inherit "/std/armour.c";


#include <stdproperties.h>
#include <wa_types.h>
#include <formulas.h>
#include <macros.h>

create_armour()
{
   ustaw_nazwe( ({"kaftan","kaftana","kaftanowi",
                  "kaftan","kaftanem","kaftanie"}),
                ({"kaftany","kaftanow","kaftanom",
                  "kaftany","kaftanami","kaftanach"}),
                PL_MESKI_NZYW);
   
   dodaj_przym("smierdzacy","smierdzacy");
   dodaj_przym("brudny","brudni");
   
   set_long("Kaftan tez wyglada na stary i malo uzyteczny. Wydziela z siebie " +
   	    "przerazajacy zapach potu i loju zwierzecego. Jest wykonany ze berzowej skory " +
   	    "bardzo twardej i popekanej w wielu miejscach.\n");
   
   set_ac(A_BODY, 5, 6, 7, A_ARMS, 3, 4, 5);
   
   add_prop(OBJ_I_VALUE, 100);
   add_prop(OBJ_I_WEIGHT, 700);
   add_prop(OBJ_I_VOLUME, 1100);
                  
}