The Dink Network

I know DinkC fairly well and I've been developing here for years.

Although I'm no longer creating content for Dink Smallwood, you can check me out on twitch, twitter, youtube, and steam to see what I'm up to these days.

Follow me on Twitch
Subscribe to my YouTube channel
Follow me on Twitter
Check me out on Steam

Private Message

While making a script for animal feed (works on only ducks thus far) I've come to a problem. When I have multiple feed piles active, the ducks won't go back to being ducks until all piles are eaten. Here's the script if anyone cares to look into it.

//Animal Feed seed

void main ()
{
//so it doesn't disappear
wait(200);
sp_brain(&current_sprite,0);
sp_que(&current_sprite,-10);

//big box for attracting animals
int &top = sp_y(&current_sprite,-1);
&top -= 40;
int &bottom = sp_y(&current_sprite,-1);
&bottom += 90;
int &left = sp_x(&current_sprite,-1);
&left -= 50;
int &right = sp_x(&current_sprite,-1);
&right += 90;

//smaller 'feeding' box
int &fleft = sp_x(&current_sprite,-1);
&fleft -= 20;
int &ftop = sp_y(&current_sprite,-1);
&ftop -= 20;
int &fright = sp_x(&current_sprite,-1);
&fright += 20;
int &fbottom = sp_y(&current_sprite,-1);
&fbottom += 20;

int &box;
int &duck;
int &dx;
int &dy;
int &count = 100;

//check for animals near feed to be attracted
duckcall:
wait(75);

&duck = get_rand_sprite_with_this_brain(3,0);
&dx = sp_x(&duck,-1);
&dy = sp_y(&duck,-1);
&box = inside_box(&dx,&dy,&left,&top,&right,&bottom);
if (&box)
{
if (sp_target(&duck,-1) == 0)
{
if sp_gold(&duck,-1) == 0)
{
//brain 9 needed for targeting
sp_brain(&duck,9);
sp_target(&duck,&current_sprite);
}
}
}

//feed depletion
&duck = get_rand_sprite_with_this_brain(9,0);
&dx = sp_x(&duck,-1);
&dy = sp_y(&duck,-1);

if (sp_target(&duck,-1) == &current_sprite)
{
&box = inside_box(&dx,&dy,&fleft,&ftop,&fright,&fbottom);
if (&box)
{
//say("<Nom>",&duck);
&count -= 1;
}
}

//it shrinks!
sp_size(&current_sprite,&count);

if (&count > 1)
goto duckcall;

//fixing brains and go back to business
&duck = 0;
reduck:
wait(25);
&duck = get_next_sprite_with_this_brain(9,0,&duck);
if (sp_target(&duck,-1) == &current_sprite)
{
//Target feed? It's a duck!
sp_brain(&duck,3);
//say("imaduck",&duck);
}
if (&duck > 0)
goto reduck;

//byebye feed
sp_active(&current_sprite,0);
sp_kill(&current_sprite,1);
}