inherit "/std/object";

#include "elear.h"
#include <stdproperties.h>
#include <pl.h>
#include <macros.h>

string opisszczura ()
{
  string s;
  s = "Widzisz piekny, duzy transparent z napisem: ALVIN NA PREZYDENTA."
  +" Czujesz, ze trzeba go WZNIESC. Potem bedziesz mogl nim POMACHAC!\n";
  return s;
}

void create_object()
{
  ustaw_nazwe (({"transparent","transparentu","transparentowi","transparent",
  		"transparentem","transparencie"}),
  	       ({"transparenty","transparentow","transparentom","transparenty",
  	        "transparentam","transparentach"}), PL_MESKI_NZYW);  
  dodaj_przym ("wzniosly","wzniosle");
  set_long ("@@opisszczura");
}

int machaj (string s)
{
  notify_fail ("Czym chcesz pomachac?\n");
  if (!s) return 0;
  notify_fail ("Nie mozesz tym pomachac.\n");
  if (s!="transparentem") return 0;
  
  write ("Machasz wielkim transparentem: ALVIN NA PREZYDENTA!\n");
  say (QCIMIE(this_player(),PL_MIA)+" macha wielkim transparentem: ALVIN NA PREZYDENTA!\n");
  return 1;
}

int wyjmij (string s)
{
  notify_fail ("Co chcesz wzniesc?\n");
  if (!s) return 0;
  notify_fail ("Nie mozesz tego wzniesc.\n");
  if (s!="transparent") return 0;
  
  write ("Wznosisz piekny transparent.\n");
  say (QCIMIE(this_player(),PL_MIA)+" wznosi transparent.\n");
  this_player() -> command ("setmin wchodzi z pieknym, wznioslym transparentem.");
  this_player() -> command ("setmout wychodzi, dumnie niosac duzy transparent,");
  this_player() -> add_prop (LIVE_S_SOULEXTRA,"carrying a beautiful, big banner");
  return 1;
}

void init()
{
  ::init();
  add_action (wyjmij,"wznies");
  add_action (machaj,"pomachaj");
  add_action (machaj,"machaj");
}