inherit "/std/object.c";
#include <formulas.h>
#include <macros.h>
#include <ss_types.h>
#include <stdproperties.h>
#include <wa_types.h>
#include <filter_funs.h>
#include <options.h>
int trik(string ps);
int rzut(string ps);
int sprawdz(string ps);
int kozluj(string ps);
int uderz(string ps);
int wstan(string ps);
int usiadz(string ps);
int zeruj(string ps);
int rzut;
int wynik;
int za_trzy;
int za_dwa;
int pudlo;
void
create_object()
	{dodaj_nazwy(({"pilka", "pilki", "pilce", "pilke", "pilka", "pilko"}),              
  ({"pilki", "pilek", "pilka", "pilki", "pilkami", "pilkach"}),  PL_ZENSKI);    
	ustaw_shorty(({"pilka do kosza", "pilki do kosza",	
	"pilce do kosza", "pilke do kosza", "pilka do kosza", 
	"pilko do kosza"}),               
	({"pilki do kosza", "pilek do kosza",	
	"pilkom do kosza", "pilki do kosza",	
	"pilkami do kosza", "pilkach do kosza"}), PL_ZENSKI);
set_long("Czerwona pilka do kosza wykonana przez Sproxa dla " +	 
	 "Sathiel, aby uczcic jej przybycie na Torila. " +
	 "Jest bardzo okragla i lekka jak na pilke do kosza, " +
	 "moze warto by nia rzucic??? Ej, zaraz, jak tutaj znalazl " +
	 "sie ten napis??????\n");
add_item("napis", "Napisy sie czyta!!! :P.\n");
add_cmd_item("napis", "przeczytaj", "To nie jest zwykla pilka!! " +
		"Ona napewno pomoze Ci wygrac kazdy mecz, tylko musisz wierzyc.\n\n " +
		"NBAtrik      -- robisz trik na miare ligi NBA.\n " +
	 	"NBArzuc      -- rzucasz do kosza.\n " +
		"NBApunkty    -- sprawdzasz ile masz punktow.\n " +
		"NBAkozluj    -- kozlujesz swoja pilka.\n " +
		"NBAusiadz    -- siadasz na swej pilce.\n " +
		"NBAwstan     -- wstajesz z pilki.\n " +
		"NBAzeruj     -- zerujesz swoj wynik.\n " +
		"NBAstaty     -- statystyki twych rzutow.\n " +
		"NBAuderz     -- uderzasz przeciwnika w brzuch.\n");        
add_prop(OBJ_I_VOLUME, 1000);
add_prop(OBJ_I_WEIGHT, 1000);}
void
init()
{
    ::init(); /* Musi byc ZAWSZE wywolane w kazdym inicie. */
    add_action("trik","NBAtrik");
    add_action("rzut","NBArzuc");
    add_action("sprawdz","NBApunkty");
    add_action("kozluj", "NBAkozluj");
    add_action("uderz", "NBAuderz");
    add_action("usiadz", "NBAusiadz");
    add_action("wstan", "NBAwstan");
    add_action("zeruj", "NBAzeruj");
    add_action("staty", "NBAstaty");
}
int 
trik(string ps)
{
 
        {
	  write("Zwijasz sie w szybkim polobrocie i przelamujesz obrone przeciwnika " +
	        "odbijajac pilke miedzy jego nogami i lapiac ja tuz za nim.\n");
        saybb(QCIMIE(this_player(),PL_MIA) + " zwija sie w szybkim polobrocie i przelamuje twa " +
        "obrone odbijajac pilke miedzy twoimi nogami, poczym lapie ja tuz za toba.\n");
        return 1;
    }
}
int 
rzut(string ps)
{
 
        
switch(random(3))
{
 case 0:
	  write("Pewnie wyrzucona przez Ciebie pilka trafia w sam srodek tarczy i " +
	        "spokojnie wpada do kosza, poczym za sprawa magi wraca do Ciebie.\n");
        saybb(QCIMIE(this_player(),PL_MIA) + " pewnie rzuca pilka, ktora odbija sie od srodka tarczy " +
        "i spokojnie wpada do kosza, poczym za sprawa magi wraca do niego.\n");
        wynik=wynik+2;
	rzut=rzut+1;
        za_dwa=za_dwa+1;
	return 1;
	break;
case 1:
	 write("Niestety rzucona przez Ciebie pilka odbija sie krzywo od tarczy i spada na ziemie " +
	        "zatrzymujac sie tuz przed toba.\n");
        saybb(QCIMIE(this_player(),PL_MIA) + " rzuca pilka, ktora krzywo odbija sie od tarczy i spada na ziemie " +
        "tuz przed nim.\n");
  
	rzut=rzut+1;
	pudlo=pudlo+1;
	return 1;
	
	break;
case 2:
	 write("Wspaniale wyrzucasz pilke ktora po dlugim locie przelatuje przez obrecz kosza. " +
	"Odleglosc jest tak wielka ze rzut liczy sie za 3 punkty.\n");
	      
        saybb(QCIMIE(this_player(),PL_MIA) + " wspaniale wyrzuca pilke ktora po dlugim " +
	"locie przelatuje przez obrecz kosza. " +
        "Odleglosc jest na tyle duza ze rzut liczy sie za 3 punkty.\n");
        wynik=wynik+3; 
	rzut=rzut+1;	
	za_trzy=za_trzy+1;
	return 1;
	break;
    }
}
int 
sprawdz(string ps)
{
 
        {
	  write("Twoja ilosc punktow to " + wynik + ".\n");
	        
        saybb(QCIMIE(this_player(),PL_MIA) + " przechwala sie ze jego ilosc punktow to: " + wynik + ".\n");
        return 1;
    }
}
int 
kozluj(string ps)
{
 
        {
	  write("Spokojnie kozlujesz pilka kierujac sie w strone kosza.\n");
        saybb(QCIMIE(this_player(),PL_MIA) + " spokojnie kozluje pilka kierujac sie w strone kosza.\n");
        return 1;
    }
}
int 
uderz(string ps)
{
 
        {
	  write("Z msciwa sadysfakcja uderzasz przeciwnika w brzuch, ktory ma naucze za swa dobra gre!!!.\n");
        saybb(QCIMIE(this_player(),PL_MIA) + " za twa dobra gre, uderza cie w brzuch.\n");
        return 1;
    }
}
int 
usiadz(string ps)
{
 
        {
	  write("Siadasz na pilke i odpoczywasz.\n");
        saybb(QCIMIE(this_player(),PL_MIA) + " Siada na pilce.\n");
        
        this_player()->add_prop(LIVE_S_EXTRA_SHORT, " siedzacy na pilce"); 
	return 1;
    }
}
int 
wstan(string ps)
{
 
        {
	  write("Wstajesz z pilki.\n");
        saybb(QCIMIE(this_player(),PL_MIA) + " podnosi sie na nogi.\n");
        
        this_player()->remove_prop(LIVE_S_EXTRA_SHORT);  
	return 1;
    }
}
int 
zeruj(string ps)
{
 
        {
	  write("Zaczynasz liczyc swe punkty od nowa.\n");
        saybb(QCIMIE(this_player(),PL_MIA) + " zaczyna liczyc swe punkty od nowa.\n");
        wynik = 0;
        rzut = 0;
	za_trzy = 0;
	za_dwa = 0;
	pudlo = 0;
	return 1;
    }
}
int 
staty(string ps)
{
 
        {
	  write("Lacznie rzutow: " + rzut + " w tym " + za_trzy + " za trzy punkty,\n " +
		za_dwa + " za dwa punkty, " + pudlo + " niecelnych.\n" +
		"Twoj laczny wynik to " + wynik + " punkty(ow).\n");		
        saybb(QCIMIE(this_player(),PL_MIA) + " lacznie oddal rzutow: " + rzut + " w tym " + za_trzy + " za trzy punkty,\n " +
		za_dwa + " za dwa punkty, " + pudlo + " niecelnych.\n " +
		"Laczny wynik to " + wynik + " punkty(ow).\n");	
      
	return 1;
    }
}