blob: 12ac6504f16554d82a1076285fa27ca3fce6512a [file] [log] [blame]
Zesstra953f9972017-02-18 15:37:36 +01001
2PresentEnemies()
3****************
4
5
6FUNKTION
7========
8
9 object *PresentEnemies();
10
11
12DEFINIERT IN
13============
14
15 /std/living/combat.c
16
17
18ARGUMENTE
19=========
20
21 keine
22
23
24RUeCKGABEWERT
25=============
26
27 anwesende Feinde
28
29
30BESCHREIBUNG
31============
32
33 Diese Funktion liefert genau die Feinde zurueck, die sich derzeit im
34 selben Raum befinden. Die Feinde unterliegen hierbei noch gewissen
35 Einschraenkungen:
36 (1) Sie duerfen als NPC nicht gestorben sein, das heisst, sie
37 muessen als Objekt noch existieren.
38 (2) Sie duerfen als Spieler nicht gestorben sein, das heisst, sie
39 duerfen keine Geister sein (Property P_GHOST nicht gesetzt).
40 (3) Sie muessen angreifbar sein, das heisst, die Property
41 P_NO_ATTACK darf nicht gesetzt sein.
42 Wird eine dieser Bedingungen verletzt, so wird der Gegner aus der
43 internen Gegnerliste entfernt. Zusaetzlich gilt:
44 Netztote werden nur als Gegner erkannt, wenn keine anderen Gegner
45 zur Verfuegung stehen.
46
47
48BEISPIEL
49========
50
51 Im Folgenden erblinden alle Gegner im Raum:
52 string blindThemAll()
53 { ob*livList;
54 if(!livList=PresentEnemies())
55 return break_string(
56 "Mist...keiner da, der blind werden moechte.",77,
57 Name(WER)+" grummelt: ");
58 for(i=sizeof(livList);i--;)
59 { if(livList[i]->QueryProp(P_BLIND))
60 { tell_object(this_object(),break_string(
61 livList[i]->Name(WER)+" ist schon blind.",77));
62 continue;
63 }
64 tell_object(this_object(),break_string(
65 "Du kratzt "+livList[i]->name(WEM)+" die Augen aus.",77));
66 tell_object(livList[i],break_string(
67 Name(WER)+" kratzt Dir die Augen aus!",77));
68 tell_room(environment(this_object()),break_string(
69 Name(WER)+" kratzt "+livList[i]->name(WEM)
70 +" die Augen aus.",77),({this_object(),livList[i]}));
71 livList[i]->SetProp(P_BLIND,1);
72 }
73 return"";
74 }
75 Aufgerufen wird das ganze am Besten in einem Chat:
76 void create()
77 { ::create();
78 ...
79 SetProp(P_CHAT_CHANCE,10);
80 SetChats(20,({break_string(
81 "Nicht angreifen, sonst wirst Du noch blind!",77,
82 Name(WER)+" bruellt: "),
83 "@@blindThemAll@@"}));
84 }
85 Natuerlich sind auch noch mehr Funktionen und Meldungen als Chats
86 moeglich: Die zwei im Beispiel sind im Normalfall etwas wenig.
87
88
89SIEHE AUCH
90==========
91
92 SelectEnemy(), QueryEnemies(), IsEnemy(), P_GHOST, P_NO_ATTACK,
93 SetChats, P_CHAT_CHANCE
94
95Last modified: Thu May 27 15:01:48 1999 by Patryn