blob: da3c5b3cb1d63ad6b8a6105a30a0baa77b00c3ca [file] [log] [blame]
inherit "/std/thing";
#include <properties.h>
#include <moving.h>
#include <language.h>
#pragma strict_types,save_types,rtt_checks
protected void create()
{
::create();
SetProp(P_GENDER, NEUTER);
SetProp(P_NAME, "Gebuesch");
SetProp(P_SHORT,"Ein Gebuesch");
SetProp(P_LONG,"Du stehst vor einem gaanz normalen Gebuesch. Es traegt "
"Fruechte. Und eventuell\nkann man darin etwas finden.\n");
SetProp(P_NOGET,"Es ist festgewachsen, eventuell kann man es ausgraben?\n");
SetProp(P_WEIGHT,5000);
SetProp(P_SIZE,100);
AddId(({"busch","gebuesch"}));
AddDetail(({"fruechte","frucht"}),
"Es scheinen Beeren zu sein. Vielleicht kannst Du sie pfluecken?\n");
AddDetail("beeren",
"Pflueck sie doch, vielleicht bringt das ja was.\n");
// Nur wenn die Syntax erfuellt ist, wird cmd_pfluecken() aufgerufen.
// "pfluecke beeren von busch" etc.
AddCmd("pfluecke|ernte&fruechte|beeren&@ID","cmd_pfluecken",
"Was willst Du denn @verben?|Wo willst Du denn die Beeren @verben?");
// suchen gibt nur eine Meldung aus. Dafuer braucht man kuenftig keine
// Funktionen mehr.
AddCmd("such|suche|durchsuch|durchsuche&@ID&\nimpossible",0,
"Wo willst Du @VERBen?|Du durchsuchst das Gebuesch, findest aber nichts.^"
"@WER1 durchsucht ein Gebuesch, findet aber nichts.");
// Graben geht eh nicht. Daher nur Fehlermeldungen.
// Das ^ sagt, dass hier ein return1 zurueckgegeben wird. Es gibt aber keine
// Raummeldung.
AddCmd("grab|grabe&@ID&aus@\nimpossible",0,
"Was willst Du graben?|Du willst das Gebuesch ausgraben?|"
"Die Wurzeln scheinen tief zu rechen. Das wird nichts.^");
}
int cmd_pfluecken(string arg, mixed *param)
{
object obj;
obj=clone_object(__DIR__"obst");
write("Verwundert pflueckst Du "+(obj->name())+" vom Busch. Komisch.\n");
// Das hier ist ein Beispiel fuer AddCmd, daher mach ich mir nich
// die Muehe das richtig zu machen. Is eh nur fuer Magier!
obj->move(this_player(),M_GET|M_NOCHECK);
return 1;
}