inherit "/d/Imperium/Varn/kopalnie/stdroom.c";
#include "local.h"

object ob1,ob2,ob3,ob4;

create_varn_room() 
{
set_short("Chodnik w kopalni");
set_long("Znajdujesz sie wlasnie w slepej odnodze chodnika. W tym "+
"miejscu znajdowalo sie przejscie na nizszy poziom kopalni. Szyny, biegnace "+
"po podlodze chodnika koncza tutaj swoj bieg. Strop tworza "+
"potezne masy ziemi, niebezpiecznie napierajace na podpierajace je "+
"drewniane belki.\n");
add_prop(ROOM_I_LIGHT, 1);
add_exit(PATH + "kopalnia3w.c", "wschod", 0);
add_item( ({ "szyne", "szyny" }),
"Szyny, niegdys sluzace do transportu wagonikow, koncza swoj bieg w "+
"tym miejscu.\n");
add_item( ({ "belke", "belki" }) ,                                      
             "Potezne belki od wiekow podtrzymuja strop. Jednak i one "+
             "nie oparly sie uplywowi czasu. Sa juz mocno sprochniale "+
             "i popekane. Nie sprawiaja wrazenia mocnych.\n");          
add_item( ({ "strop", "masy ziemi" }) ,                                 
             "Strop kopalni tworza potezne masy ziemi. Napieraja one "+ 
             "niebezpiecznie na podpierajace je belki. Moga w kazdej "+ 
             "chwili runac na ciebie, pozostawiajac cie w tej kopalni "+
             "juz na zawsze.\n");                                       

    reset_imperium_room();

    dodaj_npca(VARN + "npc/rep_o.c");
    dodaj_npca(VARN + "npc/rep_o.c");
    
}                                                                       

void
reset_imperium_room()
{
  if(!ob1)
  {
    ob1 = clone_object(VARN + "npc/wodz.c");
    if(!ob2)
    {
        ob2 = clone_object(VARN + "npc/toporb.c");
        ob2 -> move(ob1);
        ob1 -> command("dobadz topora");
    }
    else
    {
        ob3 = clone_object(VARN + "npc/topor_3.c");
        ob3 -> move(ob1);
        ob1 -> command("dobadz topora");
    }        
    ob1->move(this_object());
  }
}