No Auto-Return NR

This script is released under DNSIOIWKU License, Free and Open for anyone...

//  anti return created by Jor3l Boa 
//==================================================
//  (works on blue and rausch combat region), 
//  NOTE: for red, change -5 to 5 and + 5 to -5 :)
//  this anti return needs a nearby region
//  with entry perms to work.
//==================================================
//version 0.1

//Change log:
//  - 0.1 initial release

warpPos(vector destpos) 
{ 
   llSetPrimitiveParams([PRIM_POSITION, <1.304382E+19, 1.304382E+19, 0.0>, PRIM_POSITION,destpos]);
}
integer time;

default
{
    state_entry()
    {
        llSetTimerEvent(10);
    }

    timer()
    {
        llSetTimerEvent(0);
        llSetColor(<1,0,0>,ALL_SIDES);
        vector pos = llGetPos();
            warpPos(<-5,pos.y,pos.z>);
        vector tpos = llGetPos();
            warpPos(<tpos.x + pos.x + 5,pos.y,pos.z>);
        llSetColor(<1,1,0>,ALL_SIDES);
            llSetTimerEvent(60);
        time++;
        //llSetText((string)time+" minutes\nin this region.",<1,0,0>,1.0);
    }
}