/* obiekt sluzy do ladowania i inicjalizacji innych
*  obiektow, zaraz po reboot'cie.
*  napisane przez Alfena
*/

#pragma no_clone

inherit "/std/domain_link";


public void
preload_link()
{
  preload("/d/Imperium/std/room/kalendarz");
  preload("/d/Imperium/obj/alarm.c");
  preload("/d/Imperium/obj/void.c");
  preload("/d/Imperium/std/room.c");
  preload("/d/Imperium/std/monster.c");
  preload("/d/Imperium/std/weapon.c");

  preload("/d/Imperium/Nuln/sklepy/karczma1");
  preload("/d/Imperium/Nuln/sklepy/str_s1");
  preload("/d/Imperium/Nuln/sklepy/str_aa1");
  preload("/d/Imperium/Nuln/sklepy/straz_1");
  preload("/d/Imperium/Nuln/sklepy/strfa1");

  preload("/d/Imperium/Nuln/lokacje/placyk");
  preload("/d/Imperium/Nuln/lokacje/glowna3");

  preload("/d/Imperium/Varn/lokacje/przystan4");

  preload("/d/Imperium/Kreutz/sklepy/straznica");
  preload("/d/Imperium/Kreutz/garnizon/pok_kap");

  preload("/d/Imperium/Kreutz/Kreutz-Nuln/trakt11");
  
  preload("/d/Imperium/Szare/Ogry/obj/ogry_poison");
  preload("/d/Imperium/Szare/Ogry/engine/paraliz_jedzenie");
  preload("/d/Imperium/Szare/Ogry/obj/ogry_szczatki");
  
  preload("/d/Imperium/Loren/Lelfy/chata");
  preload("/d/Imperium/Loren/fryzjer/konf_fryz");
  preload("/d/Imperium/Loren/fryzjer/fryzura");
  
  preload("/d/Imperium/Pustkowia/rownina/r138"); // by Tanis 
                                                 // To jest lokacja, do ktorej dochodzi
                                                 // trakt z Averlandu
  preload("/d/Imperium/Pustkowia/obj/lok_bandy");
  
  preload("/d/Imperium/Straz/admin");
  preload("/d/Imperium/Klan/engine/engine");
  preload("/d/Imperium/Rodzina_Ragazzi/engine/engine");
  preload("/d/Imperium/Wyspa/Khainowcy/engine/engine");

}

void
armageddon()
{
    ("/d/Imperium/Nuln/sklepy/gielda")->remove_object();
    ("/d/Imperium/Nuln/swiatynie/sigmar4")->remove_object();
    ("/d/Imperium/Nuln/sklepy/apteka")->remove_object();
    ("/d/Imperium/Kreutz/sklepy/zielarnia")->remove_object();
    ("/d/Imperium/Loren/sklepy/zielarnia")->remove_object();
    ("/d/Imperium/Zakon/engine/zakon")->remove_object();
    ("/d/Imperium/Loren/Lelfy/strazniks")->remove_object();
    ("/d/Imperium/Pustkowia/obj/lok_bandy")->remove_object();
}

public void
delete_name(string name=0) /*Jesli jest imie, to kasujemy 
				1 gracza, jesli nie ma, to
				oczyszczamy adminobj'ty */
{

   ("/d/Imperium/Loren/Lelfy/gildia")->usun_skasowanych_graczy(name);
   // Ta funkcja sama sobie rozpoznaje czy jest imie czy nie ma...

   if (stringp(name))
      {
   ("/d/Imperium/Szare/Ogry/engine/g")->remove_imie(name);
   ("/d/Imperium/zakon/engine/zakon")->kasuj_imie(name);
      }
   else
      {
      ("/d/Imperium/Szare/Ogry/engine/g")->sprawdz_imiona();
      ("/d/Imperium/zakon/engine/zakon")->czystka();
      }
}