MG Mud User | 88f1247 | 2016-06-24 23:31:02 +0200 | [diff] [blame^] | 1 | // Asrahel |
| 2 | |
| 3 | inherit "std/thing" ; |
| 4 | |
| 5 | #include <properties.h> |
| 6 | #include <moving.h> |
| 7 | #include <defines.h> |
| 8 | #include <language.h> |
| 9 | |
| 10 | void geschmack() |
| 11 | { |
| 12 | int num; |
| 13 | num = random (8); |
| 14 | switch(num) |
| 15 | { |
| 16 | case 0 : |
| 17 | SetProp(P_SHORT,"Ein Orangenbonbon"); |
| 18 | SetProp(P_LONG,"Ein gefuelltes Bonbon mit Orangengeschmack.\n"); |
| 19 | SetProp(P_NAME,"Orangenbonbon"); |
| 20 | AddId(({"orangenbonbon"})); |
| 21 | break; |
| 22 | case 1 : |
| 23 | SetProp(P_SHORT,"Ein Zitronenbonbon"); |
| 24 | SetProp(P_LONG,"Ein gefuelltes Bonbon mit Zitronengeschmack.\n"); |
| 25 | SetProp(P_NAME,"Zitronenbonbon"); |
| 26 | AddId(({"zitronenbonbon"})); |
| 27 | break; |
| 28 | case 2 : |
| 29 | SetProp(P_SHORT,"Ein Schokoladenbonbon"); |
| 30 | SetProp(P_LONG,"Ein Schokoladenbonbon, pass auf, dass es nicht schmilzt.\n"); |
| 31 | SetProp(P_NAME,"Schokoladenbonbon"); |
| 32 | AddId(({"schokobonbon","schokoladenbonbon"})); |
| 33 | break; |
| 34 | case 3 : |
| 35 | SetProp(P_SHORT,"Ein Pfefferminzbonbon"); |
| 36 | SetProp(P_LONG,"Pfefferminze befreit den Hals und kitzelt in der Nase.\n"); |
| 37 | SetProp(P_NAME,"Pfefferminzbonbon"); |
| 38 | AddId(({"pfefferminzbonbon","minze","pfefferminz"})); |
| 39 | break; |
| 40 | case 4 : |
| 41 | SetProp(P_SHORT,"Ein Sahnebonbon"); |
| 42 | SetProp(P_LONG,"Sehr suess und sehr klebrig.\n"); |
| 43 | SetProp(P_NAME,"Sahnebonbon"); |
| 44 | AddId(({"sahnebonbon"})); |
| 45 | break; |
| 46 | case 5 : |
| 47 | SetProp(P_SHORT,"Ein Karamelbonbon"); |
| 48 | SetProp(P_LONG,"Ein Karamelbonbon, der Rest von Karneval?\n"); |
| 49 | SetProp(P_NAME,"Karamelbonbon"); |
| 50 | AddId(({"karamelbonbon"})); |
| 51 | break; |
| 52 | case 6 : |
| 53 | SetProp(P_SHORT,"Ein Anananasbonbon"); |
| 54 | SetProp(P_LONG,"Ein dreieckiges Anananasbonbon, das schmeckt bestimmt ganz ananassig.\n"); |
| 55 | SetProp(P_NAME,"Ananasbonbon"); |
| 56 | AddId(({"ananasbonbon"})); |
| 57 | break; |
| 58 | case 7 : |
| 59 | SetProp(P_SHORT,"Ein Himbeerdrops"); |
| 60 | SetProp(P_LONG,"Dieses himbeerige Fruchtbonbon ist viel groesser als eine Himbeere.\n"); |
| 61 | SetProp(P_NAME,"Himbeerdrops"); |
| 62 | AddId(({"drops","himbeerdrops","fruchtbonbon"})); |
| 63 | break; |
| 64 | default : |
| 65 | SetProp(P_SHORT,"Ein Multivitaminbonbon"); |
| 66 | SetProp(P_LONG,"Ein Multivitaminbonbon, sehr gesund (besonders bei dem Wetter in Muenster).\n"); |
| 67 | SetProp(P_NAME,"Multivitaminbonbon"); |
| 68 | AddId(({"vitaminbonbon","multivitaminbonbon"})); |
| 69 | break; |
| 70 | } |
| 71 | } |
| 72 | |
| 73 | void create() |
| 74 | { |
| 75 | if (!clonep(this_object())) return; |
| 76 | ::create(); |
| 77 | SetProp(P_WEIGHT, 25); |
| 78 | SetProp(P_VALUE, 0); |
| 79 | SetProp(P_GENDER, NEUTER ); |
| 80 | AddId("bonbon"); |
| 81 | geschmack(); |
| 82 | } |
| 83 | |
| 84 | |
| 85 | void init() |
| 86 | { |
| 87 | ::init(); |
| 88 | add_action("essen","esse"); |
| 89 | add_action("essen","iss"); |
| 90 | add_action("essen","lutsche"); |
| 91 | } |
| 92 | |
| 93 | int essen(string str) |
| 94 | { |
| 95 | notify_fail("Was moechtest Du essen?\n"); |
| 96 | if ( !str || !id(str) ) |
| 97 | return 0; |
| 98 | write("Du lutschst genuesslich " + name(WEN,0) + ".\n"); |
| 99 | say( PL->Name(WER,2) + " lutscht " + name(WEN,0) + ".\n"); |
| 100 | remove(); |
| 101 | return 1; |
| 102 | } |