inherit "/std/door.c";
#include <std.h>
#include <pl.h>

#define TP this_player()

void create_door()
{
  set_door_id ("d_z_kanalu_do_wiezy");
  set_pass_command (({"d","dol"}));
  set_pass_mess ("przez klape na dol");
  set_fail_pass("Nie mozesz przejsc przez zamknieta klape.\n");
  
  set_close_command ("zamknij");
  set_open_command ("otworz");

  set_close_mess (({"zatrzaskuje zardzewiala klape.\n","Klapa w suficie zatrzaskuje sie z glosnym hukiem.\n"
      ,"Zamkn"+TP->koncowka("ales","elas")+" klape.\n"}));
  set_fail_close("Klapa jest juz zamknieta.\n");

  set_open_mess (({"otwiera zardzewiala klape.\n","Slyszysz glosne skrzypniecie i widzisz, ze klapa w suficie sie otworzyla.\n",
      "Otworzyl"+TP->koncowka("es","as")+" klape.\n"}));
  set_fail_open("Klapa jest juz otwarta.\n");

  set_pass_mess ("przez klape na dol");

  ustaw_nazwe ( ({"klapa","klapy","klapie","klape","klapa","klapie"}),
      ({"klapy","klap","klapom","klapy","klapami","klapach"}), PL_ZENSKI);
  dodaj_przym ("zardzewialy","zardzewiali");

  set_other_room ("/d/Imperium/Nuln/kanaly/kan_pod_wieza.c");
  set_door_desc ("Jest to brudna, oslizla, metalowa klapa, prowadzaca gdzies w dol.\n");
  set_open_desc ("Widzisz otwarta, brudna klape, pod ktora znajduje sie pionowy szyb"
  +" z wbitymi metalowymi klamrami prowadzacymi na dol.\n");
  set_closed_desc ("Na podlodze znajduje sie brudna klapa do kanalow.\n");
  set_open (0);
  
  set_locked(0);
  set_lock_name("");
  set_lock_desc("");
  set_lock_command("");
  set_unlock_command("");
  
}