#pragma strict_types

inherit "/std/armour";
#include "szturmix.h"
#include "emot.h"
#include "spec.h"
#include "uspokoj.h"
void
create_armour()
{
    ustaw_nazwe(({"pas", "pasa", "pasem", "pas", "pasie", "pasem"}),
                ({"pasy", "pasow", "pasom", "pasy", "pasom", "pasami"}),
                PL_MESKI_NOS_NZYW);
    dodaj_przym("czarny","czarni");
    dodaj_przym("skorzany", "skorzani");

    add_name("pas_obr");

    add_prop(OBJ_M_NO_SELL, "F U C K\n");
    add_prop(OBJ_M_NO_DROP, "F U C K\n");
    add_prop(OBJ_M_NO_GIVE, "F U C K.\n");
    
    set_long("@@sygnetdesc");
    set_ac(A_WAIST,10,10,10);
    this_object()->set_af(this_object());	/* Aby byly wywolywane wear(), remove(). */
    
    add_prop(OBJ_I_VALUE, 10);
    add_prop(OBJ_I_WEIGHT, 2);
    add_prop(OBJ_I_VOLUME, 2);
    TP->add_prop("szefu_midd",1);
    TP->add_prop("obronca_midd",1);
    TP->add_prop("moze_popierac",1);
}
int no_way(string what)
{
   if (what=="pas")
       {
             write("Pierdol sie. Obronca sie nigdy nie rozbiera.\n");
             say(QCIMIE(this_player(),PL_MIA)+" proboje sie pierdolic.\n");
             return 1;
       }
  return 0;
}

void init()
{
   ::init();
   add_action(no_way, "zdejmij");
   add_action("bij","obrjebnij");
   add_action("uspokoj","obruspokoj");

        add_action("wita","obrpowitaj");
        add_action("zegna","obrpozegnaj");
        add_action("pomoc","obrpomoc");
        init_emoty();
}
void
leave_env(object from, object to)
{
    this_player()->remove_subloc(PAS_SUBLOC);

    ::leave_env(from, to);
}

string
show_subloc(string subloc, object on_obj, object for_obj)
{
    if (subloc == PAS_SUBLOC)
    {
        if (for_obj == on_obj)
        return "Ten pas oznacza, ze jestes Mistrzem Obroncow.\n";
        return "Ma na sobie pas, jaki nosza Mistrzowie Obroncow Middenheim.\n";
    }
}

mixed
wear()
{
    this_player()->add_subloc(PAS_SUBLOC, this_object());

    return 0;
}

mixed
remove()
{
    this_player()->remove_subloc(PAS_SUBLOC);

    return 0;
}


string
query_recover()
{
    return 0;
}

string
query_auto_load()
{
    return MASTER;
}

string
sygnetdesc()
{
    return "Jest to szeroki pas. Pas ktorego powinnienes strzec jak oka w glowie. Charakteryzuje "
	+"on twoja przynaleznosc do Obroncow Middenheim. Mozesz rowniez skorzystac z pomocy tego pasu <obrpomoc>. "
	+"Nos go z duma!\n";
} 


