Moving small linkset

integer ON = FALSE;
integer dir;
integer targetID;
float rate = 1.0; // Default setting. Movement to target takes 1 second. Reset by 
//typing a new number in channel 88 (e.g., "/88 4").

default
{
	state_entry()
	{
		llListen(88,"","","");
	}

	listen(integer channel, string name, key id, string message)
	{
		rate = (float)message;
		llSay(0,"Movement time to target now set at " + (string)rate + " seconds.");
	}
	
	touch_start(integer num)
	{
		ON = !ON;
		if(ON) //Click to start
		{
                                                dir = 1; // Forces first movement to be UP
                                                llSetStatus(STATUS_PHYSICS,TRUE);
			llSetTimerEvent(rate+1.0); // Initiate each new move 1
// second after the last movement ends
		}
		else // Click to stop
		{
                                                llSetStatus(STATUS_PHYSICS,FALSE);
			llSetTimerEvent(0); // Stops movement
		}
	}

	timer()
	{
                                targetID = llTarget(llGetPos()+(< 0,0,2> * dir),0.2);
		llMoveToTarget(llGetPos()+(< 0,0,2> * dir), rate); // Sets the 
//target to 2m above (below) current position
                }

                at_target(integer tnum, vector targetpos, vector ourpos)
               {
		llStopMoveToTarget();
                                llTargetRemove(targetID);
		dir = -dir; //Reverse direction on subsequent moves.
	}
}

integer target;
vector offset = <0.0,0.0,1.25>;
vector tpos;
integer onoff = TRUE;
float speed = 2.0;//meters per second

newtarget()
{
    tpos = llGetPos() + offset;
    target = llTarget(tpos,0.01);
    llMoveToTarget(llGetPos() + offset,llVecDist(llGetPos(), tpos)*speed);
}

default
{
    state_entry()
    {
        llSetStatus(STATUS_PHYSICS|STATUS_PHANTOM,TRUE);
        llSetStatus(STATUS_ROTATE_X|STATUS_ROTATE_Y|STATUS_ROTATE_Z,FALSE);
    }
    
    touch_start(integer num)
    {
        if(onoff){newtarget();}
        else{llResetScript();}
        onoff = !onoff;
    }

    at_target(integer tnum,vector targetpos, vector mypos)
    {
        llOwnerSay("Here");
        llTargetRemove(target);
        llStopMoveToTarget();
        offset = -offset;
        newtarget();
    }
    
    not_at_target()
    {
        llMoveToTarget(tpos,llVecDist(llGetPos(), tpos)*speed);
    }
}

state_entry()
{
llSetStatus(STATUS_PHYSICS|STATUS_PHANTOM,FALSE);
llSetStatus(STATUS_ROTATE_X|STATUS_ROTATE_Y|STATUS _ROTATE_Z,FALSE);
}

touch_start(integer num)
{
if(onoff){
llSetStatus(STATUS_PHYSICS|STATUS_PHANTOM,TRUE);
newtarget();}
else{llResetScript();}
onoff = !onoff;
}

integer ON = FALSE;
integer dir;
integer targetID;
float rate = 1.0; // Default setting. Movement to target takes 1 second. Reset by
//typing a new number in channel 88 (e.g., "/88 4").

default
{
       state_entry()
       {
               llListen(88,"","","");
               llSetStatus(STATUS_PHYSICS,FALSE);
       }

       listen(integer channel, string name, key id, string message)
       {
               rate = (float)message;
               llSay(0,"Movement time to target now set at " + (string)rate + " seconds.");
       }

       touch_start(integer num)
       {
               ON = !ON;
               if(ON) //Click to start
               {
                    dir = 1; // Forcesfirst movement to be UP
                    llSetStatus(STATUS_PHYSICS,ON);
                    llSetRot(ZERO_ROTATION);
                    llSetStatus(STATUS_ROTATE_X | STATUS_ROTATE_Y | STATUS_ROTATE_Z,FALSE);
                    targetID = llTarget(llGetPos()+(<0,0,2> * dir),0.1);
                    llMoveToTarget(llGetPos()+(< 0,0,2> * dir), rate); 
               }
               else // Click to stop
               {
                    llTargetRemove(targetID);
                    llSetStatus(STATUS_PHYSICS,ON);
               }
       }

        not_at_target()
        {
            llMoveToTarget(llGetPos()+(< 0,0,2> * dir), rate); 
        }
            

        at_target(integer tnum, vector targetpos, vector ourpos)
        {
            llStopMoveToTarget();
            llTargetRemove(targetID);
            dir = -dir; //Reverse direction on subsequent moves.
            targetID = llTarget(llGetPos()+(<0,0,2> * dir),0.1);
            llMoveToTarget(llGetPos()+(< 0,0,2> * dir), rate); 
        }
}

vector startPos;
integer ON = FALSE;
default
{
    state_entry()
    {
        startPos = llGetPos();  // Figure out where the object is to start
    }
    
    on_rez(integer start_param)
    {
        llResetScript(); // Always start with a clean slate
    }
    
    touch_start(integer total_number)
    {
        ON = !ON;
        if (ON)
        {
            llSetTimerEvent(30);  // Activate timer every 30 seconds. This means the object will be DOWN most of the time.
        }
        else
        {
            llSetTimerEvent(0);  //Stop the timer
        }
    }
    
    timer()
    {
        integer i;
        for (i=0;i<=20;i++)  // Rise in 20 steps of 0.5m each = 10m, starting at startPos.
        //Starting the rise each time at startPos guarantees that the object will always start at its base position with each timer cycle.
            {
                llSetPos(startPos + <0,0,0.5> * i); 
            }
        for (i=0;i<=20;i++)  // Go back down in 20 steps of 0.5m each.
            {
                llSetPos(llGetPos() - <0,0,0.5> * i);
            }
    }

}
CODE