# I have taken a realtively basic process and over-complicated it once again... but this one is reall handy! Trust me
# If you use my other scripts to their full abilities, you might be familiar with this process already. If not, you really should try them out.
# This script will help you setup your inventory (after death, usually) to really hinder thieves and improve your own QOL
# I like my bags and stuff setup in a really specific way and it used to be really tedious to configure after death - not anymore!
# With one button press this script will stack and hide your pouches and get your potions and gear ready to get back to playing quick. Best of all, it truly prevents thieves..
# I cannot think of a single item of value that has ever been stolen from me in a dungeon (please do not take this as a challenge lol) while running this setup
# By stacking pouches, burying your grab bag inside and using my Lockbox feature (in my Auto Pilot scripts) to further bury and lock any valuables it really makes a difference!
# It is not as complicated as it sounds - it just requires specific shelf loadout items (trapped pouches, regular pouches and a bag) and scissors in your backpack. Easy!
# Please follow the instructions below and reach out if there are any questions or issues (dan@danstockman.com)
# Thank you and I hope you enjoy these QOL scripts as much as I do! This is one of my favourites
/////////
//////// Lord Glaciers Chill INVENTORY RESET/ANTI-THIEF - UO OUTLANDS RAZOR SCRIPT - version 1.0.0
///////
////// UO Outlands Razor script - Released January 4, 2026
///// Compiled by DanStock. (aka. Lord Glacier)
////
///
///////////////////////
// CHANGE LOG: //
///////////////////////
# Jan 4 2026 - version 1.0.0: Public script release!
/////////////////
// TIPS: //
/////////////////
// Disclaimer: I AM NOT AN EXPERT! I have only played Outlands for 2 years now (with 90% of the first year spent harvesting - main PVM account is only at 16 links)
// This is also the first and only MMO I have played since I last logged out of my OSI accounts on Great Lakes shard back in 2003.
// So take any of my advice with that in mind - I am still a noob. If you have 30+ links and millions of gold, there is probably a better way to do things, but this works for me at my stage!
// I have zero prior experience scripting and I have made these primarily for my own benefit!! I am learning as I go...
// Mostly, I make these scripts in order to play on my Asus ROG Ally handheld - but I have come to enjoy the challenge of making them work for as many builds as possible.
// I do not really use Discord (I only installed it to join Outlands - then discovered I had an older account already). Lots of people message me there, but I rarely check it (sorry).
// That being said, I do my best to fix reported bugs (dan@danstockman.com) but usually do not have time to respond to requests for custom stuff (but appreciate any ideas, for sure!)
// Since I do not personally use all aspects of the script (and do all my editing in Notepad on my PC at work lol) some bugs take longer for me to find - but I am always adjusting and updating! Thanks for being patient!
// If you see me out in Avadon, my apologies if I dont respond (its a pain to type on the ROG Ally), but to do enjoy hearing that people use my scripts. Appreciate the support! GOOD LUCK OUT THERE :)
# I have taken a realtively basic process and over-complicated it once again... but this one is reall handy! Trust me
# If you use my other scripts to their full abilities, you might be familiar with this process already. If not, you really should try them out.
# This script will help you setup your inventory (after death, usually) to really hinder thieves and improve your own QOL
# I like my bags and stuff setup in a really specific way and it used to be really tedious to configure after death - not anymore!
# With one button press this script will stack and hide your pouches and get your potions and gear ready to get back to playing quick. Best of all, it truly prevents thieves..
# I cannot think of a single item of value that has ever been stolen from me in a dungeon (please do not take this as a challenge lol) while running this setup
# By stacking pouches, burying your grab bag inside and using my Lockbox feature (in my Auto Pilot scripts) to further bury and lock any valuables it really makes a difference!
# It is not as complicated as it sounds - it just requires specific shelf loadout items (trapped pouches, regular pouches and a bag) and scissors in your backpack. Easy!
# Please follow the instructions below and reach out if there are any questions or issues (dan@danstockman.com)
# Thank you and I hope you enjoy these QOL scripts as much as I do! This is one of my favourites
/////////////////////
// INSTRUCTIONS: //
/////////////////////
// IMPT!!: Requires an EQUAL AMOUNT of both TRAPPED POUCHES (in shelf loadout) and SCISSORS [blessed] (in backpack) for optimal setup (suggest ~5-10 each)
// Loadout also requires 1 UNTRAPPED POUCH (for main inventory - optionally set as Organizer Agent-01 below) and 1 BAG (for loot, etc.)
// For example, my shelf loadouts alwyas consist of: 1 UNTRAPPED POUCH, 8 TRAPPED POUCHES and 1 BAG. I always carry 8 pairs of SCISSORS [blessed] in my pack
# If enabled, script will start by resupplying from nearby storage shelf (2 tiles)
# Script will put SCISSORS into each TRAPPED POUCH (to keep them from being grabbed during future shelf loading)
# Script then STACKS any TRAPPED POUCHES on top of your MAIN INVENTORY POUCH
# If enabled, MAIN INVENTORY POUCH will be set as RAZOR ORGANIZER AGENT-01
# If enabled, your LOOT BAG will then be moved into MAIN INVENTORY POUCH and set as your GRAB ITEM HOTBAG (and hidden under rope, if found)
# Script will then HIDE the STACK underneath an ATLAS and put a DECOY TRAPPED POUCH out in the open (thieves often trip this and blow their cover)
# If enabled, ASPECT WEAPON and ARMOUR will be re-activated automatically
# HP will restored to MAX (using bandages or magery)
# If enabled, POTIONS will be filled from kegs (based on settings below). Loadout requires empty kegs and empty bottles!
# If enabled, REAGENTS will be separated into smaller stacks inside your WIZARD SATCHEL to further hinder thieves
# Inventory reset finishes by opening backpack, main inventory pouch, loot bag and any satchels
###############################
### USER VARIABLES: ###
###############################
@setvar! EnableOverheadMessages 1
# Will display overhead messages that match my other scripts (or not)
@setvar! EnableResupplyFromStorageShelf 0
# Will first resupply from storage shelf (if found within 2 tiles) before running script
@setvar! EnableReactivateAspects 0
# Will reactivate your equipped aspect weapon, book and/or armour
@setvar! EnableSetMainPouchOrganizer01 0
# Requires 1 untrapped pouch in inventory
# Will set your main storage pouch as Razor Organizer Hotbag 01
@setvar! EnableLootBag 1
# Requires 1 regular bag in inventory
# Will set your bag as the Grab Item Hotbag (for Grid Loot, etc.)
# Will move bag to main inventory pouch and hide it under rope stack (if found)
@setvar! EnableLockBox 0
# Requires wooden box and matching copper key in inventory
# Will move lockbox to main inventory pouch and hide it under food trays (if found)
# Will move key to Loot Bag (if enabled) or main inventory pouch
@setvar! EnableUsePotionKegs 0
# Requires kegs and empty bottles in inventory
# Shelf loadout requires potions, empty kegs and empty bottles (pack extra bottles for explosion pots)
# Will automatically fill your potions from kegs to set amounts
# Set your required potion amounts below:
if EnableUsePotionKegs = 1
@setvar! HealingPotionAmount 5
@setvar! CurePotionAmount 5
@setvar! RefreshPotionAmount 5
@setvar! StrengthPotionAmount 1
@setvar! AgilityPotionAmount 1
@setvar! ResistPotionAmount 1
@setvar! ExplosionPotionAmount 5
@setvar! PoisonPotionAmount 0
endif
@setvar! EnableReagentSplitter 0
# Requires Wizard Satchel in inventory or equiped (will ignore decorative)
# Will split reagents into smaller stacks inside your satchel
/////////////////////////
// END OF VARIABLES! //
/////////////////////////
################ EDIT BELOW THIS LINE AT YOUR OWN RISK! ##### EDIT BELOW THIS LINE AT YOUR OWN RISK! ##### EDIT BELOW THIS LINE AT YOUR OWN RISK! ##### EDIT BELOW THIS LINE AT YOUR OWN RISK! ################
////////////////////////
// SCRIPT START: //
////////////////////////
clearignore
if targetexists
hotkey "Cancel Current Target"
endif
dclick backpack
wait 500
if EnableResupplyFromStorageShelf = 1
if findtype "storage shelf" ground -1 -1 2 as shelf
menu shelf 1
if EnableOverheadMessages = 1
overhead "[ RESUPPLYING... ]" 93
wait 500
endif
wait 1000
elseif EnableOverheadMessages = 1
overhead "[ NO STORAGE SHELF FOUND ]" 337
wait 1500
endif
endif
if skill 'healing' > 0 and hp < maxhp and not bandaging
if findtype 'clean bandage%s%' self
hotkey 'Bandage Self'
if EnableOverheadMessages = 1
overhead "[ BANDAGING... ]" 88
endif
else
if EnableOverheadMessages = 1
overhead "[ NO BANDAGES! ]" 337
endif
endif
endif
if EnableReactivateAspects = 1
if EnableOverheadMessages = 1
overhead "[ ACTIVATING ASPECT... ]" 2234
endif
say "[aspect"
waitforgump 2424293173
gumpresponse 8
wait 250
gumpresponse 8
wait 500
gumpresponse 13
wait 250
gumpresponse 13
wait 500
gumpresponse 17
wait 250
gumpresponse 17
wait 500
gumpclose 2424293173
endif
if not varexist maininventorybag or not find maininventorybag self
overhead "[ SELECT MAIN POUCH... ]" 253
@setvar! maininventorybag
wft 500
while targetexists
sysmsg 'Script: Waiting for main pouch selection...' 0
wait 2500
endwhile
overhead "[ MAIN POUCH SET! ]" 93
wait 500
endif
lift maininventorybag
wait 500
drop backpack 69 69 0
wait 500
if EnableSetMainPouchOrganizer01 = 1
hotkey 'Set Organizer Hotbag-01'
wft 1500
target maininventorybag
if EnableOverheadMessages = 1
overhead "[ POUCH SET TO AGENT-01! ]" 84
endif
wait 500
endif
dclick maininventorybag
wait 500
clearignore
if EnableLootBag = 1
hotkey 'Set Grab Item Hotbag'
wft 1500
while targetexists
if findtype 'bag' self as grabbag
target grabbag
wait 500
break
else
wait 1000
sysmsg "Script: Auto-select failed! Please manually target your loot/grab bag..." 0
wait 1000
overhead "[ SELECT LOOT BAG... ]" 253
wait 500
endif
wait 500
endwhile
if not varexist LootBag or not find LootBag self
@setvar! Lootbag grabbag
wait 500
endif
overhead "[ LOOT BAG SET! ]" 93
wait 500
if find LootBag self
lift LootBag
wait 500
drop maininventorybag 164 144 0
wait 500
if findtype 'rope' self as myrope
lift myrope 60000
wait 500
drop maininventorybag 164 144 0
wait 500
endif
endif
endif
@ignore maininventorybag
while findtype 'scissors' self
if skill 'healing' > 0 and hp < maxhp and not bandaging
if findtype 'clean bandage%s%' self
hotkey 'Bandage Self'
if EnableOverheadMessages = 1
overhead "[ BANDAGING... ]" 88
endif
else
if EnableOverheadMessages = 1
overhead "[ NO BANDAGES! ]" 337
endif
endif
endif
if EnableOverheadMessages = 1
if not timerexists StackingTimer
createtimer StackingTimer
settimer StackingTimer 2500
endif
if timer StackingTimer > 2500
overhead "[ STACKING POUCHES... ]" 37
settimer StackingTimer 0
endif
endif
if findtype 'scissors' backpack as myscissors
if findtype 'pouch' self as trappedpouch
lift myscissors
wait 250
drop trappedpouch
wait 750
lift trappedpouch
wait 250
drop backpack 69 69 0
@ignore trappedpouch
@ignore myscissors
endif
endif
wait 500
while queued
wait 100
endwhile
endwhile
clearignore
while findtype 'pouch' backpack as decoypouch
getlabel decoypouch decoypouchlabel
wait 250
if '(1 items' in decoypouchlabel
lift decoypouch
drop backpack 97 97 0
break
else
@ignore decoypouch
endif
endwhile
clearignore
if findtype 'atlas' backpack as hidemypouchstack
lift hidemypouchstack
drop backpack 72 66 0
wait 500
else
say "[atlas"
wait 500
if findtype 'atlas' backpack as hidemypouchstack
lift hidemypouchstack
drop backpack 72 66 0
wait 500
endif
endif
if skill 'magery' >= 60 and hp < maxhp and mana >= 11 and not casting
while hp < maxhp
cast 'greater heal'
while not casting
if targetexists
hotkey 'cancel current target'
endif
cast 'greater heal'
endwhile
while not targetexists
wait 100
endwhile
target 'self'
wait 500
endwhile
endif
if skill 'healing' > 0 and hp < maxhp and not bandaging
if findtype 'clean bandage%s%' self
hotkey 'Bandage Self'
if EnableOverheadMessages = 1
overhead "[ BANDAGING... ]" 88
endif
else
if EnableOverheadMessages = 1
overhead "[ NO BANDAGES! ]" 337
endif
endif
endif
if findtype "storage shelf" ground -1 -1 2 as shelf
menu shelf 1
wait 1000
endif
clearignore
if EnableUsePotionKegs = 1 and findtype 'empty bottle%s%' self and findtype 'keg' self
if not timerexists PotionKegTimer
createtimer PotionKegTimer
settimer PotionKegTimer 5000
endif
if findtype 'alchemists satchel' self as BagofPot
dclick BagofPot
wait 500
endif
@setvar! PotionStockCheck 0
while PotionStockCheck < 8 and findtype 'empty bottle%s%' self
if PotionStockCheck = 0 and ExplosionPotionAmount != 0
@setvar! PotionType 3853
@setvar! KegColour 419
@setvar! PotionAmounttoFill ExplosionPotionAmount
@setvar! PotionStockCheck 1
elseif PotionStockCheck = 1 and HealingPotionAmount != 0
@setvar! PotionType 3852
@setvar! KegColour 253
@setvar! PotionAmounttoFill HealingPotionAmount
@setvar! PotionStockCheck 2
elseif PotionStockCheck = 2 and CurePotionAmount != 0
@setvar! PotionType 3847
@setvar! KegColour 44
@setvar! PotionAmounttoFill CurePotionAmount
@setvar! PotionStockCheck 3
elseif PotionStockCheck = 3 and RefreshPotionAmount != 0
@setvar! PotionType 3851
@setvar! KegColour 37
@setvar! PotionAmounttoFill RefreshPotionAmount
@setvar! PotionStockCheck 4
elseif PotionStockCheck = 4 and StrengthPotionAmount != 0
@setvar! PotionType 3849
@setvar! KegColour 956
@setvar! PotionAmounttoFill StrengthPotionAmount
@setvar! PotionStockCheck 5
elseif PotionStockCheck = 5 and AgilityPotionAmount != 0
@setvar! PotionType 3848
@setvar! KegColour 93
@setvar! PotionAmounttoFill AgilityPotionAmount
@setvar! PotionStockCheck 6
elseif PotionStockCheck = 6 and ResistPotionAmount != 0
@setvar! PotionType 3846
@setvar! KegColour 1109
@setvar! PotionAmounttoFill ResistPotionAmount
@setvar! PotionStockCheck 7
elseif PotionStockCheck = 7 and PoisonPotionAmount != 0
@setvar! PotionType 3850
@setvar! KegColour 363
@setvar! PotionAmounttoFill PoisonPotionAmount
@setvar! PotionStockCheck 8
else
break
endif
while counttype PotionType self < PotionAmounttoFill
if not findtype 'empty bottle%s%' self
if EnableOverheadMessages = 1 and timer 'PotionKegTimer' > 5000
overhead "[ NO EMPTY BOTTLES... ]" 337
settimer 'PotionKegTimer' 0
endif
break
endif
if findtype 'keg' self KegColour as myKeg
dclick myKeg
wait 250
if EnableOverheadMessages = 1
if timer 'PotionKegTimer' > 2000
overhead '[ FILLING POTS... ]' KegColour
settimer 'PotionKegTimer' 0
endif
endif
else
if EnableOverheadMessages = 1 and timer 'PotionKegTimer' > 5000
overhead "[ NO KEG TO USE... ]" KegColour
settimer 'PotionKegTimer' 0
endif
break
endif
endwhile
if counttype PotionType self < PotionAmounttoFill and not findtype 'empty bottle%s%' self
if EnableOverheadMessages = 1 and timer 'PotionKegTimer' > 5000
overhead "[ NO EMPTY BOTTLES... ]" 337
settimer 'PotionKegTimer' 0
endif
break
endif
endwhile
endif
clearignore
if EnableReagentSplitter = 1
if findtype "reagent satchel" self as MyWizardBag
while findtype "reagent satchel" self as MyWizardBag
getlabel MyWizardBag MyWizardBaglabel
wait 500
if "decorative" in MyWizardBaglabel
@ignore MyWizardBag
wait 500
else
break
endif
endif
endwhile
dclick MyWizardBag
wait 500
if EnableOverheadMessages = 1
overhead "[ SPLITTING REGS... ]" 2338
endif
# Spiders Silk
@setvar! ReagentStack 0
@setvar! ReagentSerial 3981
@setvar! ReagentCount 0
while findtype ReagentSerial self as regs
@setvar! ReagentCount index
@ignore regs
endwhile
@clearignore
if counttype ReagentSerial self <= 10
@setvar! ReagentStack 2
elseif counttype ReagentSerial self <= 20
@setvar! ReagentStack 4
elseif counttype ReagentSerial self <= 50
@setvar! ReagentStack 10
elseif counttype ReagentSerial self <= 100
@setvar! ReagentStack 20
elseif counttype ReagentSerial self <= 150
@setvar! ReagentStack 30
elseif counttype ReagentSerial self <= 200
@setvar! ReagentStack 40
else
@setvar! ReagentStack 50
endif
while findtype ReagentSerial self as regs
@setvar! moveRegs 0
if ReagentCount = 0
@setvar! moveRegs 1
elseif ReagentCount != 0 and not find regs MyWizardBag
@setvar! moveRegs 1
endif
if moveRegs = 1
if index = 0
lift regs ReagentStack
drop MyWizardBag 44 65 0
wait 150
elseif index = 1
lift regs ReagentStack
drop MyWizardBag 68 65 0
wait 150
elseif index = 2
lift regs ReagentStack
drop MyWizardBag 96 65 0
wait 150
elseif index = 3
lift regs ReagentStack
drop MyWizardBag 121 65 0
wait 150
else
lift regs ReagentStack
drop MyWizardBag 142 65 0
wait 150
endif
endif
@ignore regs
if moveRegs = 1
wait 500
endif
endwhile
if EnableOverheadMessages = 1
overhead "[ SPLITTING REGS... ]" 3
endif
# Black Pearl
@setvar! ReagentSerial 3962
@setvar! ReagentCount 0
while findtype ReagentSerial self as regs
@setvar! ReagentCount index
@ignore regs
endwhile
@clearignore
if counttype ReagentSerial self <= 10
@setvar! ReagentStack 2
elseif counttype ReagentSerial self <= 20
@setvar! ReagentStack 4
elseif counttype ReagentSerial self <= 50
@setvar! ReagentStack 10
elseif counttype ReagentSerial self <= 100
@setvar! ReagentStack 20
elseif counttype ReagentSerial self <= 150
@setvar! ReagentStack 30
elseif counttype ReagentSerial self <= 200
@setvar! ReagentStack 40
else
@setvar! ReagentStack 50
endif
while findtype ReagentSerial self as regs
@setvar! moveRegs 0
if ReagentCount = 0
@setvar! moveRegs 1
elseif ReagentCount != 0 and not find regs MyWizardBag
@setvar! moveRegs 1
endif
if moveRegs = 1
if index = 0
lift regs ReagentStack
drop MyWizardBag 44 76 0
wait 150
elseif index = 1
lift regs ReagentStack
drop MyWizardBag 68 76 0
wait 150
elseif index = 2
lift regs ReagentStack
drop MyWizardBag 96 76 0
wait 150
elseif index = 3
lift regs ReagentStack
drop MyWizardBag 121 76 0
wait 150
else
lift regs ReagentStack
drop MyWizardBag 142 76 0
wait 150
endif
endif
@ignore regs
if moveRegs = 1
wait 500
endif
endwhile
if EnableOverheadMessages = 1
overhead "[ SPLITTING REGS... ]" 363
endif
# Nightshade
@setvar! ReagentSerial 3976
@setvar! ReagentCount 0
while findtype ReagentSerial self as regs
@setvar! ReagentCount index
@ignore regs
endwhile
@clearignore
if counttype ReagentSerial self <= 10
@setvar! ReagentStack 2
elseif counttype ReagentSerial self <= 20
@setvar! ReagentStack 4
elseif counttype ReagentSerial self <= 50
@setvar! ReagentStack 10
elseif counttype ReagentSerial self <= 100
@setvar! ReagentStack 20
elseif counttype ReagentSerial self <= 150
@setvar! ReagentStack 30
elseif counttype ReagentSerial self <= 200
@setvar! ReagentStack 40
else
@setvar! ReagentStack 50
endif
while findtype ReagentSerial self as regs
@setvar! moveRegs 0
if ReagentCount = 0
@setvar! moveRegs 1
elseif ReagentCount != 0 and not find regs MyWizardBag
@setvar! moveRegs 1
endif
if moveRegs = 1
if index = 0
lift regs ReagentStack
drop MyWizardBag 44 88 0
wait 150
elseif index = 1
lift regs ReagentStack
drop MyWizardBag 68 88 0
wait 150
elseif index = 2
lift regs ReagentStack
drop MyWizardBag 96 88 0
wait 150
elseif index = 3
lift regs ReagentStack
drop MyWizardBag 121 88 0
wait 150
else
lift regs ReagentStack
drop MyWizardBag 142 88 0
wait 150
endif
endif
@ignore regs
if moveRegs = 1
wait 500
endif
endwhile
if EnableOverheadMessages = 1
overhead "[ SPLITTING REGS... ]" 442
endif
# Mandrake Root
@setvar! ReagentSerial 3974
@setvar! ReagentCount 0
while findtype ReagentSerial self as regs
@setvar! ReagentCount index
@ignore regs
endwhile
@clearignore
if counttype ReagentSerial self <= 10
@setvar! ReagentStack 2
elseif counttype ReagentSerial self <= 20
@setvar! ReagentStack 4
elseif counttype ReagentSerial self <= 50
@setvar! ReagentStack 10
elseif counttype ReagentSerial self <= 100
@setvar! ReagentStack 20
elseif counttype ReagentSerial self <= 150
@setvar! ReagentStack 30
elseif counttype ReagentSerial self <= 200
@setvar! ReagentStack 40
else
@setvar! ReagentStack 50
endif
while findtype ReagentSerial self as regs
@setvar! moveRegs 0
if ReagentCount = 0
@setvar! moveRegs 1
elseif ReagentCount != 0 and not find regs MyWizardBag
@setvar! moveRegs 1
endif
if moveRegs = 1
if index = 0
lift regs ReagentStack
drop MyWizardBag 44 100 0
wait 150
elseif index = 1
lift regs ReagentStack
drop MyWizardBag 68 100 0
wait 150
elseif index = 2
lift regs ReagentStack
drop MyWizardBag 96 100 0
wait 150
elseif index = 3
lift regs ReagentStack
drop MyWizardBag 121 100 0
wait 150
else
lift regs ReagentStack
drop MyWizardBag 142 100 0
wait 150
endif
endif
@ignore regs
if moveRegs = 1
wait 500
endif
endwhile
if EnableOverheadMessages = 1
overhead "[ SPLITTING REGS... ]" 153
endif
# Sulfurous Ash
@setvar! ReagentSerial 3980
@setvar! ReagentCount 0
while findtype ReagentSerial self as regs
@setvar! ReagentCount index
@ignore regs
endwhile
@clearignore
if counttype ReagentSerial self <= 10
@setvar! ReagentStack 2
elseif counttype ReagentSerial self <= 20
@setvar! ReagentStack 4
elseif counttype ReagentSerial self <= 50
@setvar! ReagentStack 10
elseif counttype ReagentSerial self <= 100
@setvar! ReagentStack 20
elseif counttype ReagentSerial self <= 150
@setvar! ReagentStack 30
elseif counttype ReagentSerial self <= 200
@setvar! ReagentStack 40
else
@setvar! ReagentStack 50
endif
while findtype ReagentSerial self as regs
@setvar! moveRegs 0
if ReagentCount = 0
@setvar! moveRegs 1
elseif ReagentCount != 0 and not find regs MyWizardBag
@setvar! moveRegs 1
endif
if moveRegs = 1
if index = 0
lift regs ReagentStack
drop MyWizardBag 44 112 0
wait 150
elseif index = 1
lift regs ReagentStack
drop MyWizardBag 68 112 0
wait 150
elseif index = 2
lift regs ReagentStack
drop MyWizardBag 96 112 0
wait 150
elseif index = 3
lift regs ReagentStack
drop MyWizardBag 121 112 0
wait 150
else
lift regs ReagentStack
drop MyWizardBag 142 112 0
wait 150
endif
endif
@ignore regs
if moveRegs = 1
wait 500
endif
endwhile
if EnableOverheadMessages = 1
overhead "[ SPLITTING REGS... ]" 247
endif
# Giseng
@setvar! ReagentSerial 3973
@setvar! ReagentCount 0
while findtype ReagentSerial self as regs
@setvar! ReagentCount index
@ignore regs
endwhile
@clearignore
if counttype ReagentSerial self <= 10
@setvar! ReagentStack 2
elseif counttype ReagentSerial self <= 20
@setvar! ReagentStack 4
elseif counttype ReagentSerial self <= 50
@setvar! ReagentStack 10
elseif counttype ReagentSerial self <= 100
@setvar! ReagentStack 20
elseif counttype ReagentSerial self <= 150
@setvar! ReagentStack 30
elseif counttype ReagentSerial self <= 200
@setvar! ReagentStack 40
else
@setvar! ReagentStack 50
endif
while findtype ReagentSerial self as regs
@setvar! moveRegs 0
if ReagentCount = 0
@setvar! moveRegs 1
elseif ReagentCount != 0 and not find regs MyWizardBag
@setvar! moveRegs 1
endif
if moveRegs = 1
if index = 0
lift regs ReagentStack
drop MyWizardBag 44 124 0
wait 150
elseif index = 1
lift regs ReagentStack
drop MyWizardBag 68 124 0
wait 150
elseif index = 2
lift regs ReagentStack
drop MyWizardBag 96 124 0
wait 150
elseif index = 3
lift regs ReagentStack
drop MyWizardBag 121 124 0
wait 150
else
lift regs ReagentStack
drop MyWizardBag 142 124 0
wait 150
endif
endif
@ignore regs
if moveRegs = 1
wait 500
endif
endwhile
if EnableOverheadMessages = 1
overhead "[ SPLITTING REGS... ]" 33
endif
# Bloodmoss
@setvar! ReagentSerial 3963
@setvar! ReagentCount 0
while findtype ReagentSerial self as regs
@setvar! ReagentCount index
@ignore regs
endwhile
@clearignore
if counttype ReagentSerial self <= 10
@setvar! ReagentStack 2
elseif counttype ReagentSerial self <= 20
@setvar! ReagentStack 4
elseif counttype ReagentSerial self <= 50
@setvar! ReagentStack 10
elseif counttype ReagentSerial self <= 100
@setvar! ReagentStack 20
elseif counttype ReagentSerial self <= 150
@setvar! ReagentStack 30
elseif counttype ReagentSerial self <= 200
@setvar! ReagentStack 40
else
@setvar! ReagentStack 50
endif
while findtype ReagentSerial self as regs
@setvar! moveRegs 0
if ReagentCount = 0
@setvar! moveRegs 1
elseif ReagentCount != 0 and not find regs MyWizardBag
@setvar! moveRegs 1
endif
if moveRegs = 1
if index = 0
lift regs ReagentStack
drop MyWizardBag 44 136 0
wait 150
elseif index = 1
lift regs ReagentStack
drop MyWizardBag 68 136 0
wait 150
elseif index = 2
lift regs ReagentStack
drop MyWizardBag 96 136 0
wait 150
elseif index = 3
lift regs ReagentStack
drop MyWizardBag 121 136 0
wait 150
else
lift regs ReagentStack
drop MyWizardBag 142 136 0
wait 150
endif
endif
@ignore regs
if moveRegs = 1
wait 500
endif
endwhile
if EnableOverheadMessages = 1
overhead "[ SPLITTING REGS... ]" 646
endif
# Garlic
@setvar! ReagentSerial 3972
@setvar! ReagentCount 0
while findtype ReagentSerial self as regs
@setvar! ReagentCount index
@ignore regs
endwhile
@clearignore
if counttype ReagentSerial self <= 10
@setvar! ReagentStack 2
elseif counttype ReagentSerial self <= 20
@setvar! ReagentStack 4
elseif counttype ReagentSerial self <= 50
@setvar! ReagentStack 10
elseif counttype ReagentSerial self <= 100
@setvar! ReagentStack 20
elseif counttype ReagentSerial self <= 150
@setvar! ReagentStack 30
elseif counttype ReagentSerial self <= 200
@setvar! ReagentStack 40
else
@setvar! ReagentStack 50
endif
while findtype ReagentSerial self as regs
@setvar! moveRegs 0
if ReagentCount = 0
@setvar! moveRegs 1
elseif ReagentCount != 0 and not find regs MyWizardBag
@setvar! moveRegs 1
endif
if moveRegs = 1
if index = 0
lift regs ReagentStack
drop MyWizardBag 44 148 0
wait 150
elseif index = 1
lift regs ReagentStack
drop MyWizardBag 68 148 0
wait 150
elseif index = 2
lift regs ReagentStack
drop MyWizardBag 96 148 0
wait 150
elseif index = 3
lift regs ReagentStack
drop MyWizardBag 121 148 0
wait 150
else
lift regs ReagentStack
drop MyWizardBag 142 148 0
wait 150
endif
endif
@ignore regs
if moveRegs = 1
wait 500
endif
endwhile
else
if EnableOverheadMessages = 1
overhead "[ NO WIZARD BAG! ]" 337
wait 500
endif
endif
endif
clearignore
if EnableOverheadMessages = 1
overhead "[ OPENING BAGS... ]" 1132
endif
dclick backpack
wait 500
while queued
wait 100
endwhile
if find maininventorybag self
dclick maininventorybag
wait 500
endif
while queued
wait 100
endwhile
if findtype 'alchemists satchel' self as BagofPot
dclick BagofPot
wait 500
endif
while queued
wait 100
endwhile
if findtype 'reagent satchel' self as WizzyBag
while findtype "reagent satchel" self as WizzyBag
getlabel WizzyBag MyWizardBagdesc
if 'decorative' in MyWizardBagdesc
@ignore WizzyBag
else
break
endif
endwhile
dclick WizzyBag
wait 500
endif
while queued
wait 100
endwhile
if EnableLootBag = 1
dclick LootBag
wait 500
endif
while queued
wait 100
endwhile
if EnableLockBox = 1
if findtype 'wooden box' self as Lockbox
if EnableOverheadMessages = 1
overhead "[ SECURING LOCKBOX... ]" 2114
wait 500
endif
lift Lockbox 1
wait 500
drop maininventorybag 44 141 0
wait 500
getlabel Lockbox Lockboxlabel
wait 500
if findtype 'tray' self as food
lift food 60000
wait 500
drop maininventorybag 44 141 0
wait 500
endif
if "items" in Lockboxlabel
dclick Lockbox
wait 500
if findtype 'copper key' self as mykey and EnableLootBag = 1
lift mykey 1
wait 500
drop LootBag 29 121 0
wait 500
elseif findtype 'copper key' self as mykey and EnableLootBag = 0
lift mykey 1
wait 500
drop maininventorybag 29 121 0
wait 500
else
overhead "[ NO KEY! ]" 337
endif
else
if findtype 'copper key' self as mykey and EnableLootBag = 1
dclick mykey
wft 1500
target Lockbox
wait 500
dclick Lockbox
wait 500
lift mykey 1
wait 500
drop LootBag 29 121 0
wait 500
elseif findtype 'copper key' self as mykey and EnableLootBag = 0
dclick mykey
wft 1500
target Lockbox
wait 500
dclick Lockbox
wait 500
lift mykey 1
wait 500
drop maininventorybag 29 121 0
wait 500
else
overhead "[ NO KEY FOUND ]" 337
endif
wait 500
endif
else
overhead "[ NO LOCKBOX FOUND ]" 337
endif
endif
while queued
wait 100
endwhile
if EnableSetMainPouchOrganizer01 = 1
hotkey "Organizer Agent-01"4
endif
wait 1000
overhead "[ SCRIPT COMPLETE! ]" 84
stop
////////////////////////
// SCRIPT FINISH //
////////////////////////
// Thank you for using my scripts! I can be contacted via email here: dan@danstockman.com
// Good luck out there and say hello if you see me in Avadon (Lord Glacier) - please don't PK me lol