diseaseAshChancreKW
Morrowind.esm
Variables
1
Local Variables
doOnce
Source
1Begin diseaseAshChancreKW
2
3DontSaveObject
4
5short doOnce
6
7;special script on just kwama WORKERS to set & reset their fight settings
8;50 if non-blighted, 90 if blighted
9
10if ( CellChanged == 0 )
11 return
12endif
13
14if ( GetJournalIndex C3_DestroyDagoth >= 50 )
15 if ( GetBlightDisease == 1 )
16 RemoveSpell "ash-chancre"
17 endif
18endif
19
20if ( GetPCCell "Abaesen-Pulu Egg Mine" == 1 )
21 if ( "Kwama Queen_Abaesen"->GetBlightDisease == 1 )
22 AddSpell "ash-chancre"
23 SetFight 90
24 else
25 RemoveSpell "ash-chancre"
26 SetFight 50
27 endif
28 return
29endif
30
31if ( GetPCCell "Ahanibi-Malmus Egg Mine" == 1 )
32 if ( "kwama queen_ahanibi"->GetBlightDisease == 1 )
33 AddSpell "ash-chancre"
34 SetFight 90
35 else
36 RemoveSpell "ash-chancre"
37 SetFight 50
38 endif
39 return
40endif
41
42if ( GetPCCell "Akimaes-Ilanipu Egg Mine" == 1 )
43 if ( "kwama queen_akimaes"->GetBlightDisease == 1 )
44 AddSpell "ash-chancre"
45 SetFight 90
46 else
47 RemoveSpell "ash-chancre"
48 SetFight 50
49 endif
50 return
51endif
52
53if ( GetPCCell "Eluba-Addon Egg Mine" == 1 )
54 if ( "kwama queen_eluba"->GetBlightDisease == 1 )
55 AddSpell "ash-chancre"
56 SetFight 90
57 else
58 RemoveSpell "ash-chancre"
59 SetFight 50
60 endif
61 return
62endif
63
64if ( GetPCCell "Eretammus-Sennammu Egg Mine" == 1 )
65 if ( "kwama queen_eretammus"->GetBlightDisease == 1 )
66 AddSpell "ash-chancre"
67 SetFight 90
68 else
69 RemoveSpell "ash-chancre"
70 SetFight 50
71 endif
72 return
73endif
74
75if ( GetPCCell "Gnisis" == 1 )
76 if ( GetDeadCount "kwama queen_gnisis" > 0 )
77 ; do nothing if the kwama queen here is dead... for IL_GnisisBlight
78 return
79 endif
80 if ( "kwama queen_gnisis"->GetBlightDisease == 1 )
81 AddSpell "ash-chancre"
82 SetFight 90
83 else
84 RemoveSpell "ash-chancre"
85 SetFight 50
86 endif
87 return
88endif
89
90if ( GetPCCell "Hairat-Vassamsi Egg Mine" == 1 )
91 if ( "kwama queen_hairat"->GetBlightDisease == 1 )
92 AddSpell "ash-chancre"
93 SetFight 90
94 else
95 RemoveSpell "ash-chancre"
96 SetFight 50
97 endif
98 return
99endif
100
101if ( GetPCCell "Hairat-Vassamsi Egg Mine, Queen's Lair" == 1 )
102 if ( "kwama queen_hairat"->GetBlightDisease == 1 )
103 AddSpell "ash-chancre"
104 SetFight 90
105 else
106 RemoveSpell "ash-chancre"
107 SetFight 50
108 endif
109 return
110endif
111
112if ( GetPCCell "Inanius Egg Mine" == 1 )
113 ;this queen is not blighted, but can be killed...
114 if ( GetDeadCount "Kwama Queen_HHEM" > 0 )
115 Disable
116 else
117 Enable
118 endif
119 return
120endif
121
122if ( GetPCCell "Madas-Zebba Egg Mine" == 1 )
123 if ( "kwama queen_madas"->GetBlightDisease == 1 )
124 AddSpell "ash-chancre"
125 SetFight 90
126 else
127 RemoveSpell "ash-chancre"
128 SetFight 50
129 endif
130 return
131endif
132
133if ( GetPCCell "Maesa-Shammus Egg Mine" == 1 )
134 if ( "kwama queen_maesa"->GetBlightDisease == 1 )
135 AddSpell "ash-chancre"
136 SetFight 90
137 else
138 RemoveSpell "ash-chancre"
139 SetFight 50
140 endif
141 return
142endif
143
144if ( GetPCCell "Matus-Akin Egg Mine" == 1 )
145 if ( "kwama queen_matus"->GetBlightDisease == 1 )
146 AddSpell "ash-chancre"
147 SetFight 90
148 else
149 RemoveSpell "ash-chancre"
150 SetFight 50
151 endif
152 return
153endif
154
155if ( GetPCCell "Matus-Akin Egg Mine, Queen's Lair" == 1 )
156 if ( "kwama queen_matus"->GetBlightDisease == 1 )
157 AddSpell "ash-chancre"
158 SetFight 90
159 else
160 RemoveSpell "ash-chancre"
161 SetFight 50
162 endif
163 return
164endif
165
166if ( GetPCCell "Mudan-Mul Egg Mine" == 1 )
167 if ( "kwama queen_mudan"->GetBlightDisease == 1 )
168 AddSpell "ash-chancre"
169 SetFight 90
170 else
171 RemoveSpell "ash-chancre"
172 SetFight 50
173 endif
174 return
175endif
176
177if ( GetPCCell "Panabanit-Nimawia Egg Mine" == 1 )
178 if ( "kwama queen_panabanit"->GetBlightDisease == 1 )
179 AddSpell "ash-chancre"
180 SetFight 90
181 else
182 RemoveSpell "ash-chancre"
183 SetFight 50
184 endif
185 return
186endif
187
188if ( GetPCCell "Sarimisun-Assa Egg Mine" == 1 )
189 if ( "kwama queen_sarimisun"->GetBlightDisease == 1 )
190 AddSpell "ash-chancre"
191 SetFight 90
192 else
193 RemoveSpell "ash-chancre"
194 SetFight 50
195 endif
196 return
197endif
198
199if ( GetPCCell "Sarimisun-Assa Egg Mine, Queen's Lair" == 1 )
200 if ( "kwama queen_sarimisun"->GetBlightDisease == 1 )
201 AddSpell "ash-chancre"
202 SetFight 90
203 else
204 RemoveSpell "ash-chancre"
205 SetFight 50
206 endif
207 return
208endif
209
210if ( GetPCCell "Shurdan-Raplay Egg Mine" == 1 )
211 if ( "kwama queen_shurdan"->GetBlightDisease == 1 )
212 AddSpell "ash-chancre"
213 SetFight 90
214 else
215 RemoveSpell "ash-chancre"
216 SetFight 50
217 endif
218 return
219endif
220
221if ( GetPCCell "Sinamusa Egg Mine" == 1 )
222 if ( "kwama queen_sinamusa"->GetBlightDisease == 1 )
223 AddSpell "ash-chancre"
224 SetFight 90
225 else
226 RemoveSpell "ash-chancre"
227 SetFight 50
228 endif
229 return
230endif
231
232if ( GetPCCell "Zalkin-Sul Egg Mine" == 1 )
233 if ( "kwama queen_zalkin"->GetBlightDisease == 1 )
234 AddSpell "ash-chancre"
235 SetFight 90
236 else
237 RemoveSpell "ash-chancre"
238 SetFight 50
239 endif
240 return
241endif
242
243;default is to go ahead and add the spell...
244if ( GetBlightDisease == 0 )
245 AddSpell "ash-chancre"
246endif
247
248End