blob: e7173bdc7c860301a092a1df373c2b24de0fb1b0 [file] [log] [blame]
MG Mud User88f12472016-06-24 23:31:02 +02001//Asrahel
2
3inherit "std/thing" ;
4
5#include <properties.h>
6#include <moving.h>
7#include <defines.h>
8#include <language.h>
9
10void create()
11{
12 if (!clonep(this_object())) return;
13 ::create() ;
14
15 SetProp( P_SHORT, "Eine Tuete Bonbons" ) ;
16 SetProp( P_LONG, "Eine magische Bonbontuete. So oft Du auch hineingreifst, sie wird niemals leer\n"
17 + "und enthaelt immer eine bunte Mischung.\n");
18
19 SetProp( P_WEIGHT, 0 ) ;
20 SetProp( P_NOBUY, 1) ;
21 SetProp( P_NODROP, "Nein, Du willst doch nicht dieses Geschenk weggeben !?\n");
22 SetProp( P_NEVERDROP, 1) ;
23 SetProp( P_NAME, "Tuete") ;
24 SetProp( P_GENDER, FEMALE ) ;
25 AddId( ({ "bonbontuete","tuete", "bonbons" }) ) ;
26 SetProp(P_AUTOLOADOBJ, 1);
27
28}
29
30void init()
31{
32 ::init();
33 add_action("naschen","greife");
34 add_action("naschen","greif");
35}
36
37int naschen (string str)
38{
39 notify_fail("Wohinein moechtest Du greifen ?\n");
40 if ( str != "tuete" && str != "in tuete" && str != "bonbons" && str != "in bonbontuete")
41 return 0;
42 write("Du greifst in Deine Tuete und holst ein Bonbon heraus.\n");
43 say( PL->name(WER,2) + " holt ein Bonbon aus einer Tuete.\n");
44 clone_object("obj/misc/bonbon")->move(PL);
45 return 1;
46}
47