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