Teleport in the same sim

//Problem : very old and doesn't work for more than 300 meters or less. Better uese llSetRegionPos

vector targetPos = <137.0,143.0,1100.0>; //The target location

reset()
{
    vector target;

    target = (targetPos- llGetPos()) * (ZERO_ROTATION / llGetRot()); //to change from global to local. zero rotation is actually equal to 1
    llSitTarget(target, ZERO_ROTATION);
    llSetSitText(llGetObjectName());
}
default
{
    state_entry()
    {
        reset();
    }

    on_rez(integer startup_param)
    {
        reset();
    }

    changed(integer change)
    {
        llUnSit(llAvatarOnSitTarget());
        reset();
    }
}