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