Script for wings from a novice's perspective

   
  1\   /1
    \ /
 2-------2
    / \
   /   \
  3     3

integer X = 1;  // whichever wing prim I'm a part of
default
{
link_message(integer sender,integer num,string str, key id)
    {
      if (num == X)
      {
        llSetAlpha(ALL_SIDES,1.0);
       }
      else
       {
         llSetAlpha(ALL_SIDES,0.0);
        }
     }
}

//WING PRIM SCRIPT
integer WINGNUM = 1; //Change this depending on which wing this prim is part of.

default
{
	link_message(integer sender_num, integer num, string str, key id)
	{
		if (num == WINGNUM)
		{
			llSetAlpha(1.0, ALL_SIDES);
		}
		else
		{
			llSetAlpha(0, ALL_SIDES);
		}
	}
}

//WING CONTROLLER SCRIPT
integer WINGNUMBER = 1;
integer UP = FALSE; 
default
{
	state_entry()
	{
		llListen(10,"","",""); //listen to owner
	}
	
	listen(integer channel, string name, key id, string message)
	{
		if (id != llGetOwner())
			return;
		
		if (llToLower(message) == "flap")
		{ //start flapping
			llSetTimerEvent(1);
			WINGNUMBER = 1;
		}
		else if (llToLower(message) == "stop")
		{ //stop flapping
			llSetTimerEvent(0);
			WINGNUMBER = 1; //Change this if you want a different wing to be the one that shows when not flapping
			llMessageLinked(LINK_SET,WINGNUMBER,"","");
		}
		
	}
	
	timer()
	{
		llMessageLinked(LINK_SET,WINGNUMBER,"","");
		if (WINGNUMBER == 3)
		{
			WINGNUMBER = 2;
			UP = TRUE;
		}
		else if (WINGNUMBER == 1)
		{
			WINGNUMBER = 2;
			UP = FALSE;
		}
		else if (WINGNUMBER == 2)
		{
			if (up)
				WINGNUMBER = 1;
			else
				WINGNUMBER = 3;
		}
	}
}

// WING CONTROLLER SCRIPT
integer TOPWING = 1;
integer BOTTOMWING = 50;
integer UP = 0;

<snip>

timer()
{
   llMessageLinked(LINK_SET,WINGNUMBER,"","");
   if (WINGNUMBER == TOPWING)
   {
      UP = 0;
   }
   else if (WINGNUMBER == BOTTOMWING)
   {
      UP = 1;
   }

   WINGNUMBER = WINGNUMBER + 1 - 2 * UP;
}

// link message brodcast counter
// timer used to create loop:  broadcasts the count on link message, count will be in a range defined by minCount and maxCount. count will count up to maxCount, then count back down to minCount. At witch point it will repeate the prossess
//this vertion will only count by 1 or -1

//global veriables
//settings
integer minCount    = 0;
integer maxCount    = 50;
//dynamic
integer count       = minCount;
integer change      = 1;

default
{
    touch_start(integer total_number)
    {
        
    }

    // time represents an iteration in a loop. Controller is count
    // note count >= maxCount  is up at the top as unnessiary error correction
    timer()
    {
        if ( count >= maxCount)
        {
            change = -1;
        }
        else if ( count <= minCount )
        {
            change = 1;
        }

        llMessageLinked ( LINK_SET, count, "", "" );

        count = count + change;
    }

}