position script good for unlinked doors

//sends a string position (vector) and rotation to "set position" script
default
{
     touch_start(integer total_number)
    {
 llSay(1101, (string)llGetPos() + ";" + (string)llGetRot() );
}
}
CODE


            --------------------------------------------------------------------------------------
set position script

CODE

//Prim Movement Script
//Billy Islander Feb.2008
//
//With greatest of thanks to rotation guru Nava Muni for his patience and help with this script.
//
//feel free to modify ,distribute , use in your builds , if you paid for this script IM me Billy Islander

// Sets the position of a prim or linkset relative to another keeping rotations and offsets intact.

vector myoffset = <0.0,-0.286,0.22>; // difference between x,y,z co-ordinates of controller(doorframe) and door (root prim ,point of rotation) 
default
{
    state_entry()
    {
        
       integer handle = llListen( 1101, "controller", NULL_KEY, "" ); /// rename controller to  the name of the object containg the contoller script

  }
    
    listen(integer channel, string name, key id, string msg)
    {
        // "msg"  received from controller is a vector and rotation separated by a ";"
        // split these "two pieces" into a list for easy access

        list pos_and_rot = llParseString2List( msg, [";"], [] ); 


        // take the first list element and convert it from a string to a vector 
        vector mynewvector = (vector)llList2String( pos_and_rot, 0 ); // 0 is 1st list element


        // take the second list element and convert it from a string to a rotation
        rotation mynewrotation = (rotation)llList2String( pos_and_rot, 1 ); // 1 is 2nd list element


// llSay(0,"rotation values are" + llDumpList2String(pos_and_rot,  "1" )); // allows us to see values sent by contoller      
      
    llSetPos(mynewvector + myoffset * mynewrotation);
    llSetRot(mynewrotation);
    llSay(0,"moving to" + (string)llGetPos());
    llOwnerSay((string)llGetPos());
  }
} 
CODE

integer handle = llListen( 1101, "controller", NULL_KEY, "" );
CODE
 
 rename controller to  the name of the object containg the contoller script , hope that helps.