Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 1 | AddInfo() |
| 2 | ========= |
| 3 | |
| 4 | FUNKTION |
| 5 | -------- |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 6 | |
Arathorn | 41004de | 2020-10-18 22:03:28 +0200 | [diff] [blame] | 7 | public varargs void AddInfo(string|string* key, string|closure info, |
| 8 | string indent, int|string silent, string|closure casebased); |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 9 | |
| 10 | DEFINIERT IN |
| 11 | ------------ |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 12 | |
| 13 | /std/npc/info.c |
| 14 | |
| 15 | ARGUMENTE |
| 16 | --------- |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 17 | |
Arathorn | 41004de | 2020-10-18 22:03:28 +0200 | [diff] [blame] | 18 | string|string* frage |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 19 | Schluesselphrase(n), fuer die der NPC eine Antwort geben soll, wenn |
Arathorn | 41004de | 2020-10-18 22:03:28 +0200 | [diff] [blame] | 20 | man ihn danach fragt |
| 21 | |
| 22 | string|closure meldung |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 23 | Information, die gegeben werden soll; wenn 'meldung' eine |
| 24 | Closure ist, wird der gerufenen Funktion die vom Spieler gefragte |
| 25 | Schluesselphrase uebergeben. |
Arathorn | 41004de | 2020-10-18 22:03:28 +0200 | [diff] [blame] | 26 | |
| 27 | string indent (optional) |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 28 | Text, der sich bei mehrzeiligen Meldungen wiederholen soll. |
Arathorn | 41004de | 2020-10-18 22:03:28 +0200 | [diff] [blame] | 29 | |
| 30 | int|string silent (optional) |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 31 | Ist silent gesetzt, so erfolgt Antwort nur an Fragenden. |
Arathorn | 41004de | 2020-10-18 22:03:28 +0200 | [diff] [blame] | 32 | |
| 33 | string|closure casebased (optional) |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 34 | Closure mit Returnwert string oder int. Der Funktion wird die vom |
| 35 | Spieler gefragte Schluesselphrase uebergeben. |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 36 | |
| 37 | BESCHREIBUNG |
| 38 | ------------ |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 39 | |
| 40 | Wenn ein Spieler ein NPC mittels "frage <monstername> nach <frage>" nach |
| 41 | einer Information mit dem Schluessel 'frage' fragt, so wird die |
| 42 | entsprechende 'meldung' ausgegeben (oder die Closure in 'meldung' |
| 43 | gerufen und der zurueckgegebene Text ausgegeben). Der Meldung wird |
| 44 | der Name des Monsters vorangestellt. |
| 45 | |
| 46 | Frage: |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 47 | Schluesselphrasen muessen kleingeschrieben sein, koennen aber |
| 48 | Leerzeichen enthalten. |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 49 | |
| 50 | Meldung: |
| 51 | Wenn kein 'indent' angegeben ist, muss man die Meldung selbst |
| 52 | umbrechen. |
| 53 | |
| 54 | Indent: |
| 55 | Wird ein 'indent' angegeben so wird jeder Zeile hinter dem |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 56 | Monsternamen noch das 'indent' vorangesetzt. |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 57 | Ein typisches indent ist "sagt: ". |
| 58 | |
| 59 | Silent: |
| 60 | Bei 'silent'==1 erfolgt keine Textausgabe der Antwortmeldung im Raum, |
| 61 | ist 'silent' ein String, so wird jener an alle anderen Spieler ausser |
| 62 | dem Fragesteller im Raum ausgegeben. |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 63 | Dem ausgegebenen Text wird der Name des NPCs als Indent vorangestellt. |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 64 | |
| 65 | Casebased: |
| 66 | Die als Closure angegebene Methode entscheidet, ob oder wie der NPC |
| 67 | auf diese Frage antworten soll: |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 68 | |
| 69 | # return 0: normale Antwort mit "meldung" |
| 70 | |
| 71 | # return 1: keine Antwort/Antwort mit DEFAULT_NOINFO |
| 72 | |
| 73 | # return string: Antwort mit string unter Beruecksichtigung eines indent |
| 74 | |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 75 | |
| 76 | Die Strings von 'silent' und 'meldung' werden geparsed. |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 77 | Dabei koennen die @[...]-Tags von replace_personal() verwendet werden, |
Arathorn | 41004de | 2020-10-18 22:03:28 +0200 | [diff] [blame] | 78 | Objekt 1 ist this_player(). Ersetzte Strings am Satzanfang werden |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 79 | automatisch gross geschrieben. |
| 80 | AddInfo() konvertiert die alten Schluesselworte @WER, @WESSEN, @WEM, |
Zesstra | d59c00c | 2018-01-10 20:48:15 +0100 | [diff] [blame] | 81 | @WEN zu denen von replace_personal(), jedoch nicht in den Rueckgabe- |
| 82 | werten von Closures. |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 83 | |
| 84 | Mittels der in <npc.h> definierten Frage DEFAULT_INFO kann eine |
| 85 | Meldung gesetzt werden, die gegeben werden soll, wenn der Spieler |
| 86 | etwas fragt, auf das keine Antwort vorgegeben ist (das loest |
| 87 | SetProp(P_DEFAULT_INFO, <text>) ab). |
| 88 | |
| 89 | BEISPIELE |
| 90 | --------- |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 91 | Siehe auch: /doc/beispiele/AddInfo/ |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 92 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 93 | .. code-block:: pike |
| 94 | |
| 95 | // Beispiel 1: ### eine Standardantwort setzen ### |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 96 | AddInfo(DEFAULT_INFO, "starrt Dir boese in die Augen.\n"); |
| 97 | // identisch zu |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 98 | // obsolet: SetProp(P_DEFAULT_INFO, "starrt Dir boese in die Augen.\n"); |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 99 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 100 | .. code-block:: pike |
| 101 | |
| 102 | // Beispiel 2: einfache Beispiele, auch mit casebased |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 103 | AddInfo(({"knete","kohle"}), |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 104 | "sagt: ich habe so etwas nicht.\n"); |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 105 | AddInfo("geld", |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 106 | "Ich habe zwar kein Geld, aber [...] blablabla [...]", |
| 107 | "sagt: "); |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 108 | AddInfo("muenzen", |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 109 | "fluestert: Du willst Geld?\n", |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 110 | 0, |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 111 | "fluestert @WEM1 etwas zu.\n"); |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 112 | |
| 113 | // "frage monster nach geld": alle im Raum hoeren |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 114 | // Das Monster sagt: Ich habe zwar kein Geld, aber [...] |
| 115 | // Das Monster sagt: [...] blablabla [...] |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 116 | |
| 117 | // "frage monster nach muenzen": |
| 118 | // - der Fragensteller hoert: |
| 119 | // "Das Monster fluestert: Du willst Geld?" |
| 120 | // - alle andere hoeren: |
| 121 | // "Das Monster fluestert <Fragenstellernamen> etwas zu." |
| 122 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 123 | .. code-block:: pike |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 124 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 125 | // Beispiel 3: dynamisch |
| 126 | // ein Prototyp, damit wir die Methode bekannt machen |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 127 | protected string query_kekse(string key); |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 128 | |
| 129 | AddInfo(({"keks","kekse"}), |
| 130 | #'query_kekse, // ein Verweis auf die Funktion |
| 131 | "sagt: "); |
| 132 | |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 133 | protected string query_kekse(string key) { |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 134 | if(present("keks", this_object())) |
| 135 | return("Ich hab noch welche. Aetsch!"); |
| 136 | else if(present("keks", environment())) |
| 137 | return("Da liegt einer!"); |
| 138 | return("Menno. Keine mehr da!"); |
| 139 | } |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 140 | // "frage monster nach keks": |
| 141 | // - wenn es noch Kekse hat, hoeren alle: |
| 142 | // "Das Monster sagt: Ich hab noch welche. Aetsch! |
| 143 | // - sonst: |
| 144 | // "Das Monster sagt: "Menno. Keine mehr da! |
| 145 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 146 | .. code-block:: pike |
| 147 | |
| 148 | // Beispiel 4: dynamischer |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 149 | // ein Prototyp, damit wir die Methode bekannt machen |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 150 | protected string query_kekse(string key); |
| 151 | protected mixed case_fighting(string key); |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 152 | |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 153 | AddInfo(({"keks","kekse"}), |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 154 | #'query_kekse," // ein Verweis auf die Funktion |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 155 | "sagt: ", |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 156 | 0, // nicht silent :) |
| 157 | #'case_fighting); // noch ein Funktionsverweis |
| 158 | |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 159 | protected string query_kekse(string key) { |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 160 | if(present("keks")) |
| 161 | return("Ich hab noch welche. Aetsch!"); |
| 162 | return("Menno. Keine mehr da!"); |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 163 | } |
| 164 | |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 165 | protected mixed case_fighting(string key) { |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 166 | if(InFight()) |
| 167 | return("Keine Zeit fuer Kekse. Muss kaempfen."); |
| 168 | return 0; |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 169 | } |
| 170 | |
| 171 | // "frage monster nach keks": |
| 172 | // - wenn es kaempft, hoeren alle: |
| 173 | // "Das Monster sagt: Keine Zeit fuer Kekse. Muss kaempfen. |
| 174 | // - sonst, wenn es noch Kekse hat, hoeren alle: |
| 175 | // "Das Monster sagt: Ich hab noch welche. Aetsch! |
| 176 | // - sonst: |
| 177 | // "Das Monster sagt: "Menno. Keine mehr da! |
| 178 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 179 | .. code-block:: pike |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 180 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 181 | // Beispiel 5: ### dynamisch und komplex ### |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 182 | // ein Prototyp, damit wir die Methode bekannt machen |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 183 | protected string question_gold(string key); |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 184 | |
| 185 | // "gold" wird eine Closure auf die Methode question_gold() |
| 186 | // zugewiesen, ausserdem soll es still bleiben (wir informieren |
| 187 | // den Restraum selbst) |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 188 | AddInfo("gold", #'question_gold, "murmelt: ", 1); |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 189 | |
| 190 | // los gehts, wir generieren unsere Antwort selbst |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 191 | protected string question_gold(string key) { |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 192 | // wieviel Kohle hat der Spieler |
| 193 | int money = this_player()->QueryMoney(); |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 194 | string* valuables = ({}); |
| 195 | |
| 196 | // Wertgegenstaende suchen, d.h. Material kein Gold, |
| 197 | // Objekt kein Geld, und auch nicht unsichtbar |
| 198 | foreach(object o : deep_inventory(this_player())) |
| 199 | { |
| 200 | if ( o->QueryMaterial(MAT_GOLD)>0 && |
| 201 | load_name(o) != "/items/money" && |
| 202 | o->QueryProp(P_SHORT) && |
| 203 | !o->QueryProp(P_INVIS) ) |
| 204 | { |
| 205 | valuables += ({o->Name(WER,1)}); |
| 206 | } |
| 207 | } |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 208 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 209 | // das geht an alle anderen im Raum, silent bietet sich hier |
| 210 | // nicht an, weil es mehrere Moeglichkeiten gibt |
| 211 | send_room(environment(), |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 212 | sprintf("%s murmelt %s etwas zu%s.", |
| 213 | Name(WER,1), |
| 214 | this_player()->name(WEM,1), |
| 215 | (money || sizeof(valuables))? |
| 216 | " und glotzt "+this_player()->QueryPronoun(WEN)+ |
| 217 | " gierig an" : ""), |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 218 | MT_LOOK|MT_LISTEN, |
| 219 | MA_EMOTE, 0, ({this_player()})); |
| 220 | |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 221 | // Und hier die Antwort an den Spieler selbst, mit diversen |
| 222 | // Verzweigungen fuer dessen Besitztum. |
| 223 | string reply = "Ich hab kein Gold bei mir."; |
| 224 | string verb = sizeof(valuables) ? "ist" : "sind"; |
| 225 | if ( money ) |
| 226 | { |
| 227 | reply += " Aber Du hast ja jede Menge Kohle bei dir, so etwa "+ |
| 228 | money+" Muenzen."; |
| 229 | if ( sizeof(valuables) ) |
| 230 | reply += sprintf(" Ausserdem %s auch noch %s aus Gold.", |
| 231 | verb, CountUp(valuables)); |
| 232 | } |
| 233 | else if ( sizeof(valuables) ) |
| 234 | { |
| 235 | reply += sprintf( |
| 236 | " Aber Du hast ja ein paar Wertsachen dabei: %s %s aus Gold.", |
| 237 | CountUp(valuables), verb); |
| 238 | } |
| 239 | return reply; |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 240 | } |
| 241 | |
| 242 | // "frage monster nach gold" |
| 243 | // - der Fragesteller hoert zB: |
Zesstra | ffa1035 | 2019-08-08 21:08:44 +0200 | [diff] [blame] | 244 | // Das Monster murmelt: Ich hab kein Gold bei mir. Aber Du hast ja |
| 245 | // Das Monster murmelt: jede Menge Kohle bei Dir, so etwa <number> |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 246 | // Das Monster murmelt: Muenzen. Ausserdem ist/sind noch <object1> |
| 247 | // Das Monster murmelt: und <object2> aus Gold." |
| 248 | // - die Umstehenden hoeren: |
Zesstra | 7626ddd | 2018-02-21 19:27:44 +0100 | [diff] [blame] | 249 | // "Das Monster murmelt @WEM1 etwas zu." |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 250 | // oder |
Zesstra | 7626ddd | 2018-02-21 19:27:44 +0100 | [diff] [blame] | 251 | // "Das Monster murmelt @WEM1 etwas zu und glotzt ihn/sie gierig an." |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 252 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 253 | |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 254 | SIEHE AUCH |
| 255 | ---------- |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 256 | |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 257 | Verwandt: |
| 258 | :doc:`AddSpecialInfo`, :doc:`RemoveInfo` |
| 259 | Props: |
| 260 | :doc:`../props/P_PRE_INFO` |
| 261 | Files: |
| 262 | /std/npc/info.c |
| 263 | Loggen: |
Zesstra | 362c737 | 2018-02-05 00:02:24 +0100 | [diff] [blame] | 264 | :doc:`../props/P_LOG_INFO` |
Christian Georg Becker | a38b32f | 2017-03-07 23:12:05 +0100 | [diff] [blame] | 265 | Interna: |
| 266 | :doc:`GetInfoArr` , :doc:`do_frage` |
Zesstra | 1862697 | 2017-01-31 10:38:27 +0100 | [diff] [blame] | 267 | |
Zesstra | bbb16a7 | 2021-08-09 23:58:46 +0200 | [diff] [blame] | 268 | 09.08.2021, Zesstra |