Back to "switcher" tags

AspectQuickSwitch (UPDATED) by sifmoo

Description: Modified version of AspectQuickSwitch by Elhoej to include new expansion aspects.

1// ==================================
2// ASPECT SWITCHER
3// Ensure "Show Only Unlocked" is UNTICKED
4// The script requires ALL aspects to be shown
5// ==================================
6
7
8@clearsysmsg
9
10@setvar! weaponAspect BLOOD
11@setvar! armorAspect HARVEST
12
13// DONT EDIT THIS LIST ===========================
14@setvar AIR        2263
15@setvar ARCANE     1560
16@setvar ARTISAN    2096
17@setvar BLOOD      2087
18@setvar DEATH      2155
19@setvar DISCIPLINE 2490
20@setvar COMMAND    1782
21@setvar EARTH      2767
22@setvar ELDRITCH   2615
23@setvar FIRE       2635
24@setvar FORTUNE    2843
25@setvar FROST      2234
26@setvar GADGET     2669
27@setvar HARVEST    2086
28@setvar HOLY       3985
29@setvar LIGHTNING  2650
30@setvar LYRIC      2241
31@setvar MADNESS    1060
32@setvar POISON     2897
33@setvar SHADOW     1790
34@setvar VOID       2599
35@setvar WATER      2592
36@setvar WAR        999
37// ===============================================
38
39
40//open aspect
41say '[aspect'
42waitforgump 0x907FC735 1000
43
44//change to overview if necessary
45if ingump 'Aspect Details' 0x907FC735
46    gumpresponse 103 0x907FC735
47    waitforgump 0x907FC735 1000
48endif
49
50//check if on right page
51if weaponAspect = GADGET or weaponAspect = HARVEST or weaponAspect = HOLY or weaponAspect = LIGHTNING or weaponAspect = LYRIC or weaponAspect = MADNESS or weaponAspect = POISON or weaponAspect = SHADOW or weaponAspect = VOID or weaponAspect = WAR or weaponAspect = WATER
52    if ingump '1/2' 0x907FC735
53    gumpresponse 11 0x907FC735
54        waitforgump 0x907FC735 1000
55    endif
56else 
57    if ingump '2/2' 0x907FC735
58    gumpresponse 10 0x907FC735
59        waitforgump 0x907FC735 1000
60    endif
61endif
62
63//activate weapon aspect
64
65if weaponAspect = AIR
66    gumpresponse 500 0x907FC735
67    waitforgump 0x907FC735 1000
68    gumpresponse 500 0x907FC735
69    waitforgump 0x907FC735 1000
70elseif weaponAspect = ARCANE
71    gumpresponse 501 0x907FC735
72    waitforgump 0x907FC735 1000
73    gumpresponse 501 0x907FC735
74    waitforgump 0x907FC735 1000
75elseif weaponAspect = ARTISAN
76    gumpresponse 502 0x907FC735
77    waitforgump 0x907FC735 1000
78    gumpresponse 502 0x907FC735
79    waitforgump 0x907FC735 1000
80elseif weaponAspect = BLOOD
81    gumpresponse 503 0x907FC735
82    waitforgump 0x907FC735 1000
83    gumpresponse 503 0x907FC735
84    waitforgump 0x907FC735 1000
85elseif weaponAspect = COMMAND
86    gumpresponse 504 0x907FC735
87    waitforgump 0x907FC735 1000
88    gumpresponse 504 0x907FC735
89    waitforgump 0x907FC735 1000
90elseif weaponAspect = DEATH
91    gumpresponse 505 0x907FC735
92    waitforgump 0x907FC735 1000
93    gumpresponse 505 0x907FC735
94    waitforgump 0x907FC735 1000
95elseif weaponAspect = DISCIPLINE
96    gumpresponse 506 0x907FC735
97    waitforgump 0x907FC735 1000
98    gumpresponse 506 0x907FC735
99    waitforgump 0x907FC735 1000
100elseif weaponAspect = EARTH
101    gumpresponse 507 0x907FC735
102    waitforgump 0x907FC735 1000
103    gumpresponse 507 0x907FC735
104    waitforgump 0x907FC735 1000
105elseif weaponAspect = ELDRITCH
106    gumpresponse 508 0x907FC735
107    waitforgump 0x907FC735 1000
108    gumpresponse 508 0x907FC735
109    waitforgump 0x907FC735 1000
110elseif weaponAspect = FIRE
111    gumpresponse 509 0x907FC735
112    waitforgump 0x907FC735 1000
113    gumpresponse 509 0x907FC735
114    waitforgump 0x907FC735 1000
115elseif weaponAspect = FORTUNE
116    gumpresponse 510 0x907FC735
117    waitforgump 0x907FC735 1000
118    gumpresponse 510 0x907FC735
119    waitforgump 0x907FC735 1000
120    elseif weaponAspect = FROST
121    gumpresponse 511 0x907FC735
122    waitforgump 0x907FC735 1000
123    gumpresponse 511 0x907FC735
124    waitforgump 0x907FC735 1000
125    elseif weaponAspect = GADGET
126        gumpresponse 500 0x907FC735
127    waitforgump 0x907FC735 1000
128    gumpresponse 500 0x907FC735
129    waitforgump 0x907FC735 1000
130    elseif weaponAspect = HARVEST
131        gumpresponse 501 0x907FC735
132    waitforgump 0x907FC735 1000
133    gumpresponse 501 0x907FC735
134    waitforgump 0x907FC735 1000
135    elseif weaponAspect = HOLY
136        gumpresponse 502 0x907FC735
137    waitforgump 0x907FC735 1000
138    gumpresponse 502 0x907FC735
139    waitforgump 0x907FC735 1000
140    elseif weaponAspect = LIGHTNING
141        gumpresponse 503 0x907FC735
142    waitforgump 0x907FC735 1000
143    gumpresponse 503 0x907FC735
144    waitforgump 0x907FC735 1000
145    elseif weaponAspect = LYRIC
146        gumpresponse 504 0x907FC735
147    waitforgump 0x907FC735 1000
148    gumpresponse 504 0x907FC735
149    waitforgump 0x907FC735 1000
150    elseif weaponAspect = MADNESS
151        gumpresponse 505 0x907FC735
152    waitforgump 0x907FC735 1000
153    gumpresponse 505 0x907FC735
154    waitforgump 0x907FC735 1000
155    elseif weaponAspect = POISON
156        gumpresponse 506 0x907FC735
157    waitforgump 0x907FC735 1000
158    gumpresponse 506 0x907FC735
159    waitforgump 0x907FC735 1000
160    elseif weaponAspect = SHADOW
161        gumpresponse 507 0x907FC735
162    waitforgump 0x907FC735 1000
163    gumpresponse 507 0x907FC735
164    waitforgump 0x907FC735 1000
165    elseif weaponAspect = VOID
166        gumpresponse 508 0x907FC735
167    waitforgump 0x907FC735 1000
168    gumpresponse 508 0x907FC735
169    waitforgump 0x907FC735 1000
170    elseif weaponAspect = WAR
171        gumpresponse 509 0x907FC735
172    waitforgump 0x907FC735 1000
173    gumpresponse 509 0x907FC735
174    waitforgump 0x907FC735 1000
175    elseif weaponAspect = WATER
176        gumpresponse 510 0x907FC735
177    waitforgump 0x907FC735 1000
178    gumpresponse 510 0x907FC735
179    waitforgump 0x907FC735 1000
180    endif
181
182
183//check if on right page
184if armorAspect = GADGET or armorAspect = HARVEST or armorAspect = HOLY or armorAspect = LIGHTNING or armorAspect = LYRIC or armorAspect = MADNESS or armorAspect = POISON or armorAspect = SHADOW or armorAspect = VOID or armorAspect = WAR or armorAspect = WATER
185    if ingump '1/2' 0x907FC735
186        gumpresponse 11 0x907FC735
187        waitforgump 0x907FC735 1000
188    endif
189else 
190    if ingump '2/2' 0x907FC735
191        gumpresponse 10 0x907FC735
192        waitforgump 0x907FC735 1000
193    endif
194endif
195    
196//Active armor aspect
197if armorAspect = AIR
198    gumpresponse 600 0x907FC735
199    waitforgump 0x907FC735 1000
200    gumpresponse 600 0x907FC735
201    waitforgump 0x907FC735 1000
202elseif armorAspect = ARCANE
203    gumpresponse 601 0x907FC735
204    waitforgump 0x907FC735 1000
205    gumpresponse 601 0x907FC735
206    waitforgump 0x907FC735 1000
207elseif armorAspect = ARTISAN
208    gumpresponse 602 0x907FC735
209    waitforgump 0x907FC735 1000
210    gumpresponse 602 0x907FC735
211    waitforgump 0x907FC735 1000
212elseif armorAspect = BLOOD
213    gumpresponse 603 0x907FC735
214    waitforgump 0x907FC735 1000
215    gumpresponse 603 0x907FC735
216    waitforgump 0x907FC735 1000
217elseif armorAspect = COMMAND
218    gumpresponse 604 0x907FC735
219    waitforgump 0x907FC735 1000
220    gumpresponse 604 0x907FC735
221    waitforgump 0x907FC735 1000
222elseif armorAspect = DEATH
223    gumpresponse 605 0x907FC735
224    waitforgump 0x907FC735 1000
225    gumpresponse 605 0x907FC735
226    waitforgump 0x907FC735 1000
227elseif armorAspect = DISCIPLINE
228    gumpresponse 606 0x907FC735
229    waitforgump 0x907FC735 1000
230    gumpresponse 606 0x907FC735
231    waitforgump 0x907FC735 1000
232elseif armorAspect = EARTH
233    gumpresponse 607 0x907FC735
234    waitforgump 0x907FC735 1000
235    gumpresponse 607 0x907FC735
236    waitforgump 0x907FC735 1000
237elseif armorAspect = ELDRITCH
238    gumpresponse 608 0x907FC735
239    waitforgump 0x907FC735 1000
240    gumpresponse 608 0x907FC735
241    waitforgump 0x907FC735 1000
242elseif armorAspect = FIRE
243    gumpresponse 609 0x907FC735
244    waitforgump 0x907FC735 1000
245    gumpresponse 609 0x907FC735
246    waitforgump 0x907FC735 1000
247elseif armorAspect = FORTUNE
248    gumpresponse 610 0x907FC735
249    waitforgump 0x907FC735 1000
250    gumpresponse 610 0x907FC735
251    waitforgump 0x907FC735 1000
252    elseif armorAspect = FROST
253    gumpresponse 611 0x907FC735
254    waitforgump 0x907FC735 1000
255    gumpresponse 611 0x907FC735
256    waitforgump 0x907FC735 1000
257    elseif armorAspect = GADGET
258        gumpresponse 600 0x907FC735
259    waitforgump 0x907FC735 1000
260    gumpresponse 600 0x907FC735
261    waitforgump 0x907FC735 1000
262    elseif armorAspect = HARVEST
263    gumpresponse 601 0x907FC735
264    waitforgump 0x907FC735 1000
265    gumpresponse 601 0x907FC735
266    waitforgump 0x907FC735 1000
267    elseif armorAspect = HOLY
268        gumpresponse 602 0x907FC735
269    waitforgump 0x907FC735 1000
270    gumpresponse 602 0x907FC735
271    waitforgump 0x907FC735 1000
272    elseif armorAspect = LIGHTNING
273        gumpresponse 603 0x907FC735
274    waitforgump 0x907FC735 1000
275    gumpresponse 603 0x907FC735
276    waitforgump 0x907FC735 1000
277    elseif armorAspect = LYRIC
278        gumpresponse 604 0x907FC735
279    waitforgump 0x907FC735 1000
280    gumpresponse 604 0x907FC735
281    waitforgump 0x907FC735 1000
282    elseif armorAspect = MADNESS
283        gumpresponse 605 0x907FC735
284    waitforgump 0x907FC735 1000
285    gumpresponse 605 0x907FC735
286    waitforgump 0x907FC735 1000
287    elseif armorAspect = POISON
288        gumpresponse 606 0x907FC735
289    waitforgump 0x907FC735 1000
290    gumpresponse 606 0x907FC735
291    waitforgump 0x907FC735 1000
292    elseif armorAspect = SHADOW
293        gumpresponse 607 0x907FC735
294    waitforgump 0x907FC735 1000
295    gumpresponse 607 0x907FC735
296    waitforgump 0x907FC735 1000
297    elseif armorAspect = VOID
298    gumpresponse 608 0x907FC735
299    waitforgump 0x907FC735 1000
300    gumpresponse 608 0x907FC735
301    waitforgump 0x907FC735 1000
302    elseif armorAspect = WAR
303    gumpresponse 609 0x907FC735
304    waitforgump 0x907FC735 1000
305    gumpresponse 609 0x907FC735
306    waitforgump 0x907FC735 1000
307    elseif armorAspect = WATER
308    gumpresponse 610 0x907FC735
309    waitforgump 0x907FC735 1000
310    gumpresponse 610 0x907FC735
311    waitforgump 0x907FC735 1000
312    endif
313pause 50
314
315if insysmsg 'do not have a'
316    overhead '[ ASPECT ] NO EQUIP'   37
317elseif insysmsg 'before activating another'
318    overhead '[ ASPECT ] MUST WAIT'  37
319elseif insysmsg 'already of that aspect'
320    overhead '[ ASPECT ] ALREADY ACTIVE' 37
321endif
322
323gumpclose 0x907FC735