#=====
# Written By DSLS_DeathSythe (5/29/03)
# RotateDoor01.COG
# -Makes a door rotate to open.
# -does not close the door until it is activated again.
#=====
symbols
#-----
message   activated
message   arrived
thing     door=-1
flex      moveTime=1.0
int       door_pos=0     local
int       is_moving=0     local
#-----
end
#=====
code
#-----
activated:
  if(is_moving == 1) return;
  if(GetSenderRef() != door) return;
  is_moving = 1;
  if(door_pos == 0)
    RotatePivot(door, 1, moveTime);
  else
    RotatePivot(door, 1, -moveTime);
return;
#-----
arrived:
  is_moving = 0;
  if(door_pos == 0)
    door_pos = 1;
  else
    door_pos = 0;
return;
#=====
end