Created: 09/21/2024, 06:17:33 PM Updated: 11/25/2024, 09:31:51 PM View Change History
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16removelist myDressList
17createlist myDressList
18
19
20
21
22
23@setvar! activateAspect 1
24
25
26
27
28
29
30pushlist myDressList 0000
31pushlist myDressList 0000
32pushlist myDressList 0000
33pushlist myDressList 0000
34pushlist myDressList 0000
35
36
37
38
39
40
41
42
43@setvar! onlyExceptionalOrMagical 1
44
45
46
47
48
49
50@setvar! leather 0
51@setvar! studded 0
52@setvar! bone 0
53@setvar! ringmail 0
54@setvar! chainmail 0
55@setvar! platemail 0
56
57@setvar! useShield 1
58@setvar! openAbilityHotbar 1
59
60
61
62@setvar! maxwaittimeinms 650
63
64
65
66@clearignore
67
68@setvar! weaponResponse 0
69
70@setvar! messageCD 3000
71settimer messageTimer messageCD
72
73if 1 = leather
74
75 while findtype 7610|5063|5061|5070|5075|7175|7179|31191|5074|7169|7177 backpack as itemDress
76
77 getlabel itemDress itemDesc
78
79 if 1 = onlyExceptionalOrMagical
80 if "exceptional" in itemDesc or "invulnerability" in itemDesc or "fortification" in itemDesc
81 if timer messageTimer > messageCD
82 overhead "dressing.." 11
83 settimer messageTimer 0
84 endif
85 dclick itemDress
86 wait maxwaittimeinms
87 endif
88 else
89 if timer messageTimer > messageCD
90 overhead "dressing.." 11
91 settimer messageTimer 0
92 endif
93 dclick itemDress
94 wait maxwaittimeinms
95 endif
96
97 @ignore itemDress
98
99 endwhile
100
101elseif 1 = studded
102
103 while findtype 31011|5078|5076|5085|5090|7181|7170|5089|31012 backpack as itemDress
104
105 getlabel itemDress itemDesc
106
107 if 1 = onlyExceptionalOrMagical
108 if "exceptional" in itemDesc or "invulnerability" in itemDesc or "fortification" in itemDesc
109 if timer messageTimer > messageCD
110 overhead "dressing.." 11
111 settimer messageTimer 0
112 endif
113 dclick itemDress
114 wait maxwaittimeinms
115 endif
116 else
117 if timer messageTimer > messageCD
118 overhead "dressing.." 11
119 settimer messageTimer 0
120 endif
121 dclick itemDress
122 wait maxwaittimeinms
123 endif
124
125 @ignore itemDress
126
127 endwhile
128
129elseif 1 = bone
130
131 while findtype 5201|31003|5203|5205|5204|5207|31004 backpack as itemDress
132
133 getlabel itemDress itemDesc
134
135 if 1 = onlyExceptionalOrMagical
136 if "exceptional" in itemDesc or "invulnerability" in itemDesc or "fortification" in itemDesc
137 if timer messageTimer > messageCD
138 overhead "dressing.." 11
139 settimer messageTimer 0
140 endif
141 dclick itemDress
142 wait maxwaittimeinms
143 endif
144 else
145 if timer messageTimer > messageCD
146 overhead "dressing.." 11
147 settimer messageTimer 0
148 endif
149 dclick itemDress
150 wait maxwaittimeinms
151 endif
152
153 @ignore itemDress
154
155 endwhile
156
157elseif 1 = ringmail
158
159 while findtype 5131|31009|5103|5106|5101|5105|31010 backpack as itemDress
160
161 getlabel itemDress itemDesc
162
163 if 1 = onlyExceptionalOrMagical
164 if "exceptional" in itemDesc or "invulnerability" in itemDesc or "fortification" in itemDesc
165 if timer messageTimer > messageCD
166 overhead "dressing.." 11
167 settimer messageTimer 0
168 endif
169 dclick itemDress
170 wait maxwaittimeinms
171 endif
172 else
173 if timer messageTimer > messageCD
174 overhead "dressing.." 11
175 settimer messageTimer 0
176 endif
177 dclick itemDress
178 wait maxwaittimeinms
179 endif
180
181 @ignore itemDress
182
183 endwhile
184
185elseif 1 = chainmail
186
187 while findtype 5056|31006|31005|31015|5060|5059|31007 backpack as itemDress
188
189 getlabel itemDress itemDesc
190
191 if 1 = onlyExceptionalOrMagical
192 if "exceptional" in itemDesc or "invulnerability" in itemDesc or "fortification" in itemDesc
193 if timer messageTimer > messageCD
194 overhead "dressing.." 11
195 settimer messageTimer 0
196 endif
197 dclick itemDress
198 wait maxwaittimeinms
199 endif
200 else
201 if timer messageTimer > messageCD
202 overhead "dressing.." 11
203 settimer messageTimer 0
204 endif
205 dclick itemDress
206 wait maxwaittimeinms
207 endif
208
209 @ignore itemDress
210
211 endwhile
212
213elseif 1 = platemail
214
215 while findtype 5138|5139|5143|5144|5142|5146|31008 backpack as itemDress
216
217 getlabel itemDress itemDesc
218
219 if 1 = onlyExceptionalOrMagical
220 if "exceptional" in itemDesc or "invulnerability" in itemDesc or "fortification" in itemDesc
221 if timer messageTimer > messageCD
222 overhead "dressing.." 11
223 settimer messageTimer 0
224 endif
225 dclick itemDress
226 wait maxwaittimeinms
227 endif
228 else
229 if timer messageTimer > messageCD
230 overhead "dressing.." 11
231 settimer messageTimer 0
232 endif
233 dclick itemDress
234 wait maxwaittimeinms
235 endif
236
237 @ignore itemDress
238
239 endwhile
240
241endif
242
243foreach cloth in myDressList
244 if findtype cloth backpack as myItem
245 getlabel myItem myLabel
246
247 if "blessed" in myLabel
248 if timer messageTimer > messageCD
249 overhead "dressing.." 11
250 settimer messageTimer 0
251 endif
252 dclick myItem
253 wait maxwaittimeinms
254 endif
255 endif
256
257endfor
258
259if skill 'arcane' >= 80
260
261 while findtype 31017|31019|31021|31023|31025|31027|31029|31031|31033|31035|31037|31038|31041|31043|31045|31047|31049|31051|31053|31055 backpack as itemDress
262 getlabel itemDress itemDesc
263
264 if 1 = onlyExceptionalOrMagical
265 if "exceptional" in itemDesc or "vanquishing" in itemDesc or "supremely" in itemDesc or "power" in itemDesc or "exceedingly" in itemDesc or "slaying" in itemDesc
266 if timer messageTimer > messageCD
267 overhead "dressing.." 11
268 settimer messageTimer 0
269 endif
270 @setvar! weaponResponse 8
271 dclick itemDress
272 wait maxwaittimeinms
273 break
274 endif
275 else
276 if timer messageTimer > messageCD
277 overhead "dressing.." 11
278 settimer messageTimer 0
279 endif
280 dclick itemDress
281 wait maxwaittimeinms
282 endif
283
284 @ignore itemDress
285 endwhile
286elseif skill 'archery' >= 80
287
288 while findtype 3920|5042|5117|30990|30993|30994|30995|31184|31186 backpack as itemDress
289 getlabel itemDress itemDesc
290
291 if 1 = onlyExceptionalOrMagical
292 if "exceptional" in itemDesc or "vanquishing" in itemDesc or "supremely" in itemDesc or "power" in itemDesc or "exceedingly" in itemDesc or "slaying" in itemDesc
293 if timer messageTimer > messageCD
294 overhead "dressing.." 11
295 settimer messageTimer 0
296 endif
297 @setvar! weaponResponse 8
298 dclick itemDress
299 wait maxwaittimeinms
300 break
301 endif
302 else
303 if timer messageTimer > messageCD
304 overhead "dressing.." 11
305 settimer messageTimer 0
306 endif
307 dclick itemDress
308 wait maxwaittimeinms
309 endif
310
311 @ignore itemDress
312 endwhile
313elseif skill 'fencing' >= 80
314 while findtype 3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188 backpack as itemDress
315 getlabel itemDress itemDesc
316
317 if 1 = onlyExceptionalOrMagical
318 if "exceptional" in itemDesc or "vanquishing" in itemDesc or "supremely" in itemDesc or "power" in itemDesc or "exceedingly" in itemDesc or "slaying" in itemDesc
319 if timer messageTimer > messageCD
320 overhead "dressing.." 11
321 settimer messageTimer 0
322 endif
323 @setvar! weaponResponse 8
324 dclick itemDress
325 wait maxwaittimeinms
326 break
327 endif
328 else
329 if timer messageTimer > messageCD
330 overhead "dressing.." 11
331 settimer messageTimer 0
332 endif
333 dclick itemDress
334 wait maxwaittimeinms
335 endif
336
337 @ignore itemDress
338 endwhile
339elseif skill 'mace fighting' >= 80
340 while findtype 3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182 backpack as itemDress
341 getlabel itemDress itemDesc
342
343 if 1 = onlyExceptionalOrMagical
344 if "exceptional" in itemDesc or "vanquishing" in itemDesc or "supremely" in itemDesc or "power" in itemDesc or "exceedingly" in itemDesc or "slaying" in itemDesc
345 if timer messageTimer > messageCD
346 overhead "dressing.." 11
347 settimer messageTimer 0
348 endif
349 @setvar! weaponResponse 8
350 dclick itemDress
351 wait maxwaittimeinms
352 break
353 endif
354 else
355 if timer messageTimer > messageCD
356 overhead "dressing.." 11
357 settimer messageTimer 0
358 endif
359 dclick itemDress
360 wait maxwaittimeinms
361 endif
362
363 @ignore itemDress
364 endwhile
365elseif skill 'swordsmanship' >= 80
366 while findtype 3909|3911|3913|3915|3917|3934|3937|5046|5049|5115|5119|5182|5185|5187|30988|31128|31190 backpack as itemDress
367 getlabel itemDress itemDesc
368
369 if 1 = onlyExceptionalOrMagical
370 if "exceptional" in itemDesc or "vanquishing" in itemDesc or "supremely" in itemDesc or "power" in itemDesc or "exceedingly" in itemDesc or "slaying" in itemDesc
371 if timer messageTimer > messageCD
372 overhead "dressing.." 11
373 settimer messageTimer 0
374 endif
375 @setvar! weaponResponse 8
376 dclick itemDress
377 wait maxwaittimeinms
378 break
379 endif
380 else
381 if timer messageTimer > messageCD
382 overhead "dressing.." 11
383 settimer messageTimer 0
384 endif
385 dclick itemDress
386 wait maxwaittimeinms
387 endif
388
389 @ignore itemDress
390 endwhile
391elseif skill 'magery' >= 80
392 while findtype 3570|3571|3572|3573|3834 backpack as itemDress
393 getlabel itemDress itemDesc
394
395 if 1 = onlyExceptionalOrMagical
396 if "exceptional" in itemDesc or "vanquishing" in itemDesc or "supremely" in itemDesc or "power" in itemDesc or "exceedingly" in itemDesc or "slaying" in itemDesc
397 if hue itemDress != 0
398 if timer messageTimer > messageCD
399 settimer messageTimer 0
400 endif
401 @setvar! weaponResponse 13
402 dclick itemDress
403 wait maxwaittimeinms
404 break
405 endif
406 endif
407 else
408 if timer messageTimer > messageCD
409 overhead "dressing.." 11
410 settimer messageTimer 0
411 endif
412 dclick itemDress
413 wait maxwaittimeinms
414 endif
415
416 @ignore itemDress
417 endwhile
418elseif skill 'wrestling' >= 80
419 while findtype 22187|31141|31142 backpack as itemDress
420 getlabel itemDress itemDesc
421
422 if 1 = onlyExceptionalOrMagical
423 if "exceptional" in itemDesc or "vanquishing" in itemDesc or "supremely" in itemDesc or "power" in itemDesc or "exceedingly" in itemDesc or "slaying" in itemDesc
424 if timer messageTimer > messageCD
425 overhead "dressing.." 11
426 settimer messageTimer 0
427 endif
428 @setvar! weaponResponse 8
429 dclick itemDress
430 wait maxwaittimeinms
431 break
432 endif
433 else
434 if timer messageTimer > messageCD
435 overhead "dressing.." 11
436 settimer messageTimer 0
437 endif
438 dclick itemDress
439 wait maxwaittimeinms
440 endif
441
442 @ignore itemDress
443 endwhile
444endif
445
446if 1 = useShield
447 while findtype 7026|7027|7029|7031|7033|7034|7035|7107|7109|31002|31130 backpack as itemDress
448 getlabel itemDress itemDesc
449
450 if 1 = onlyExceptionalOrMagical
451 if "exceptional" in itemDesc or "vanquishing" in itemDesc or "supremely" in itemDesc or "power" in itemDesc or "exceedingly" in itemDesc or "slaying" in itemDesc
452 if timer messageTimer > messageCD
453 overhead "dressing.." 11
454 settimer messageTimer 0
455 endif
456 dclick itemDress
457 wait maxwaittimeinms
458 break
459 endif
460 else
461 if timer messageTimer > messageCD
462 overhead "dressing.." 11
463 settimer messageTimer 0
464 endif
465 dclick itemDress
466 wait maxwaittimeinms
467 endif
468
469 @ignore itemDress
470 endwhile
471endif
472
473if 1 = activateAspect
474
475 if ingump "Show Only Unlocked"
476 gumpresponse 102
477 waitforgump 2424293173 maxwaittimeinms
478 endif
479
480 say '[aspect'
481 waitforgump 2424293173 maxwaittimeinms
482 gumpresponse 17
483 wait 200
484 waitforgump 2424293173 maxwaittimeinms
485 gumpresponse 17
486 wait 200
487
488 if 0 != weaponResponse
489 waitforgump 2424293173 maxwaittimeinms
490 gumpresponse weaponResponse
491 wait 200
492 waitforgump 2424293173 maxwaittimeinms
493 gumpresponse weaponResponse
494 wait 200
495 endif
496
497 gumpclose
498endif
499
500if 1 = openAbilityHotbar and not gumpexists 3954121934
501 yell '[abilitieshotbar'
502endif
503
504overhead "Dress Completed!" 65