// RURKA DO STRZELANIA

inherit "/std/object";
inherit "/cmd/std/command_driver.c";
#include "../wieza.h"

int ilosc_strzal = 3;

void
create_object()
{
    set_long("@@long_opis");
    ustaw_nazwe( ({"rurka", "rurki", "rurce", "rurke", "rurka", "rurce"}),
                 ({"rurki", "rurek", "rurkom", "rurki", "rurkami", "rurkach"}),
                 PL_ZENSKI);
    dodaj_przym("stalowy", "stalowi");
    dodaj_przym("dlugi", "dludzy");

    add_prop(OBJ_I_WEIGHT, 200);
}

void
init()
{
	::init();
	add_action("strzel", "strzel");
}

string
long_opis()
{

 string str;

 str = "Jest to stalowa dluga rurka zluzaca do strzelania w zywe istoty. "+
       "Za naboj sluza strzalki namaczane w sluzie trolla, i owiniete lisciami "+
       "koki. Cel po trafieniu bedzie zesztywnialy, a pozniej umrze.\n";
 
 
   switch (ilosc_strzal)
     {
       case 1:
       str +="W rurce znajduja sie tylko jedna strzalka.";
       break;
       case 2:
       str +="W rurce znajduja sie dwie smiercionosne strzalki ";
       break;
       case 3:
       str +="W rurce znajduja sie trzy strzalki ";
       break;
       default:
       str +="W rurce nie znajduje sie zadna strzalka ";
       break;
     }
  
 return (str +"\n");

}

int 
strzel(string str)
{
    object *kogo = parse_this(str,"%l:"+PL_BIE);
    
    notify_fail("W kogo chcesz strzelic z rurki?\n");
    if( ilosc_strzal == 0)
     {
     	notify_fail("Nie mozesz strzelac, gdy nie masz strzalek w rurce.\n");
     	return 0;
     }
     
    if (sizeof (kogo) > 1 )
    {
	notify_fail("Nie uda ci sie strzelic do kilku przeciwnikow na raz. Musisz " +
		     "zdecydowac sie na jednego.\n");
	return 0;
    }

    if (!sizeof(kogo))
    {
       notify_fail("Do kogo chcialbys strzelic??\n");
       return 0;
    }
    
    TP->catch_msg("Przymierzasz sie i wycelowywujesz do "+QIMIE(kogo[0],PL_BIE)+" ze "+
                  "swojej rurki. Po chwili strzelasz i trafiasz w swoj cel.\n");
kogo[0]->catch_msg("Widzisz, jak "+QIMIE(TP,PL_MIA)+" strzela w Ciebie ze swojej "+
                   "rurki i trafia.\n");
    kogo[0]->heal_hp(-(kogo[0]->query_max_hp()));
    kogo[0]->do_die(TP);
    ilosc_strzal = (ilosc_strzal - 1);
    return 1;
}