Bapeth's Modern Dungeon Picker by barryroser
Description: This script will put dungeon lockpicking and pilfering on cruise control.
Please read the description at the top of the script. Enjoy!
1# "***Bapeths Modern Dungeon Picker***"
2# Feb 26th 2025 - Removed Time Sense (use standalone script now), removed auto invis/smokebomb from Auto-Pilfer Routine
3#
4# "***READ THIS***READ THIS***READ THIS***READ THIS***"
5#
6# "***REQUIRED SETTINGS***"
7#
8# "In Game Dungeon Chest Menu"
9# "Continuous Lockpicking" and "Continuous Remove Trap" must be checked in the lockpicking gump menu
10# This gump menu appears when you attempt to open a chest
11#
12# "Auto Loot Control"
13# This script uses razor "Auto-Queue Object Delay" setting
14# Make sure this setting is turned ON in the razor Options tab > Targeting & Queues sub-tab
15# And set "object delay to 503" AUTO LOOTING WILL BE SLOW IF YOU DONT DO THIS!
16#
17# "Cooldowns"
18# This script uses four cooldowns called "Hiding" "Stealth" "Stealing" and "Move" (Stealing only for Pilfering)
19# Create these in the in-game options menu under Cooldowns and they must be spelled correctly
20# Sometimes a full game restart is needed if cooldowns are edited
21# The "Move" Cooldown should be set to "0.3 seconds"
22#
23# "***OPTIONAL SETTINGS***"
24#
25# "Smoke Bomb Cooldown" for pilfering only (use a separate script for regular smoke bombing)
26# Create a cooldown called "Smoke Bomb" (note the space), must be spelled exactly like that
27# Default cooldown is set to minimum cooldown time of 60 seconds (This assumes you have 3 points in "Without a Trace")
28# This can be edited by searching (ctrl + f) "60000" and replacing it with your personal cooldown timer that matches your thieves codex
29# Possible timers for smoke bomb are "60000", "80000", "100000", or "120000" (this is milliseconds)
30#
31# "Wizard Hat Stealth Trick" - prevents you from stumbling over a player/mob while moving in stealth
32# It is recommended to have in your pack a "Blessed and Aspected Armored Magical Wizard Hat" (Purchasable at prev vendor)
33# Alternatively you can buy a cheap "Magical Wizards Hat" from the Mage NPC in town (non-aspectable)
34# This is for the stealth part of the script
35# It will quick swap your hat and reduce your stamina
36# If your hat ever gets stuck in a "spam loop"
37# Go to Script tab > Options subtab and delete "bwiz" "bmain" and "nonaspectedwiz"
38#
39# "Auto Pilfer"
40# Toggle "WARMODE ON" for "AUTO-PILFER" - It is best to use the "TAB" button and ensure that "TAB" is set to toggle in UO options
41# To enable this feature: open the "thieves codex" while the script is playing - this will act like a switch to turn auto-pilfer on/off
42
43# "Hide/Stealth Blocking"
44# Toggle "WARMODE ON" to block the scripts smart hide/stealth feature (use for "Boss Room Custodians" and saving cooldown time)
45#
46# "Auto Chest Protection"
47# "ACP" feature will instantly cast (Minimum "50 Magery" required to use)
48# Wall of stone, Earth Elemental, Tele + Rope, or Reveal when you are detected
49# Does not work when player is revealed by the reveal spell
50# Toggle "Wall" "Earth" "Tele" "Reveal" or "None" by doubleclicking an "Atlas"
51# Type "[Atlas" in game to spawn a free weightless "Atlas" in your bag
52# Hotkey "Grants the player an Atlas" in razor hotkey tab if you dont want to doubleclick
53#
54# "Auto Frost Shell Protection"
55# Create a cooldown in game called "Aspect"
56# Frost shell is a powerful 5 second "cheat death" effect that can be instantly enabled for the cost of 5 essence through "activating the Frost Aspect"
57# The script will automatically hot swap to "Frost Aspect" when you are Detected by another player (skill not spell), or, if you fall to 35 or less HP
58# It is highly reccomended that you make a manual hotkey for "say [AspectArmor Frost"
59# You may want to activate "Frost Armor" on your own terms outside of the scope of the script
60# To toggle Auto Frost Shell Protection feature on/off "open the party menu" while the script is playing - the party menu acts like a switch (if you require the party menu for normal means, stop the script first before using)
61#
62# "Auto-Recycler"
63# This feature will auto recycle bad items and keep the good ones - To use this feature:
64# You must be carrying at least one "item identification wand" and at least one "recycler tool" type (Tinker Tools, Sewing Kit, Saw, Tongs, or Scribes Pen)
65# The recycle will happen when the player begins picking a fresh chest (Double Click Scissors to activate auto recycle manually)
66#
67# "Loot-Sense & Vacuum Mode"
68# This function will overhead display *loot* above items on the ground and pick them up as you pass by (2 tiles)
69# Be aware that this may make you overweight from large gold piles from time to time
70# To toggle this feature on/off (default is off) "Double click a Wizard Grimoire"
71#
72# "Auto Detect & Skin Corpses"
73# If you have a skinning knife and 50 or more "Forensic Evaluation"
74# While in Peace Mode the script will show corpses and auto skin them when in range
75# To toggle this feature on/off double click your skinning knife while the script is playing
76#
77# "Extra Features"
78# If you have any of the following items, the script will auto-use them when convenient and necessary;
79# Cure Potion, Cleansing Brew (use warmode), Trapped Pouch, Strength Potion (when weakened by another player), Refresh Potion
80# If you are "over weight" the script will now "auto-dump" leather and piles of 444 gold until you are unburdened
81#
82# "Lootbag"
83# Set by using the razor hotkey "Set Grab Item Hotbag"
84#
85# "Auto Stealth"
86# This is an in game setting that is reccomended to be turned ON
87# Toggle this on and off by typing [AutoStealth in game
88#
89# "Spam Reduction"
90# Options tab > Targeting & Queues subtab > Uncheck "Attack/Target name overhead"
91# Filters tab > Text & Messages subtab > Check "Filter Repeating Razor Messages" ONLY
92#
93# "Summoners Name Your Elemental"
94# See "line 150 & 158" if you would like to custom name your earth elemental(s)
95# Default is "LootGolem"
96#
97# -------------------------------"Recommended Builds"-------------------------------
98# --"Pilfer Ninja"------"Chest Ninja**"------"Summoner Picker"----"Bully Pilferer"--
99# Detect Hidden - 120 Detect Hidden - 120 Detect Hidden - 120 Hiding -------- 100
100# Lockpicking ----120 Lockpicking ----120 Lockpicking ----120 Snooping ------ 100
101# Stealth ------- 120 Stealth ------- 100 Stealth ------- 120 Stealing ------ 100
102# Hiding -------- 100 Hiding -------- 100 Hiding -------- 100 Wrestling ----- 100
103# Magery --------- 80 Magery --------- 80 Magery -------- 100 Alchemy -------- 80
104# Camping -------- 80 Camping ------- 120 Camping -------- 80 Parryig -------- 80
105# Stealing ------ 100 Stealing ------- 80 Spirit Speak --- 80 Magery --------- 80
106# Magic Resist --- 80
107# "Recommended Aspects, Links, and Codex/Tome"
108# Harvest or Fortune Aspect (high end tools needed for Fortune and or low level aspect)
109# Special/Rare loot Chance Links (Max 20) & Chest Success Chances/Progress Links (Max 10)
110# If you Summon "Spirit Pact" and "Earthpull" upgrades are recommended (Summoner Tome)
111# If you Lockpick "Overlooked" and "Without a Trace" is recommended (Thieves Codex)
112# If you Pilfer "Extortion" is recommended (Thieves Codex)
113# "** Bapeths current main build"
114#
115# "Notes on Rares"
116# Not all "Rares" are on the auto loot list
117# Keep an eye out for unlooted rares
118# I update the list as I find them
119#
120# "Notes on error"
121# "Screen transitions" and "teleporting far distances" will on occasion error the script
122# This is a bug in razor, simply play the script again if this happens
123# It helps to make a habit of replaying the script often to ensure its always playing
124# I recommend, if you know how to, loop this script into your other commonly used scripts
125#
126# "Notes on loop-in"
127# You will likley want to use other scripts while playing, and, it is advised to keep this script running at all times
128# In order to achieve this you can "loop-in" this script on the back end of any other script you are using
129# To learn more about this ask about it in the scripts=and-macros discord channel for Outlands discord
130# You can also seach for scripts Bapeth has made that are pre-looped, such as "Bapeths Dungeon Rope + Tele"
131#
132# "Script Starts Here"
133
134if not find "bsummon1" ground and findtype "an earth elemental|a fire elemental|a water elemental|an air elemental|a daemon" ground -1 -1 1 as sum1
135 if noto sum1 = "friend"
136 # Name your summon if you like (no spaces must be unique)
137 rename sum1 "LootGolem"
138 endif
139elseif not find "bsummon1" ground and findtype "LootGolem" ground as sum1
140 @setvar "bsummon1" sum1
141endif
142if not find "bsummon2" ground and findtype "an earth elemental|a fire elemental|a water elemental|an air elemental|a daemon" ground -1 -1 1 as sum2
143 if noto sum2 = "friend"
144 # Name your summon if you like (no spaces must be unique)
145 rename sum2 "LootGolems"
146 endif
147elseif not find "bsummon2" gorund and findtype "LootGolems" ground as sum2
148 @setvar "bsummon2" sum2
149endif
150
151if findtype 5912 self and not varexist "bwiz" and findlayer self head as regularhat
152 getlabel regularhat desc
153 if "magical" in desc
154 dclick regularhat
155 pause 500
156 getlabel backpack ping
157 replay
158 endif
159endif
160if not find "bwiz" self and findtype 5912 backpack as wizhat
161 getlabel wizhat desc
162 if "restyled" in desc
163 @ignore wizhat
164 replay
165 elseif "armored" in desc
166 @setvar "bwiz" wizhat
167 elseif "magical" in desc
168 @setvar "bwiz" wizhat
169 @setvar "nonaspectedwiz" wizhat
170 endif
171endif
172if varexist "bwiz" and find "bwiz" backpack
173 if not find "bmain" self and findlayer self head as hat
174 @setvar "bmain" hat
175 endif
176 if not varexist "bmain"
177 overhead "I need a primary hat or helm to wear.." 88
178 pause 2000
179 overhead "Anything will do, just not a magical wizard hat..." 88
180 stop
181 endif
182endif
183
184if skill "Lockpicking" >= 50 and not findtype "lockpicks" backpack and not timerexists lockpickcheck
185 overhead "I have no Lockpicks..." 38
186 createtimer lockpickcheck
187endif
188if timerexists lockpickcheck
189 if timer lockpickcheck > 21000
190 overhead "I have no Lockpicks..." 38
191 settimer lockpickcheck 0
192 endif
193endif
194if findtype "lockpicks" backpack
195 removetimer lockpickcheck
196endif
197
198if skill "Detect" >= 50 and not findtype "drill" backpack and not timerexists drillcheck
199 overhead "I have no Removal Tool..." 38
200 createtimer drillcheck
201endif
202if timerexists drillcheck
203 if timer drillcheck > 21000
204 overhead "I have no Removal Tool..." 38
205 settimer drillcheck 0
206 endif
207endif
208if findtype "drill" backpack
209 removetimer drillcheck
210endif
211
212if not timerexists frostshelltimer
213 createtimer frostshelltimer
214 settimer frostshelltimer 5000
215endif
216if timerexists frostshellswitch and timer frostshelltimer > 5000 and not cooldown "Aspect" and hp <= 35
217 say "[AspectArmor Frost"
218 getlabel backpack ping
219 if insysmsg "Your armor is already of that aspect"
220 //donothing
221 else
222 cooldown "Aspect" 30000
223 overhead "--Frost Shell Primed--" 2234
224 endif
225 settimer frostshelltimer 0
226endif
227
228if not timerexists frostshellswitch
229 if gumpexists 3527489586
230 gumpclose 3527489586
231 createtimer frostshellswitch
232 overhead "--Auto Shell Enabled--" 2085
233 endif
234endif
235if timerexists frostshellswitch
236 if gumpexists 3527489586
237 gumpclose 3527489586
238 removetimer frostshellswitch
239 overhead "--Auto Shell Disabled--" 1779
240 endif
241endif
242
243if not timerexists checkaspect
244 createtimer checkaspect
245 settimer checkaspect 60000
246elseif timer checkaspect >= 60000
247 if findlayer self innertorso as aspectarm
248 getlabel aspectarm desc
249 if "aspect" in desc
250 if "air" in desc
251 overhead "<Air Active>" 2263
252 elseif "arcane aspect" in desc
253 overhead "<Arcane Active>" 1560
254 elseif "artisan aspect" in desc
255 overhead "<Artisan Active>" 2096
256 elseif "blood aspect" in desc
257 overhead "<Blood Active>" 2087
258 elseif "command aspect" in desc
259 overhead "<Command Active>" 1782
260 elseif "death aspect" in desc
261 overhead "<Death Active>" 2155
262 elseif "discipline aspect" in desc
263 overhead "<Discipline Active>" 2490
264 elseif "earth aspect" in desc
265 overhead "<Earth Active>" 2767
266 elseif "eldritch aspect" in desc
267 overhead "<Eldritch Active>" 2615
268 elseif "fire aspect" in desc
269 overhead "<Fire Active>" 2635
270 elseif "fortune aspect" in desc
271 overhead "<Fortune Active>" 2843
272 elseif "frost aspect" in desc
273 overhead "<Frost Active>" 2234
274 elseif "gadget aspect" in desc
275 overhead "<Gadget Active>" 2669
276 elseif "harvest aspect" in desc
277 overhead "<Harvest Active>" 2086
278 elseif "holy aspect" in desc
279 overhead "<Holy Active>" 2153
280 elseif "lightning aspect" in desc
281 overhead "<Lightning Active>" 2650
282 elseif "lyric aspect" in desc
283 overhead "<Lyric Active>" 2241
284 elseif "madness aspect" in desc
285 overhead "<Madness Active>" 1060
286 elseif "poison aspect" in desc
287 overhead "<Poison Active>" 2897
288 elseif "shadow aspect" in desc
289 overhead "<Shadow Active>" 1790
290 elseif "void aspect" in desc
291 overhead "<Void Active>" 2599
292 elseif "water aspect" in desc
293 overhead "<Water Active>" 1788
294 elseif "war aspect" in desc
295 overhead "<War Active>" 2503
296 endif
297 else
298 overhead "No aspect enabled" 45
299 endif
300 endif
301 settimer checkaspect 0
302endif
303
304if timerexists ots
305 removetimer ots
306endif
307
308if timerexists bchestopen
309 removetimer bchestopen
310endif
311
312if not timerexists tab
313 createtimer tab
314endif
315
316if not timerexists ACPcheck
317 createtimer ACPcheck
318endif
319
320if skill "Magery" >= 80
321 if timerexists reflect and not findbuff "Magic Reflection"
322 if timer reflect > 30000
323 overhead "--Cast Reflect--" 2122
324 settimer reflect 12000
325 endif
326 endif
327 if findbuff "Magic Reflection" and timerexists reflect
328 removetimer reflect
329 endif
330 if not findbuff "Magic Reflection" and not timerexists reflect
331 createtimer reflect
332 endif
333endif
334
335if skill "Magery" >= 20
336 if timerexists reactive and not findbuff "Reactive Armor"
337 if timer reactive > 30000
338 overhead "--Cast Reactive--" 2122
339 settimer reactive 13500
340 endif
341 endif
342 if findbuff "Reactive Armor" and timerexists reactive
343 removetimer reactive
344 endif
345 if not findbuff "Reactive Armor" and not timerexists reactive
346 createtimer reactive
347 endif
348endif
349
350if skill "Magery" >= 40
351 if timerexists protection and not findbuff "Protection"
352 if timer protection > 30000
353 overhead "--Cast Protection--" 2122
354 settimer protection 9000
355 endif
356 endif
357 if findbuff "Protection" and timerexists protection
358 removetimer protection
359 endif
360 if not findbuff "Protection" and not timerexists protection
361 createtimer protection
362 endif
363endif
364
365if warmode and not hidden and not timerexists brew and not targetexists and findbuff "Bleed" and findtype 50675 backpack as cbrew
366 clearsysmsg
367 while queued
368 //donothing
369 endwhile
370 dclick cbrew
371 getlabel backpack ping
372 if insysmsg "You drink a cleansing brew"
373 createtimer brew
374 endif
375elseif warmode and not hidden and not timerexists brew and not targetexists and findbuff "Diseased" and findtype 50675 backpack as cbrew
376 while queued
377 //donothing
378 endwhile
379 dclick cbrew
380 getlabel backpack ping
381 if insysmsg "You drink a cleansing brew"
382 createtimer brew
383 endif
384endif
385if timerexists brew
386 if timer brew >= 120000
387 removetimer brew
388 endif
389endif
390
391if not hidden and not casting and findbuff "Weaken" and not targetexists and findtype "White Potion" backpack as stpot
392 while queued
393 //donothing
394 endwhile
395 dclick stpot
396endif
397
398if not timerexists topupstr
399 createtimer topupstr
400 settimer topupstr 30000
401elseif timer topupstr >= 30000 and not hidden and not casting and str = 100 and findtype "White Potion" backpack as stpot
402 while queued
403 //donothing
404 endwhile
405 overhead "--Drink Strength--" 2122
406 settimer topupstr 0
407endif
408
409if not timerexists topupres
410 createtimer topupres
411 settimer topupres 30000
412elseif timer topupres >= 30000 and not hidden and not casting and not findbuff "Magic Resist Potion" and findtype "Black Potion" backpack as respot
413 while queued
414 //donothing
415 endwhile
416 overhead "--Drink Resist--" 2122
417 settimer topupres 0
418endif
419
420if not targetexists and not hidden and not casting and stam <= 4 and findtype "Red Potion" backpack as redpot
421 while queued
422 //donothing
423 endwhile
424 dclick redpot
425endif
426
427if not hidden and paralyzed and not targetexists and findtype "pouch" backpack 38
428 say "[Pouch"
429endif
430
431if not hidden and not casting and poisoned and not targetexists and findtype "Orange Potion" backpack as curepot
432 while queued
433 //donothing
434 endwhile
435 dclick curepot
436endif
437
438if not timerexists chestsensetimer
439 createtimer chestsensetimer
440 settimer chestsensetimer 200
441endif
442if not timerexists timesenseswitch and timer chestsensetimer >= 200
443 if not gumpexists 736038070 and skill "Lockpicking" >= 50
444 for 18
445 if index > 0 and findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 index as chest
446 getlabel chest desc
447 if "lock" in desc
448 overhead "{{desc}}" 2085 chest
449 break
450 else
451 overhead "{{desc}}" 1779 chest
452 @ignore chest
453 endif
454 endif
455 endfor
456 @clearignore
457 endif
458 settimer chestsensetimer 0
459endif
460
461
462if not timerexists getpilf
463 createtimer getpilf
464endif
465if not timerexists autopilferswitch
466 if gumpexists 2955404556
467 gumpclose 2955404556
468 createtimer autopilferswitch
469 overhead "--Auto Pilfer Enabled--" 88
470 endif
471endif
472if timerexists autopilferswitch
473 if gumpexists 2955404556
474 gumpclose 2955404556
475 removetimer autopilferswitch
476 overhead "--Auto Pilfer Disabled--" 38
477 endif
478endif
479if timerexists autopilferswitch and skill "Stealing" >= 80 and warmode and not targetexists
480 if timer getpilf >= 100
481 settimer getpilf 0
482 for 12
483 hotkey 'Target Closest Murderer Monster'
484 hotkey 'Next Grey Monster Target'
485 @setvar pilfertarget lasttarget
486 if find pilfertarget ground -1 -1 2
487 overhead "*pilfer target*" 2091 pilfertarget
488 break
489 endif
490 endfor
491 endif
492 if hidden
493 while find pilfertarget ground -1 -1 2
494 if not cooldown "Hiding" and not cooldown "Stealth" and not cooldown "Stealing"
495 clearsysmsg
496 if not targetexists
497 hotkey 'Cancel Current Target'
498 skill "Stealing"
499 wft 1000
500 if find "Manual Override" ground -1 -1 2
501 target "Manual Override"
502 else
503 target pilfertarget
504 endif
505 hotkey 'Cancel Current Target'
506 endif
507 getlabel backpack ping
508 break
509 endif
510 if not warmode
511 break
512 endif
513 endwhile
514 if insysmsg "You Steal"
515 overhead "The goods are mine!" 2091
516 cooldown "Stealing" 5000
517 warmode off
518 endif
519 if insysmsg "The creature is barren"
520 overhead "Another thief beat me to it..." 1779
521 cooldown "Stealing" 5000
522 warmode off
523 endif
524 if insysmsg "That is too far away"
525 overhead "Argh, not close enough..." 1779
526 cooldown "Stealing" 5000
527 warmode off
528 endif
529 if insysmsg "Target cannot be seen"
530 overhead "Argh, I cant see it..." 1779
531 cooldown "Stealing" 5000
532 warmode off
533 endif
534 if insysmsg "You have already stolen"
535 overhead "I have already pilfered this..." 1779
536 cooldown "Stealing" 5000
537 warmode off
538 endif
539 if insysmsg "You fail"
540 overhead "Argh, I failed to Pilfer..." 1779
541 cooldown "Stealing" 5000
542 warmode off
543 endif
544 elseif not hidden
545 while find pilfertarget ground -1 -1 2
546 if not cooldown "Hiding" and not cooldown "Stealth" and not cooldown "Stealing"
547 clearsysmsg
548 if not targetexists
549 hotkey 'Cancel Current Target'
550 skill "Stealing"
551 wft 1000
552 if find "Manual Override" ground -1 -1 2
553 target "Manual Override"
554 else
555 target pilfertarget
556 endif
557 target pilfertarget
558 hotkey 'Cancel Current Target'
559 endif
560 getlabel backpack ping
561 break
562 endif
563 endwhile
564 if insysmsg "retaliate"
565 overhead "Argh, I failed to Pilfer" 1779
566 cooldown "Stealing" 5000
567 warmode off
568 if not hidden and findtype "yellow potion" backpack as healpot
569 while queued
570 //donothing
571 endwhile
572 dclick healpot
573 endif
574 endif
575 if insysmsg "You Steal"
576 overhead "The goods are mine!" 2091
577 cooldown "Stealing" 5000
578 warmode off
579 endif
580 if insysmsg "The creature is barren"
581 overhead "Another thief beat me to it..." 1779
582 cooldown "Stealing" 5000
583 warmode off
584 endif
585 if insysmsg "That is too far away"
586 overhead "Argh, not close enough..." 1779
587 cooldown "Stealing" 5000
588 warmode off
589 endif
590 if insysmsg "Target cannot be seen"
591 overhead "Argh, I cant see it..." 1779
592 cooldown "Stealing" 5000
593 warmode off
594 endif
595 if insysmsg "You have already stolen"
596 overhead "I have already pilfered this..." 1779
597 cooldown "Stealing" 5000
598 warmode off
599 endif
600 endif
601endif
602
603if gumpexists 736038070
604 gumpclose 736038070
605endif
606
607if not casting and skill "Lockpicking" >= 50 and findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2 as bchest and not targetexists
608 clearsysmsg
609 if not warmode
610 warmode on
611 warmode off
612 endif
613 while queued
614 //donothing
615 endwhile
616 dclick bchest
617 @setvar "bchest" lastobject
618 getlabel bchest desc
619 if "(locked and trapped)" in desc
620 createtimer activaterecycle
621 endif
622 waitforgump 736038070 1000
623 if gumpexists 736038070 and not ingump "Cleared Of Traps" 736038070
624 while gumpexists 736038070
625 gumpresponse 7
626 waitforgump 736038070 1000
627 if insysmsg "You attempt to remove traps"
628 clearsysmsg
629 break
630 endif
631 if insysmsg "That appears to be devoid"
632 clearsysmsg
633 break
634 endif
635 if not findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2
636 removetimer activaterecycle
637 break
638 endif
639 if not cooldown "Move" and not hidden and not cooldown "Hiding" and not cooldown "Stealth" and not cooldown "Stealing" and not warmode and skill "Hiding" >= 80
640 skill "Hiding"
641 getlabel backpack ping
642 if hidden
643 getlabel backpack ping
644 cooldown "Hiding" 10000
645 endif
646 endif
647 endwhile
648 if not hidden
649 if followers >= 1
650 if find "bsummon1"
651 menu bsummon1 2
652 wft 1000
653 target self
654 getlabel backpack ping
655 if find "bsummon2"
656 menu bsummon2 2
657 wft 1000
658 target self
659 endif
660 elseif find "bsummon2"
661 menu bsummon2 2
662 wft 1000
663 target self
664 getlabel backpack ping
665 if find "bsummon1"
666 menu bsummon1 2
667 wft 1000
668 target self
669 endif
670 endif
671 endif
672 if not cooldown "Move" and not warmode and not cooldown "Hiding" and not cooldown "Stealth" and skill "Hiding" >= 80
673 warmode on
674 warmode off
675 skill "Hiding"
676 getlabel backpack ping
677 if hidden
678 getlabel backpack ping
679 cooldown "Hiding" 10000
680 endif
681 endif
682 endif
683 overhead "*disarming*" 1060 bchest
684 while not dead
685 if timerexists frostshellswitch and timer frostshelltimer > 5000 and not cooldown "Aspect" and hp <= 35
686 say "[AspectArmor Frost"
687 getlabel backpack ping
688 if insysmsg "Your armor is already of that aspect"
689 //donothing
690 else
691 cooldown "Aspect" 30000
692 overhead "--Frost Shell Primed--" 2234
693 endif
694 settimer frostshelltimer 0
695 endif
696 if not cooldown "Move" and not hidden and not cooldown "Hiding" and not cooldown "Stealth" and not cooldown "Stealing" and not warmode and skill "Hiding" >= 80
697 warmode on
698 warmode off
699 skill "Hiding"
700 getlabel backpack ping
701 if hidden
702 getlabel backpack ping
703 cooldown "Hiding" 10000
704 endif
705 endif
706 if not cooldown "Move" and findbuff "Invisibility" and not cooldown "Hiding" and not cooldown "Stealth" and not cooldown "Stealing" and not warmode and skill "Hiding" >= 80
707 skill "Hiding"
708 getlabel backpack ping
709 if hidden
710 getlabel backpack ping
711 cooldown "Hiding" 10000
712 removetimer ots
713 endif
714 endif
715 if not warmode and hidden and not cooldown "Hiding" and not cooldown "Stealth" and not timerexists ots and skill "Stealth" >= 80
716 skill "Stealth"
717 getlabel backpack ping
718 if not timerexists ots
719 createtimer ots
720 endif
721 endif
722 if insysmsg "move quietly"
723 getlabel backpack ping
724 cooldown "Stealth" 10000
725 endif
726 if not cooldown "Move" and hidden and not cooldown "Hiding" and not cooldown "Stealth" and insysmsg "hide first" and skill "Hiding" >= 80
727 pause 1000
728 getlabel backpack ping
729 skill "Hiding"
730 getlabel backpack ping
731 if hidden
732 getlabel backpack ping
733 cooldown "Hiding" 10000
734 endif
735 removetimer ots
736 endif
737 if insysmsg "You have successfully cleared it of traps"
738 overhead "*tick*" 2091 bchest
739 break
740 endif
741 if not findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2
742 removetimer activaterecycle
743 break
744 endif
745 if find "bchest" ground -1 -1 2
746# Note for author:
747# The break here will not work on special Urkton Chests or possibly new Time Dungeon chests.
748# It is not a big deal as this part is only for a specific sceanario in which another player
749# opens a chest while you are trying to snatch their chest. It will break into looting instantly.
750# I still want to figure out a better way here.
751 getlabel bchest desc
752 if "wooden" in desc
753 //do nothing
754 elseif "metal" in desc
755 //do nothing
756 elseif "lock" in desc
757 //do nothing
758 else
759 overhead "*pop*" 2091 bchest
760 break
761 endif
762 endif
763 if ingump "Cleared Of Traps" 736038070
764 overhead "*tick*" 2091 bchest
765 break
766 endif
767 if timer tab > 1000
768 if not warmode
769 warmode on
770 warmode off
771 endif
772 settimer tab 0
773 endif
774 if insysmsg "You make some progress towards clearing it of traps"
775 overhead "*clink*" 810 bchest
776 endif
777 if insysmsg "You have worn out your tool"
778 overhead "This tool is worn out!" 805
779 endif
780 if ingump "Shrines" 341416395
781 if not timerexists "Wacp" and skill "Magery" >= 50
782 gumpclose 341416395
783 overhead "Wall of Stone ACP ------Enabled------" 2031
784 createtimer "Wall"
785 createtimer "Wacp"
786 removetimer "Nacp"
787 removetimer "Eacp"
788 removetimer "Tacp"
789 removetimer "Racp"
790 removetimer "Elemental"
791 removetimer "Tele"
792 removetimer "None"
793 removetimer "Reveal"
794 elseif not timerexists "Eacp" and skill "Spirit Speak" >= 80 and skill "Magery" >= 100
795 gumpclose 341416395
796 overhead "Earth Elemental ACP ------Enabled------" 1501
797 createtimer "Elemental"
798 createtimer "Eacp"
799 removetimer "Nacp"
800 removetimer "Tacp"
801 removetimer "Racp"
802 removetimer "Wall"
803 removetimer "Tele"
804 removetimer "None"
805 removetimer "Reveal"
806 elseif not timerexists "Tacp" and skill "Magery" >= 50
807 gumpclose 341416395
808 overhead "Teleport + Rope ACP ------Enabled------" 1272
809 createtimer "Tele"
810 createtimer "Tacp"
811 removetimer "Nacp"
812 removetimer "Racp"
813 removetimer "Wall"
814 removetimer "Elemental"
815 removetimer "None"
816 removetimer "Reveal"
817 elseif not timerexists "Racp" and skill "Magery" >= 80
818 gumpclose 341416395
819 overhead "Reveal Spellcast ACP ------Enabled------" 2040
820 createtimer "Racp"
821 createtimer "Reveal"
822 removetimer "Nacp"
823 removetimer "Wall"
824 removetimer "Elemental"
825 removetimer "Tele"
826 removetimer "None"
827 elseif not timerexists "Nacp"
828 gumpclose 341416395
829 overhead "Auto Chest Protection ------Disabled------" 38
830 createtimer "Nacp"
831 removetimer "Eacp"
832 removetimer "Tacp"
833 removetimer "Wacp"
834 removetimer "Wall"
835 removetimer "Elemental"
836 removetimer "Tele"
837 removetimer "Reveal"
838 endif
839 endif
840 if insysmsg "You have been revealed!"
841 if timerexists "Tele" and mana >= 9
842 say "[Anger"
843 cast 'Teleport'
844 if findtype "rope" backpack as rope
845 dclick rope
846 else
847 overhead "I am out of rope..." 34
848 endif
849 removetimer "Tacp"
850 removetimer "Tele"
851 createtimer "Eacp"
852 createtimer "Nacp"
853 createtimer "Wacp"
854 createtimer "Racp"
855 dclicktype "atlas" backpack
856 elseif timerexists "Wall" and mana >= 9
857 say "[Anger"
858 cast 'Wall of Stone'
859 removetimer "Wacp"
860 removetimer "Wall"
861 createtimer "Eacp"
862 createtimer "Nacp"
863 createtimer "Tacp"
864 createtimer "Racp"
865 dclicktype "atlas" backpack
866 elseif timerexists "Elemental" and mana >= 50
867 say "[Anger"
868 cast 'Earth Elemental'
869 removetimer "Eacp"
870 removetimer "Elemental"
871 createtimer "Wacp"
872 createtimer "Nacp"
873 createtimer "Tacp"
874 createtimer "Racp"
875 dclicktype "atlas" backpack
876 elseif timerexists "Reveal" and mana >= 20
877 say "[Anger"
878 cast 'Reveal'
879 removetimer "Racp"
880 removetimer "Reveal"
881 createtimer "Wacp"
882 createtimer "Nacp"
883 createtimer "Tacp"
884 createtimer "Eacp"
885 dclicktype "atlas" backpack
886 else
887 say "[Anger"
888 endif
889 if timerexists frostshellswitch and not cooldown "Aspect"
890 say "[AspectArmor Frost"
891 getlabel backpack ping
892 if insysmsg "Your armor is already of that aspect"
893 //donothing
894 else
895 cooldown "Aspect" 30000
896 overhead "--Frost Shell Primed--" 2234
897 endif
898 settimer frostshelltimer 0
899 endif
900 endif
901 if timer ACPcheck > 42000
902 if timerexists "Tele"
903 overhead "Teleport ACP active" 1272
904 endif
905 if timerexists "Wall"
906 overhead "Wall ACP active" 2031
907 endif
908 if timerexists "Elemental"
909 overhead "Elemental ACP active" 1501
910 endif
911 if timerexists "Reveal"
912 overhead "Reveal ACP active" 2040
913 endif
914 settimer ACPcheck 0
915 endif
916 if insysmsg "Another player"
917 gumpclose 736038070
918 dclick bchest
919 waitforgump 736038070 1000
920 gumpresponse 7
921 waitforgump 736038070 1000
922 endif
923 if hidden and timerexists activaterecycle and findtype "sewing kit|saw|pen and ink|tongs|tool kit" backpack as breakdowntool
924 if findtype 20496 backpack as IDwand
925 clearsysmsg
926 if findtype 3834 backpack 0 as bbook
927 @ignore bbook
928 endif
929 while findtype 5056|5059|5060|5061|5063|5070|5074|5075|5076|5078|5085|5089|5090|5101|5103|5105|5106|5129|5131|5132|5135|5138|5139|5142|5143|5144|5146|5201|5203|5204|5205|5207|7169|7170|7173|7175|7177|7179|7181|7610|7947|31003|31004|31005|31006|31007|31008|31009|31010|31011|31012|31015|31191|31017|31019|31021|31023|31025|31027|31029|31031|31033|31035|31037|31038|31041|31043|31045|31047|31049|31051|31053|31055|3834|3740|3742|3762|3763|10245|20006|20008|20010|20012|20014|20016|7026|7027|7029|7031|7033|7034|7035|7107|7109|31002|31130|3920|5042|5117|30990|30993|30994|30995|31184|31186|3719|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182|3909|3911|3913|3915|3917|3934|3937|5046|5049|5115|5119|5182|5185|5187|30988|31128|31190|22187|31141|31142|31169|31172 backpack as IDitem
930 getlabel IDitem desc
931 if "unidentified" in desc
932 while queued
933 //donothing
934 endwhile
935 dclick IDwand
936 wft 1000
937 target IDitem
938 waitforsysmsg "You identify the item." 1000
939 getlabel IDitem desc
940 if "aspect" in desc or "training" in desc or "vanquishing" in desc or "supremely" in desc or "slaying" in desc or "enticement" in desc or "invulnerability" in desc or "power" in desc or "exceedingly accurate force" in desc or "exceedingly potent" in desc or "valorite" in desc or "valehide" in desc or "valewood" in desc or "avarite" in desc or "avarhide" in desc or "avarwood" in desc or "verite" in desc or "verehide" in desc or "verewood" in desc or "agapite" in desc or "rosehide" in desc or "rosewood" in desc or "fortification" in desc
941 @ignore IDitem
942 overhead "This one is worth keeping..." 2091
943 overhead "*strong magic*" 2091 IDitem
944 say "[surprise" 2091
945 elseif "durable" in desc or "substantial" in desc or "massive" in desc or "fortified" in desc or "indestructible" in desc or "exceptional" in desc or "accurate" in desc or "surpassingly" in desc or "eminently" in desc or "exceedingly" in desc or "ruin" in desc or "might" in desc or "force" in desc or "power" in desc or "mastercrafted" in desc or "defense" in desc or "guarding" in desc or "hardening" in desc or "potent" in desc or "melodious" in desc
946 overhead "*trash*" 1779 IDitem
947 while not gumpexists 949095101
948 while queued
949 //donothing
950 endwhile
951 dclick breakdowntool
952 waitforgump 949095101 1000
953 endwhile
954 while not ingump "Recycle Single Item" 949095101
955 gumpresponse 2
956 waitforgump 949095101 1000
957 endwhile
958 gumpresponse 3
959 waitforgump 949095101 1000
960 target IDitem
961 getlabel backpack ping
962 pause 300
963 gumpclose 949095101
964 else
965 @ignore IDitem
966 endif
967 elseif "aspect" in desc or "training" in desc or "vanquishing" in desc or "supremely" in desc or "slaying" in desc or "enticement" in desc or "invulnerability" in desc or "power" in desc or "exceedingly accurate force" in desc or "exceedingly potent" in desc or "valorite" in desc or "valehide" in desc or "valewood" in desc or "avarite" in desc or "avarhide" in desc or "avarwood" in desc or "verite" in desc or "verehide" in desc or "verewood" in desc or "agapite" in desc or "rosehide" in desc or "rosewood" in desc or "fortification" in desc
968 @ignore IDitem
969 elseif "durable" in desc or "substantial" in desc or "massive" in desc or "fortified" in desc or "indestructible" in desc or "exceptional" in desc or "accurate" in desc or "surpassingly" in desc or "eminently" in desc or "exceedingly" in desc or "ruin" in desc or "might" in desc or "force" in desc or "power" in desc or "mastercrafted" in desc or "defense" in desc or "guarding" in desc or "hardening" in desc or "potent" in desc or "melodious" in desc
970 overhead "*trash*" 1779 IDitem
971 while not gumpexists 949095101
972 while queued
973 //donothing
974 endwhile
975 dclick breakdowntool
976 waitforgump 949095101 1000
977 endwhile
978 while not ingump "Recycle Single Item" 949095101
979 gumpresponse 2
980 waitforgump 949095101 1000
981 endwhile
982 gumpresponse 3
983 waitforgump 949095101 1000
984 target IDitem
985 getlabel backpack ping
986 pause 300
987 gumpclose 949095101
988 else
989 @ignore IDitem
990 endif
991 if not findtype 20496 backpack
992 break
993 endif
994 endwhile
995 if gumpexists 949095101
996 gumpclose 949095101
997 endif
998 endif
999 if targetexists
1000 hotkey "Cancel Current Target"
1001 endif
1002 endif
1003 if varexist "bwiz" and find "bwiz" backpack and find "bmain" self
1004 if not targetexists and not casting and skill "Stealth" >= 80 and hidden and stam = maxstam
1005 while queued
1006 //donothing
1007 endwhile
1008 dclick "bwiz"
1009 while queued
1010 //donothing
1011 endwhile
1012 pause 30
1013 dclick "bmain"
1014 pause 500
1015 getlabel backpack ping
1016 endif
1017 if not targetexists and not casting and not findlayer self head and find "bmain" self
1018 while queued
1019 //donothing
1020 endwhile
1021 dclick "bmain"
1022 pause 500
1023 getlabel backpack ping
1024 endif
1025 endif
1026 if varexist "bwiz" and find "bmain" self
1027 if not targetexists and not casting and not find "bwiz" backpack
1028 while queued
1029 //donothing
1030 endwhile
1031 dclick "bmain"
1032 pause 500
1033 getlabel backpack ping
1034 endif
1035 endif
1036 endwhile
1037 waitforgump 736038070 1000
1038 endif
1039 if not casting and gumpexists 736038070 and ingump "Cleared Of Traps" 736038070
1040 while gumpexists 736038070
1041 dclick bchest
1042 gumpresponse 4
1043 waitforgump 736038070 1000
1044 if insysmsg "You attempt to pick the lock"
1045 clearsysmsg
1046 break
1047 endif
1048 if insysmsg "It appears to be unlocked"
1049 clearsysmsg
1050 break
1051 endif
1052 if not cooldown "Move" and not hidden and not cooldown "Hiding" and not cooldown "Stealth" and not cooldown "Stealing" and not warmode and skill "Hiding" >= 80
1053 skill "Hiding"
1054 getlabel backpack ping
1055 if hidden
1056 getlabel backpack ping
1057 cooldown "Hiding" 10000
1058 endif
1059 endif
1060 endwhile
1061 if not hidden
1062 if followers >= 1
1063 if find "bsummon1"
1064 menu bsummon1 2
1065 wft 1000
1066 target self
1067 getlabel backpack ping
1068 if find "bsummon2"
1069 menu bsummon2 2
1070 wft 1000
1071 target self
1072 endif
1073 elseif find "bsummon2"
1074 menu bsummon2 2
1075 wft 1000
1076 target self
1077 getlabel backpack ping
1078 if find "bsummon1"
1079 menu bsummon1 2
1080 wft 1000
1081 target self
1082 endif
1083 endif
1084 endif
1085 if not cooldown "Move" and not warmode and not cooldown "Hiding" and not cooldown "Stealth" and skill "Hiding" >= 80
1086 warmode on
1087 warmode off
1088 skill "Hiding"
1089 getlabel backpack ping
1090 if hidden
1091 getlabel backpack ping
1092 cooldown "Hiding" 10000
1093 endif
1094 endif
1095 endif
1096 overhead "*picking*" 1060 bchest
1097 while not dead
1098 if timerexists frostshellswitch and timer frostshelltimer > 5000 and not cooldown "Aspect" and hp <= 35
1099 say "[AspectArmor Frost"
1100 getlabel backpack ping
1101 if insysmsg "Your armor is already of that aspect"
1102 //donothing
1103 else
1104 cooldown "Aspect" 30000
1105 overhead "--Frost Shell Primed--" 2234
1106 endif
1107 settimer frostshelltimer 0
1108 endif
1109 if not cooldown "Move" and not hidden and not cooldown "Hiding" and not cooldown "Stealth" and not cooldown "Stealing" and not warmode and skill "Hiding" >= 80
1110 warmode on
1111 warmode off
1112 skill "Hiding"
1113 getlabel backpack ping
1114 if hidden
1115 getlabel backpack ping
1116 cooldown "Hiding" 10000
1117 endif
1118 endif
1119 if not cooldown "Move" and findbuff "Invisibility" and not cooldown "Hiding" and not cooldown "Stealth" and not cooldown "Stealing" and not warmode and skill "Hiding" >= 80
1120 skill "Hiding"
1121 getlabel backpack ping
1122 if hidden
1123 getlabel backpack ping
1124 cooldown "Hiding" 10000
1125 removetimer ots
1126 endif
1127 endif
1128 if not warmode and hidden and not cooldown "Hiding" and not cooldown "Stealth" and not timerexists ots and skill "Stealth" >= 80
1129 skill "Stealth"
1130 getlabel backpack ping
1131 if not timerexists ots
1132 createtimer ots
1133 endif
1134 endif
1135 if insysmsg "move quietly"
1136 getlabel backpack ping
1137 cooldown "Stealth" 10000
1138 endif
1139 if not cooldown "Move" and hidden and not cooldown "Hiding" and not cooldown "Stealth" and insysmsg "hide first" and skill "Hiding" >= 80
1140 pause 1000
1141 getlabel backpack ping
1142 skill "Hiding"
1143 getlabel backpack ping
1144 if hidden
1145 getlabel backpack ping
1146 cooldown "Hiding" 10000
1147 endif
1148 removetimer ots
1149 endif
1150 if insysmsg "You successfully pick the lock"
1151 overhead "*pop*" 2091 bchest
1152 break
1153 endif
1154 if not findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2
1155 removetimer activaterecycle
1156 break
1157 endif
1158 if find "bchest" ground -1 -1 2
1159# Note for author:
1160# The break here will not work on special Urkton Chests or possibly new Time Dungeon chests.
1161# It is not a big deal as this part is only for a specific sceanario in which another player
1162# opens a chest while you are trying to snatch their chest. It will break into looting instantly.
1163# I still want to figure out a better way here.
1164 getlabel bchest desc
1165 if "wooden" in desc
1166 //do nothing
1167 elseif "metal" in desc
1168 //do nothing
1169 elseif "lock" in desc
1170 //do nothing
1171 else
1172 overhead "*pop*" 2091 bchest
1173 break
1174 endif
1175 endif
1176 if timer tab > 1000
1177 if not warmode
1178 warmode on
1179 warmode off
1180 endif
1181 settimer tab 0
1182 endif
1183 if insysmsg "You make some progress on the lock"
1184 overhead "*click*" 810 bchest
1185 endif
1186 if insysmsg "You have worn out your tool"
1187 overhead "This tool is worn out!" 805
1188 endif
1189 if varexist "bwiz" and find "bwiz" backpack and find "bmain" self and not find "nonaspectedwiz" backpack
1190 if not targetexists and not casting and skill "Stealth" >= 80 and hidden and stam = maxstam
1191 while queued
1192 //donothing
1193 endwhile
1194 dclick "bwiz"
1195 while queued
1196 //donothing
1197 endwhile
1198 pause 30
1199 dclick "bmain"
1200 pause 500
1201 getlabel backpack ping
1202 endif
1203 if not targetexists and not casting and not findlayer self head and find "bmain" self
1204 while queued
1205 //donothing
1206 endwhile
1207 dclick "bmain"
1208 pause 500
1209 getlabel backpack ping
1210 endif
1211 endif
1212 if varexist "bwiz" and find "bmain" self
1213 if not targetexists and not casting and not find "bwiz" backpack
1214 while queued
1215 //donothing
1216 endwhile
1217 dclick "bmain"
1218 pause 500
1219 getlabel backpack ping
1220 endif
1221 endif
1222 if ingump "Shrines" 341416395
1223 if not timerexists "Wacp" and skill "Magery" >= 50
1224 gumpclose 341416395
1225 overhead "Wall of Stone ACP ------Enabled------" 2031
1226 createtimer "Wall"
1227 createtimer "Wacp"
1228 removetimer "Nacp"
1229 removetimer "Eacp"
1230 removetimer "Tacp"
1231 removetimer "Racp"
1232 removetimer "Elemental"
1233 removetimer "Tele"
1234 removetimer "None"
1235 removetimer "Reveal"
1236 elseif not timerexists "Eacp" and skill "Spirit Speak" >= 80 and skill "Magery" >= 100
1237 gumpclose 341416395
1238 overhead "Earth Elemental ACP ------Enabled------" 1501
1239 createtimer "Elemental"
1240 createtimer "Eacp"
1241 removetimer "Nacp"
1242 removetimer "Tacp"
1243 removetimer "Racp"
1244 removetimer "Wall"
1245 removetimer "Tele"
1246 removetimer "None"
1247 removetimer "Reveal"
1248 elseif not timerexists "Tacp" and skill "Magery" >= 50
1249 gumpclose 341416395
1250 overhead "Teleport + Rope ACP ------Enabled------" 1272
1251 createtimer "Tele"
1252 createtimer "Tacp"
1253 removetimer "Nacp"
1254 removetimer "Racp"
1255 removetimer "Wall"
1256 removetimer "Elemental"
1257 removetimer "None"
1258 removetimer "Reveal"
1259 elseif not timerexists "Racp" and skill "Magery" >= 80
1260 gumpclose 341416395
1261 overhead "Reveal Spellcast ACP ------Enabled------" 2040
1262 createtimer "Racp"
1263 createtimer "Reveal"
1264 removetimer "Nacp"
1265 removetimer "Wall"
1266 removetimer "Elemental"
1267 removetimer "Tele"
1268 removetimer "None"
1269 elseif not timerexists "Nacp"
1270 gumpclose 341416395
1271 overhead "Auto Chest Protection ------Disabled------" 38
1272 createtimer "Nacp"
1273 removetimer "Eacp"
1274 removetimer "Tacp"
1275 removetimer "Wacp"
1276 removetimer "Wall"
1277 removetimer "Elemental"
1278 removetimer "Tele"
1279 removetimer "Reveal"
1280 endif
1281 endif
1282 if insysmsg "You have been revealed!"
1283 if timerexists "Tele" and mana >= 9
1284 say "[Anger"
1285 cast 'Teleport'
1286 if findtype "rope" backpack as rope
1287 dclick rope
1288 else
1289 overhead "I am out of rope..." 34
1290 endif
1291 removetimer "Tacp"
1292 removetimer "Tele"
1293 createtimer "Eacp"
1294 createtimer "Nacp"
1295 createtimer "Wacp"
1296 createtimer "Racp"
1297 dclicktype "atlas" backpack
1298 elseif timerexists "Wall" and mana >= 9
1299 say "[Anger"
1300 cast 'Wall of Stone'
1301 removetimer "Wacp"
1302 removetimer "Wall"
1303 createtimer "Eacp"
1304 createtimer "Nacp"
1305 createtimer "Tacp"
1306 createtimer "Racp"
1307 dclicktype "atlas" backpack
1308 elseif timerexists "Elemental" and mana >= 50
1309 say "[Anger"
1310 cast 'Earth Elemental'
1311 removetimer "Eacp"
1312 removetimer "Elemental"
1313 createtimer "Wacp"
1314 createtimer "Nacp"
1315 createtimer "Tacp"
1316 createtimer "Racp"
1317 dclicktype "atlas" backpack
1318 elseif timerexists "Reveal" and mana >= 20
1319 say "[Anger"
1320 cast 'Reveal'
1321 removetimer "Racp"
1322 removetimer "Reveal"
1323 createtimer "Wacp"
1324 createtimer "Nacp"
1325 createtimer "Tacp"
1326 createtimer "Eacp"
1327 dclicktype "atlas" backpack
1328 else
1329 say "[Anger"
1330 endif
1331 if timerexists frostshellswitch and not cooldown "Aspect"
1332 say "[AspectArmor Frost"
1333 getlabel backpack ping
1334 if insysmsg "Your armor is already of that aspect"
1335 //donothing
1336 else
1337 cooldown "Aspect" 30000
1338 overhead "--Frost Shell Primed--" 2234
1339 endif
1340 settimer frostshelltimer 0
1341 endif
1342 endif
1343 if timer ACPcheck > 42000
1344 if timerexists "Tele"
1345 overhead "Teleport ACP active" 1272
1346 endif
1347 if timerexists "Wall"
1348 overhead "Wall ACP active" 2031
1349 endif
1350 if timerexists "Elemental"
1351 overhead "Elemental ACP active" 1501
1352 endif
1353 if timerexists "Reveal"
1354 overhead "Reveal ACP active" 2040
1355 endif
1356 settimer ACPcheck 0
1357 endif
1358 if insysmsg "Another player"
1359 gumpclose 736038070
1360 dclick bchest
1361 waitforgump 736038070 1000
1362 gumpresponse 4
1363 waitforgump 736038070 1000
1364 endif
1365 endwhile
1366 endif
1367endif
1368
1369if gumpexists 949095101
1370 gumpclose 949095101
1371endif
1372
1373if find "bchest" ground -1 -1 2 as bchest and not targetexists
1374 clearsysmsg
1375 while findtype "54230|44985|glass display|20049|Pig Iron|broken shield|blackrock fragment|gargish fragment|18705|55247|49482|53694|54570|53696|53876|50612|55420|53280|53473|54831|50278|49528|bottle set|entrail bucket|mounted stalaghorn|sea glass bulb|juggling daggers|st patricks cross|divination orb|mirror display|murder of crows|charmed cobra|prodigy fiddle|wilting rose belljar|scale of balance|screaming mandrake|statue of the siren|the final hour|55204|specimen jars|shattered weapon|bird cage|widows grief|54684|27612|49223|54591|54601|54718|7408|19948|58325|19959|19822|49730|49729|19944|19949|47613|47612|47611|47610|47611|3986|3966|cathedral tapestry|Darkscale tapestry|large painting|landscape painting|portrait painting|figurine|statue|20291|44987|49730|47107|18653|45127|20103|47103|29363|47105|29361|43453|5899|47109|45250|41509|43447|18657|4025|51308|45156|51304|45214|28769|28799|28803|28765|45211|45248|51259|45220|51328|45218|3842|51327|45222|45241|51336|11858|51375|45282|54722|45255|45246|28795|44983|45235|45251|45238|51258|51314|28761|45236|51260|54718|18400|58325|45252|18656|47111|3839|45239|45242|45254|45281|45247|42241|45216|28775|2594|51321|3838|51318|5901|5905|45259|5903|48407|51302|4248|27611|15296|43166|5359|5981|4026|3985|25359|17686|3836|17087|5356|29030|24434|22336|29036|3843|29025|51098|29034|8826|51094|576|3827|22326|45315|3891|2539|39898|39896|39892|39918|39911|39916|39897|39905|39891|39917|39912|39909|39889|31047|31017|31049|31019|31055|31051|31053|31025|31027|31031|31041|54717|31021|31011|31023|31029|31043|31003|31035|31033|31045|31037|31002|20006|31169|31006|30999|31012|31009|30996|7109|7107|31128|31188|20014|31014|31004|31142|31001|31000|37181|31010|30998|31172|30988|30997|31038|31141|7947|20008|31005|31191|31008|31007|30994|30993|31182|30989|20012|31186|31178|31015|30991|20010|20016|31184|31190|30990|30995|31176|31180|30992|31130|5207|7031|7026|7034|7033|7027|7035|7029|5078|5063|5059|5105|5060|5138|5129|5201|5142|5143|5076|5106|7610|5139|5090|5103|5132|7177|5061|7181|7179|3920|5042|5127|5117|5185|5125|3938|5177|3937|5044|5121|3915|3909|3568|3932|5123|5144|5119|5056|5135|5187|5074|5089|3934|3913|3917|3721|5075|5046|5049|7170|5146|5205|5203|5115|5204|5040|5179|5070|5182|5085|5181|3719|7173|5131|3911|5101|7175|7169|3713|5112|22187|9917|3859|3862|3878|3865|3856|3873|3877|3834|3742|3762|3740|3763|10245|3572|3573|3571|3885|7127|4225|12686|19985|19981|19984|19982|19983|19991|19989|19986|19987|19988|19994|19995|19992|19993|19990|19980|19977|19976|19978|7154|19979|43423|7154|4225|7127|3861|3821" bchest as bitem
1376 if diffweight <= 5 and findtype 3821 bchest as goldcoinz
1377 @ignore goldcoinz
1378 endif
1379 if not timerexists bchestopen
1380 createtimer bchestopen
1381 overhead "The treasure is mine!" 2091
1382 endif
1383 hotkey 'Grab Item'
1384 target bitem
1385 while queued
1386 //donothing
1387 endwhile
1388 if not findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2
1389 break
1390 endif
1391 if insysmsg "That container cannot hold more weight."
1392 break
1393 endif
1394 endwhile
1395 if varexist "bwiz" and find "bwiz" backpack and find "bmain" self
1396 if not targetexists and not casting and skill "Stealth" >= 80 and hidden and stam = maxstam
1397 while queued
1398 //donothing
1399 endwhile
1400 dclick "bwiz"
1401 while queued
1402 //donothing
1403 endwhile
1404 pause 30
1405 dclick "bmain"
1406 pause 500
1407 getlabel backpack ping
1408 endif
1409 if not targetexists and not casting and not findlayer self head and find "bmain" self
1410 while queued
1411 //donothing
1412 endwhile
1413 dclick "bmain"
1414 pause 500
1415 getlabel backpack ping
1416 endif
1417 endif
1418 if varexist "bwiz" and find "bmain" self
1419 if not targetexists and not casting and not find "bwiz" backpack
1420 while queued
1421 //donothing
1422 endwhile
1423 dclick "bmain"
1424 pause 500
1425 getlabel backpack ping
1426 endif
1427 endif
1428endif
1429
1430if ingump "Shrines" 341416395
1431 if not timerexists "Wacp" and skill "Magery" >= 50
1432 gumpclose 341416395
1433 overhead "Wall of Stone ACP ------Enabled------" 2031
1434 createtimer "Wall"
1435 createtimer "Wacp"
1436 removetimer "Nacp"
1437 removetimer "Eacp"
1438 removetimer "Tacp"
1439 removetimer "Racp"
1440 removetimer "Elemental"
1441 removetimer "Tele"
1442 removetimer "None"
1443 removetimer "Reveal"
1444 elseif not timerexists "Eacp" and skill "Spirit Speak" >= 80 and skill "Magery" >= 100
1445 gumpclose 341416395
1446 overhead "Earth Elemental ACP ------Enabled------" 1501
1447 createtimer "Elemental"
1448 createtimer "Eacp"
1449 removetimer "Nacp"
1450 removetimer "Tacp"
1451 removetimer "Racp"
1452 removetimer "Wall"
1453 removetimer "Tele"
1454 removetimer "None"
1455 removetimer "Reveal"
1456 elseif not timerexists "Tacp" and skill "Magery" >= 50
1457 gumpclose 341416395
1458 overhead "Teleport + Rope ACP ------Enabled------" 1272
1459 createtimer "Tele"
1460 createtimer "Tacp"
1461 removetimer "Nacp"
1462 removetimer "Racp"
1463 removetimer "Wall"
1464 removetimer "Elemental"
1465 removetimer "None"
1466 removetimer "Reveal"
1467 elseif not timerexists "Racp" and skill "Magery" >= 80
1468 gumpclose 341416395
1469 overhead "Reveal Spellcast ACP ------Enabled------" 2040
1470 createtimer "Racp"
1471 createtimer "Reveal"
1472 removetimer "Nacp"
1473 removetimer "Wall"
1474 removetimer "Elemental"
1475 removetimer "Tele"
1476 removetimer "None"
1477 elseif not timerexists "Nacp"
1478 gumpclose 341416395
1479 overhead "Auto Chest Protection ------Disabled------" 38
1480 createtimer "Nacp"
1481 removetimer "Eacp"
1482 removetimer "Tacp"
1483 removetimer "Wacp"
1484 removetimer "Wall"
1485 removetimer "Elemental"
1486 removetimer "Tele"
1487 removetimer "Reveal"
1488 endif
1489endif
1490if insysmsg "You have been revealed!"
1491 if timerexists "Tele" and mana >= 9
1492 say "[Anger"
1493 cast 'Teleport'
1494 if findtype "rope" backpack as rope
1495 dclick rope
1496 else
1497 overhead "I am out of rope..." 34
1498 endif
1499 removetimer "Tacp"
1500 removetimer "Tele"
1501 createtimer "Eacp"
1502 createtimer "Nacp"
1503 createtimer "Wacp"
1504 createtimer "Racp"
1505 dclicktype "atlas" backpack
1506 elseif timerexists "Wall" and mana >= 9
1507 say "[Anger"
1508 cast 'Wall of Stone'
1509 removetimer "Wacp"
1510 removetimer "Wall"
1511 createtimer "Eacp"
1512 createtimer "Nacp"
1513 createtimer "Tacp"
1514 createtimer "Racp"
1515 dclicktype "atlas" backpack
1516 elseif timerexists "Elemental" and mana >= 50
1517 say "[Anger"
1518 cast 'Earth Elemental'
1519 removetimer "Eacp"
1520 removetimer "Elemental"
1521 createtimer "Wacp"
1522 createtimer "Nacp"
1523 createtimer "Tacp"
1524 createtimer "Racp"
1525 dclicktype "atlas" backpack
1526 elseif timerexists "Reveal" and mana >= 20
1527 say "[Anger"
1528 cast 'Reveal'
1529 removetimer "Racp"
1530 removetimer "Reveal"
1531 createtimer "Wacp"
1532 createtimer "Nacp"
1533 createtimer "Tacp"
1534 createtimer "Eacp"
1535 dclicktype "atlas" backpack
1536 else
1537 say "[Anger"
1538 endif
1539 if timerexists frostshellswitch and not cooldown "Aspect"
1540 say "[AspectArmor Frost"
1541 getlabel backpack ping
1542 if insysmsg "Your armor is already of that aspect"
1543 //donothing
1544 else
1545 cooldown "Aspect" 30000
1546 overhead "--Frost Shell Primed--" 2234
1547 endif
1548 settimer frostshelltimer 0
1549 endif
1550endif
1551
1552if not findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2
1553 removetimer activaterecycle
1554 if varexist "bwiz" and find "bwiz" backpack and find "bmain" self
1555 if not targetexists and not casting and skill "Stealth" >= 80 and hidden and stam = maxstam
1556 while queued
1557 //donothing
1558 endwhile
1559 dclick "bwiz"
1560 while queued
1561 //donothing
1562 endwhile
1563 pause 30
1564 dclick "bmain"
1565 pause 500
1566 getlabel backpack ping
1567 endif
1568 if not targetexists and not casting and not findlayer self head and find "bmain" self
1569 while queued
1570 //donothing
1571 endwhile
1572 dclick "bmain"
1573 pause 500
1574 getlabel backpack ping
1575 endif
1576 endif
1577 if varexist "bwiz" and find "bmain" self
1578 if not targetexists and not casting and not find "bwiz" backpack
1579 while queued
1580 //donothing
1581 endwhile
1582 dclick "bmain"
1583 pause 500
1584 getlabel backpack ping
1585 endif
1586 endif
1587endif
1588
1589if timer ACPcheck > 42000
1590 if timerexists "Tele"
1591 overhead "Teleport ACP active" 1272
1592 endif
1593 if timerexists "Wall"
1594 overhead "Wall ACP active" 2031
1595 endif
1596 if timerexists "Elemental"
1597 overhead "Elemental ACP active" 1501
1598 endif
1599 if timerexists "Reveal"
1600 overhead "Reveal ACP active" 2040
1601 endif
1602 settimer ACPcheck 0
1603endif
1604
1605if not timerexists lootvacuumswitch
1606 if gumpexists 1281623709
1607 gumpclose 1281623709
1608 createtimer lootvacuumswitch
1609 settimer lootvacuumswitch 15000
1610 overhead "--Loot Vacuum Enabled--" 2085
1611 endif
1612endif
1613if timerexists lootvacuumswitch
1614 if gumpexists 1281623709
1615 gumpclose 1281623709
1616 removetimer lootvacuumswitch
1617 overhead "--Loot Vacuum Disabled--" 1779
1618 endif
1619endif
1620while diffweight <= 0 and findtype "gold coin" backpack as dropgold
1621 if not hidden and stam <= 4 and findtype "Red Potion" backpack as redpot
1622 while queued
1623 //donothing
1624 endwhile
1625 dclick redpot
1626 endif
1627 overhead "My cup runneth over..." 1194
1628 if findtype 4225 backpack 0 as garbleather
1629 drop backpack
1630 lift garbleather 59999
1631 drop 0
1632 while queued
1633 //donothing
1634 endwhile
1635 endif
1636 drop backpack
1637 lift dropgold 444
1638 drop 0
1639 while queued
1640 //donothing
1641 endwhile
1642 settimer lootvacuumswitch 0
1643endwhile
1644if timerexists lootvacuumswitch
1645 if timer lootvacuumswitch >= 9000
1646 if not timerexists lootsensetimer
1647 createtimer lootsensetimer
1648 settimer lootsensetimer 1000
1649 endif
1650 if not findtype 4239|4240 ground -1 -1 2 and timer lootsensetimer >= 1000
1651 for 18
1652 while findtype 3827 ground 0 as zeroscroll
1653 @ignore zeroscroll
1654 endwhile
1655 while findtype 7154 ground 0 as zeroingot
1656 @ignore zeroingot
1657 endwhile
1658 while findtype 4225 ground 0 as zeroleather
1659 @ignore zeroleather
1660 endwhile
1661 while findtype 7127 ground 0 as zeroboard
1662 @ignore zeroboard
1663 endwhile
1664 while findtype 7154 ground 2419 as zeroingot
1665 @ignore zeroingot
1666 endwhile
1667 while findtype 4225 ground 2419 as zeroleather
1668 @ignore zeroleather
1669 endwhile
1670 while findtype 7127 ground 2419 as zeroboard
1671 @ignore zeroboard
1672 endwhile
1673 while findtype 7154 ground 2406 as zeroingot
1674 @ignore zeroingot
1675 endwhile
1676 while findtype 4225 ground 2406 as zeroleather
1677 @ignore zeroleather
1678 endwhile
1679 while findtype 7127 ground 2406 as zeroboard
1680 @ignore zeroboard
1681 endwhile
1682 while findtype 7154 ground 2413 as zeroingot
1683 @ignore zeroingot
1684 endwhile
1685 while findtype 4225 ground 2413 as zeroleather
1686 @ignore zeroleather
1687 endwhile
1688 while findtype 7127 ground 2413 as zeroboard
1689 @ignore zeroboard
1690 endwhile
1691 while findtype 7154 ground 2418 as zeroingot
1692 @ignore zeroingot
1693 endwhile
1694 while findtype 4225 ground 2418 as zeroleather
1695 @ignore zeroleather
1696 endwhile
1697 while findtype 7127 ground 2418 as zeroboard
1698 @ignore zeroboard
1699 endwhile
1700 while findtype 7154 ground 2213 as zeroingot
1701 @ignore zeroingot
1702 endwhile
1703 while findtype 4225 ground 2213 as zeroleather
1704 @ignore zeroleather
1705 endwhile
1706 while findtype 7127 ground 2213 as zeroboard
1707 @ignore zeroboard
1708 endwhile
1709 if index > 0 and findtype "54230|44985|glass display|20049|Pig Iron|blackrock fragment|gargish fragment|18705|55247|49482|53694|54570|53696|53876|50612|55420|53280|53473|54831|50278|49528|bottle set|entrail bucket|mounted stalaghorn|sea glass bulb|juggling daggers|st patricks cross|divination orb|mirror display|murder of crows|charmed cobra|prodigy fiddle|wilting rose belljar|scale of balance|screaming mandrake|statue of the siren|the final hour|55204|specimen jars|bird cage|widows grief|54684|27612|49223|54591|54601|54718|19948|58325|19959|19822|49730|49729|19944|19949|47613|47612|47611|47610|47611|3986|3966|cathedral tapestry|Darkscale tapestry|large painting|landscape painting|portrait painting|figurine|statue|20291|44987|49730|47107|18653|45127|20103|47103|29363|47105|29361|43453|5899|47109|45250|41509|43447|18657|4025|51308|45156|51304|45214|28769|28799|28803|28765|45211|45248|51259|45220|51328|45218|3842|51327|45222|45241|51336|11858|51375|45282|54722|45255|45246|28795|44983|45235|45251|45238|51258|51314|28761|45236|51260|54718|18400|58325|45252|18656|47111|3839|45239|45242|45254|45281|45247|42241|45216|28775|51321|3838|51318|5901|5905|45259|5903|48407|51302|4248|27611|15296|43166|5359|5981|4026|3985|25359|17686|3836|17087|5356|29030|24434|22336|29036|3843|29025|51098|29034|8826|51094|576|3827|22326|45315|3891|2539|39898|39896|39892|39918|39911|39916|39897|39905|39891|39917|39912|39909|39889|31047|31017|31049|31019|31055|31051|31053|31025|31027|31031|31041|54717|31021|31011|31023|31029|31043|31003|31035|31033|31045|31037|31002|20006|31169|31006|30999|31012|31009|30996|7109|7107|31128|31188|20014|31014|31004|31142|31001|31000|37181|31010|30998|31172|30988|30997|31038|31141|7947|20008|31005|31191|31008|31007|30994|30993|31182|30989|20012|31186|31178|31015|30991|20010|20016|31184|31190|30990|30995|31176|31180|30992|31130|5207|7031|7026|7034|7033|7027|7035|7029|5078|5063|5059|5105|5060|5138|5129|5201|5142|5143|5076|5106|7610|5139|5090|5103|5132|7177|5061|7181|7179|3920|5042|5127|5117|5185|5125|3938|5177|3937|5044|5121|3915|3909|3568|3932|5123|5144|5119|5056|5135|5187|5074|5089|3934|3913|3917|3721|5075|5046|5049|7170|5146|5205|5203|5115|5204|5040|5179|5070|5182|5085|5181|3719|7173|5131|3911|5101|7175|7169|3713|5112|22187|9917|3859|3862|3878|3865|3856|3873|3877|3834|3742|3762|3740|3763|10245|3572|3573|3571|3885|12686|19985|19981|19984|19982|19983|19991|19989|19986|19987|19988|19994|19995|19992|19993|19990|19980|19977|19976|19978|19979|43423|7154|4225|7127|3861" ground -1 -1 index as lootlocation
1710 overhead "*loot*" 2091 lootlocation
1711 @ignore lootlocation
1712 endif
1713 if warmode and findtype 4239|4240 ground -1 -1 2
1714 break
1715 endif
1716 endfor
1717 @clearignore
1718 settimer lootsensetimer 0
1719 endif
1720 while findtype 3827 ground 0 as zeroscroll
1721 @ignore zeroscroll
1722 endwhile
1723 while findtype 7154 ground 0 as zeroingot
1724 @ignore zeroingot
1725 endwhile
1726 while findtype 4225 ground 0 as zeroleather
1727 @ignore zeroleather
1728 endwhile
1729 while findtype 7127 ground 0 as zeroboard
1730 @ignore zeroboard
1731 endwhile
1732 while findtype 7154 ground 2419 as zeroingot
1733 @ignore zeroingot
1734 endwhile
1735 while findtype 4225 ground 2419 as zeroleather
1736 @ignore zeroleather
1737 endwhile
1738 while findtype 7127 ground 2419 as zeroboard
1739 @ignore zeroboard
1740 endwhile
1741 while findtype 7154 ground 2406 as zeroingot
1742 @ignore zeroingot
1743 endwhile
1744 while findtype 4225 ground 2406 as zeroleather
1745 @ignore zeroleather
1746 endwhile
1747 while findtype 7127 ground 2406 as zeroboard
1748 @ignore zeroboard
1749 endwhile
1750 while findtype 7154 ground 2413 as zeroingot
1751 @ignore zeroingot
1752 endwhile
1753 while findtype 4225 ground 2413 as zeroleather
1754 @ignore zeroleather
1755 endwhile
1756 while findtype 7127 ground 2413 as zeroboard
1757 @ignore zeroboard
1758 endwhile
1759 while findtype 7154 ground 2418 as zeroingot
1760 @ignore zeroingot
1761 endwhile
1762 while findtype 4225 ground 2418 as zeroleather
1763 @ignore zeroleather
1764 endwhile
1765 while findtype 7127 ground 2418 as zeroboard
1766 @ignore zeroboard
1767 endwhile
1768 while findtype 7154 ground 2213 as zeroingot
1769 @ignore zeroingot
1770 endwhile
1771 while findtype 4225 ground 2213 as zeroleather
1772 @ignore zeroleather
1773 endwhile
1774 while findtype 7127 ground 2213 as zeroboard
1775 @ignore zeroboard
1776 endwhile
1777 while not casting and not targetexists and findtype "54230|44985|glass display|20049|Pig Iron|blackrock fragment|gargish fragment|18705|55247|49482|53694|54570|53696|53876|50612|55420|53280|53473|54831|50278|49528|bottle set|entrail bucket|mounted stalaghorn|sea glass bulb|juggling daggers|st patricks cross|divination orb|mirror display|murder of crows|charmed cobra|prodigy fiddle|wilting rose belljar|scale of balance|screaming mandrake|statue of the siren|the final hour|55204|specimen jars|bird cage|widows grief|54684|27612|49223|54591|54601|54718|19948|58325|19959|19822|49730|49729|19944|19949|47613|47612|47611|47610|47611|3986|3966|cathedral tapestry|Darkscale tapestry|large painting|landscape painting|portrait painting|figurine|statue|20291|44987|49730|47107|18653|45127|20103|47103|29363|47105|29361|43453|5899|47109|45250|41509|43447|18657|4025|51308|45156|51304|45214|28769|28799|28803|28765|45211|45248|51259|45220|51328|45218|3842|51327|45222|45241|51336|11858|51375|45282|54722|45255|45246|28795|44983|45235|45251|45238|51258|51314|28761|45236|51260|54718|18400|58325|45252|18656|47111|3839|45239|45242|45254|45281|45247|42241|45216|28775|51321|3838|51318|5901|5905|45259|5903|48407|51302|4248|27611|15296|43166|5359|5981|4026|3985|25359|17686|3836|17087|5356|29030|24434|22336|29036|3843|29025|51098|29034|8826|51094|576|3827|22326|45315|3891|2539|39898|39896|39892|39918|39911|39916|39897|39905|39891|39917|39912|39909|39889|31047|31017|31049|31019|31055|31051|31053|31025|31027|31031|31041|54717|31021|31011|31023|31029|31043|31003|31035|31033|31045|31037|31002|20006|31169|31006|30999|31012|31009|30996|7109|7107|31128|31188|20014|31014|31004|31142|31001|31000|37181|31010|30998|31172|30988|30997|31038|31141|7947|20008|31005|31191|31008|31007|30994|30993|31182|30989|20012|31186|31178|31015|30991|20010|20016|31184|31190|30990|30995|31176|31180|30992|31130|5207|7031|7026|7034|7033|7027|7035|7029|5078|5063|5059|5105|5060|5138|5129|5201|5142|5143|5076|5106|7610|5139|5090|5103|5132|7177|5061|7181|7179|3920|5042|5127|5117|5185|5125|3938|5177|3937|5044|5121|3915|3909|3568|3932|5123|5144|5119|5056|5135|5187|5074|5089|3934|3913|3917|3721|5075|5046|5049|7170|5146|5205|5203|5115|5204|5040|5179|5070|5182|5085|5181|3719|7173|5131|3911|5101|7175|7169|3713|5112|22187|9917|3859|3862|3878|3865|3856|3873|3877|3834|3742|3762|3740|3763|10245|3572|3573|3571|3885|12686|19985|19981|19984|19982|19983|19991|19989|19986|19987|19988|19994|19995|19992|19993|19990|19980|19977|19976|19978|19979|43423|7154|4225|7127|3861" ground -1 -1 2 as eatloot
1778 hotkey 'Grab Item'
1779 target eatloot
1780 if insysmsg "Invalid or inaccessible item."
1781 @ignore eatloot
1782 endif
1783 while queued
1784 //donothing
1785 endwhile
1786 endwhile
1787 endif
1788endif
1789if not timerexists skinnerswitch
1790 if insysmsg "What corpse or location do you wish to carve?"
1791 hotkey "Cancel Current Target"
1792 createtimer skinnerswitch
1793 overhead "--Skinner Mode Enabled--" 2085
1794 endif
1795endif
1796
1797if timerexists skinnerswitch
1798 if insysmsg "What corpse or location do you wish to carve?"
1799 hotkey "Cancel Current Target"
1800 removetimer skinnerswitch
1801 overhead "--Skinner Mode Disabled--" 1779
1802 endif
1803endif
1804if not hidden and not casting and findtype "Elven Spellblade" backpack
1805 if not warmode and timerexists skinnerswitch
1806 if not timerexists corpsetimer
1807 createtimer corpsetimer
1808 settimer corpsetimer 2000
1809 endif
1810 if timer corpsetimer >= 2000
1811 for 18
1812 if index > 0 and findtype "corpse" ground -1 -1 index as corpselocation
1813 overhead "corpse" 76 corpselocation
1814 @ignore corpselocation
1815 endif
1816 endfor
1817 @clearignore
1818 settimer corpsetimer 0
1819 endif
1820 if not find "bknife" backpack and findtype "Elven Spellblade" backpack as newknife
1821 @setvar "bknife" newknife
1822 endif
1823 while findtype "corpse" ground -1 -1 2 as bcorpse
1824 getlabel bcorpse desc
1825 if "the remains of" in desc
1826 overhead "avatar corpse" 45 bcorpse
1827 @ignore bcorpse
1828 else
1829 while queued
1830 //do nothing
1831 endwhile
1832 dclick "bknife"
1833 wft 500
1834 target bcorpse
1835 getlabel backpack ping
1836 pause 500
1837 if insysmsg "You carve materials from the corpse"
1838 overhead "*fresh cut*" 2085 bcorpse
1839 @ignore bcorpse
1840 elseif insysmsg "That corpse has already been carved"
1841 overhead "*carved*" 1779 bcorpse
1842 @ignore bcorpse
1843 endif
1844 endif
1845 endwhile
1846 clearsysmsg
1847 endif
1848endif
1849if insysmsg "What should I use these scissors on?" and findtype "sewing kit|saw|pen and ink|tongs|tool kit" backpack as breakdowntool
1850 hotkey "Cancel Current Target"
1851 if findtype 20496 backpack as IDwand
1852 clearsysmsg
1853 if findtype 3834 backpack 0 as bbook
1854 @ignore bbook
1855 endif
1856 while findtype 5056|5059|5060|5061|5063|5070|5074|5075|5076|5078|5085|5089|5090|5101|5103|5105|5106|5129|5131|5132|5135|5138|5139|5142|5143|5144|5146|5201|5203|5204|5205|5207|7169|7170|7173|7175|7177|7179|7181|7610|7947|31003|31004|31005|31006|31007|31008|31009|31010|31011|31012|31015|31191|31017|31019|31021|31023|31025|31027|31029|31031|31033|31035|31037|31038|31041|31043|31045|31047|31049|31051|31053|31055|3834|3740|3742|3762|3763|10245|20006|20008|20010|20012|20014|20016|7026|7027|7029|7031|7033|7034|7035|7107|7109|31002|31130|3920|5042|5117|30990|30993|30994|30995|31184|31186|3719|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182|3909|3911|3913|3915|3917|3934|3937|5046|5049|5115|5119|5182|5185|5187|30988|31128|31190|22187|31141|31142|31169|31172 backpack as IDitem
1857 getlabel IDitem desc
1858 if "unidentified" in desc
1859 while queued
1860 //donothing
1861 endwhile
1862 dclick IDwand
1863 wft 1000
1864 target IDitem
1865 waitforsysmsg "You identify the item." 1000
1866 getlabel IDitem desc
1867 if "aspect" in desc or "training" in desc or "vanquishing" in desc or "supremely" in desc or "slaying" in desc or "enticement" in desc or "invulnerability" in desc or "power" in desc or "exceedingly accurate force" in desc or "exceedingly potent" in desc or "valorite" in desc or "valehide" in desc or "valewood" in desc or "avarite" in desc or "avarhide" in desc or "avarwood" in desc or "verite" in desc or "verehide" in desc or "verewood" in desc or "agapite" in desc or "rosehide" in desc or "rosewood" in desc or "fortification" in desc
1868 @ignore IDitem
1869 overhead "This one is worth keeping..." 2091
1870 overhead "*strong magic*" 2091 IDitem
1871 say "[surprise" 2091
1872 elseif "durable" in desc or "substantial" in desc or "massive" in desc or "fortified" in desc or "indestructible" in desc or "exceptional" in desc or "accurate" in desc or "surpassingly" in desc or "eminently" in desc or "exceedingly" in desc or "ruin" in desc or "might" in desc or "force" in desc or "power" in desc or "mastercrafted" in desc or "defense" in desc or "guarding" in desc or "hardening" in desc or "potent" in desc or "melodious" in desc
1873 overhead "*trash*" 1779 IDitem
1874 while not gumpexists 949095101
1875 while queued
1876 //donothing
1877 endwhile
1878 dclick breakdowntool
1879 waitforgump 949095101 1000
1880 endwhile
1881 while not ingump "Recycle Single Item" 949095101
1882 gumpresponse 2
1883 waitforgump 949095101 1000
1884 endwhile
1885 gumpresponse 3
1886 waitforgump 949095101 1000
1887 target IDitem
1888 getlabel backpack ping
1889 pause 300
1890 gumpclose 949095101
1891 else
1892 @ignore IDitem
1893 endif
1894 elseif "aspect" in desc or "training" in desc or "vanquishing" in desc or "supremely" in desc or "slaying" in desc or "enticement" in desc or "invulnerability" in desc or "power" in desc or "exceedingly accurate force" in desc or "exceedingly potent" in desc or "valorite" in desc or "valehide" in desc or "valewood" in desc or "avarite" in desc or "avarhide" in desc or "avarwood" in desc or "verite" in desc or "verehide" in desc or "verewood" in desc or "agapite" in desc or "rosehide" in desc or "rosewood" in desc or "fortification" in desc
1895 @ignore IDitem
1896 elseif "durable" in desc or "substantial" in desc or "massive" in desc or "fortified" in desc or "indestructible" in desc or "exceptional" in desc or "accurate" in desc or "surpassingly" in desc or "eminently" in desc or "exceedingly" in desc or "ruin" in desc or "might" in desc or "force" in desc or "power" in desc or "mastercrafted" in desc or "defense" in desc or "guarding" in desc or "hardening" in desc or "potent" in desc or "melodious" in desc
1897 overhead "*trash*" 1779 IDitem
1898 while not gumpexists 949095101
1899 while queued
1900 //donothing
1901 endwhile
1902 dclick breakdowntool
1903 waitforgump 949095101 1000
1904 endwhile
1905 while not ingump "Recycle Single Item" 949095101
1906 gumpresponse 2
1907 waitforgump 949095101 1000
1908 endwhile
1909 gumpresponse 3
1910 waitforgump 949095101 1000
1911 target IDitem
1912 getlabel backpack ping
1913 pause 300
1914 gumpclose 949095101
1915 else
1916 @ignore IDitem
1917 endif
1918 if not findtype 20496 backpack
1919 break
1920 endif
1921 endwhile
1922 if gumpexists 949095101
1923 gumpclose 949095101
1924 endif
1925 endif
1926 if targetexists
1927 hotkey "Cancel Current Target"
1928 endif
1929endif
1930if dead
1931 overhead "I need a new body..." 88
1932 stop
1933endif
1934loop