inherit "/std/weapon.c";
#include <macros.h>
#include <stdproperties.h>
#include <ss_types.h>
#include <wa_types.h>
#include <special.h>

#define TP this_player()
#define TO this_object()


void
create_weapon()
{
ustaw_nazwe(({"miecz dwureczny","miecza dwurecznego","mieczowi dwurecznemu",
	    "miecz dwureczny","mieczem dwurecznym","mieczu dwurecznym"}),
	({"miecze dwureczne","mieczy dwurecznych","mieczom dwurecznym",
	"miecze dwureczne","mieczami dwurecznymi","mieczach dwurecznych"}),
	PL_MESKI_NOS_NZYW);

dodaj_nazwy(({"miecz","miecza","mieczowi","miecz","mieczem","mieczu"}),
	({"miecze","mieczy","mieczom","miecze","mieczami","mieczach"}),
	PL_MESKI_NOS_NZYW);

dodaj_przym("czarny","czarni");
dodaj_przym("lsniacy","lsniacy");

set_long("Jest to dlugi, ciezki miecz o dwusiecznym, czarnym "+
	"ostrzu, ktore lsni kiedy tylko na nie spogladasz. "+
	"Nie mozesz zrozumiec, ani w pelni odczuc czym jest "+
	"otaczajaca go mroczna aura, ktorej chlod "+
	"penetruje twoje zmysly z nadwyraz wielka sila.\n");

set_pen(45);
set_hit(30);
set_wt(W_SWORD);
set_dt(W_SLASH);
set_hands(W_BOTH);
}

int
did_hit( int aid, string hdesc, int phurt, object enemy, 
	int dt, int phit, int dam, int tohit, mixed def_ob, 
	object armour)
{
int pen;
int r = random(100);

    if ( r < 20 )
	{
	pen=return_pen(TP,enemy,150);
	
	enemy->hit_me(pen,W_SLASH,50,TP);
	
		
	if (enemy->query_hp()<1)
	    {
	TP->catch_msg("Zataczasz szeroki luk "+TO->short(TP,PL_NAR)+" "+
	    "czujac jak wstepuja w ciebie zle duchy zapomnianych lordow "+
	    "smierci, a po chwili z wielkim impetem pchniesz potezna "+
	    "glowice swojego miecza w "+QIMIE(enemy,PL_BIE)+" i wbijasz "+
	    "idealnie w "+enemy->koncowka("jego","jej")+" cialo "+
	    "widzac jak ostrze bez problemu przecina sciegna i kosci "+
	    "wyrzucajac w powietrze wstegi krwi.\n");
	
	tell_room(environment(TP),""+QCIMIE(TP,PL_MIA)+" zatacza "+
	    "szeroki luk "+TO->short(PL_NAR)+", a po chwili z wielkim "+
	    "impetem pchnie potezna glowice swojego miecza w "+
	    ""+QIMIE(enemy,PL_BIE)+" i wbija idealnie w "+enemy->koncowka("jego","jej")+" "+
	    "cialo z okrucienstwem spogladajac jak ostrze bez problemu "+
	    "przecina sciegna i kosci wyrzucajac w powietrze wstegi "+
	    "krwi...\n",({TP,enemy}));
	
	enemy->catch_msg("Przed twoimi oczami staje smierc, kiedy "+
	    "dzierzony przez "+QIMIE(TP,PL_DOP)+" "+TO->short(TP,PL_MIA)+" "+
	    "z poteznym impetem wrzyna sie w twe cialo... Po chwili jednak "+
	    "nie czujesz juz nic co mialoby jakikolwiek sens...\n");
	enemy->do_die(TP);
	} else {
	
	TP->catch_msg("Bierzesz szeroki zamach "+TO->short(TP,PL_NAR)+" "+
		"po czym z calej sily tniesz "+QIMIE(enemy,PL_BIE)+" "+
		"raniac "+enemy->koncowka("go","ja")+".\n");
	tell_room(environment(TP),""+QCIMIE(TP,PL_MIA)+" bierze szeroki "+
		"zamach "+TO->short(TP,PL_NAR)+" po czym z calej "+
		"sily tnie "+QIMIE(enemy,PL_BIE)+" "+
		"raniac "+enemy->koncowka("go","ja")+" okrutnie.\n",({enemy,TP}));
	enemy->catch_msg("Nagle "+QIMIE(TP,PL_MIA)+" wykonuje potezny "+
	    "zamach "+TO->short(TP,PL_NAR)+" i potwornie szybkim "+
	    "ciosem rani cie z okrucienstwem przygladajac sie pozostawionej "+
	    "na twoim ciele ranie.\n");
	
	
	}
	}

	
::did_hit(aid,hdesc,phurt,enemy,dt,phit,dam,tohit,def_ob,armour);
}