// on fail to open - gam entry room
void main()
{
   object oMe=OBJECT_SELF;
   string sTag=GetTag(oMe);
   string sID=GetStringRight(sTag,3);
   object oMod=GetModule();
   object oLead;
   if (sID=="PID") sID="SPID";
   oLead=GetLocalObject(oMod,"oTeamLead"+sID);
   if (oLead==OBJECT_INVALID)
   { // door should not be locked
     SetLocked(oMe,FALSE);
     AssignCommand(oMe,ActionOpenDoor(oMe));
   } // door should not be locked
}