inherit "room/room";

reset(arg) {
    if (arg) return;

    set_light(1);
    short_desc = "Arena";
    no_castle_flag = 0;
    long_desc = 
        "The arena.\n"
        + "Player killing is allowed in this room, so be warned..\n"
        + "also, only players of levels 20 or higher can fight here.\n"
        + "although since this is not a gladiators arena, you can leave\nduring a fight.\n";
    dest_dir = 
        ({ "players/jubal/room/arenaent", "west"
        });
}

init() {
   add_action("kill", "kill");
   ::init();
   }

kill(str) {
  object ob;
  string name;

  str=lower_case(str);
  name=capitalize(str);
  if(this_player()->query_level()<20) return 0;
  if(!str) return write("Kill what?\n");
  if(!(ob=find_player(str)) && !(ob=find_living(str))) {
     write(name+" is not a living thing !\n");
     say(this_player()->query_name()+" tries foolishly to attack "+name+".\n");
     return 1;
  }
  if(ob==this_player()) return write("What? Attack yourself?\n");

  if(!present(ob,this_object())) return write(name+" isn't here.\n");
  if(ob->query_level()<20) return write(name+" is too low level to attack.\n");
  this_player()->attack_object(ob);
  return 1;
}