inherit "/std/armour";
#include <wa_types.h>
#include <stdproperties.h>
#include <macros.h>
#include <formulas.h>
#include <filter_funs.h>
#include <options.h>
#include <pl.h>
#define TP              this_player()
#define TO              this_object()
void
create_armour()
{
    dodaj_nazwy(({"tarcza","tarczy",
                  "tarczy","tarcza",
                  "tarcza","tarczach"}),
                ({"tarcze","tarcz",
                  "tarczom","tarcze",
                  "tarczami","tarczach"}),PL_MESKI_NOS_NZYW);
    dodaj_przym("ogromny","ogromni");
    dodaj_przym("czarny","czarni");
    set_long("Masz przed soba ogromna czarna tarcze. " +
             "Uwazasz, ze mozesz sie nia doskonale zaslaniac " +
             "nie znajac sie na tarczownictwie. " +
             "Ogladajac ja dokladnie widzisz w srodku niej krysztal " +
             ", a na nim znak wyznawcow Malala.\n");
    add_prop(MAGIC_AM_MAGIC, ({ 50, "enchantment"}));         
    setup_shield(SH_DLUGA_RYCERSKA, 55);
    add_prop(OBJ_I_VALUE, 4000);
    this_object()->set_af(this_object());
    add_prop(OBJ_I_WEIGHT, 1000);
    add_prop(OBJ_I_VOLUME, 1000);                            
}             
mixed
wear(object armour)
{
    wearer=TP;
    write(capitalize(short(PL_MIA)) + " przylepia sie do twego ramienia.\n");
    say(capitalize(short(PL_MIA)) + " przylepia sie do ramienia " +
QCIMIE(TP,PL_DOP) + ".\n");
    return 1;
    return 1;
}
mixed
remove(object armour)
{
    object *kogo;
   
    kogo = ({TO->query_worn()});
    kogo[0]->catch_tell("Tarcza odlepia sie od twego ramienia.\n");
    say("Gdy " + QCIMIE(kogo[0],PL_MIA)+ " zdejmuje swa " +
        "tarcze swiatlo w niej przygasa.\n");
    return 1;
}