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("krysztalowy","krysztalowi");
    dodaj_przym("blekitny","blekitni");
    set_long("Bardzo dziwny przedmiot. Tarcza zrobiona z jakiegos " +
             "blekitnego krysztalu. Jest przezroczysta i nawet " +
             "nie wiesz jak ja zalozyc. Chociaz, nie zaszkodzi " +
             "sprobowac. Jasne smugi swiatla wydaja sie byc zatopione " +
             "w krysztale.\n");
    add_prop(MAGIC_AM_MAGIC, ({ 50, "enchantment"}));         
    setup_shield(SH_DLUGA_RYCERSKA, 45);
    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;
}