inherit "/d/Imperium/Kraina/std/halfling";
inherit "/d/Imperium/std/golebnik";
#include <pl.h>
#include <stdproperties.h>
#include <macros.h>
#include <formulas.h>
#include <ss_types.h>
#include <money.h>
#define TO      this_object()
#define TP      this_player()
void
create_halfling()
{
    ustaw_imie(({"praalg","praalga","praalgowi","praalga","praalgiem","praalgu"}), PL_MESKI_OS);                
    set_long("Niski, dlugonosy halfling wyglada jakby cale zycie spedzil w tym jednym "+
             "pokoju. Ma na sobie zuzyte ubranie, ktore wyglada, jakby kolor nadaly "+
             "mu golebie odchody. Kreci sie nerwowo wkolo, co chwile podchodzi do "+
             "stolika, bierze troche karmy i daje ja ptakom.\n");
    dodaj_przym("dlugonosy","dlugonosi");
    dodaj_przym("usmiechniety","usmiechnieci");
    
    set_gender(G_MALE);
      
    add_act("emote sprzata klatki z golebiami.");
    add_act("emote karmi golebie.");
    add_act("emote czule spoglada na swoje golebie.");
    add_act("emote pyta: Moze potrzeba golebia?");
    add_act("emote mowi: Moge wypozyczyc bardzo dobre golebie.");
    add_act("emote mowi: Moje golebie moga dotrzec prawie wszedzie.");
        
    
    add_cchat("Ratunku!");
    add_cchat("Sigmarze! uratuj nas!");
    
    set_alignment(230);
    config_default_trade();
}
void init_living()
{
   init_pigeon_trade();
   ::init_living();
}  
string
query_presentation()
{
    return"Praalg, Golebiarz z Altdorfu, halfling";
}
void
add_introduced(string imie)
{
    set_alarm(2.0,0.0,"return_intro", imie);
}
varargs void 
return_intro(string kto)
{
    command("przedstaw sie " + find_player(kto)->query_real_name(PL_CEL));
}