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