/*
 *  Plik:         pierscien1.c
 *  Autor:        Aleksy
 *  Data:         05.12.1998
 *  Last Update:  05.12.1998
 *  Opis:         Moj pierscionek.
 */

inherit "/std/armour";

#include "/d/Imperium/sys/alarm.h"
#include <stdproperties.h>
#include <wa_types.h>
#include <formulas.h>
#include <macros.h>

void
create_armour()
{
    ustaw_nazwe(({"pierscien", "pierscienia", "pierscieniowi",
                  "pierscien", "pierscieniem", "pierscieniu"}),
                ({"pierscienie","pierscieni", "pierscieniom",
                  "pierscienie", "pierscieniami", "pierscieniami"}),
                  PL_MESKI_NOS_NZYW);

    dodaj_przym("mithrylowy", "mithrylowi");
    dodaj_przym("zdobiony", "zdobieni");

    add_prop(OBJ_M_NO_DROP, "Sily najwyzsze nie pozwolaja "
	+ "pozwyc sie mithrylowego pierscienia.\n");
    
    set_long("Widzisz przed soba wspanialej roboty mithrylowy pierscien. "
	+ "Ktos mial nadzwyczaj wielka wyobraznie przy jego robieniu. "
	+ "Na jego wierzcholku widzisz ogromny brylant blyszczacy "
	+ "nawet przy slabym ledwo widocznym swiecie. Z brylantu tego "
	+ "zostal wyrzezbiony maly zamek z najdrobniejszymi szczegolami. "
	+ "Z tylu widac jakis napis, moze udaloby sie go przeczytac.\n");
    set_ac(A_ANY_FINGER, 0, 0, 0);
  
    add_cmd_item("napis", "przeczytaj",
	  "Wszystkiego najleprzego Alvinie z okazji 100 dni na Arkadii. "
	+ "Zycze Ci byc nadal Ukochanym Ojciem i Umilowanym Przywodca, "
	+ "lub cos w tym stylu. I nie zapominaj ze oproc Ciebie tez sa tu "
	+ "inni wizowie. :->\n");

    set_alarm(1000.0, 5.0, "NAGLE !!! ... z glebi brylanta wydobywa sie "
	+ "czerwony promien "
	+ "i wyrywa jakis przedmiot zciemnosci. Za moment znika niepozostawiajac "
	+ "zadnego sladu po sobie. Nie byles w stanie wychwicic swoimokiem "
	+ "tamten przedmiot. Moze nastepnym razem sie uda.\n");
    set_alarm(200.0, 15.0, "Pierscien promienieje czerwonym swiatlem.\n");
    set_alarm(300.0, 20.0, "Czujesz fale ciepla ktora wydobywa sie w brylanta.\n");
    set_alarm(600.0, 40.0, "Pierscien nagle sie przekreca na twoim paluszku. Czujesz sie "
	+ "o wiele lepiej niewiadomo dlaczego.\n");
    set_alarm(500.0, 50.0, "Czujesz jak przecina cie energia. Zdaje ci sie ze caly swiat "
	+ "stoi teraz pod twoimi stopami i mozesz robic z nim co tylko chcesz.\n");

    add_prop(OBJ_I_VALUE, 10);
    add_prop(OBJ_I_WEIGHT, 2);
    add_prop(OBJ_I_VOLUME, 2);
}

string
query_recover()
{
    return 0;
}

/* string
 * query_auto_load()
 * {
 *   return MASTER;
 * }
 */