#include <filter_funs.h>



/*int
spojrz(string str)
{
    object *oblist;
    
    oblist = parse_this(str,"'na' %l:"+PL_DOP);

	if (!sizeof(oblist)) return notify_fail("Na kogo chcesz spojrzec ?\n");
	
	actor("Rogladasz sie z pogarda wokol siebie czujac niepohamowana rzadze krwi. "+
		  "Wtem twoj wzrok przykuwa postac ",oblist,PL_DOP,", w ktorej z pewnym niedowierzaniem "+
		  "dostrzegasz godnego siebie przeciwnika. ");
	target("ze znudzeniem na twarzy rozglada sie wokol. Nagle zatrzymuje sie "+
			"na tobie i wykrzywia twarz w szyderczym usmiechu. W  oczach widzisz "+
			"palajaca rzadze krwi.",oblist);
	all2act("rozglada sie wokol z pogarda na twarzy. Nagle usmiecha sie szyderczo do "+
		    "",oblist,PL_DOP,", a +gracz->koncowka("jego","jej") oczy otwieraja sie szerzej, "+
			"widzisz w nich niepohamowana chec walki.");

	return 1;
        
}

int
przeklnij(string str)
{
    object *oblist;
    
    oblist = parse_this(str,"'' %l:"+PL_DOP);

	if (!sizeof(oblist)) return notify_fail("Kogo chcesz przeklnac ?\n");
	
	actor("Twoj wzrok staje sie lodowaty. Powoli unosisz lewa dlon w kierunku ",oblist,PL_DOP,", "+
          "przeklinajac +gracz->koncowka("go","ja") w Imie Tzeentha.");
	all2act("wpatruje sie w ",oblist,PL_DOP,". Powoli unosi lewa dlon w  kierunku, "+ 
		  "przeklinajac w Imie Tzeentha.");
	target("wpatruje sie uwaznie w ciebie, a jego wzrok staje sie lodowaty. Powoli unosi lewa "+
		   "dlon w twoim kierunku, przeklinajac cie w Imie Tzeentha.", oblist);
	return 1;
        
}*/

int 
dobro()
{
    write("Ze wsciekloscia i grymasem na twarzy przeklinasz wszystko co dobre.\n");
    allbb("z odrazajacym wyrazem twarzy przeklina dobro.");
    return 1;
}

int 
ujawnij(string str)
{
	if (!str && str!="sie") 
	return notify_fail("Chyba: tzujawnij [sie].\n");
    write("Wyrzucasz rece w gore wychwalajac wielkosc Tzeentha.\n");
    allbb("wyrzuca rece w gore wychwalajac wielkosc i zlo Tzeentha.");
    return 1;
}

int
wykrzyw(string str)
{
	if (!str && str!="sie") 
	return notify_fail("Chyba: tzwykrzyw [sie].\n");
	all("wykrzywia twarz w przerazajacym grymasie bolu i cierpienia, ktory zdaje sie mu sprawiac przyjemnosc.");
	write("przybierasz odrazajaca maske bolu i cierpienia.\n");
	return 1;
}


int 
smiech()
{
    write("Wybuchasz histerycznym, urywanym smiechem, ktory mrozi krew w zylach kazdej zywej istoty.\n");
    allbb("wybucha niepohamowanym histerycznym, zrywanym smiechem, ktory przyprawia cie o ciarki.");
    return 1;
}

int 
krzyk()
{
    write("Wydajesz z siebie budzacy groze, straszliwy ryk bojowy, nie majacy nic "+
		  "wspolnego z zadnym z ziemskich odglosow, a przyprawiajacy twoich wrogow o "+
		  "dreszcz strachu.");
    allbb("wydaje z siebie budzacy groze, straszliwy ryk bojowy, nie majacy nic "+
		  "wspolnego z zadnym z ziemskich glosow, a wzbudzajacy przerazenie.");
	
	return 1;
}

int
pomoc(string str)
{
	write("Dodatkowe komendy wyznawcow Tzeentcha:\n"+
	"\t- mczasmiej sie\n"+
	"\t- mcnienawisc\n"+
	"\t- mcwykrzyw sie\n"+
	"\t- mcujawnij sie\n"+
	"\t- mcspojrz [na kogo]\n"+
	"\t- mcprzeklinij [kogo]\n"+
	"\t- mckrzyknij\n\n"+
        "\tCzary:\n"+
        "\t-mckula [kogo]\n"+
        "\t-mcnaszpikuj [kogo]\n"+         
        "\t-mcciemnosc\n"+
        "\t-mcprzywolaj [balroga/horde]\n"+
        "\t-mctell\n\n"+
	    return 1;
}

init_emoty()
{
	add_action(krzyk,"mckrzyknij");
	add_action(dobro,"mcnienawisc");
	add_action(ujawnij,"mcujawnij");
	add_action(spojrz,"mcspojrz");
	add_action(przeklnij,"mcprzeklnij");
	add_action(wykrzyw,"mcwykrzyw");
	add_action(smiech,"mczasmiej");
	add_action(pomoc,"mcpomoc");
}
