The script opens and closes the door. 
// ********** USER SETTINGS HERE **********
// automatically close the door after this 
// many seconds, set to 0 to disable
float TIMER_CLOSE = 5.0; 
// direction door opens in. Either 1 
// (outwards) or -1 (inwards);
integer DIRECTION = -1; 
// ********** END OF USER SETTINGS **********
integer DOOR_OPEN = 1;
integer DOOR_CLOSE = 2;
vector mypos; // starting pos of the door
door(integer what) 
{
rotation rot;
rotation delta;
llSetTimerEvent(0); // kill any running timers
if ( what == DOOR_OPEN ) 
{
llTriggerSound("Door open", 0.8);
rot = llGetRot();
delta = llEuler2Rot(<0, 0, -DIRECTION * PI_BY_TWO>);
rot = delta * rot; 
// rotate by -45 degree
llSetRot(rot); 
} 
else if ( what == DOOR_CLOSE) 
{
rot = llGetRot();
delta = llEuler2Rot(<0, 0, DIRECTION * PI_BY_TWO>); 
// rotate by 45 degree
rot = delta * rot;
llSetRot(rot);
llTriggerSound("Door close", 0.8);
}
}
default // closed 
{ 
on_rez(integer start_param) 
{ 
// reset, so we store the new position
llResetScript();
}
state_entry() 
{
// remember where we're supposed to be
mypos = llGetPos(); 
}
touch_start(integer total_number) 
{
door(DOOR_OPEN);
state is_open;
}
// done moving me around, store new position
moving_end() 
{ 
mypos = llGetPos();
}
}
state is_open 
{
state_entry() 
{
llSetTimerEvent(TIMER_CLOSE);
}
touch_start(integer num) 
{
door(DOOR_CLOSE);
llSetPos(mypos); 
state default;
}
timer() 
{ 
// time to close the door
door(DOOR_CLOSE); 
llSetPos(mypos); 
state default;
}
moving_start() 
{ 
// close door when door is being moved
door(DOOR_CLOSE);
state default;
}
}