Razor script
Lord Glacier's Chill RECALL/RESET/RELOAD - UO OUTLANDS RAZOR SCRIPT - v1.0.3
by danstock._98439 · 2378 lines
Lord Glaciers Chill RECALL/RESET/RELOAD - UO OUTLANDS RAZOR SCRIPT - version 1.0.3 UO Outlands Razor script - Released January 4, 2026 - Last updated September 9, 2026 Compiled by DanStock. (aka. Lord Glacier)
Hiding
Lord Glaciers Chill RECALLRESETRELOAD - UO OUTLANDS RAZOR SCRIPT - v103.razor
1# This is an automated backup - check out https://outlands.uorazorscripts.com/script/eb531d83-26e4-4d50-ba15-d7e72ac483cc for latest2# Automation by Jaseowns3## Script: Lord Glacier's Chill RECALL/RESET/RELOAD - UO OUTLANDS RAZOR SCRIPT - v1.0.34## Created by: danstock._98439#05#############################################6 7/////////8//////// Lord Glaciers Chill RECALL/RESET/RELOAD - UO OUTLANDS RAZOR SCRIPT - version 1.0.39///////10////// UO Outlands Razor script - Released January 4, 2026 - Last updated September 9, 202611///// Compiled by DanStock. (aka. Lord Glacier)12////13///14 15 16 17 18 19 ///////////////////////20 // CHANGE LOG: //21 ///////////////////////22 23 # Sep 09 2026 - version 1.0.3: Fixed some bugs and typos and adjusted the order of things - brought it all in line with my latest script specs24 # Aug 31 2026 - version 1.0.2: Updated Storage Tome serials, added Dual Wield & Throwing weapon equipping, tweaked order of things25 # Jul 23 2026 - version 1.0.1: Moved Loot Bag and Main Pouch variable checks to avoid hanging prior to Recall if not found26 # Jan 04 2026 - version 1.0.0: Public script release!27 28 29 30 31 /////////////////32 // TIPS: //33 /////////////////34 35# I have taken a relatively basic process and over-complicated it once again... but I think it turned out well! Nice to work on a short script for a change.36# This should all look pretty familiar if you use any of my other scripts (the auto recall functions, specifically)37# I decided to finally release a stand-alone Recall/Reset script that you can use independently of my other Auto Pilot scripts. 38# A lot of the stuff will be seamless if you are using it in other scripts - otherwise you will be prompted to select runebook, loot bag, loot chest, tomes, etc. upon first use. 39# Script can cast recall (if reagents and skill available) or it can use charged scrolls in runebooks. Casts to the "DEFAULT" rune or uses scrolls to "FIRST LOCATION" in book40# After recalling it will smelt ore/make boards (if harvesting), dispel summons, deposit gold and loot, repair items, reset loadouts, reset inventory... basically anything you need!41# If there is anything missing that this script could do, just let me know by email (dan@danstockman.com) and I will see what I can do42 43 44 45 46 ###############################47 ### USER VARIABLES: ###48 ###############################49 50@setvar! EnableOverheadMessages 151 # Will display overhead messages that match my other scripts (or not)52 53@setvar! EnableCastRecall 054 # '0' for 'Scrolls in charged Runebook to "first" rune'55 # '1' for 'Cast Recall to Runebook/Runetome using "default" rune'56 57 58 // AUTO RECALL DESTINATION (choose only one):59 @setvar! BankRecall 060 @setvar! OwnerInnRecall 061 @setvar! CoOwnerInnRecall 062 @setvar! InsideHouseRecall 063 @setvar! OutsideHouseRecall 064 65 if OutsideHouseRecall = 166 @setvar! EnableCloseMyDoor 067 @setvar! MyDoor 0x000000068 # Use '>info' to ID your own house door (to quickly close it behind you)69 endif 70 71 @setvar! HideAtHomeorInn 072 # Will use hiding skill after recalling73 74 @setvar! EnableEquipWeapon 075 # Will check for an Aspected weapon and equip it after recalling76 77 @setvar! EnableEquipShield 078 # Will check for a shield and equip it after recalling (ignores unidentified)79 80 @setvar! EnableDispelSummonsAfterRecall 081 # Will dispel all of your active summons after recalling82 83 @setvar! MyBlessedSpellbook 0x0000000084 @setvar! MyBlessedSpellbook2 0x0000000085 @setvar! MyBlessedSpellbook3 0x0000000086 @setvar! MyBlessedSpellbook4 0x0000000087 @setvar! MyBlessedSpellbook5 0x0000000088 # Use '>info' to ID your [blessed] spellbooks and add them above89 # This will prevent the script from trying to equip them90 91 92 // LOADOUT RESET (after RECALL): 93 # Safe, Repair Bench, Resource Stockpile, Storage Shelf, Magic Recycler, Storage Tome Container and/or Loot Chest must be found within 2 tiles!94 # Storage Tomes can be locked down (within 2 tiles) or located inside Loot Chest or Storage Tome Container95 96 @setvar! EnableLootBag 097 # Will open selected bag after recalling (usually whatever you have set as your 'Grab Bag')98 @setvar! EnableSafeDeposit 099 # Will deposit all gold and doubloons found in inventory100 @setvar! EnableMagicRecycler 0101 # Will add all unidentified magic items to your Recycler 102 @setvar! EnableRecycleItemsWhenFull 0103 # If Recycler is full, it will attempt to ID, Recycle and deposit resources (if stockpile nearby) before adding items104 @setvar! EnableLootChest 0105 # Will open selected chest to store non-shelf/stockpile/tome items in your HOME/INN/BANK (uses Razor organizer agents 06-09)106 @setvar! EnableStorageTomes 0107 # Will add items to any nearby storage tomes (skill scrolls, dyes, runes, maps, cards, etc)108 @setvar! EnableStorageTomeContainer 0109 # Script checks on ground (2 tiles) or in LOOT CHEST (enable below) by default110 # Otherwise you can designate a TOME CONTAINER to check for your books111 @setvar! EnableResourceStockpile 0112 # Will deposit all resources (ingots, boards, gems, etc.)113 @setvar! EnableRepairBench 0114 # Will repair all equipment (Repair Bench must have charges available)115 @setvar! EnableStorageShelf 0116 # Will restock shelf and then resupply a fresh loadout117 @setvar! EnableReagentSplitter 0118 # Will split reagents into smaller stacks after shelf resupply 119 @setvar! EnableUsePotionKegs 0120 # Will automatically fill your potions from kegs after resetting loadout121 # Set your required potion amounts below 122 # Loadout requires empty kegs and empty bottles (pack extra bottles for explosion pots) 123 if EnableUsePotionKegs = 1124 @setvar! HealingPotionAmount 5125 @setvar! CurePotionAmount 5126 @setvar! RefreshPotionAmount 5127 @setvar! StrengthPotionAmount 1128 @setvar! AgilityPotionAmount 1129 @setvar! ResistPotionAmount 1130 @setvar! ExplosionPotionAmount 1131 @setvar! PoisonPotionAmount 0132 endif133 134 135 // LOADOUT RESET (after DEATH): 136 # This variable will reorganize your backpack after death (see instructions below)137 # Your pack will be setup with anti-theft measures and all aspects will be reactivated, etc. 138 139 @setvar! EnableResetInventoryAfterDeath 0140 # Will detect if you just died and triggers inventory reset (instructions below)141 @setvar! EnableSetMainPouchOrganizer01 0142 # Will set your main pouch as Razor Organizer Agent-01 during inventory reset143 144 // Requires an equal amount of TRAPPED POUCHES (in shelf loadout) and SCISSORS [blessed] (in backpack)145 // Loadout also requires 1 UNTRAPPED POUCH (for main inventory - optionally set as Organizer Agent-01 above) and 1 BAG (for loot, etc.)146 // Script will put scissors in each trapped pouch (to keep them from being grabbed during future shelf loading)147 // Script then STACKS any trapped pouches on top of your main inventory pouch148 // Loot bag will be moved into main inventory pouch and automatically set as your Grab Bag for Gridloot, etc.149 // Script will then hide the stack underneath an ATLAS and put a DECOY TRAPPED POUCH out in the open150 // ASPECT WEAPON and ARMOR will be re-activated automatically and HP restored to MAX151 // Loadout reset finishes by opening backpack, main pouch, loot bag and any satchels152 153 154/////////////////////////155// END OF VARIABLES! //156/////////////////////////157 158 159 160 161 162################ 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! ################163 164 165 166 167 168///////////////////////169// TIMER SETUPS: //170///////////////////////171 172if not timerexists "PackySmeltTimer"173 createtimer "PackySmeltTimer"174 settimer "PackySmeltTimer" 3500175endif 176 177if not timerexists "TomeOverheadTimer"178 createtimer "TomeOverheadTimer"179 settimer "TomeOverheadTimer" 3500180endif 181 182if not timerexists "PotionKegTimer"183 createtimer "PotionKegTimer"184 settimer "PotionKegTimer" 2000185endif186 187if not timerexists "PotionKegPVPCooldown"188 createtimer "PotionKegPVPCooldown"189 settimer "PotionKegPVPCooldown" 30000190endif191 192if not timerexists "OverheadManaMessageTimer"193 createtimer "OverheadManaMessageTimer"194 settimer "OverheadManaMessageTimer" 3500195endif196 197if not timerexists "InventoryCheck"198 createtimer "InventoryCheck"199 settimer "InventoryCheck" 3500200endif201 202if not timerexists "RepairTimer"203 createtimer "RepairTimer"204 settimer "RepairTimer" 5000205endif206 207if not varexist myMainPackAnimal208 @setvar! myMainPackAnimal 0209endif 210 211if not varexist mySecondPackAnimal212 @setvar! mySecondPackAnimal 0213endif 214 215if not varexist NeedtoSecureIngots216 @setvar! NeedtoSecureIngots 0217endif218 219if not varexist maininventorybag220 @setvar! maininventorybag 0221endif222 223 224//////////////////////225// INITIAL SETUP: //226//////////////////////227 228if not varexist escape_runebook_glaciers_chill_autorecall or not find escape_runebook_glaciers_chill_autorecall self229 overhead "Please select your runebook..." 253230 setvar escape_runebook_glaciers_chill_autorecall231 wait 500232 while targetexists233 sysmsg 'Script: Waiting for runebook selection...' 0234 wait 2500235 endwhile 236 wait 2000237 sysmsg 'Script: Runebook set successfully! One moment...' 0238 wait 2000239endif240 241if EnableLootChest = 1242 if not varexist LootChest243 wait 500244 overhead "Select a secure container to store your Loot..." 253245 wait 1000246 overhead "Anything that will not go into a Resource Stockpile, Storage Shelf or Magic Recycler" 0247 overhead "(ie. Skill Orbs, Treasure Maps, Paragon chests, etc.)"248 setvar LootChest249 wait 500250 while targetexists251 sysmsg 'Script: Waiting for Loot Chest selection...' 0252 wait 2500253 endwhile 254 sysmsg "Use Razor Organizer Agents 06 - 09 for the Loot Chest and its contents - organize to your own liking!" 0255 wait 1500256 endif257endif258 259if EnableStorageTomeContainer = 1 and EnableStorageTomes = 1260 if not varexist TomeContainer261 wait 500262 overhead "Please select a secure container to store your Tomes..." 253263 wait 1000264 overhead "This will cause script to look in this container for any Storage Tomes when unloading loot..." 0265 setvar TomeContainer266 wait 500267 while targetexists268 sysmsg 'Script: Waiting for Tome Container selection...' 0269 wait 2500270 endwhile 271 sysmsg "Turn this variable off if your tomes are stored on the ground in your home/inn room" 0272 wait 1500273 endif274endif275 276 277////////////////////////278// SCRIPT START: //279////////////////////////280 281while not dead 282 if skill 'Swordsmanship' >= 50283 if findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' hand as weapon284 @setvar! UsingSwords 1285 elseif findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' backpack as potentialweapon286 @setvar! UsingSwords 2287 elseif not findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' self 288 @setvar! UsingSwords 0 289 endif 290 else 291 @setvar! UsingSwords 0292 endif293 294 if skill 'Mace Fighting' >= 50295 if findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31182' hand as weapon296 @setvar! UsingMacing 1297 elseif findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31182' backpack as potentialweapon298 @setvar! UsingMacing 2299 elseif not findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31182' self 300 @setvar! UsingMacing 0 301 endif 302 else 303 @setvar! UsingMacing 0304 endif 305 306 if skill 'Fencing' >= 50307 if findtype '3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188' hand as weapon308 @setvar! UsingFencing 1309 elseif findtype '3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188' backpack as potentialweapon310 @setvar! UsingFencing 2311 elseif not findtype '3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188' self 312 @setvar! UsingFencing 0 313 endif 314 else 315 @setvar! UsingFencing 0316 endif 317 318 if skill 'Archery' >= 50319 if findtype '3920|5042|5117|30990|30993|30994|30995|31184|31186' hand as weapon320 @setvar! UsingArchery 1321 elseif findtype '3920|5042|5117|30990|30993|30994|30995|31184|31186' backpack as potentialweapon322 @setvar! UsingArchery 2323 elseif not findtype '3920|5042|5117|30990|30993|30994|30995|31184|31186' self 324 @setvar! UsingArchery 0 325 endif 326 else 327 @setvar! UsingArchery 0328 endif 329 330 if skill 'Wrestling' >= 50331 if findtype '22187|31141|31142' hand as weapon332 @setvar! UsingWrestling 1333 elseif findtype '22187|31141|31142' backpack as potentialweapon334 @setvar! UsingWrestling 2335 elseif not findtype '22187|31141|31142' self 336 @setvar! UsingWrestling 0 337 endif 338 else 339 @setvar! UsingWrestling 0 340 endif 341 342 if skill 'Throwing' >= 50343 if findtype '67713|67723|67734|67744|67754|67764' hand as weapon344 @setvar! UsingThrowing 1345 elseif findtype '67713|67723|67734|67744|67754|67764' backpack as potentialweapon346 @setvar! UsingThrowing 2347 elseif not findtype '67713|67723|67734|67744|67754|67764' self 348 @setvar! UsingThrowing 0 349 endif 350 else 351 @setvar! UsingThrowing 0352 endif 353 354 if skill 'Dual Wielding' >= 50355 if findtype '67773|67774|67775|67776|67777|67778' hand as weapon356 @setvar! UsingDualWield 1357 elseif findtype '67773|67774|67775|67776|67777|67778' backpack as potentialweapon358 @setvar! UsingDualWield 2359 elseif not findtype '67773|67774|67775|67776|67777|67778' self 360 @setvar! UsingDualWield 0 361 endif 362 else 363 @setvar! UsingDualWield 0364 endif 365 366 if targetexists367 hotkey 'Cancel Current Target'368 endif369 370 if paralyzed 371 say "[pouch"372 wait 500373 endif374 375 if skill 'Healing' > 0 and not bandaging and hits < maxhits376 if counttype 'clean bandage%s%' self > 0 377 hotkey "Bandage self"378 if EnableOverheadMessages = 1379 overhead '[ BANDAGING... ]' 88380 endif 381 wait 500382 endif 383 endif 384 385 if diffhits > 30 and not cooldown "Healing Potion"386 if findtype "Yellow Potion" self as healpot387 if EnableOverheadMessages = 1388 overhead '[ HEAL POTION... ]' 253389 endif390 dclick healpot391 cooldown "Healing Potion" 10000392 wait 500393 endif394 endif 395 396 while poisoned397 if findtype "Orange Potion" self as curepot398 if EnableOverheadMessages = 1399 overhead '[ CURE POTION... ]' 44400 endif401 dclick curepot402 wait 500403 else 404 break405 endif406 endwhile 407 408 while mana < 11409 wait 100410 if timer "OverheadManaMessageTimer" > 3500 and EnableOverheadMessages = 1411 overhead "[ WAITING FOR MANA... ]" 12412 settimer "OverheadManaMessageTimer" 0413 endif 414 endwhile 415 416 if EnableCastRecall = 1 417 if skill 'Magery' > 40 418 if counttype 3962 self = 0 or counttype 3963 self = 0 or counttype 3974 self = 0419 @setvar! EnableCastRecall 0420 if EnableOverheadMessages = 1421 overhead "[ MISSING REGS! ]" 337422 endif423 wait 500424 sysmsg 'Script: Missing reagents for recall... attempting scrolls instead!' 0425 endif426 else 427 @setvar! EnableCastRecall 0428 endif429 endif430 431 if EnableCastRecall = 1 and skill "Magery" >= 60 and counttype 3962 self > 0 and counttype 3963 self > 0 and counttype 3974 self > 0432 cast "Recall"433 wait 500434 435 while casting 436 wait 100437 endwhile 438 439 target escape_runebook_glaciers_chill_autorecall440 wait 1000441 442 for 5443 wait 500444 if insysmsg 'Your concentration is disturbed'445 if EnableOverheadMessages = 1446 overhead '[ INTERRUPTED! ]' 333447 endif448 clearsysmsg449 wait 2000450 cast "Recall"451 wait 500452 while casting 453 wait 100454 endwhile 455 target escape_runebook_glaciers_chill_autorecall 456 wait 1000457 458 if diffhits > 25 and not cooldown "Healing Potion"459 if findtype "Yellow Potion" self as healpot460 dclick healpot461 wait 250462 cooldown "Healing Potion" 10000463 if EnableOverheadMessages = 1464 overhead "[ HEAL POTION ]" 253465 endif466 endif467 endif468 469 while poisoned470 if findtype "Orange Potion" self as curepot471 dclick curepot472 wait 500473 if EnableOverheadMessages = 1474 overhead "[ CURE POTION ]" 44475 endif476 else 477 break 478 endif479 endwhile480 else 481 break 482 endif483 endfor484 else485 dclick escape_runebook_glaciers_chill_autorecall486 waitforgump 1551740969487 gumpresponse 2488 wait 1000489 490 for 5491 wait 500492 if insysmsg 'Your concentration is disturbed'493 if EnableOverheadMessages = 1494 overhead '[ INTERRUPTED! ]' 333495 endif496 clearsysmsg497 wait 1500498 dclick escape_runebook_glaciers_chill_autorecall499 waitforgump 1551740969500 gumpresponse 2501 wait 500 502 503 if diffhits > 25 and not cooldown "Healing Potion"504 if findtype "Yellow Potion" self as healpot505 dclick healpot506 wait 250507 cooldown "Healing Potion" 10000508 if EnableOverheadMessages = 1509 overhead "[ HEAL POTION ]" 253510 endif511 endif512 endif513 514 while poisoned515 if findtype "Orange Potion" self as curepot516 dclick curepot517 wait 500518 if EnableOverheadMessages = 1519 overhead "[ CURE POTION ]" 44520 endif521 else 522 break 523 endif524 endwhile525 else 526 break 527 endif528 endfor529 endif 530 531 wait 500532 533 if EnableEquipWeapon = 1534 if find weapon backpack535 dclick weapon536 wait 500 537 endif 538 539 if skill 'Swordsmanship' >= 50 and UsingSwords != 0540 if not findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' self541 overhead "[ NO WEAPON! ]" 337542 else543 if not findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' hand544 if findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' backpack as weapon545 for 10546 getlabel weapon WeaponLabel547 wait 250548 if "unidentified" in WeaponLabel549 @ignore weapon550 wait 250551 if findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' backpack as weapon552 getlabel weapon WeaponLabel553 wait 250 554 endif555 elseif "aspect" in WeaponLabel or "Aspect" in WeaponLabel556 break557 else 558 @ignore weapon559 wait 250560 if findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' backpack as weapon561 getlabel weapon WeaponLabel562 wait 250 563 endif564 endif565 endfor566 wait 150567 clearsysmsg 568 dclick weapon569 wait 500570 endif571 endif572 endif573 elseif skill 'Mace Fighting' >= 50 and UsingMacing != 0574 if not findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31182' self575 overhead "[ NO WEAPON! ]" 337576 else577 if not findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31182' hand578 if findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31182' backpack as weapon579 for 10580 getlabel weapon WeaponLabel581 wait 250582 if "unidentified" in WeaponLabel583 @ignore weapon584 wait 150585 if findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31182' backpack as weapon586 getlabel weapon WeaponLabel587 wait 250 588 endif589 elseif "aspect" in WeaponLabel or "Aspect" in WeaponLabel590 break591 else592 @ignore weapon593 wait 250594 if findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31182' backpack as weapon595 getlabel weapon WeaponLabel596 wait 250 597 endif598 endif599 endfor600 wait 150601 clearsysmsg 602 dclick weapon603 wait 500604 endif605 endif606 endif607 elseif skill 'Fencing' >= 50 and UsingFencing != 0608 if not findtype '3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188' self609 overhead "[ NO WEAPON! ]" 337610 else611 if not findtype '3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188' hand612 if findtype '3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188' backpack as weapon613 for 10614 getlabel weapon WeaponLabel615 wait 250616 if "unidentified" in WeaponLabel617 @ignore weapon618 wait 150619 if findtype '3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188' backpack as weapon620 getlabel weapon WeaponLabel621 wait 250 622 endif623 elseif "aspect" in WeaponLabel or "Aspect" in WeaponLabel624 break625 else626 @ignore weapon627 wait 150628 if findtype '3719|3922|3938|5121|5123|5125|30989|30992|30996|30997|30998|31176|31188' backpack as weapon629 getlabel weapon WeaponLabel630 wait 250 631 endif632 endif633 endfor634 wait 150635 clearsysmsg 636 dclick weapon637 wait 500638 endif639 endif640 endif641 elseif skill 'Archery' >= 50 and UsingArchery != 0642 if not findtype '3920|5042|5117|30990|30993|30994|30995|31184|31186' self643 overhead "[ NO WEAPON! ]" 337644 else645 if not findtype '3920|5042|5117|30990|30993|30994|30995|31184|31186' hand646 if findtype '3920|5042|5117|30990|30993|30994|30995|31184|31186' backpack as weapon647 for 10648 getlabel weapon WeaponLabel649 wait 250650 if "unidentified" in WeaponLabel651 @ignore weapon652 wait 150653 if findtype '3920|5042|5117|30990|30993|30994|30995|31184|31186' backpack as weapon654 getlabel weapon WeaponLabel655 wait 250 656 endif657 elseif "aspect" in WeaponLabel or "Aspect" in WeaponLabel658 break659 else660 @ignore weapon661 wait 150662 if findtype '3920|5042|5117|30990|30993|30994|30995|31184|31186' backpack as weapon663 getlabel weapon WeaponLabel664 wait 250 665 endif666 endif667 endfor668 wait 150669 clearsysmsg 670 dclick weapon671 wait 500672 endif673 endif674 endif675 elseif skill 'Wrestling' >= 50 and UsingWrestling != 0676 if not findtype '22187|31141|31142' self677 overhead "[ NO WEAPON! ]" 337678 else679 if not findtype '22187|31141|31142' hand680 if findtype '22187|31141|31142' backpack as weapon681 for 10682 getlabel weapon WeaponLabel683 wait 250684 if "unidentified" in WeaponLabel685 @ignore weapon686 wait 150687 if findtype '22187|31141|31142' backpack as weapon688 getlabel weapon WeaponLabel689 wait 250 690 endif691 elseif "aspect" in WeaponLabel or "Aspect" in WeaponLabel692 break693 else694 @ignore weapon695 wait 150696 if findtype '22187|31141|31142' backpack as weapon697 getlabel weapon WeaponLabel698 wait 250 699 endif700 endif701 endfor702 wait 150703 clearsysmsg 704 dclick weapon705 wait 500706 endif707 endif708 endif709 elseif skill 'Throwing' >= 50 and UsingThrowing != 0710 if not findtype '67713|67723|67734|67744|67754|67764' self711 overhead "[ NO WEAPON! ]" 337712 else713 if not findtype '67713|67723|67734|67744|67754|67764' hand714 if findtype '67713|67723|67734|67744|67754|67764' backpack as weapon715 for 10716 getlabel weapon WeaponLabel717 wait 250718 if "unidentified" in WeaponLabel719 @ignore weapon720 wait 150721 if findtype '67713|67723|67734|67744|67754|67764' backpack as weapon722 getlabel weapon WeaponLabel723 wait 250 724 endif725 elseif "aspect" in WeaponLabel or "Aspect" in WeaponLabel726 break727 else728 @ignore weapon729 wait 150730 if findtype '67713|67723|67734|67744|67754|67764' backpack as weapon731 getlabel weapon WeaponLabel732 wait 250 733 endif734 endif735 endfor736 wait 150737 clearsysmsg 738 dclick weapon739 wait 500740 endif741 endif742 endif743 elseif skill 'Dual Wielding' >= 50 and UsingDualWield != 0744 if not findtype '67773|67774|67775|67776|67777|67778' self745 overhead "[ NO WEAPON! ]" 337746 else747 if not findtype '67773|67774|67775|67776|67777|67778' hand748 if findtype '67773|67774|67775|67776|67777|67778' backpack as weapon749 for 10750 getlabel weapon WeaponLabel751 wait 250752 if "unidentified" in WeaponLabel753 @ignore weapon754 wait 150755 if findtype '67773|67774|67775|67776|67777|67778' backpack as weapon756 getlabel weapon WeaponLabel757 wait 250 758 endif759 elseif "aspect" in WeaponLabel or "Aspect" in WeaponLabel760 break761 else762 @ignore weapon763 wait 150764 if findtype '67773|67774|67775|67776|67777|67778' backpack as weapon765 getlabel weapon WeaponLabel766 wait 250 767 endif768 endif769 endfor770 wait 150771 clearsysmsg 772 dclick weapon773 wait 500774 endif775 endif776 endif777 endif778 endif779 780 if EnableEquipShield = 1781 wait 250782 if not findtype 'Order shield|buckler |metal shield|Chaos shield|heater shield|bone shield|bronze shield|kite shield|wooden shield|parrying gauche' lefthand783 if findtype 'Order shield|buckler |metal shield|Chaos shield|heater shield|bone shield|bronze shield|kite shield|wooden shield|parrying gauche' backpack as shield784 getlabel shield ShieldLabel785 for 5786 wait 250787 if "unidentified" in ShieldLabel788 @ignore shield789 wait 250790 if findtype 'Order shield|buckler |metal shield|Chaos shield|heater shield|bone shield|bronze shield|kite shield|wooden shield|parrying gauche' backpack as shield791 getlabel shield ShieldLabel792 wait 250793 endif794 else795 break796 endif797 endfor798 wait 250799 dclick shield800 wait 500801 endif802 endif803 endif804 805 @ignore MyBlessedSpellbook806 @ignore MyBlessedSpellbook2807 @ignore MyBlessedSpellbook3808 @ignore MyBlessedSpellbook4809 @ignore MyBlessedSpellbook5810 811 if skill "Magery" >= 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook812 getlabel myspellbook SpellbookLabel813 wait 250814 for 5815 wait 250816 if "aspect" in SpellbookLabel817 break818 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel819 @ignore myspellbook 820 wait 250821 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook822 getlabel myspellbook SpellbookLabel823 wait 250 824 elseif EnableOverheadMessages = 1825 overhead "[ NO SPELLBOOK! ]" 337826 break827 else 828 break 829 endif830 endif 831 endfor832 dclick myspellbook833 wait 500834 endif 835 836 wait 500837 838 if OutsideHouseRecall = 1839 wait 2500840 if find MyDoor ground -1 -1 2 and EnableCloseMyDoor = 1841 dclick MyDoor842 overhead "*door slams!*" 0 MyDoor843 wait 1000844 endif845 wait 3000846 elseif OwnerInnRecall = 1847 wait 500848 say "Innkeeper, I need a room!" 2234849 waitforgump 2393832411850 gumpresponse 4851 wait 1500852 elseif CoOwnerInnRecall = 1853 wait 500854 say "Innkeeper, I need a room!" 2234855 waitforgump 2393832411856 gumpresponse 5857 wait 500858 gumpresponse 100859 wait 1500860 elseif InsideHouseRecall = 1861 wait 500862 elseif BankRecall = 1863 say "Open my bank!" 2234864 wait 1000865 else866 wait 500867 endif 868 869 if EnableDispelSummonsAfterRecall = 1 870 if skill "Magery" >= 70 and mana >= 40 and findtype '3962' self and findtype '3972' self and findtype '3974' self and findtype '3980' self and followers > 0871 wait 500872 cast "Mass Dispel"873 while not targetexists874 wait 100875 endwhile876 if EnableOverheadMessages = 1877 overhead "[ RELEASING SUMMONS... ]" 22878 endif879 target self880 wait 500881 endif882 endif883 884 if HideAtHomeorInn = 1885 useskill "Hiding"886 wait 500887 endif 888 889 clearignore890 hotkey 'Toggle Peace Only'891 892 if EnableOverheadMessages = 1893 if hp > 50 and find maininventorybag self 894 wait 500895 overhead "Home Sweet Home!" 2338896 @setvar! ResetLoadout 0897 wait 500898 elseif hp < 25 and not find maininventorybag self899 wait 500900 overhead "Well... that sucked." 2338901 @setvar! ResetLoadout 1902 wait 1000903 elseif hp < 50 and find maininventorybag self 904 wait 500905 overhead "Whew! That was a close one..." 2338906 @setvar! ResetLoadout 0907 wait 1000908 else 909 wait 500910 overhead "Ah, Home Sweet Home!" 2338911 @setvar! ResetLoadout 0912 wait 1000913 endif914 else 915 if hp > 50 and find maininventorybag self 916 @setvar! ResetLoadout 0917 wait 500918 elseif hp < 25 and not find maininventorybag self919 @setvar! ResetLoadout 1920 wait 500921 elseif hp < 50 and find maininventorybag self 922 @setvar! ResetLoadout 0923 wait 500924 else 925 @setvar! ResetLoadout 0926 wait 500927 endif928 endif 929 930 if skill 'Mining' > 50 931 if find IngotBag self 932 dclick IngotBag933 wait 500934 endif935 while queued 936 wait 100937 endwhile938 endif939 940 if skill 'Lumberjacking' > 50 941 if find BoardBag self 942 dclick BoardBag943 wait 500944 endif945 while queued946 wait 100947 endwhile948 endif949 950 if skill 'Mining' > 50 951 while findtype "iron ore" backpack as ore952 if findtype "forge" ground -1 -1 2 as forge or findtype 0x0FB1 ground -1 -1 2 as forge953 if EnableOverheadMessages = 1954 overhead "[ SMELTING ORE... ]" 2114 forge955 endif956 dclick ore957 wait 1000958 else 959 if EnableOverheadMessages = 1960 overhead "[ NO FORGE NEARBY ]" 337961 wait 1000962 endif963 break964 endif 965 endwhile 966 967 wait 500968 969 if find myMainPackAnimal ground -1 -1 2970 getlabel myMainPackAnimal PackyLabel971 if "[0/2000" in PackyLabel972 // Do nothing973 elseif "[0/4000" in PackyLabel974 // Do nothing975 else976 dclick myMainPackAnimal 977 wait 500978 while findtype "iron ore" myMainPackAnimal as packyoretosmelt979 dclick packyoretosmelt980 if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages = 1981 overhead "[ SMELTING FROM PACKY... ]" 2114 myMainPackAnimal 982 settimer "PackySmeltTimer" 0983 endif 984 wait 650985 endwhile986 @setvar! NeedtoSecureIngots 1987 endif988 endif 989 990 wait 500991 992 if find mySecondPackAnimal ground -1 -1 2993 getlabel mySecondPackAnimal TwoPackyLabel994 if "[0/2000" in TwoPackyLabel995 // Do nothing996 elseif "[0/4000" in TwoPackyLabel997 // Do nothing998 else999 dclick mySecondPackAnimal 1000 wait 5001001 while findtype "iron ore" mySecondPackAnimal as twopackyoretosmelt1002 dclick twopackyoretosmelt1003 if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages = 11004 overhead "[ SMELTING FROM PACKY... ]" 2114 mySecondPackAnimal 1005 settimer "PackySmeltTimer" 01006 endif 1007 wait 6501008 endwhile1009 @setvar! NeedtoSecureIngots 11010 endif1011 endif 1012 endif 1013 1014 if skill 'Lumberjacking' > 50 1015 while findtype 'log%s' backpack as mylogs1016 if counttype "hatchet" self = 0 1017 if EnableOverheadMessages = 1 1018 overhead "[ NO HATCHET! ]" 3371019 wait 10001020 endif1021 break1022 else 1023 wait 5001024 if EnableOverheadMessages = 11025 overhead '[ MAKING BOARDS... ]' 01026 endif1027 dclick mylogs 1028 wait 10001029 endif 1030 endwhile1031 endif 1032 1033 if EnableLootChest = 11034 dclick LootChest1035 wait 5001036 endif1037 1038 while queued 1039 wait 1001040 endwhile1041 1042 if EnableStorageTomeContainer = 1 and EnableStorageTomes = 11043 dclick TomeContainer1044 wait 5001045 endif1046 1047 while queued 1048 wait 1001049 endwhile1050 1051 if EnableResetInventoryAfterDeath = 1 and ResetLoadout = 11052 if EnableOverheadMessages = 11053 overhead "[ RESETTING LOADOUT... ]" 771054 wait 15001055 endif1056 endif1057 1058 if ResetLoadout != 11059 if EnableLootBag = 11060 if not varexist LootBag1061 wait 5001062 overhead "Please select your loot bag..." 2531063 wait 10001064 overhead "This should be whatever is set as your 'Grab Bag' and will be opened when unloading loot after recalling..." 01065 @setvar! LootBag1066 wait 5001067 while targetexists1068 sysmsg 'Script: Waiting for Loot Bag selection...' 01069 wait 25001070 endwhile 1071 wait 15001072 endif1073 endif1074 1075 if EnableLootBag = 11076 if find LootBag self1077 dclick LootBag1078 wait 5001079 else 1080 if EnableOverheadMessages = 11081 overhead "[ NO LOOT BAG! ]" 3371082 endif1083 endif1084 endif1085 1086 while queued 1087 wait 1001088 endwhile1089 1090 if findtype "wooden box" self as lockbox1091 if findtype "copper key" self as key1092 clearignore1093 getlabel lockbox lockboxlabel1094 wait 2501095 if "items" in lockboxlabel1096 dclick lockbox1097 wait 5001098 else1099 dclick key1100 wft 15001101 target lockbox1102 if EnableOverheadMessages = 11103 overhead "[loot box unlocked]" 841104 endif1105 wait 5001106 dclick lockbox1107 wait 2501108 if insysmsg "It appears to be locked."1109 dclick key1110 wft 15001111 target lockbox1112 wait 5001113 dclick lockbox1114 wait 5001115 endif1116 endif1117 elseif EnableOverheadMessages = 11118 overhead "[ NO LOCKBOX KEY! ]" 3371119 endif1120 endif1121 1122 while queued 1123 wait 1001124 endwhile1125 1126 if EnableSafeDeposit = 11127 if findtype "bank deposit safe" ground -1 -1 2 as safe1128 clearignore1129 while findtype "gold coin" self as gold1130 if findtype "wooden box" self as lockbox1131 if findtype "copper key" self as key1132 getlabel lockbox lockboxlabel1133 if "items" in lockboxlabel1134 wait 5001135 else1136 dclick key1137 wft 15001138 target lockbox1139 wait 2501140 if insysmsg "It appears to be locked."1141 dclick key1142 wft 15001143 target lockbox1144 wait 2501145 endif1146 endif1147 elseif EnableOverheadMessages = 11148 overhead "[ NO LOCKBOX KEY! ]" 3371149 endif1150 endif1151 1152 if EnableOverheadMessages = 11153 overhead "[ DEPOSITING GOLD... ]" 1491154 else1155 overhead " � " 1491156 endif1157 menu safe 01158 wait 5001159 if not findtype "gold coin" self1160 break1161 endif1162 endwhile1163 1164 while findtype 2539 self as dubs1165 if EnableOverheadMessages = 11166 overhead "[ DEPOSITING DUBS... ]" 1491167 else1168 overhead " � " 1491169 endif1170 menu safe 01171 wait 5001172 if not findtype 2539 self1173 break1174 endif1175 endwhile1176 elseif EnableOverheadMessages = 11177 overhead "[ NO BANK SAFE FOUND ]" 3371178 wait 15001179 endif1180 endif1181 1182 if EnableMagicRecycler = 11183 if findtype "ornate elven chest|magic item recycler" ground -1 -1 2 as recycler1184 for 21185 getlabel recycler recyclerdesc1186 1187 if EnableRecycleItemsWhenFull = 11188 if "(125 items" in recyclerdesc1189 dclick recycler1190 waitforgump 40451111011191 gumpresponse 71192 waitforgump 40451111011193 gumpresponse 61194 waitforgump 40451111011195 gumpresponse 61196 1197 if EnableOverheadMessages = 11198 overhead "[ RECYCLING JUNK... ]" 661199 else1200 overhead " � " 661201 endif1202 1203 wait 5001204 gumpclose 40451111011205 1206 if EnableResourceStockpile = 11207 if findtype "resource container" ground -1 -1 2 as resource1208 menu resource 01209 wft 15001210 target recycler1211 wait 5001212 if EnableOverheadMessages = 11213 overhead "[ PILING RESOURCES... ]" 841214 else1215 overhead " � " 841216 endif1217 wait 5001218 elseif EnableOverheadMessages = 11219 overhead "[ NO RESOURCE STOCKPILE FOUND ]" 3371220 endif1221 endif1222 1223 menu recycler 11224 getlabel backpack backpacklabel1225 1226 if insysmsg "0 recyclable"1227 break1228 else1229 if EnableOverheadMessages = 11230 overhead "[ ADDING TO RECYCLER... ]" 61231 else1232 overhead " � " 61233 endif1234 wait 15001235 endif1236 endif1237 endif1238 menu recycler 11239 wait 5001240 if insysmsg "0 recyclable"1241 if EnableOverheadMessages = 1 and timer "TomeOverheadTimer" > 50001242 overhead "[ NO MAGIC LOOT! ]" 61243 elseif timer "TomeOverheadTimer" > 50001244 overhead " � " 61245 endif1246 wait 5001247 break1248 else1249 if EnableOverheadMessages = 11250 overhead "[ ADDING TO RECYCLER... ]" 61251 else1252 overhead " � " 61253 endif1254 settimer "TomeOverheadTimer" 01255 wait 15001256 endif1257 wait 5001258 endfor1259 elseif EnableOverheadMessages = 11260 overhead "[ NO MAGIC ITEM RECYCLER FOUND ]" 3371261 endif1262 endif1263 1264 if EnableLootChest = 11265 dclick LootChest1266 if EnableOverheadMessages = 11267 overhead "[ STASHING LOOT... ]" 691268 else1269 overhead " � " 691270 endif1271 wait 5001272 for 21273 hotkey "Organizer Agent-06"1274 wait 2501275 hotkey "Organizer Agent-07"1276 wait 2501277 hotkey "Organizer Agent-08"1278 wait 2501279 hotkey "Organizer Agent-09"1280 wait 2501281 endfor1282 while queued1283 wait 1001284 endwhile1285 endif1286 1287 if EnableStorageTomes = 11288 if EnableStorageTomeContainer = 11289 dclick TomeContainer1290 wait 2501291 else1292 @setvar! TomeContainer 01293 endif1294 if EnableLootChest = 11295 dclick LootChest1296 wait 2501297 else 1298 @setvar! LootChest 01299 endif1300 if findtype "70142|70143|70144|70145|70158|70159|70160|70161|70162|70163|70164|70165|70166|70167|70168" ground -1 -1 2 as StorageTome or findtype "70142|70143|70144|70145|70158|70159|70160|70161|70162|70163|70164|70165|70166|70167|70168" LootChest as StorageTome or findtype "70142|70143|70144|70145|70158|70159|70160|70161|70162|70163|70164|70165|70166|70167|70168" TomeContainer as StorageTome1301 while findtype "70142|70143|70144|70145|70158|70159|70160|70161|70162|70163|70164|70165|70166|70167|70168" ground -1 -1 2 as StorageTome1302 menu StorageTome 01303 if EnableOverheadMessages = 1 and timer "InventoryCheck" > 35001304 overhead '[ STORING TOME ITEMS... ]' 21171305 settimer "InventoryCheck" 01306 elseif EnableOverheadMessages = 0 and timer "InventoryCheck" > 35001307 overhead " � " 21171308 settimer "InventoryCheck" 01309 endif1310 wait 2501311 @ignore StorageTome1312 endwhile1313 while findtype "70142|70143|70144|70145|70158|70159|70160|70161|70162|70163|70164|70165|70166|70167|70168" LootChest as StorageTome or findtype "70142|70143|70144|70145|70158|70159|70160|70161|70162|70163|70164|70165|70166|70167|70168" TomeContainer as StorageTome1314 menu StorageTome 01315 if EnableOverheadMessages = 1 and timer "InventoryCheck" > 35001316 overhead '[ STORING TOME ITEMS... ]' 21171317 settimer "InventoryCheck" 01318 elseif EnableOverheadMessages = 0 and timer "InventoryCheck" > 35001319 overhead " � " 21171320 settimer "InventoryCheck" 01321 endif1322 wait 2501323 @ignore StorageTome1324 endwhile1325 @clearignore1326 elseif EnableOverheadMessages = 11327 overhead '[ NO STORAGE TOMES FOUND ]' 3371328 wait 15001329 endif1330 endif1331 1332 if EnableResourceStockpile = 11333 if findtype "resource container" ground -1 -1 2 as resource1334 menu resource 01335 wft 5001336 target self1337 if EnableOverheadMessages = 11338 overhead '[ PILING RESOURCES... ]' 841339 else1340 overhead " � " 841341 endif1342 wait 15001343 elseif EnableOverheadMessages = 11344 overhead '[ NO RESOURCE STOCKPILE FOUND ]' 3371345 wait 15001346 endif1347 endif1348 1349 if EnableRepairBench = 11350 if findtype "repair bench" ground -1 -1 3 as RepairBench1351 clearsysmsg1352 dclick RepairBench1353 wait 5001354 if insysmsg "You do not have any items equipped or in your backpack in need of repairs."1355 if EnableOverheadMessages = 11356 overhead "[ NOTHING TO REPAIR! ]" 01357 endif1358 wait 15001359 else1360 if EnableOverheadMessages = 11361 overhead "[ REPAIRING EQUIPMENT... ]" 3391362 else1363 overhead " � " 3391364 endif1365 settimer RepairTimer 01366 while timer RepairTimer <= 50001367 if insysmsg "Repair"1368 break1369 endif1370 endwhile1371 if EnableOverheadMessages = 11372 overhead "[ ITEMS REPAIRED! ]" 01373 wait 5001374 overhead "Repair took: {{RepairTimer}}ms" 771375 else1376 overhead " � " 01377 endif1378 wait 5001379 endif1380 elseif EnableOverheadMessages = 11381 overhead "[ NO REPAIR BENCH FOUND ]" 3371382 wait 15001383 endif1384 endif1385 endif1386 1387 wait 5001388 1389 if EnableStorageShelf = 11390 if findtype "storage shelf" ground -1 -1 2 as shelf1391 if ResetLoadout != 11392 menu shelf 01393 wft 5001394 target self1395 if EnableOverheadMessages = 11396 overhead "[ STORING GOODS... ]" 21141397 else1398 overhead " � " 21141399 endif1400 wait 5001401 gumpclose 32328259651402 wait 10001403 endif1404 menu shelf 11405 if EnableOverheadMessages = 11406 overhead "[ RESUPPLYING... ]" 931407 wait 5001408 else1409 overhead " � " 931410 endif1411 wait 10001412 elseif EnableOverheadMessages = 11413 overhead "[ NO STORAGE SHELF FOUND ]" 3371414 wait 15001415 endif1416 endif1417 1418 if EnableResetInventoryAfterDeath = 1 and ResetLoadout = 11419 clearignore1420 1421 if not varexist maininventorybag or not find maininventorybag self1422 overhead "[ SELECT MAIN POUCH... ]" 2531423 @setvar! maininventorybag1424 wft 5001425 while targetexists1426 wait 1001427 endwhile1428 overhead "[ MAIN POUCH SET! ]" 931429 wait 5001430 endif1431 1432 lift maininventorybag1433 wait 5001434 drop backpack 69 69 01435 wait 5001436 1437 if EnableSetMainPouchOrganizer01 = 11438 hotkey 'Set Organizer Hotbag-01'1439 wft 10001440 target maininventorybag1441 if EnableOverheadMessages = 11442 overhead "[ POUCH SET TO AGENT-01! ]" 841443 endif1444 wait 5001445 endif1446 1447 dclick maininventorybag1448 wait 10001449 sysmsg "Auto-selecting your loot/grab bag..." 01450 hotkey 'Set Grab Item Hotbag'1451 wft 15001452 1453 while targetexists1454 if findtype 'bag' self as grabbag1455 target grabbag1456 wait 5001457 else1458 wait 10001459 sysmsg "Auto-select failed! Please manually target your loot/grab bag!" 01460 wait 10001461 overhead "[ SELECT GRAB BAG... ]" 2531462 wait 35001463 endif1464 wait 5001465 endwhile1466 overhead "[ GRAB BAG SET! ]" 931467 wait 5001468 1469 if EnableLootBag = 11470 if not find LootBag self1471 wait 5001472 overhead "Select your new loot bag..." 2531473 wait 5001474 @setvar! LootBag1475 wait 5001476 while targetexists1477 wait 1001478 endwhile1479 endif1480 endif1481 1482 if find grabbag self1483 lift grabbag1484 wait 5001485 drop maininventorybag -1 -1 -11486 wait 5001487 endif1488 1489 while findtype 'scissors' self1490 if skill 'healing' > 0 and hp < maxhp and not bandaging1491 if findtype 'clean bandage%s%' self1492 hotkey 'Bandage Self'1493 if EnableOverheadMessages = 11494 overhead "[ BANDAGING... ]" 881495 endif1496 else1497 if EnableOverheadMessages = 11498 overhead "[ NO BANDAGES! ]" 3371499 endif1500 endif1501 endif1502 1503 if findtype 'scissors' backpack as myscissors1504 if findtype 'pouch' self as trappedpouch1505 lift myscissors1506 wait 2501507 drop trappedpouch1508 wait 7501509 lift trappedpouch1510 wait 2501511 drop backpack 69 69 01512 @ignore trappedpouch1513 @ignore myscissors1514 endif1515 endif1516 1517 wait 5001518 while queued1519 wait 1001520 endwhile1521 endwhile1522 1523 clearignore1524 1525 while findtype 'pouch' backpack as decoypouch1526 getlabel decoypouch decoypouchlabel1527 wait 2501528 if '(1 items' in decoypouchlabel1529 lift decoypouch1530 drop backpack 97 97 01531 break1532 else1533 @ignore decoypouch1534 endif1535 endwhile1536 1537 if findtype 'atlas' backpack as hidemypouchstack1538 lift hidemypouchstack1539 drop backpack 72 66 01540 wait 5001541 else1542 say "[atlas"1543 wait 5001544 if findtype 'atlas' backpack as hidemypouchstack1545 lift hidemypouchstack1546 drop backpack 72 66 01547 wait 5001548 endif1549 endif1550 1551 if EnableOverheadMessages = 11552 overhead "[ ACTIVATING ASPECT... ]" 22341553 wait 5001554 endif1555 1556 say "[aspect"1557 waitforgump 24242931731558 gumpresponse 131559 wait 5001560 gumpresponse 131561 wait 2501562 gumpresponse 171563 wait 5001564 gumpresponse 171565 wait 2501566 gumpclose 24242931731567 wait 5001568 1569 if skill 'magery' >= 60 and hp < maxhp and mana >= 11 and not casting1570 for 31571 if hp < maxhp1572 cast 'greater heal'1573 while not casting1574 if targetexists1575 hotkey 'cancel current target'1576 endif1577 cast 'greater heal'1578 endwhile1579 while not targetexists1580 wait 1001581 endwhile1582 target 'self'1583 wait 5001584 else 1585 break 1586 endif1587 endfor1588 endif1589 1590 if skill 'healing' > 0 and hp < maxhp and not bandaging1591 if findtype 'clean bandage%s%' self1592 hotkey 'Bandage Self'1593 if EnableOverheadMessages = 11594 overhead "[ BANDAGING... ]" 881595 endif1596 else1597 if EnableOverheadMessages = 11598 overhead "[ NO BANDAGES! ]" 3371599 endif1600 endif1601 endif1602 1603 if findtype "storage shelf" ground -1 -1 2 as shelf1604 menu shelf 11605 wait 5001606 endif1607 1608 if find maininventorybag self1609 dclick maininventorybag1610 wait 5001611 endif1612 1613 if findtype 'alchemists satchel' self as BagofPot1614 dclick BagofPot1615 wait 5001616 endif1617 1618 if findtype 'reagent satchel' self as WizardBag1619 dclick WizardBag1620 wait 5001621 endif1622 1623 if find grabbag self1624 dclick grabbag1625 wait 5001626 endif1627 1628 clearignore1629 @setvar! ResetLoadout 01630 overhead "[ RESET COMPLETE! ]" 691631 wait 5001632 endif1633 1634 if EnableUsePotionKegs = 1 and findtype 'empty bottle%s%' self and findtype 'keg' self and timer 'PotionKegPVPCooldown' > 30000 1635 if not timerexists PotionKegTimer1636 createtimer PotionKegTimer1637 settimer PotionKegTimer 50001638 endif1639 1640 @setvar! PotionStockCheck 01641 1642 while PotionStockCheck < 8 and findtype 'empty bottle%s%' self1643 @setvar! PotionAmounttoFill 01644 if PotionStockCheck = 01645 if ExplosionPotionAmount != 01646 @setvar! PotionType 38531647 @setvar! KegColour 4191648 @setvar! PotionAmounttoFill ExplosionPotionAmount1649 endif1650 @setvar! PotionStockCheck 11651 elseif PotionStockCheck = 11652 if HealingPotionAmount != 01653 @setvar! PotionType 38521654 @setvar! KegColour 2531655 @setvar! PotionAmounttoFill HealingPotionAmount1656 endif1657 @setvar! PotionStockCheck 21658 elseif PotionStockCheck = 21659 if CurePotionAmount != 01660 @setvar! PotionType 38471661 @setvar! KegColour 441662 @setvar! PotionAmounttoFill CurePotionAmount1663 endif1664 @setvar! PotionStockCheck 31665 elseif PotionStockCheck = 31666 if RefreshPotionAmount != 01667 @setvar! PotionType 38511668 @setvar! KegColour 371669 @setvar! PotionAmounttoFill RefreshPotionAmount1670 endif1671 @setvar! PotionStockCheck 41672 elseif PotionStockCheck = 41673 if StrengthPotionAmount != 01674 @setvar! PotionType 38491675 @setvar! KegColour 9561676 @setvar! PotionAmounttoFill StrengthPotionAmount1677 endif1678 @setvar! PotionStockCheck 51679 elseif PotionStockCheck = 51680 if AgilityPotionAmount != 01681 @setvar! PotionType 38481682 @setvar! KegColour 931683 @setvar! PotionAmounttoFill AgilityPotionAmount1684 endif1685 @setvar! PotionStockCheck 61686 elseif PotionStockCheck = 61687 if ResistPotionAmount != 01688 @setvar! PotionType 38461689 @setvar! KegColour 11091690 @setvar! PotionAmounttoFill ResistPotionAmount1691 endif1692 @setvar! PotionStockCheck 71693 elseif PotionStockCheck = 71694 if PoisonPotionAmount != 01695 @setvar! PotionType 38501696 @setvar! KegColour 3631697 @setvar! PotionAmounttoFill PoisonPotionAmount1698 endif1699 @setvar! PotionStockCheck 81700 endif1701 1702 if PotionAmounttoFill != 01703 while counttype PotionType self < PotionAmounttoFill1704 if not findtype 'empty bottle%s%' self1705 if EnableOverheadMessages = 1 and timer 'PotionKegTimer' > 50001706 overhead "[ NO EMPTY BOTTLES... ]" 3371707 settimer 'PotionKegTimer' 01708 endif1709 break1710 endif1711 1712 if diffhits > 101713 break1714 endif1715 1716 if findtype 'keg' self KegColour as myKeg1717 dclick myKeg1718 wait 2501719 if EnableOverheadMessages = 11720 if timer 'PotionKegTimer' > 20001721 overhead '[ FILLING POTS... ]' KegColour1722 settimer 'PotionKegTimer' 01723 endif1724 endif1725 else1726 if EnableOverheadMessages = 1 and timer 'PotionKegTimer' > 50001727 overhead "[ NO KEG TO USE... ]" KegColour1728 settimer 'PotionKegTimer' 01729 endif1730 break1731 endif1732 if insysmsg "You have been in combat with another player"1733 settimer "PotionKegPVPCooldown" 01734 break1735 endif1736 endwhile1737 1738 if counttype PotionType self < PotionAmounttoFill and not findtype 'empty bottle%s%' self1739 if EnableOverheadMessages = 1 and timer 'PotionKegTimer' > 50001740 overhead "[ NO EMPTY BOTTLES... ]" 3371741 settimer 'PotionKegTimer' 01742 endif1743 break1744 endif1745 endif1746 endwhile1747 endif1748 1749 if EnableReagentSplitter = 11750 if skill 'Magery' > 01751 if findtype "reagent satchel" self as MyWizardBag 1752 while findtype "reagent satchel" self as MyWizardBag1753 getlabel MyWizardBag MyWizardBaglabel1754 wait 5001755 if "decorative" in MyWizardBaglabel1756 @ignore MyWizardBag1757 wait 5001758 else 1759 break1760 endif1761 endwhile1762 1763 dclick MyWizardBag1764 wait 5001765 1766 if EnableOverheadMessages = 11767 overhead "[ SPLITTING REGS... ]" 23381768 endif1769 1770 # Spiders Silk1771 @setvar! ReagentStack 01772 @setvar! ReagentSerial 39811773 @setvar! ReagentCount 01774 1775 while findtype ReagentSerial self as regs 1776 @setvar! ReagentCount index1777 @ignore regs1778 endwhile1779 1780 @clearignore1781 1782 if counttype ReagentSerial self <= 101783 @setvar! ReagentStack 21784 elseif counttype ReagentSerial self <= 201785 @setvar! ReagentStack 4 1786 elseif counttype ReagentSerial self <= 501787 @setvar! ReagentStack 10 1788 elseif counttype ReagentSerial self <= 1001789 @setvar! ReagentStack 20 1790 elseif counttype ReagentSerial self <= 1501791 @setvar! ReagentStack 301792 elseif counttype ReagentSerial self <= 2001793 @setvar! ReagentStack 401794 else 1795 @setvar! ReagentStack 501796 endif1797 1798 while findtype ReagentSerial self as regs1799 @setvar! moveRegs 0 1800 1801 if ReagentCount = 01802 @setvar! moveRegs 11803 elseif ReagentCount != 0 and not find regs MyWizardBag1804 @setvar! moveRegs 11805 endif1806 1807 if moveRegs = 11808 if index = 01809 lift regs ReagentStack1810 drop MyWizardBag 44 65 01811 wait 1501812 elseif index = 11813 lift regs ReagentStack1814 drop MyWizardBag 68 65 01815 wait 1501816 elseif index = 21817 lift regs ReagentStack1818 drop MyWizardBag 96 65 01819 wait 1501820 elseif index = 31821 lift regs ReagentStack1822 drop MyWizardBag 121 65 01823 wait 1501824 else1825 lift regs ReagentStack1826 drop MyWizardBag 142 65 01827 wait 1501828 endif1829 endif1830 1831 @ignore regs 1832 1833 if moveRegs = 11834 wait 5001835 endif1836 endwhile1837 1838 if EnableOverheadMessages = 11839 overhead "[ SPLITTING REGS... ]" 31840 endif1841 1842 # Black Pearl1843 @setvar! ReagentSerial 39621844 @setvar! ReagentCount 01845 1846 while findtype ReagentSerial self as regs 1847 @setvar! ReagentCount index1848 @ignore regs1849 endwhile1850 1851 @clearignore1852 1853 if counttype ReagentSerial self <= 101854 @setvar! ReagentStack 21855 elseif counttype ReagentSerial self <= 201856 @setvar! ReagentStack 4 1857 elseif counttype ReagentSerial self <= 501858 @setvar! ReagentStack 10 1859 elseif counttype ReagentSerial self <= 1001860 @setvar! ReagentStack 20 1861 elseif counttype ReagentSerial self <= 1501862 @setvar! ReagentStack 301863 elseif counttype ReagentSerial self <= 2001864 @setvar! ReagentStack 401865 else 1866 @setvar! ReagentStack 501867 endif1868 1869 while findtype ReagentSerial self as regs1870 @setvar! moveRegs 0 1871 1872 if ReagentCount = 01873 @setvar! moveRegs 11874 elseif ReagentCount != 0 and not find regs MyWizardBag1875 @setvar! moveRegs 11876 endif1877 1878 if moveRegs = 11879 if index = 01880 lift regs ReagentStack1881 drop MyWizardBag 44 76 01882 wait 1501883 elseif index = 11884 lift regs ReagentStack1885 drop MyWizardBag 68 76 01886 wait 1501887 elseif index = 21888 lift regs ReagentStack1889 drop MyWizardBag 96 76 01890 wait 1501891 elseif index = 31892 lift regs ReagentStack1893 drop MyWizardBag 121 76 01894 wait 1501895 else1896 lift regs ReagentStack1897 drop MyWizardBag 142 76 01898 wait 1501899 endif1900 endif1901 1902 @ignore regs 1903 1904 if moveRegs = 11905 wait 5001906 endif1907 endwhile1908 1909 if EnableOverheadMessages = 11910 overhead "[ SPLITTING REGS... ]" 3631911 endif1912 1913 # Nightshade1914 @setvar! ReagentSerial 39761915 @setvar! ReagentCount 01916 1917 while findtype ReagentSerial self as regs 1918 @setvar! ReagentCount index1919 @ignore regs1920 endwhile1921 1922 @clearignore1923 1924 if counttype ReagentSerial self <= 101925 @setvar! ReagentStack 21926 elseif counttype ReagentSerial self <= 201927 @setvar! ReagentStack 4 1928 elseif counttype ReagentSerial self <= 501929 @setvar! ReagentStack 10 1930 elseif counttype ReagentSerial self <= 1001931 @setvar! ReagentStack 20 1932 elseif counttype ReagentSerial self <= 1501933 @setvar! ReagentStack 301934 elseif counttype ReagentSerial self <= 2001935 @setvar! ReagentStack 401936 else 1937 @setvar! ReagentStack 501938 endif1939 1940 while findtype ReagentSerial self as regs1941 @setvar! moveRegs 0 1942 1943 if ReagentCount = 01944 @setvar! moveRegs 11945 elseif ReagentCount != 0 and not find regs MyWizardBag1946 @setvar! moveRegs 11947 endif1948 1949 if moveRegs = 11950 if index = 01951 lift regs ReagentStack1952 drop MyWizardBag 44 88 01953 wait 1501954 elseif index = 11955 lift regs ReagentStack1956 drop MyWizardBag 68 88 01957 wait 1501958 elseif index = 21959 lift regs ReagentStack1960 drop MyWizardBag 96 88 01961 wait 1501962 elseif index = 31963 lift regs ReagentStack1964 drop MyWizardBag 121 88 01965 wait 1501966 else1967 lift regs ReagentStack1968 drop MyWizardBag 142 88 01969 wait 1501970 endif1971 endif1972 1973 @ignore regs 1974 1975 if moveRegs = 11976 wait 5001977 endif1978 endwhile1979 1980 if EnableOverheadMessages = 11981 overhead "[ SPLITTING REGS... ]" 4421982 endif1983 1984 # Mandrake Root1985 @setvar! ReagentSerial 39741986 @setvar! ReagentCount 01987 1988 while findtype ReagentSerial self as regs 1989 @setvar! ReagentCount index1990 @ignore regs1991 endwhile1992 @clearignore1993 1994 if counttype ReagentSerial self <= 101995 @setvar! ReagentStack 21996 elseif counttype ReagentSerial self <= 201997 @setvar! ReagentStack 4 1998 elseif counttype ReagentSerial self <= 501999 @setvar! ReagentStack 10 2000 elseif counttype ReagentSerial self <= 1002001 @setvar! ReagentStack 20 2002 elseif counttype ReagentSerial self <= 1502003 @setvar! ReagentStack 302004 elseif counttype ReagentSerial self <= 2002005 @setvar! ReagentStack 402006 else 2007 @setvar! ReagentStack 502008 endif2009 2010 while findtype ReagentSerial self as regs2011 @setvar! moveRegs 0 2012 2013 if ReagentCount = 02014 @setvar! moveRegs 12015 elseif ReagentCount != 0 and not find regs MyWizardBag2016 @setvar! moveRegs 12017 endif2018 2019 if moveRegs = 12020 if index = 02021 lift regs ReagentStack2022 drop MyWizardBag 44 100 02023 wait 1502024 elseif index = 12025 lift regs ReagentStack2026 drop MyWizardBag 68 100 02027 wait 1502028 elseif index = 22029 lift regs ReagentStack2030 drop MyWizardBag 96 100 02031 wait 1502032 elseif index = 32033 lift regs ReagentStack2034 drop MyWizardBag 121 100 02035 wait 1502036 else2037 lift regs ReagentStack2038 drop MyWizardBag 142 100 02039 wait 1502040 endif2041 endif2042 2043 @ignore regs 2044 2045 if moveRegs = 12046 wait 5002047 endif2048 endwhile2049 2050 if EnableOverheadMessages = 12051 overhead "[ SPLITTING REGS... ]" 1532052 endif2053 2054 # Sulfurous Ash2055 @setvar! ReagentSerial 39802056 @setvar! ReagentCount 02057 2058 while findtype ReagentSerial self as regs 2059 @setvar! ReagentCount index2060 @ignore regs2061 endwhile2062 2063 @clearignore2064 2065 if counttype ReagentSerial self <= 102066 @setvar! ReagentStack 22067 elseif counttype ReagentSerial self <= 202068 @setvar! ReagentStack 4 2069 elseif counttype ReagentSerial self <= 502070 @setvar! ReagentStack 10 2071 elseif counttype ReagentSerial self <= 1002072 @setvar! ReagentStack 20 2073 elseif counttype ReagentSerial self <= 1502074 @setvar! ReagentStack 302075 elseif counttype ReagentSerial self <= 2002076 @setvar! ReagentStack 402077 else 2078 @setvar! ReagentStack 502079 endif2080 2081 while findtype ReagentSerial self as regs2082 @setvar! moveRegs 0 2083 2084 if ReagentCount = 02085 @setvar! moveRegs 12086 elseif ReagentCount != 0 and not find regs MyWizardBag2087 @setvar! moveRegs 1 2088 endif2089 2090 if moveRegs = 12091 if index = 02092 lift regs ReagentStack2093 drop MyWizardBag 44 112 02094 wait 1502095 elseif index = 12096 lift regs ReagentStack2097 drop MyWizardBag 68 112 02098 wait 1502099 elseif index = 22100 lift regs ReagentStack2101 drop MyWizardBag 96 112 02102 wait 1502103 elseif index = 32104 lift regs ReagentStack2105 drop MyWizardBag 121 112 02106 wait 1502107 else2108 lift regs ReagentStack2109 drop MyWizardBag 142 112 02110 wait 1502111 endif2112 endif2113 2114 @ignore regs 2115 2116 if moveRegs = 12117 wait 5002118 endif2119 endwhile2120 2121 if EnableOverheadMessages = 12122 overhead "[ SPLITTING REGS... ]" 2472123 endif2124 2125 # Giseng2126 @setvar! ReagentSerial 39732127 @setvar! ReagentCount 02128 2129 while findtype ReagentSerial self as regs 2130 @setvar! ReagentCount index2131 @ignore regs2132 endwhile2133 2134 @clearignore2135 2136 if counttype ReagentSerial self <= 102137 @setvar! ReagentStack 22138 elseif counttype ReagentSerial self <= 202139 @setvar! ReagentStack 4 2140 elseif counttype ReagentSerial self <= 502141 @setvar! ReagentStack 10 2142 elseif counttype ReagentSerial self <= 1002143 @setvar! ReagentStack 20 2144 elseif counttype ReagentSerial self <= 1502145 @setvar! ReagentStack 302146 elseif counttype ReagentSerial self <= 2002147 @setvar! ReagentStack 402148 else 2149 @setvar! ReagentStack 502150 endif2151 2152 while findtype ReagentSerial self as regs2153 @setvar! moveRegs 0 2154 2155 if ReagentCount = 02156 @setvar! moveRegs 12157 elseif ReagentCount != 0 and not find regs MyWizardBag2158 @setvar! moveRegs 12159 endif2160 2161 if moveRegs = 12162 if index = 02163 lift regs ReagentStack2164 drop MyWizardBag 44 124 02165 wait 1502166 elseif index = 12167 lift regs ReagentStack2168 drop MyWizardBag 68 124 02169 wait 1502170 elseif index = 22171 lift regs ReagentStack2172 drop MyWizardBag 96 124 02173 wait 1502174 elseif index = 32175 lift regs ReagentStack2176 drop MyWizardBag 121 124 02177 wait 1502178 else2179 lift regs ReagentStack2180 drop MyWizardBag 142 124 02181 wait 1502182 endif2183 endif2184 2185 @ignore regs 2186 2187 if moveRegs = 12188 wait 5002189 endif2190 endwhile2191 2192 if EnableOverheadMessages = 12193 overhead "[ SPLITTING REGS... ]" 332194 endif2195 2196 # Bloodmoss2197 @setvar! ReagentSerial 39632198 @setvar! ReagentCount 02199 2200 while findtype ReagentSerial self as regs 2201 @setvar! ReagentCount index2202 @ignore regs2203 endwhile2204 2205 @clearignore2206 2207 if counttype ReagentSerial self <= 102208 @setvar! ReagentStack 22209 elseif counttype ReagentSerial self <= 202210 @setvar! ReagentStack 4 2211 elseif counttype ReagentSerial self <= 502212 @setvar! ReagentStack 10 2213 elseif counttype ReagentSerial self <= 1002214 @setvar! ReagentStack 20 2215 elseif counttype ReagentSerial self <= 1502216 @setvar! ReagentStack 302217 elseif counttype ReagentSerial self <= 2002218 @setvar! ReagentStack 402219 else 2220 @setvar! ReagentStack 502221 endif2222 2223 while findtype ReagentSerial self as regs2224 @setvar! moveRegs 0 2225 2226 if ReagentCount = 02227 @setvar! moveRegs 12228 elseif ReagentCount != 0 and not find regs MyWizardBag2229 @setvar! moveRegs 12230 endif2231 2232 if moveRegs = 12233 if index = 02234 lift regs ReagentStack2235 drop MyWizardBag 44 136 02236 wait 1502237 elseif index = 12238 lift regs ReagentStack2239 drop MyWizardBag 68 136 02240 wait 1502241 elseif index = 22242 lift regs ReagentStack2243 drop MyWizardBag 96 136 02244 wait 1502245 elseif index = 32246 lift regs ReagentStack2247 drop MyWizardBag 121 136 02248 wait 1502249 else2250 lift regs ReagentStack2251 drop MyWizardBag 142 136 02252 wait 1502253 endif2254 endif2255 2256 @ignore regs 2257 2258 if moveRegs = 12259 wait 5002260 endif2261 endwhile2262 2263 if EnableOverheadMessages = 12264 overhead "[ SPLITTING REGS... ]" 6462265 endif2266 2267 # Garlic2268 @setvar! ReagentSerial 39722269 @setvar! ReagentCount 02270 2271 while findtype ReagentSerial self as regs 2272 @setvar! ReagentCount index2273 @ignore regs2274 endwhile2275 2276 @clearignore2277 2278 if counttype ReagentSerial self <= 102279 @setvar! ReagentStack 22280 elseif counttype ReagentSerial self <= 202281 @setvar! ReagentStack 4 2282 elseif counttype ReagentSerial self <= 502283 @setvar! ReagentStack 10 2284 elseif counttype ReagentSerial self <= 1002285 @setvar! ReagentStack 20 2286 elseif counttype ReagentSerial self <= 1502287 @setvar! ReagentStack 302288 elseif counttype ReagentSerial self <= 2002289 @setvar! ReagentStack 402290 else 2291 @setvar! ReagentStack 502292 endif2293 2294 while findtype ReagentSerial self as regs2295 @setvar! moveRegs 0 2296 2297 if ReagentCount = 02298 @setvar! moveRegs 12299 elseif ReagentCount != 0 and not find regs MyWizardBag2300 @setvar! moveRegs 12301 endif2302 2303 if moveRegs = 12304 if index = 02305 lift regs ReagentStack2306 drop MyWizardBag 44 148 02307 wait 1502308 elseif index = 12309 lift regs ReagentStack2310 drop MyWizardBag 68 148 02311 wait 1502312 elseif index = 22313 lift regs ReagentStack2314 drop MyWizardBag 96 148 02315 wait 1502316 elseif index = 32317 lift regs ReagentStack2318 drop MyWizardBag 121 148 02319 wait 1502320 else2321 lift regs ReagentStack2322 drop MyWizardBag 142 148 02323 wait 1502324 endif2325 endif2326 2327 @ignore regs 2328 2329 if moveRegs = 12330 wait 5002331 endif2332 endwhile2333 else 2334 if EnableOverheadMessages = 12335 overhead "[ NO WIZARD BAG! ]" 3372336 wait 5002337 endif2338 endif2339 endif2340 endif2341 2342 if EnableSetMainPouchOrganizer01 = 12343 hotkey "Organizer Agent-01"2344 endif 2345 wait 10002346 2347 if name = Glacier2348 if skill 'Dual Wielding' >= 50 and UsingDualWield = 12349 script 'My Scripts\Sheath Axes' 2350 elseif skill 'Swordsmanship' >= 50 and UsingSwords = 12351 script 'My Scripts\Sheath Sword'2352 endif 2353 else 2354 overhead "[ SCRIPT COMPLETE! ]" 882355 endif2356 stop2357 2358 if dead 2359 stop2360 endif2361endwhile2362 2363////////////////////////2364// SCRIPT FINISH //2365////////////////////////2366 2367 2368 2369 2370 2371 // Thank you for using my scripts! I can be contacted via email here: dan@danstockman.com 2372 // Good luck out there and say hello if you see me in Avadon (Lord Glacier) - please don't PK me lol2373 2374 2375 2376 2377 2378