inherit "/std/object";

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

#define ELEAR_KAN_I_HACZYK  "_elear_kan_i_haczyk"

int hak = 1;

string 
opisszczura ()
{
  string s;
  s = "Widzisz zwloki malego, wychudzonego kota. Jego futerko jest"
  +" w wielu miejscach poprzecierane lub powygryzane, ";
  if (hak)
  {
      s = s + "a najciekawszym elementem"
      +" jego smetnych resztek jest sterczacy, wbity mu w bok niemalze na wylot,"
      +" duzy, stalowy haczyk wedkarski. Ciekawe, kto tego kota tak zalatwil.\n";
  }
  else
  {
      s = s + "wytrzeszczone w ostatnim skurczu miesni oczka, otwarty pyszczek."
      +" Zauwazalna jest rowniez duza, wyszarpana rana w jego boku.\n";
      if (this_player() -> query_prop ("ELEAR_KAN_I_HACZYK"))
      {
          s = s + "Nic dziwnego - przeciez sam"+plpl("","a")+" mu z boku wyrwal"+plpl("e","a")
          +"s duzy haczyk wedkarski.\n";
      }
  }
  return s;
}

void 
create_object()
{
  ustaw_nazwe(({"kot","kota","kotu","kota","kotem","kocie"}),
      ({"koty","kotow","kotom","koty","kotami","kotach"}),PL_MESKI_NOS_ZYW);
  dodaj_przym ("zdechly","zdechli");
  set_long ("@@opisszczura");
    add_prop(OBJ_I_WEIGHT, 560);
    add_prop(OBJ_I_VOLUME, 200);
    add_prop(OBJ_I_VALUE, 0);
}

int 
wyjmij (string s)
{
  object obj;
  if (!s)
  {
    notify_fail ("Co i skad chcesz wyjac?\n");
    return 0;
  }
  if (s=="haczyk z kota" || s=="hak z kota" || s=="haczyk z trupa" || s=="hak z trupa")
  {
      if (hak)
      {
          write ("Bez wiekszego wysilku wyciagn"+plpl("ale","ela")+"s haczyk z martwego kota.\n");
          say (QCNAME(this_player())+" wyciagn"+plpl("al","ela")+" haczyk wedkarski ze zdechlego kota.\n");
          hak = 0;
          obj = clone_object (NPATH+"obj/haczyk.c");
          obj -> move (this_player());
          this_player()->add_prop(ELEAR_KAN_I_HACZYK,1);
      }
      else
      {
          write ("Nie widzisz tu zadnego haczyka.\n");
      }
  }
  else write ("Nie mozesz tego zrobic.\n");
  return 1;
}  

void 
init()
{
  ::init();
  add_action (wyjmij,"wyjmij");
  add_action (wyjmij,"wyrwij");
  add_action (wyjmij,"wyciagnij");
}