string secur;

#define ALLOWED ({"jubal","valentine","jezz","timothee","arnealia","addey", \
                 })

/* in reset..  if arg then reset_secur() */
reset_secur(defaultval) {
  if((!defaultval || defaultval=="on") && secur!="off") secur="on";
  else if(defaultval && defaultval=="off" && secur!="on") secur="off";
}

query_secur() { return secur; }

do_secur(out) {
  if(secur=="on" && member_array(this_player()->query_real_name(),ALLOWED)==-1){
     write("Jubal's Security won't let you inside.\n");
     say("Jubal's Security kicks "+this_player()->query_name()+
         " out of the room.\n");
     move_object(this_player(), out);
     return;
     }

  if(this_player()->query_real_name()=="jubal") {
    add_action("security","security");
    add_action("security","secur");
  }

}

security(arg) {
  int i;

  if(arg=="on") {
    say("Jubal's Security walks into the room.\n");
    write("Jubal's Security walks into the room.\n");
    secur="on";
    reset();
    return 1;
  }
  if(arg=="off") {
    say("Jubal's Security takes off for lunch.\n");
    write("Jubal's Security takes off for lunch.\n");
    secur="off";
    reset();
    return 1;
  }
  if(arg=="list") {
    write("Allowed: \n");
    for(i=0;i<sizeof(ALLOWED);i++)
      write("  "+ALLOWED[i]);
    write("\n");
    return 1;
  }
  write("Usage: security <on||off||list>\n");
  return 1;
}