swing_door_open.lsl

Go to the documentation of this file.

/* \file swing_door_opener.lsl
 * \version 1.0
 * \date 
 * This script is designed to run in the Open Simulator (or Second Life) environment. The door/window
 * can be opened or closed by touch, or by remote control from the door_window_state.lsl script.
 *
 * The door/window can also be lock or unlocked by using the door_window_state.lsl script. However,  
 * the lock does not prevent the door opener from opening and/or closing a door. This is used to ensure
 * that if the control object is inside a building, a user cannot lock the doors and teleporting out, preventing
 * anyone, including the owner, from entering the building by the door.
 *
 */
 
integer COMMAND_CHANNEL_NUMBER = 0x80FFFF08;            // The Inter-Object communications Channel

string UNLOCK_NAME = "UNLOCK";

string OPEN_NAME = "OPEN";

string CLOSE_NAME = "CLOSE";

string LOCK_NAME = "LOCK";

integer UNLOCK_STATE = 0;

integer OPEN_STATE = 1;

integer CLOSE_STATE = 2;

integer LOCK_STATE = 3;

integer door_locked;

integer intSwing =-90;

rotation rotSwing;
 
vector vOffset;

float closed_angle;

integer listen_handle;

rdSwingDoor()
{
    list l = llGetPrimitiveParams([PRIM_POS_LOCAL,PRIM_ROT_LOCAL]);
    vector v = llList2Vector(l,0);
    rotation r = llList2Rot(l,1);
    llSetPrimitiveParams([PRIM_POS_LOCAL,v-(vOffset-vOffset * rotSwing)*r, PRIM_ROT_LOCAL,rotSwing*r]);
    rotSwing.s*=-1;
}

//default

class default
{

    state_entry()
    {
        rotSwing = llEuler2Rot(<0.0,0.0,(float)intSwing>*DEG_TO_RAD);  //90 degress on the z axis
        closed_angle = rotSwing.s;
 
        vector size = llGetScale();
        vOffset = <(size.x*0.45),(size.y*0.5),0.0>;
 
        door_locked = FALSE;
        
        listen_handle = llListen(COMMAND_CHANNEL_NUMBER, "", "", ""); // Open the Communications Channel
    }
    
    listen(integer ChannelNumber, string Name, key Id, string Message)
    {
        if (Message == UNLOCK_NAME)
        {
            door_locked = FALSE;                
        }
    else if ((Message == OPEN_NAME) && !door_locked)
    {
      if (rotSwing.s == closed_angle) rdSwingDoor();
      }
      else if ((Message == CLOSE_NAME) && !door_locked)
      {
        if (rotSwing.s != closed_angle) rdSwingDoor(); 
      }
      else if (Message == LOCK_NAME)
      {
        door_locked = TRUE;
        if (rotSwing.s != closed_angle) rdSwingDoor(); 
      }
    }

    touch_start(integer total_number)
    {
          if ( !door_locked || (llDetectedKey(0) == llGetOwner()) )
      {
              rdSwingDoor();
      }
      else
      {
        llWhisper(PUBLIC_CHANNEL, "This door is currently locked.");
      }
    }
    
    collision_start(integer total_number)
    {
        if (rotSwing.s != closed_angle)
        {
            llWhisper(PUBLIC_CHANNEL, "PLEASE BE CAREFUL! This door is already open."); 
        }
        else if ((llDetectedKey(0) == llGetOwner()) || !door_locked)
        {
            rdSwingDoor();
        }
        else
        {
      llWhisper(PUBLIC_CHANNEL, "PLEASE BE CAREFUL! This door is currently locked.");
        }
    }
}