Created: 10/22/2022, 01:52:37 AM Updated: 10/22/2022, 01:52:37 AM View Change History
1
2
3
4
5
6
7
8overhead "Autobot engaged" 88
9
10 @setvar! cdTrap 420000
11
12 if not timerexists myTrapTimer1
13 createtimer myTrapTimer1
14 settimer myTrapTimer1 cdTrap
15 endif
16 if not timerexists myTrapTimer2
17 createtimer myTrapTimer2
18 settimer myTrapTimer2 cdTrap
19 endif
20 if not timerexists myTrapTimer3
21 createtimer myTrapTimer3
22 settimer myTrapTimer3 cdTrap
23 endif
24 if not timerexists myTrapTimer4
25 createtimer myTrapTimer4
26 settimer myTrapTimer4 cdTrap
27 endif
28 if not timerexists myTrapTimer5
29 createtimer myTrapTimer5
30 settimer myTrapTimer5 cdTrap
31 endif
32
33
34if findlayer self righthand as item
35
36elseif findtype "3834" backpack as item
37 dclick item
38else
39 overhead "No book bro!" 34
40endif
41
42if position 1828 998
43
44 while not gumpexists 3899019871 and findtype "blue moongate" ground 0 1 2 as jGate
45 dclick jGate
46 endwhile
47
48 if gumpexists 3899019871 and findtype "blue moongate" ground 0 1 2 as jGate
49 gumpresponse 2 3899019871
50 endif
51
52 if not hidden
53 useskill 'Hiding'
54 endif
55 wait 500
56 replay
57endif
58
59
60
61
62@setvar! setThisAsOneIfYouWantToTargetYourOwnKillOrItWillTargetClosestMonster 0
63
64
65@setvar! cdLightning 40000
66@setvar! cdMagicArrow 20000
67@setvar! cdHarm 20000
68@setvar! cdFireball 60000
69@setvar! cdEvilOmen 30000
70@setvar! cdVampiricEmbrace 30000
71@setvar! cdCorpseSkin 30000
72@setvar! cdMindRot 30000
73@setvar! cdMushroom 60000
74@setvar! cdMagicShield 60000
75@setvar! cdReactiveArmor 60000
76@setvar! cdGuardMe 15000
77
78if not timerexists reactiveArmorTimer
79 createtimer reactiveArmorTimer
80 settimer reactiveArmorTimer cdMagicShield
81endif
82
83if not timerexists magicShieldTimer
84 createtimer magicShieldTimer
85 settimer magicShieldTimer cdMagicShield
86endif
87
88if not timerexists magicMushroomTimer
89 createtimer magicMushroomTimer
90 settimer magicMushroomTimer cdMushroom
91endif
92
93if not timerexists magicArrowTimer
94 createtimer magicArrowTimer
95 settimer magicArrowTimer cdMagicArrow
96endif
97
98if not timerexists lightningTimer
99 createtimer lightningTimer
100 settimer lightningTimer cdLightning
101endif
102
103if not timerexists harmTimer
104 createtimer harmTimer
105 settimer harmTimer cdHarm
106endif
107
108if not timerexists fireballTimer
109 createtimer fireballTimer
110 settimer fireballTimer cdFireball
111endif
112
113if not timerexists evilOmenTimer
114 createtimer evilOmenTimer
115 settimer evilOmenTimer cdEvilOmen
116endif
117
118if not timerexists vampiricEmbraceTimer
119 createtimer vampiricEmbraceTimer
120 settimer vampiricEmbraceTimer cdVampiricEmbrace
121endif
122
123if not timerexists corpseSkinTimer
124 createtimer corpseSkinTimer
125 settimer corpseSkinTimer cdCorpseSkin
126endif
127
128if not timerexists mindRotTimer
129 createtimer mindRotTimer
130 settimer mindRotTimer cdMindRot
131endif
132
133if not timerexists allGuardMeTimer
134 createtimer allGuardMeTimer
135 settimer allGuardMeTimer cdGuardMe
136endif
137
138
139if setThisAsOneIfYouWantToTargetYourOwnKillOrItWillTargetClosestMonster = 1
140 say "all kill"
141 wait 200
142 while targetexists
143
144 wait 50
145 endwhile
146else
147 hotkey 'Target Closest Non-Friendly Monster'
148 wait 200
149 if insysmsg "No one matching that was found" or not find lasttarget ground -1 -1 8
150 overhead "found no one" 34
151 wait 500
152 if targetexists
153 hotkey 'Cancel Current Target'
154 endif
155 if timer allGuardMeTimer >= cdGuardMe
156 say "all guard me"
157 settimer allGuardMeTimer 0
158 endif
159 if counttype "mushroom" backpack < 5
160 while counttype "mushroom" backpack < 15
161 cast "Create Food"
162 wait 200
163 endwhile
164 endif
165 while mana < 50
166 if not findbuff "actively meditating"
167 useskill 'meditation'
168 endif
169 wait 500
170 endwhile
171 if timer vampiricEmbraceTimer >= cdVampiricEmbrace and findtype 8198 ground -1 -1 4 as jorpse
172 say "[VampiricEmbrace"
173 wft 500
174 target jorpse
175 settimer vampiricEmbraceTimer 0
176 endif
177 replay
178 endif
179endif
180
181@setvar myKillTarget lasttarget
182
183if not varexist myPreviousKillTarget
184 @setvar myPreviousKillTarget 0
185endif
186
187getlabel myKillTarget desc
188overhead desc
189
190if not varexist myEarthPet or dead myEarthPet
191 overhead "Your pet is dead, demonic summon time" 34
192else
193 menu myEarthPet 2
194 wft 500
195 target myKillTarget
196endif
197
198if diffhits >= 30 and mana > 12
199 while not targetexists
200 if diffhits >= 60
201 cast 'Heal'
202 else
203 cast 'Greater Heal'
204 endif
205 wait 50
206 if hp = maxhp
207 hotkey '> Interrupt'
208 break
209 endif
210 endwhile
211 if targetexists
212 target self
213 endif
214endif
215
216if find myKillTarget -1 -1 8 as killy
217 if myKillTarget = myPreviousKillTarget
218
219 else
220 @setvar myPreviousKillTarget myKillTarget
221 endif
222else
223 overhead "Out of range" 34
224endif
225
226clearsysmsg
227
228say "all guard"
229
230@setvar! isLethalPoison 0
231clearsysmsg
232
233while not dead myKillTarget and find myKillTarget -1 -1 8 as killy
234
235 if not findtype "Purple Potion" backpack
236 overhead "Thou hast a distinct lack of boom juice" 34
237 endif
238
239 if find myKillTarget -1 -1 2 and findtype "metal chest|wooden chest" ground -1 -1 2
240 overhead "We found a chest!"
241
242 if findtype "barrel lid" ground -1 -1 2
243 overhead "Already on a trap!"
244 else
245 if timer myTrapTimer1 >= cdTrap
246 if findtype 6263 backpack as jire
247 while not gumpexists 3489968915
248 dclick jire
249 wft 500
250 target self
251 endwhile
252 if gumpexists 3489968915
253 overhead "Using trap 1 of 5" 88
254 gumpresponse 20 3489968915
255 wait 200
256 if insysmsg "You place a trap."
257 overhead "Sucess" 66
258 settimer myTrapTimer1 0
259 endif
260 endif
261 endif
262 elseif timer myTrapTimer2 >= cdTrap
263 if findtype 6263 backpack as jire
264 while not gumpexists 3489968915
265 dclick jire
266 wft 500
267 target self
268 endwhile
269 if gumpexists 3489968915
270 overhead "Using trap 2 of 5" 88
271 gumpresponse 20 3489968915
272 wait 200
273 if insysmsg "You place a trap."
274 overhead "Sucess" 66
275 settimer myTrapTimer2 0
276 endif
277 endif
278 endif
279 elseif timer myTrapTimer3 >= cdTrap
280 if findtype 6263 backpack as jire
281 while not gumpexists 3489968915
282 dclick jire
283 wft 500
284 target self
285 endwhile
286 if gumpexists 3489968915
287 overhead "Using trap 3 of 5" 88
288 gumpresponse 20 3489968915
289 wait 200
290 if insysmsg "You place a trap."
291 overhead "Sucess" 66
292 settimer myTrapTimer3 0
293 endif
294 endif
295 endif
296 elseif timer myTrapTimer4 >= cdTrap
297 if findtype 6263 backpack as jire
298 while not gumpexists 3489968915
299 dclick jire
300 wft 500
301 target self
302 endwhile
303 if gumpexists 3489968915
304 overhead "Using trap 4 of 5" 88
305 gumpresponse 20 3489968915
306 wait 200
307 if insysmsg "You place a trap."
308 overhead "Sucess" 66
309 settimer myTrapTimer4 0
310 endif
311 endif
312 endif
313 elseif timer myTrapTimer5 >= cdTrap
314 if findtype 6263 backpack as jire
315 while not gumpexists 3489968915
316 dclick jire
317 wft 500
318 target self
319 endwhile
320 if gumpexists 3489968915
321 overhead "Using trap 5 of 5" 88
322 gumpresponse 20 3489968915
323 wait 200
324 if insysmsg "You place a trap."
325 overhead "Sucess" 66
326 settimer myTrapTimer5 0
327 endif
328 endif
329 endif
330 elseif findtype 6263 backpack as jire
331 while not gumpexists 3489968915
332 dclick jire
333 wft 500
334 target self
335 endwhile
336 if gumpexists 3489968915
337 if ingump "5/5" 3489968915
338
339 overhead "NO MORE BOOM!" 34
340 else
341 settimer myTrapTimer1 cdTrap
342 gumpresponse 8 3489968915
343 endif
344 endif
345 else
346 overhead "NO MORE BOOM WIRE!" 34
347 endif
348 endif
349
350
351 if findtype "barrel lid" ground -1 -1 8 and findtype "music box" backpack as item
352 dclick item
353 wft 500
354 target self
355 endif
356
357 endif
358
359 if timer magicShieldTimer >= cdMagicShield and not findbuff "Magic Reflection"
360 cast "Magic Reflection"
361 wait 1000
362 elseif not findbuff "Magic Reflection" and not findbuff "Magic Resist Potion" and findtype "Black Potion" backpack as pot
363 dclick pot
364 wait 200
365 endif
366
367 if findbuff "Magic Reflection"
368 settimer magicShieldTimer 0
369 endif
370
371 if timer reactiveArmorTimer >= cdReactiveArmor and not findbuff "Reactive Armor"
372 cast "Reactive Armor"
373 wait 200
374 endif
375
376 if findbuff "Reactive Armor"
377 settimer reactiveArmorTimer 0
378 endif
379
380 if timer corpseSkinTimer >= cdCorpseSkin
381 overhead "Should be CorpseSkin!" 34
382 say "[CorpseSkin"
383 settimer corpseSkinTimer 0
384 wait 500
385 endif
386
387 if skill "poisoning" >= 100
388
389 if timer mindRotTimer >= cdMindRot
390 overhead "Should be mind rotting!" 34
391 say "[MindRot"
392 settimer mindRotTimer 0
393 wait 500
394 endif
395
396 while isLethalPoison = 0
397 getlabel myKillTarget desc2
398 overhead desc2 66
399
400 if "Lethal" in desc2
401 @setvar! isLethalPoison 1
402 break
403 elseif diffhits >= 30
404
405 break
406 elseif mana >= 9
407 while not targetexists
408 cast 'poison'
409 wait 50
410 if dead myKillTarget
411 hotkey '> Interrupt'
412 break
413 endif
414 endwhile
415 target myKillTarget
416 else
417 wait 200
418 endif
419 endwhile
420 endif
421 if timer evilOmenTimer >= cdEvilOmen
422 say "[EvilOmen"
423 settimer evilOmenTimer 0
424 wait 200
425 endif
426
427 if timer vampiricEmbraceTimer >= cdVampiricEmbrace and findtype 8198 ground -1 -1 4 as jorpse
428 say "[VampiricEmbrace"
429 wft 500
430 target jorpse
431 settimer vampiricEmbraceTimer 0
432 endif
433
434 if find myKillTarget -1 -1 12 as killy
435
436 else
437 overhead "Out of range" 34
438 break
439 endif
440
441 if poisoned
442 if findtype "Orange Potion" backpack as pot
443 dclick pot
444 wait 200
445 else
446 while not targetexists
447 if not poisoned
448 hotkey '> Interrupt'
449 break
450 else
451 cast 'Cure'
452 wait 50
453 endif
454 endwhile
455 if targetexists
456 target self
457 wait 500
458 endif
459 endif
460 endif
461
462
463 if diffhits < 30 and mana >= 12 and timer lightningTimer >= cdLightning
464 while not targetexists
465 if dead myKillTarget or diffhits >= 30
466 hotkey '> Interrupt'
467 break
468 else
469 cast 'Lightning'
470 wait 50
471 endif
472 endwhile
473 if targetexists
474 target myKillTarget
475 settimer lightningTimer 0
476 wait 500
477 endif
478 endif
479
480 if diffhits < 30 and mana >= 5 and timer magicArrowTimer >= cdMagicArrow
481 while not targetexists
482 if dead myKillTarget or diffhits >= 30
483 hotkey '> Interrupt'
484 break
485 else
486 cast 'magic arrow'
487 wait 50
488 endif
489 endwhile
490 if targetexists
491 target myKillTarget
492 settimer magicArrowTimer 0
493 wait 500
494 endif
495 endif
496
497 if diffhits < 30 and mana >= 9 and timer harmTimer >= cdHarm
498 while not targetexists
499 if dead myKillTarget or diffhits >= 30
500 hotkey '> Interrupt'
501 break
502 else
503 cast 'harm'
504 wait 50
505 endif
506 endwhile
507 if targetexists
508 target myKillTarget
509 settimer harmTimer 0
510 wait 500
511 endif
512 endif
513
514 if diffhits < 30 and mana >= 12 and timer fireballTimer >= cdFireball
515 while not targetexists
516 if dead myKillTarget or diffhits >= 30
517 hotkey '> Interrupt'
518 break
519 else
520 cast 'fireball'
521 wait 50
522 endif
523 endwhile
524 if targetexists
525 target myKillTarget
526 settimer fireballTimer 0
527 wait 500
528 endif
529 endif
530
531 if diffhits >= 30
532
533 if findtype "Yellow Potion" backpack as pot
534 getlabel pot desc
535 if "next usable" in desc
536
537 else
538 dclick pot
539 wait 200
540 endif
541 endif
542
543 if diffhits >= 30 and mana >= 12
544 while not targetexists
545 if diffhits >= 60
546 cast 'Heal'
547 else
548 cast 'Greater Heal'
549 endif
550 wait 50
551 if hp = maxhp
552 hotkey '> Interrupt'
553 break
554 endif
555 endwhile
556 if targetexists
557 target self
558 wait 50
559 endif
560 endif
561 elseif mana < 55 and findbuff "actively meditating"
562
563 elseif mana > 42
564 while not targetexists
565 if dead myKillTarget or diffhits >= 30
566 hotkey '> Interrupt'
567 break
568 else
569 cast 'Flamestrike'
570 wait 50
571 endif
572 endwhile
573 if targetexists
574 target myKillTarget
575 wait 500
576 endif
577 elseif not findbuff "actively meditating" and timer magicMushroomTimer >= cdMushroom and findtype "mushroom" backpack as mushy
578 overhead "Eatting shrooms" 66
579 dclick mushy
580 settimer magicMushroomTimer 0
581 elseif not findbuff "actively meditating"
582 useskill 'meditation'
583 wait 500
584 endif
585 wait 50
586endwhile
587
588wait 200
589replay