Glacier's ULTIMATE HARVESTING AUTO PILOT UO OUTLANDS RAZOR SCRIPT - Last Updated Apr 6, 2025 MINING, LUMBER, FISHING & SCAVENGING MEGA-AUTOBOT (DEXXER, MAGE OR SUMMONER w/ AUTO RECALL & MUCH MORE!) Compiled by Lord Glacier (aka. DanStock.)…
GatheringCombatMagicMeditationHidingFishingMiningTracking
Big script test omg the biggest.razor
1# This is an automated backup - check out https://outlands.uorazorscripts.com/script/a385239e-a254-444a-a26d-e456c93d96b4 for latest2# Automation by Jaseowns3## Script: Big script test omg the biggest4## Created by: Jaseowns#66945#############################################6 7/////////8//////// Glacier's ULTIMATE HARVESTING AUTO PILOT UO OUTLANDS RAZOR SCRIPT - Last Updated Apr 6, 20259/////// 10////// MINING, LUMBER, FISHING & SCAVENGING MEGA-AUTOBOT (DEXXER, MAGE OR SUMMONER w/ AUTO RECALL & MUCH MORE!)11///// Compiled by Lord Glacier (aka. DanStock.)12//// Inspired by & learned from various scripts found on: https://outlands.uorazorscripts.com/13///14 15 16 17 18 19# Required (or suggested *) inventory items:20 21 # Pickaxe or Hatchet or Fishing Pole or Skinning Knife, Lockpicks & Trap Removal Tools 22 # A blessed escape runebook (charged w/ recall scrolls if no Magery skill)23 # Trapped pouches 24 # Healing, Cure and Refresh potions 25 # Magic Resist and Strength potions *26 # Potion Satchel *27 # Wizard's Satchel (w/ regs) *28 # Bandages * 29 # Adventurer's rope *30 # Magic Mushrooms *31 # Wooden Box w/ copper key *32 # Tool Kit (for tool recycle) *33 # Weapon of choice (supports Swords, Macing or Spellbook) *34 # Harvest Aspect armour of choice *35 36 37 38 39 //////////////////////////////40 // RESET SCRIPT HERE: //41 //////////////////////////////42 43 //// SET THIS VALUE TO '1' AND RUN SCRIPT TO UNSET ALL PERMANENT SCRIPT VARIABLES: \\\\44 45 @setvar! SCRIPTRESET 046 47 ################### THEN RETURN 'SCRIPTRESET' TO '0' TO RESTART THE INITIAL SETUP ###################48 #### (Or you can re-target script variables individually in the 'Options' tab above the script!) ####49 50 51 52 53 # ENABLE or DISABLE individual sections of the script here:54 @setvar! EnableMining 155 @setvar! EnableLumberjacking 156 @setvar! EnableFishing 157 @setvar! EnableDungeonPicker 158 // Only required if you have multiple harvest skills on a single character!59 60 61 62 63 ############################################64 ### COOLDOWNS TO ADD IN UO CLIENT: ###65 ############################################66#67# REQUIRED COOLDOWNS:68# Hiding (w/ overhead text triggers of 'You have hidden yourself well' and 'You fail to hide' - 10 second cooldown)69# * Only 'required' for DUNGEON PICKER script functions (but a handy cooldown to put on a bar for any build)70#71# OPTIONAL COOLDOWNS:72# Healing Potion73# Cure Potion74# Refresh Potion75# Travel76# Mushroom (magery only)77# * These cooldowns are NOT required for script functions (but will still work for bars - no triggers required)78#79 80 81 82 83 //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////84 // MOST FUNCTIONS ARE TURNED 'OFF' BY DEFAULT (set to '0' for OFF and '1' for ON) - MAKE SURE TO CHECK ALL VARIABLES CLOSELY! //85 //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////86 87 88 89 90 #################################################91 // COMMON VARIABLES: //92 #################################################93 94 95//////////////////////////96// OFFENSIVE: //97//////////////////////////98 99@setvar! EnableAutoAttackGreyMOB 0100 # Toggle 'War Mode' to attack nearby grey targets101 102@setvar! EnableSpellbookCheck 0103@setvar! EnableWeaponCheck 0104 # Will automatically equip weapon or book during combat105 106 107//////////////////////////108// DEFENSIVE: //109//////////////////////////110 111@setvar! EnableHealPotion 1112@setvar! EnableCurePotion 1113@setvar! EnableRefreshPotion 1114@setvar! EnableMagicResistPotion 0115@setvar! EnableStrengthPotion 0116@setvar! EnableAgilityPotion 0117 # Set to 1 for fulltime buff or 2 for combat-only118 119@setvar! HealPotHPdiff 30120@setvar! RefreshPotSPdiff 15121@setvar! HealingPotionCooldown 10000122@setvar! CurePotionCooldown 1000123@setvar! RefreshPotionCooldown 5000124 # Adjust your potion cooldowns and set points 125 126@setvar! EnableAutoParalyzePouch 1127 # Requires trapped pouches in inventory128 129 130//////////////////////////131// UTILITY: //132//////////////////////////133 134@setvar! EnableWeightWarningMessage 1135@setvar! GreenWarningDiffWeight 50136@setvar! YellowWarningDiffWeight 25137@setvar! RedWeightLimitDiffWeight 5138 139@setvar! EnableOverheadMessages 1140 # Disable or Enable unnecessary overhead messages/texts141 142@setvar! EnableLootBag 0143 # Allows selection of your loot bag (opens after recall)144 145@setvar! EnableToolCountdown 0146 # System message countdown when tool is about to break147 148@setvar! EnableGoldVacuum 0149 # Automatically grabs any gold on the ground150 151@setvar! EnableSatchels 0152 # Requires potion and/or wizard satchels in inventory153 154@setvar! EnableEatingFood 0155 # Only if delectable food found in inventory156 157@setvar! EnableAutoCarving 0 158 # Requires skinning knife in inventory159 160@setvar! EnableRecycleTool 0161 # Requires tinker 'Tool Kit' in inventory162 163 164//////////////////////////165// AUTO-RECALL: //166//////////////////////////167 168 ####################################################169 #### RECALL AND/OR DUNGEON GATE TRIGGERS: ####170 ####################################################171 172 // RED RECALL (w/ TRACKING SKILL): //173 if skill 'Tracking' >= 50174 @setvar! EnableTrackingAutoRecall 1175 # Make sure "Ignore Houses/Ships" is checked in the Tracking skill menu!176 @setvar! PKTrackingRange 60177 # Range can be 40, 50 or 60 tiles (or 0 will trigger Auto Recall regardless of range)178 @setvar! EnableRedAlertOverhead 1179 # If your build has tracking skill, I highly recommend setting up a Razor overhead message instead of using the script one:180 // This will display PK name/distance overhead when tracked!181 // Add overhead message w/ a trigger of "Now tracking" and message "[ RED ALERT: {3} ]" (hue 335)182 // Then a second with a trigger of "Distance to destination" and message "[ {4} TILES AWAY! ]" (hue 253)183 // Once complete you should disable "EnableRedAlertOverhead" above184 185 // RED RECALL (w/ NO TRACKING SKILL): //186 elseif skill 'Tracking' < 50187 @setvar! EnablePKradar 1188 @setvar! EnableAutoRedRecall 1189 endif190 191 // MINING RECALL (ingots): //192 if skill 'Mining' >= 50 EnableMining = 1193 @setvar! EnableIngotAutoRecall 0194 @setvar! IngotRecallAmount 2500195 endif 196 197 // LUMBER RECALL (boards): //198 if skill 'Lumberjacking' >= 50 and EnableLumberjacking = 1199 @setvar! EnableBoardAutoRecall 0200 @setvar! BoardRecallAmount 2500201 endif 202 203 // OTHER RECALL/DUNGEON GATE TRIGGERS: //204 @setvar! EnableWarModeDungeonGate 0205 @setvar! EnableAutoRedDungeonGate 0206 @setvar! EnableAutoWeightDungeonGate 0207 @setvar! EnableRecallAfterDungeonGate 0208 @setvar! EnableRecallAfterRessurection 0209 210 #####################################################211 #### YOU CAN USE YOUR OWN RAZOR RECALL SCRIPT: ####212 #####################################################213 214 # Enable use of your own Razor script for Auto Recall (otherwise script will prompt for a Runebook and use built-in auto recall):215 @setvar! EnableDIYRecallScript 0216 createlist DIYRecallScriptList217 218 # Type the name of your own Home Recall Razor script here:219 pushlist DIYRecallScriptList " YOUR RECALL SCRIPT NAME HERE "220 221 #####################################################222 #### OR USE THE BUILT-IN AUTO RECALL SCRIPT: ####223 #####################################################224 225 # Script will use charged recall scrolls if casting is disabled:226 @setvar! EnableCastRecall 0227 228 if EnableCastRecall = 1229 # If casting Recall, choose to target Runebook or Rune:230 @setvar! CasttoRunebook 1231 # or 232 @setvar! CasttoRune 0233 endif 234 235 // AUTO RECALL DESTINATION (choose only one):236 @setvar! InsideHouseRecall 0237 @setvar! OutsideHouseRecall 0238 @setvar! OwnerInnRecall 0239 @setvar! CoOwnerInnRecall 0240 @setvar! BankRecall 0 241 242 if OutsideHouseRecall = 1243 @setvar! EnableCloseMyDoor 0244 # Use ">info" to ID your own house door (to quickly close it behind you):245 @setvar! MyDoor 0x00000246 endif 247 248 @setvar! HideAtHomeorInn 0249 250 // HOME/INN/BANK STORAGE (after recall): //251 # Will look for and use nearby storage after recalling:252 @setvar! EnableSafeDeposit 0253 @setvar! EnableRepairBench 0254 @setvar! EnableResourceStockpile 0255 @setvar! EnableStorageShelf 0256 @setvar! EnableMagicRecycler 0257 @setvar! EnableStorageTomes 0258 # Optional Loot Chest to store non-shelf/stockpile/tome items in your HOME/INN/BANK (uses Razor organizer agents 06-09)259 @setvar! EnableLootChest 0260 261 262 #################################################263 // MINING VARIABLES: //264 #################################################265 266if skill "Mining" >= 50 and EnableMining = 1267 268@setvar! EnableOreVacuum 1269@setvar! EnablePlayerForgeRadar 1270@setvar! EnableAutoSmeltPlayerForge 1271@setvar! EnableAutoSmeltNaturalForge 1272 273@setvar! EnableOreStacker 0274@setvar! StackOreinIngotBag 0275 276@setvar! EnablePackAnimals 0277@setvar! PackAnimalCount 0278 # Can be set to 1 or 2 (or 0)279 # Make sure to add PACK ANIMALS amounts to TOTAL FOLLOWER COUNT below (Magery settings) if using SUMMONS280 # Ore can be transfered to packy based on Ore Amount:281@setvar! OreTransfertoPackyAmount 0282 # or Diff Weight:283@setvar! TransfertoPackyWeightDiff 50284 285# You can choose to set a storage bag for your Ingots:286 @setvar! EnableIngotBag 0287 # It can be a trapped pouch for security but, if so, disable opening Ingot Bag:288 @setvar! OpenIngotBag 0289# Otherwise, this will open your Ingot Bag when stacking ingots or unloading (at home/inn/bank/etc.)290 @setvar! StackIngotsinIngotBag 0291 # This will stack all the ingots on the same pixel in your Ingot Bag for additional security292 @setvar! SetIngotBagtoOrganizer03 0293 # This option will prompt the script to set your Ingot Bag to Agent-03 automatically (if using organizers)294# Or you can put them in a locked box instead:295 @setvar! PutIngotsinLockedChest 0296 # Must have wooden box and matching copper key in backpack (can be crafted with 50 carpentry/50 tinkering)297 298endif299 300 301 #################################################302 // LUMBER VARIABLES: //303 #################################################304 305if skill "Lumberjacking" >= 50 and EnableLumberjacking = 1306 307@setvar! LogsToBoards 1308@setvar! EnableLogStacker 0309 310# You can choose to set a storage bag for your Boards:311 @setvar! EnableBoardBag 0312 # It can be a trapped pouch for security but, if so, disable opening Board Bag:313 @setvar! OpenBoardBag 0314 # Otherwise, this will open your Board Bag when stacking boards or unloading (at home/inn/bank/etc.)315 @setvar! StackBoardsinBoardBag 0316 # This will stack all the boards on the same pixel in your Board Bag for additional security317 @setvar! SetBoardBagtoOrganizer01 0318 # This option will prompt the script to set your Board Bag to Agent-01 automatically (if using organizers)319# Or you can put them in a locked box instead:320 @setvar! PutBoardsinLockedChest 0321 # Must have wooden box and matching copper key in backpack (can be crafted with 50 carpentry/50 tinkering)322 323endif324 325 326 #################################################327 // PICKER VARIABLES: //328 #################################################329 330if skill "Lockpicking" >= 50 and EnableDungeonPicker = 1 331 332@setvar! EnableDungeonCleanup 0333 334 # Make sure continuous Lockpicking and Remove Trap is selected in UO client!335@setvar! EnableChestRadar 1336@setvar! EnableAutoPickDungeonChests 1337 # Will automatically attempt to remove traps and pick locks of any locked dungeon chests within 2 tiles.338@setvar! EnableSkinningMode 0339 # Equip a skinning knife to toggle SKINNING MODE (will work even if EnableAutoCarving is disabled above)340 341@setvar! EnableAutoGateEscape 1342 # Toggle WarMode while in dungeon to start 2 minute "Escape Timer"343 # This will try to keep you alive while you get to the nearest gate - and then automatically exits & recalls!344 345@setvar! PutLootinLockedChest 0346 # Must have wooden box and matching copper key in backpack (can be crafted with 50 carpentry/50 tinkering)347 # Will automatically store loot and lock chest 348 349endif 350 351 352 ##################################################353 // FISHING VARIABLES: //354 ##################################################355 356if skill 'Fishing' >= 50 and EnableFishing = 1357 358@setvar! EnableSpyglass 0359 360@setvar! EnableCasting 1361 # Casting mode will equip fishing pole and cast while in PEACE MODE362 # Must add a "Dress List" in Razor (Arm/Dress tab) called "Fishing Pole" (to auto equip fishing poles, as needed)363 # Add (Target) your fishing pole then right-click the list item and choose 'Convert Selected to TYPE'364 365@setvar! EnableFishCarver 1366@setvar! FishCarveCount 100367 # Must have dagger in inventory to carve fish steaks368 369@setvar! EnableTrawling 0370 # Trawling mode will equip fishing weapon (HARPOON or TRIDENT) and throw fishing nets if in WAR MODE 371 372@setvar! PutSpecialNetsinBag 0373 # Will prompt to you to select a storage bag for any Special Fishing Nets you harvest374// or375@setvar! PutSpecialNetsinLockedChest 0376 # Otherwise, you can put them in a locked box instead!377 # Must have wooden box and matching copper key in backpack (can be crafted with 50 carpentry/50 tinkering or purchased from NPC)378 379endif 380 381 382 #################################################383 // MAGERY VARIABLES: //384 #################################################385 386 # Use ">info" to ID any of your [blessed] spellbooks and add them here:387@setvar! MyBlessedMiningSpellbook 0x00000000388@setvar! MyBlessedLumberSpellbook 0x00000000389@setvar! MyBlessedFishingSpellbook 0x00000000390@setvar! MyBlessedScavengerSpellbook 0x00000000391 # This will prevent the script from trying to equip it instead of your aspect spellbook 392 393 394 //////////////////////// 395 // DEFENSIVE MAGIC: //396 //////////////////////// 397 398if skill "Magery" >= 60399 400@setvar! EnableMagicReflection 0401@setvar! EnableReactiveArmour 0402@setvar! EnableProtection 0403@setvar! EnableCastHeal 1404@setvar! EnableCastCure 1405@setvar! CastHealHPlowdiff 25406@setvar! CastHealHPhighdiff 45407 408endif409 410 411 //////////////////////// 412 // OFFENSIVE MAGIC: //413 //////////////////////// 414 415if skill "Magery" >= 80416 417@setvar! EnableCastHarm 0418@setvar! HarmCooldown 30000419@setvar! EnableCastWeaken 0420@setvar! WeakenCooldown 60000421@setvar! EnableCastCurse 0422@setvar! CurseCooldown 60000423@setvar! EnableCastMindBlast 0424@setvar! MindblastCooldown 5000425@setvar! EnableCastMagicArrow 0426@setvar! MagicArrowCooldown 60000427@setvar! EnableCastFireball 0428@setvar! FireballCooldown 30000429@setvar! EnableCastLightning 0430@setvar! LightningCooldown 30000431@setvar! EnableCastExplosion 1432@setvar! ExplosionCooldown 10000433@setvar! EnableCastEnergyBolt 1434@setvar! EnergyBoltCooldown 10000435@setvar! EnableCastFlamestrike 1436@setvar! FlamestrikeCooldown 10000437@setvar! EnableCastMeteorSwarm 0438@setvar! MeteorSwarmCooldown 30000439@setvar! EnableCastChainLightning 0440@setvar! ChainLightningCooldown 30000441 442 443 ///////////////////////444 // MINING SUMMONS: //445 ///////////////////////446 447 if skill "Mining" >= 50 and EnableMining = 1448 449 @setvar! EnableSummons 0450 @setvar! TotalFollowerCount 0451 # This number assumes your are MOUNTED (do NOT include mounts in total followers) but must include any active PETS or PACK ANIMALS452 453 // Number of summoned pets (0, 1 or 2 each - up to 4 total):454 @setvar! SummonFireElemental 0455 @setvar! SummonEarthElemental 0456 @setvar! SummonAirElemental 0457 @setvar! SummonWaterElemental 0458 @setvar! SummonDemon 0459 460 @setvar! EnableMagicMushroom 0461 @setvar! MushroomCooldown 180000462 @setvar! EnableMushroomMaker 0463 @setvar! MakeMushroomAmount 5464 465 466 ///////////////////////////467 // LUMBERJACK SUMMONS: //468 /////////////////////////// 469 470 elseif skill "Lumberjacking" >= 50 and EnableLumberjacking = 1471 472 @setvar! EnableSummons 0473 @setvar! TotalFollowerCount 0474 # This number assumes your are MOUNTED (do NOT include mounts in total followers) but must include any active PETS or PACK ANIMALS475 476 // Number of summoned pets (0, 1 or 2 each - up to 4 total):477 @setvar! SummonFireElemental 0478 @setvar! SummonEarthElemental 0479 @setvar! SummonAirElemental 0480 @setvar! SummonWaterElemental 0481 @setvar! SummonDemon 0482 483 @setvar! EnableMagicMushroom 0484 @setvar! MushroomCooldown 180000485 @setvar! EnableMushroomMaker 0486 @setvar! MakeMushroomAmount 5487 488 endif 489 490 491 //////////////////////////492 // NAME YOUR SUMMONS: //493 //////////////////////////494 495 @setvar! NameSummonedPets 0496 497# Add or change pet names in lists below (must be unique):498 if NameSummonedPets = 1 499 if not listexists FireEleNamesList 500 createlist FireEleNamesList501 endif502 if not listexists AirEleNamesList503 createlist AirEleNamesList504 endif505 if not listexists WaterEleNamesList506 createlist WaterEleNamesList 507 endif 508 if not listexists EarthEleNamesList509 createlist EarthEleNamesList510 endif511 if not listexists DemonNamesList512 createlist DemonNamesList 513 endif514 # FIRE ELEMENTAL NAMES:515 if SummonFireElemental > 0 and list FireEleNamesList = 0516 pushlist FireEleNamesList "Vulcanuz"517 pushlist FireEleNamesList "Blazze"518 pushlist FireEleNamesList "Emberr"519 pushlist FireEleNamesList "Seraphinz"520 pushlist FireEleNamesList "Ignitiaz"521 pushlist FireEleNamesList "Phenixx"522 pushlist FireEleNamesList "Flarrez"523 pushlist FireEleNamesList "Flinntz"524 pushlist FireEleNamesList "Valcanii"525 pushlist FireEleNamesList "Lavaass"526 pushlist FireEleNamesList "Pryo"527 pushlist FireEleNamesList "Maagnus"528 pushlist FireEleNamesList "Pyrrhuz"529 pushlist FireEleNamesList "Volcanous"530 pushlist FireEleNamesList "Magmaass"531 pushlist FireEleNamesList "Toastious"532 pushlist FireEleNamesList "Valcanii"533 pushlist FireEleNamesList "Fumettos"534 pushlist FireEleNamesList "Heliozz"535 pushlist FireEleNamesList "Ziriuz"536 endif537 # DEMON NAMES:538 if SummonDemon > 0 and list DemonNamesList = 0 539 pushlist DemonNamesList "Akuumah"540 pushlist DemonNamesList "Agarez"541 pushlist DemonNamesList "Baahl"542 pushlist DemonNamesList "Beelzeabubbs"543 pushlist DemonNamesList "Beliall"544 pushlist DemonNamesList "Kronuus"545 pushlist DemonNamesList "Daemahnn"546 pushlist DemonNamesList "Otnickk"547 pushlist DemonNamesList "Deemanous"548 pushlist DemonNamesList "Lucifass"549 pushlist DemonNamesList "Satanious"550 pushlist DemonNamesList "Deamathous"551 pushlist DemonNamesList "Pyratis"552 pushlist DemonNamesList "Pyrathius" 553 pushlist DemonNamesList "Darkius"554 pushlist DemonNamesList "Devilass"555 pushlist DemonNamesList "Evillanous"556 pushlist DemonNamesList "Pentagrys"557 pushlist DemonNamesList "Rectarr"558 pushlist DemonNamesList "Satonne"559 endif560 # EARTH ELEMENTAL NAMES:561 if SummonEarthElemental > 0 and list EarthEleNamesList = 0562 pushlist EarthEleNamesList "Terranous"563 pushlist EarthEleNamesList "Avanii"564 pushlist EarthEleNamesList "Gaiassius"565 pushlist EarthEleNamesList "Demetrious"566 pushlist EarthEleNamesList "Rikura"567 pushlist EarthEleNamesList "Terradus"568 pushlist EarthEleNamesList "Rochets"569 pushlist EarthEleNamesList "Clifffy"570 pushlist EarthEleNamesList "Earthares"571 pushlist EarthEleNamesList "Tialocc"572 pushlist EarthEleNamesList "Pebbellz"573 pushlist EarthEleNamesList "Rawckee"574 pushlist EarthEleNamesList "Bloccius"575 pushlist EarthEleNamesList "Stoniouss"576 pushlist EarthEleNamesList "Boulderass"577 pushlist EarthEleNamesList "Stownes"578 pushlist EarthEleNamesList "Hevvee"579 pushlist EarthEleNamesList "Rockkee"580 pushlist EarthEleNamesList "Tonness"581 pushlist EarthEleNamesList "Stoneyy"582 endif583 # AIR ELEMENTAL NAMES:584 if SummonAirElemental > 0 and list AirEleNamesList = 0585 pushlist AirEleNamesList "Aylamayus"586 pushlist AirEleNamesList "Alyaah"587 pushlist AirEleNamesList "Anemoneee"588 pushlist AirEleNamesList "Ariahhh"589 pushlist AirEleNamesList "Caelestisss"590 pushlist AirEleNamesList "Tuuliii"591 pushlist AirEleNamesList "Zeruss"592 pushlist AirEleNamesList "Sorasse"593 pushlist AirEleNamesList "Windius"594 pushlist AirEleNamesList "Essenn"595 pushlist AirEleNamesList "Inannah"596 pushlist AirEleNamesList "Tornadous"597 pushlist AirEleNamesList "Cyclonius"598 pushlist AirEleNamesList "Hurhicann""599 pushlist AirEleNamesList "Aeronious""600 pushlist AirEleNamesList "Blohh"601 pushlist AirEleNamesList "Stratosus"602 pushlist AirEleNamesList "Cloudass"603 pushlist AirEleNamesList "Spinniboius"604 pushlist AirEleNamesList "Gassius"605 endif 606 # WATER ELEMENTAL NAMES:607 if SummonWaterElemental > 0 and list WaterEleNamesList = 0 608 pushlist WaterEleNamesList "Andymanus"609 pushlist WaterEleNamesList "Aaltoh"610 pushlist WaterEleNamesList "Asherahh"611 pushlist WaterEleNamesList "Burimmah"612 pushlist WaterEleNamesList "Juballaa" 613 pushlist WaterEleNamesList "Nanamiia"614 pushlist WaterEleNamesList "Afonnis"615 pushlist WaterEleNamesList "Tiamattus"616 pushlist WaterEleNamesList "Marinus"617 pushlist WaterEleNamesList "Hyrdrosis"618 pushlist WaterEleNamesList "Wettiuss"619 pushlist WaterEleNamesList "Liquidiouss"620 pushlist WaterEleNamesList "Hydroniuous"621 pushlist WaterEleNamesList "Oceannah""622 pushlist WaterEleNamesList "Seaamahhn"623 pushlist WaterEleNamesList "Hydroass"624 pushlist WaterEleNamesList "Watermahnn"625 pushlist WaterEleNamesList "Eywehtmisalph"626 pushlist WaterEleNamesList "Aachtoohoe"627 pushlist WaterEleNamesList "Riverrah"628 endif629 else630 clearlist FireEleNamesList 631 clearlist EarthEleNamesList 632 clearlist AirEleNamesList 633 clearlist WaterEleNamesList 634 clearlist DemonNamesList 635 endif 636endif637 638 639 640 641 642 643############ 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! ############644 645 646 647 648 649 650 /////////////////////651 // SCRIPT RESET: //652 /////////////////////653 654if not dead655if SCRIPTRESET = 1656 unsetvar DanStock.657 unsetvar FIRSTRUN658 unsetvar lumber_runebook659 unsetvar mining_runebook660 unsetvar fishing_runebook661 unsetvar dungeoncrawler_runebook662 unsetvar mining_rune663 unsetvar lumber_rune664 unsetvar fishing_rune665 unsetvar dungeoncrawler_rune666 unsetvar IngotBag667 unsetvar BoardBag668 unsetvar MyLootBag669 unsetvar MyLootChest670 unsetvar myMainPackAnimal671 unsetvar mySecondPackAnimal672 unsetvar EASTEREGG673 clearlist FireEleNamesList 674 clearlist EarthEleNamesList 675 clearlist AirEleNamesList 676 clearlist WaterEleNamesList 677 clearlist DemonNamesList 678 @setvar! TimeToGo 0679 clearignore 680 overhead "All permanent script variables reset!" 84681 overhead "Reset SCRIPTRESET back to 0 and restart script to prompt for new targets..." 0682 sysmsg "Make sure to set SCRIPTRESET back to 0" 253683 sysmsg "Stopping script..." 0684 stop 685endif686 687 688 //////////////////////689 // INITIAL SETUP: //690 //////////////////////691 692if not varexist DanStock.693 sysmsg "DanStock's Ultimate Harvest Auto Pilot Script" 77694 wait 1000695 sysmsg "Last updated: Apr 6, 2025" 0696 wait 1000697 overhead "Thank you for trying my script! It appears this may be your first time running it..." 0698 wait 4000699 overhead "IMPT: Please make sure to setup all your required VARIABLES!" 153700 wait 5500701 overhead "There is a LOT this script can do with the right configuration!" 0702 wait 2500703 setvar DanStock. 1704 sysmsg "Beginning initial Harvest Auto Pilot script setup...... " 0705 wait 1500706 sysmsg "This is best done from inside your Home or Inn Room!" 253707 wait 1500708 hotkey 'Cancel Current Target'709endif 710 711if EnableDIYHomeRecallScript != 1712 if skill "Mining" >= 50 and EnableTrackingAutoRecall = 1 or EnableIngotAutoRecall = 1 or EnableRecallAfterRessurection = 1713 if EnableCastRecall = 1 and CasttoRunebook = 1714 if not varexist mining_runebook or not find mining_runebook self715 wait 1000716 overhead "First off, please select your Escape Runebook..." 88717 wait 1500718 overhead "[ SELECT RUNEBOOK... ]" 253719 setvar mining_runebook720 wft 500721 while targetexists722 wait 100723 endwhile724 overhead "[ RUNEBOOOK SELECTED! ]" 93725 wait 1500726 overhead "Script will now CAST recall to 'default' rune in RUNEBOOK upon AUTO RECALL trigger" 0727 wait 2500728 endif729 elseif EnableCastRecall = 1 and CasttoRune = 1730 if not varexist mining_rune or not find mining_rune self731 wait 1000732 overhead "First off, please select your Escape Rune..." 88733 wait 1500734 overhead "[ SELECT RUNE... ]" 253735 setvar mining_rune736 wft 500737 while targetexists738 wait 100739 endwhile740 overhead "[ RUNE SELECTED! ]" 93741 wait 1500742 overhead "Script will now CAST recall to selected RUNE upon AUTO RECALL trigger" 0743 wait 2500744 endif745 elseif EnableCastRecall = 0 746 if not varexist mining_runebook or not find mining_runebook self747 wait 1000748 overhead "First off, please select your Escape Runebook..." 88749 wait 1500750 overhead "[ SELECT RUNEBOOK... ]" 253751 setvar mining_runebook752 wft 500753 while targetexists754 wait 100755 endwhile756 overhead "[ RUNEBOOOK SELECTED! ]" 93757 wait 1500758 overhead "Script will now use recall SCROLL (to first in book rune) upon AUTO RECALL trigger" 0759 wait 2500760 endif 761 endif762 elseif skill "Lumberjacking" >= 50 and EnableTrackingAutoRecall = 1 or EnableBoardAutoRecall = 1 or EnableRecallAfterRessurection = 1763 if EnableCastRecall = 1 and CasttoRunebook = 1764 if not varexist lumber_runebook or not find lumber_runebook self765 wait 1000766 overhead "First off, please select your Escape Runebook..." 88767 wait 1500768 overhead "[ SELECT RUNEBOOK... ]" 253769 setvar lumber_runebook770 wft 500771 while targetexists772 wait 100773 endwhile774 overhead "[ RUNEBOOOK SELECTED! ]" 93775 wait 1500776 overhead "Script will now CAST recall to 'default' rune in RUNEBOOK upon AUTO RECALL trigger" 0777 wait 2500778 endif779 elseif EnableCastRecall = 1 and CasttoRune = 1780 if not varexist lumber_rune or not find lumber_rune self781 wait 1000782 overhead "First off, please select your Escape Rune..." 88783 wait 1500784 overhead "[ SELECT RUNE... ]" 253785 setvar lumber_rune786 wft 500787 while targetexists788 wait 100789 endwhile790 overhead "[ RUNE SELECTED! ]" 93791 wait 1500792 overhead "Script will now CAST recall to selected RUNE upon AUTO RECALL trigger" 0793 wait 2500794 endif795 elseif EnableCastRecall = 0 796 if not varexist lumber_runebook or not find lumber_runebook self797 wait 1000798 overhead "First off, please select your Escape Runebook..." 88799 wait 1500800 overhead "[ SELECT RUNEBOOK... ]" 253801 setvar lumber_runebook802 wft 500803 while targetexists804 wait 100805 endwhile806 overhead "[ RUNEBOOOK SELECTED! ]" 93807 wait 1500808 overhead "Script will now use recall SCROLL (to first in book rune) upon AUTO RECALL trigger" 0809 wait 2500810 endif811 endif812 elseif skill "Fishing" >= 50 and EnableTrackingAutoRecall = 1 or EnableRecallAfterRessurection = 1813 if EnableCastRecall = 1 and CasttoRunebook = 1814 if not varexist fishing_runebook or not find fishing_runebook self815 wait 1000816 overhead "First off, please select your Escape Runebook..." 88817 wait 1500818 overhead "[ SELECT RUNEBOOK... ]" 253819 setvar fishing_runebook820 wft 500821 while targetexists822 wait 100823 endwhile824 overhead "[ RUNEBOOOK SELECTED! ]" 93825 wait 1500826 overhead "Script will now CAST recall to 'default' rune in RUNEBOOK upon AUTO RECALL trigger" 0827 wait 2500828 endif829 elseif EnableCastRecall = 1 and CasttoRune = 1830 if not varexist fishing_rune or not find fishing_rune self831 wait 1000832 overhead "First off, please select your Escape Rune..." 88833 wait 1500834 overhead "[ SELECT RUNE... ]" 253835 setvar fishing_rune836 wft 500837 while targetexists838 wait 100839 endwhile840 overhead "[ RUNE SELECTED! ]" 93841 wait 1500842 overhead "Script will now CAST recall to selected RUNE upon AUTO RECALL trigger" 0843 wait 2500844 endif845 elseif EnableCastRecall = 0846 if not varexist fishing_runebook or not find fishing_runebook self847 wait 1000848 overhead "First off, please select your Escape Runebook..." 88849 wait 1500850 overhead "[ SELECT RUNEBOOK... ]" 253851 setvar fishing_runebook 852 wft 500853 while targetexists854 wait 100855 endwhile856 overhead "[ RUNEBOOOK SELECTED! ]" 93857 wait 1500858 overhead "Script will now use recall SCROLL (to first in book rune) upon AUTO RECALL trigger" 0859 wait 2500860 endif861 endif862 elseif skill "Lockpicking" >= 50 and EnableTrackingAutoRecall = 1 or EnableRecallAfterRessurection = 1 or EnableRecallAfterDungeonGate = 1863 if EnableCastRecall = 1 and CasttoRunebook = 1864 if not varexist dungeoncrawler_runebook or not find dungeoncrawler_runebook self865 wait 1000866 overhead "First off, please select your Escape Runebook..." 88867 wait 1500868 overhead "[ SELECT RUNEBOOK... ]" 253869 setvar dungeoncrawler_runebook870 wft 500871 while targetexists872 wait 100873 endwhile874 overhead "[ RUNEBOOOK SELECTED! ]" 93875 wait 1500876 overhead "Script will now CAST recall to 'default' rune in RUNEBOOK upon AUTO RECALL trigger" 0877 wait 2500878 endif879 elseif EnableCastRecall = 1 and CasttoRune = 1880 if not varexist dungeoncrawler_rune or not find dungeoncrawler_rune self881 wait 1000882 overhead "First off, please select your Escape Rune..." 88883 wait 1500884 overhead "[ SELECT RUNE... ]" 253885 setvar dungeoncrawler_rune886 wft 500887 while targetexists888 wait 100889 endwhile890 overhead "[ RUNE SELECTED! ]" 93891 wait 1500892 overhead "Script will now CAST recall to selected RUNE upon AUTO RECALL trigger" 0893 wait 2500894 endif895 elseif EnableCastRecall = 0 896 if not varexist dungeoncrawler_runebook or not find dungeoncrawler_runebook self897 wait 1000898 overhead "First off, please select your Escape Runebook..." 88899 wait 1500900 overhead "[ SELECT RUNEBOOK... ]" 253901 setvar dungeoncrawler_runebook902 wft 500903 while targetexists904 wait 100905 endwhile906 overhead "[ RUNEBOOOK SELECTED! ]" 93907 wait 1500908 overhead "Script will now use recall SCROLL (to first in book rune) upon AUTO RECALL trigger" 0909 wait 2500910 endif911 endif912 endif913endif914 915if skill "Mining" >= 50 and EnableIngotBag = 1916 if not varexist IngotBag or not find IngotBag self 917 wait 1500918 overhead "Next, we'll choose your ingot storage bag..." 88919 wait 1500920 overhead "[ SELECT INGOT BAG... ]" 253921 setvar IngotBag922 wft 500923 while targetexists924 wait 100925 endwhile926 overhead "[ INGOT BAG SET! ]" 93927 wait 3000928 if SetIngotBagtoOrganizer03 = 1929 overhead "...now once more to set it as Razor Organizer Agent-03..." 88930 wait 1500931 overhead "[ SELECT INGOT BAG AGAIN... ]" 253932 hotkey 'Set Organizer HotBag-03'933 wft 500934 while targetexists935 wait 100936 endwhile937 overhead "[ RAZOR HOTBAG-03 SET! ]" 93938 wait 3000939 endif940 endif941endif942 943if skill "Lumberjacking" >= 50 and EnableBoardBag = 1944 if not varexist BoardBag or not find BoardBag self 945 wait 1000946 overhead "Next, we'll set your lumber storage bag..." 88947 wait 1500948 overhead "[ SELECT BOARD BAG... ]" 253949 setvar BoardBag950 wft 500951 while targetexists952 wait 100953 endwhile954 overhead "[ BOARD BAG SET! ]" 93955 wait 3000956 if SetBoardBagtoOrganizer01 = 1957 overhead "...now once more to set it as Razor Organizer Agent-01..." 88958 wait 1500959 overhead "[ SELECT BOARD BAG AGAIN... ]" 253960 hotkey 'Set Organizer HotBag-01'961 wft 500962 while targetexists963 wait 100964 endwhile965 overhead "[ RAZOR HOTBAG-01 SET! ]" 93966 wait 3000967 endif968 endif969endif970 971if EnableLootChest = 1972 if not varexist MyLootChest973 wait 1000974 sysmsg "Disable 'EnableLootChest' in script variables to turn off this feature!" 0975 overhead "Now, select a container (in your Home or Inn) to store your loot..." 88976 wait 1500977 overhead "[ SELECT YOUR LOOT CHEST... ]" 253978 setvar MyLootChest979 wft 500980 while targetexists 981 wait 100982 endwhile983 overhead "[ LOOT CHEST SET! ]" 93984 wait 1500985 overhead "Setup additional Organizer Agents (06-09 by default) within this container!" 0986 wait 3500987 endif988endif989 990if EnableLootBag = 1991 if not varexist MyLootBag or not find MyLootBag self992 wait 1000993 sysmsg "Disable 'EnableLootBag' in script variables to turn off this feature!" 0994 overhead "Please select a bag (in your backpack) for your loot..." 88995 wait 1500996 overhead "[ SELECT YOUR LOOT BAG... ]" 253997 setvar MyLootBag998 wft 500999 while targetexists 1000 wait 1001001 endwhile1002 overhead "[ LOOT BAG SET! ]" 931003 wait 15001004 overhead "This bag should also be set as your 'Grid Loot' bag!" 01005 wait 25001006 endif1007endif1008 1009if not varexist FIRSTRUN1010 sysmsg "Verifying initial setup is complete.......... " 01011 wait 35001012 overhead "Ok, looks like you're good to go!" 01013 wait 30001014 overhead "Good luck out there and thanks again for trying my script!" 01015 overhead " - Dan " 01016 setvar FIRSTRUN 11017 wait 30001018 sysmsg "DANSTOCK'S ULTIMATE HARVEST AUTO PILIOT SCRIPT SETUP COMPLETE!" 841019 wait 15001020 overhead "[ HAPPY HARVESTING!! ]" 20861021 wait 30001022endif1023 1024@ignore MyBlessedMiningSpellbook1025@ignore MyBlessedLumberSpellbook1026@ignore MyBlessedFishingSpellbook1027@ignore MyBlessedScavengerSpellbook1028 1029if not timerexists "HealingPotionTimer" 1030 createtimer "HealingPotionTimer" 1031 settimer ""HealingPotionTimer" HealingPotionCooldown1032endif 1033 1034if not timerexists "CurePotionTimer" 1035 createtimer "CurePotionTimer" 1036 settimer "CurePotionTimer" CurePotionCooldown1037endif 1038 1039if not timerexists "RefreshPotionTimer" 1040 createtimer "RefreshPotionTimer" 1041 settimer "RefreshPotionTimer" RefreshPotionCooldown1042endif 1043 1044if not timerexists "InventoryTimer" 1045 createtimer "InventoryTimer" 1046 settimer "InventoryTimer" 60001047endif 1048 1049if not timerexists "TargetTimer" 1050 createtimer "TargetTimer" 1051 settimer "TargetTimer" 35001052endif 1053 1054if not timerexists "NoTargetTimer" 1055 createtimer "NoTargetTimer" 1056 settimer "NoTargetTimer" 35001057endif 1058 1059if not timerexists "TravelTimer" 1060 createtimer "TravelTimer" 1061 settimer "TravelTimer" 600001062endif 1063 1064if not timerexists "ManaTimer" 1065 createtimer "ManaTimer" 1066 settimer "ManaTimer" 50001067endif 1068 1069 1070 ///////////////////////1071 // CHECKS: //1072 ///////////////////////1073 1074 if EnableAutoParalyzePouch = 11075 if paralyzed1076 if EnableOverheadMessages = 11077 overhead "[ [ [ [POP] ] ] ]" 21171078 endif1079 say "[pouch" 1080 if EnableRedAlertOverhead = 11081 overhead "[ !!RED ALERT!! ]" 371082 endif1083 @setvar! RedTargetFound 11084 @setvar! TimeToGo 11085 endif1086 endif1087 1088 if EnablePKradar = 1 and skill 'Tracking' < 501089 if not timerexists "PK Radar" 1090 createtimer "PK Radar"1091 settimer "PK Radar" 01092 endif 1093 if timer "PK Radar" > 10001094 hotkey 'Next Murderer Player Target'1095 wait 5001096 if insysmsg "No one matching that was found"1097 settimer "PK Radar" 01098 else1099 if DungeonMode = 1 and EnableAutoRedDungeonGate = 11100 hotkey 'Toggle War Only'1101 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 01102 if not hidden1103 useskill 'Hiding'1104 endif1105 elseif DungeonMode = 01106 @setvar! RedTargetFound 11107 @setvar! TimeToGo 11108 endif 1109 @setvar! MurdererTarget lasttarget1110 clearsysmsg1111 replay 1112 endif 1113 endif1114 endif 1115 1116 if EnableTrackingAutoRecall = 1 and RedTargetFound != 11117 if skill 'Tracking' > 50 and not findbuff 'tracking'1118 while not gumpexists 42674676591119 useskill 'tracking'1120 wait 2501121 endwhile1122 if gumpexists 42674676591123 while not insysmsg "You will now hunt all hostile players."1124 gumpresponse 8 42674676591125 waitforgump 4267467659 50001126 endwhile1127 gumpresponse 6 42674676591128 wait 10001129 clearsysmsg1130 endif1131 gumpclose 42674676591132 if EnableOverheadMessages = 11133 overhead "*tracking reds...*" 3341134 endif1135 endif 1136 1137 if PKTrackingRange = 60 1138 if insysmsg ": 60 step" or insysmsg "60 space" or insysmsg ": 59 step" or insysmsg "59 space" or insysmsg ": 58 step" or insysmsg "58 space" or insysmsg ": 57 step" or insysmsg "57 space" or insysmsg ": 56 step" or insysmsg "56 space" or insysmsg ": 55 step" or insysmsg "55 space" or insysmsg ": 54 step" or insysmsg "54 space" or insysmsg ": 53 step" or insysmsg "53 space" or insysmsg ": 52 step" or insysmsg "52 space" or insysmsg ": 51 step" or insysmsg "51 space" or insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"1139 if EnableRedAlertOverhead = 11140 overhead "[ !! RED ALERT !! ]" 371141 endif 1142 if DungeonMode = 1 and EnableAutoRedDungeonGate = 11143 hotkey 'Toggle War Only'1144 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 01145 if not hidden1146 useskill 'Hiding'1147 endif1148 elseif DungeonMode = 01149 @setvar! RedTargetFound 11150 @setvar! TimeToGo 11151 clearsysmsg1152 endif 1153 endif1154 elseif PKTrackingRange = 50 1155 if insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"1156 if EnableRedAlertOverhead = 11157 overhead "[ !! RED ALERT !! ]" 371158 endif 1159 if DungeonMode = 1 and EnableAutoRedDungeonGate = 11160 hotkey 'Toggle War Only'1161 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 01162 if not hidden1163 useskill 'Hiding'1164 endif1165 elseif DungeonMode = 01166 @setvar! RedTargetFound 11167 @setvar! TimeToGo 11168 clearsysmsg1169 endif 1170 endif1171 elseif PKTrackingRange = 401172 if insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"1173 if EnableRedAlertOverhead = 11174 overhead "[ !! RED ALERT !! ]" 371175 endif 1176 if DungeonMode = 1 and EnableAutoRedDungeonGate = 11177 hotkey 'Toggle War Only'1178 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 01179 if not hidden1180 useskill 'Hiding'1181 endif1182 elseif DungeonMode = 01183 @setvar! RedTargetFound 11184 @setvar! TimeToGo 11185 clearsysmsg1186 endif 1187 endif1188 elseif PKTrackingRange = 0 1189 if insysmsg "Now tracking"1190 if EnableRedAlertOverhead = 11191 overhead "[ !! RED ALERT !! ]" 371192 endif 1193 if DungeonMode = 1 and EnableAutoRedDungeonGate = 11194 hotkey 'Toggle War Only'1195 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 01196 if not hidden1197 useskill 'Hiding'1198 endif1199 elseif DungeonMode = 01200 @setvar! RedTargetFound 11201 @setvar! TimeToGo 11202 clearsysmsg1203 endif 1204 endif1205 endif 1206 endif1207 1208 if not timerexists "TravelTimer" 1209 createtimer "TravelTimer" 1210 settimer "TravelTimer" 6000001211 endif1212 1213 while TravelCooldownActive = 1 or insysmsg "traveled"1214 hotkey 'Use item in hand' 1215 wft 15001216 hotkey 'Target Self' 1217 wait 6501218 if insysmsg "must wait 59"1219 if EnableOverheadMessages = 11220 overhead "I'm tired from travelling..." 20861221 wait 1500 1222 overhead "Just give me a minute to recover!" 20861223 endif 1224 clearsysmsg 1225 cooldown "Travel" 590001226 settimer "TravelTimer" 10001227 @setvar! TravelCooldownActive 01228 replay 1229 elseif insysmsg "must wait 58"1230 if EnableOverheadMessages = 11231 overhead "I'm tired from travelling..." 20861232 wait 1500 1233 overhead "Just give me a minute to recover!" 20861234 endif1235 cooldown "Travel" 580001236 settimer "TravelTimer" 20001237 @setvar! TravelCooldownActive 01238 clearsysmsg 1239 replay 1240 elseif insysmsg "must wait 57"1241 if EnableOverheadMessages = 11242 overhead "I'm tired from travelling..." 20861243 wait 1500 1244 overhead "Just give me a minute to recover!" 20861245 endif1246 cooldown "Travel" 570001247 settimer "TravelTimer" 30001248 @setvar! TravelCooldownActive 01249 clearsysmsg 1250 replay 1251 elseif insysmsg "must wait 56"1252 if EnableOverheadMessages = 11253 overhead "I'm tired from travelling..." 20861254 wait 1500 1255 overhead "Just give me a minute to recover!" 20861256 endif1257 cooldown "Travel" 560001258 settimer "TravelTimer" 40001259 @setvar! TravelCooldownActive 01260 clearsysmsg 1261 replay 1262 elseif insysmsg "must wait 55"1263 if EnableOverheadMessages = 11264 overhead "I'm tired from travelling..." 20861265 wait 1500 1266 overhead "Just give me a minute to recover!" 20861267 endif1268 cooldown "Travel" 550001269 settimer "TravelTimer" 50001270 @setvar! TravelCooldownActive 01271 clearsysmsg 1272 replay 1273 elseif insysmsg "must wait 54"1274 if EnableOverheadMessages = 11275 overhead "I'm tired from travelling..." 20861276 wait 1500 1277 overhead "Just give me a minute to recover!" 20861278 endif1279 cooldown "Travel" 540001280 settimer "TravelTimer" 60001281 @setvar! TravelCooldownActive 01282 clearsysmsg 1283 replay 1284 elseif insysmsg "must wait 53"1285 if EnableOverheadMessages = 11286 overhead "I'm tired from travelling..." 20861287 wait 1500 1288 overhead "Just give me a minute to recover!" 20861289 endif1290 cooldown "Travel" 530001291 settimer "TravelTimer" 70001292 @setvar! TravelCooldownActive 01293 clearsysmsg 1294 replay 1295 elseif insysmsg "must wait 52"1296 if EnableOverheadMessages = 11297 overhead "I'm tired from travelling..." 20861298 wait 1500 1299 overhead "Just give me a minute to recover!" 20861300 endif1301 cooldown "Travel" 520001302 settimer "TravelTimer" 80001303 @setvar! TravelCooldownActive 01304 clearsysmsg 1305 replay 1306 elseif insysmsg "must wait 51"1307 if EnableOverheadMessages = 11308 overhead "I'm tired from travelling..." 20861309 wait 1500 1310 overhead "Just give me a minute to recover!" 20861311 endif1312 cooldown "Travel" 510001313 settimer "TravelTimer" 90001314 @setvar! TravelCooldownActive 01315 clearsysmsg 1316 replay 1317 elseif insysmsg "must wait 50"1318 if EnableOverheadMessages = 11319 overhead "I'm tired from travelling..." 20861320 wait 1500 1321 overhead "Just give me a minute to recover!" 20861322 endif1323 cooldown "Travel" 500001324 settimer "TravelTimer" 100001325 @setvar! TravelCooldownActive 01326 clearsysmsg 1327 replay 1328 elseif insysmsg "must wait 49"1329 if EnableOverheadMessages = 11330 overhead "I'm tired from travelling..." 20861331 wait 1500 1332 overhead "Just give me a minute to recover!" 20861333 endif1334 cooldown "Travel" 490001335 settimer "TravelTimer" 110001336 @setvar! TravelCooldownActive 01337 clearsysmsg 1338 replay 1339 elseif insysmsg "must wait 48"1340 if EnableOverheadMessages = 11341 overhead "I'm tired from travelling..." 20861342 wait 1500 1343 overhead "Just give me a minute to recover!" 20861344 endif1345 cooldown "Travel" 480001346 settimer "TravelTimer" 120001347 @setvar! TravelCooldownActive 01348 clearsysmsg 1349 replay 1350 elseif insysmsg "must wait 47"1351 if EnableOverheadMessages = 11352 overhead "I'm tired from travelling..." 20861353 wait 1500 1354 overhead "Just give me a minute to recover!" 20861355 endif1356 cooldown "Travel" 470001357 settimer "TravelTimer" 130001358 @setvar! TravelCooldownActive 01359 clearsysmsg 1360 replay 1361 elseif insysmsg "must wait 46"1362 if EnableOverheadMessages = 11363 overhead "I'm tired from travelling..." 20861364 wait 1500 1365 overhead "Just give me a minute to recover!" 20861366 endif1367 cooldown "Travel" 460001368 settimer "TravelTimer" 140001369 @setvar! TravelCooldownActive 01370 clearsysmsg 1371 replay 1372 elseif insysmsg "must wait 45"1373 if EnableOverheadMessages = 11374 overhead "I'm tired from travelling..." 20861375 wait 1500 1376 overhead "Just give me a minute to recover!" 20861377 endif1378 cooldown "Travel" 450001379 settimer "TravelTimer" 150001380 @setvar! TravelCooldownActive 01381 clearsysmsg 1382 replay 1383 elseif insysmsg "must wait 44"1384 if EnableOverheadMessages = 11385 overhead "I'm tired from travelling..." 20861386 wait 1500 1387 overhead "Just give me a minute to recover!" 20861388 endif1389 cooldown "Travel" 440001390 settimer "TravelTimer" 160001391 @setvar! TravelCooldownActive 01392 clearsysmsg 1393 replay 1394 elseif insysmsg "must wait 43"1395 if EnableOverheadMessages = 11396 overhead "I'm tired from travelling..." 20861397 wait 1500 1398 overhead "Just give me a minute to recover!" 20861399 endif1400 cooldown "Travel" 430001401 settimer "TravelTimer" 170001402 @setvar! TravelCooldownActive 01403 clearsysmsg 1404 replay 1405 elseif insysmsg "must wait 42"1406 if EnableOverheadMessages = 11407 overhead "I'm tired from travelling..." 20861408 wait 1500 1409 overhead "Just give me a minute to recover!" 20861410 endif1411 cooldown "Travel" 420001412 settimer "TravelTimer" 180001413 @setvar! TravelCooldownActive 01414 clearsysmsg 1415 replay 1416 elseif insysmsg "must wait 41"1417 if EnableOverheadMessages = 11418 overhead "I'm tired from travelling..." 20861419 wait 1500 1420 overhead "Just give me a minute to recover!" 20861421 endif1422 cooldown "Travel" 410001423 settimer "TravelTimer" 190001424 @setvar! TravelCooldownActive 01425 clearsysmsg 1426 replay 1427 elseif insysmsg "must wait 40"1428 if EnableOverheadMessages = 11429 overhead "I'm tired from travelling..." 20861430 wait 1500 1431 overhead "Just give me a bit to recover!" 20861432 endif1433 cooldown "Travel" 400001434 settimer "TravelTimer" 200001435 @setvar! TravelCooldownActive 01436 clearsysmsg 1437 replay 1438 elseif insysmsg "must wait 39"1439 if EnableOverheadMessages = 11440 overhead "I'm tired from travelling..." 20861441 wait 1500 1442 overhead "Just give me a bit to recover!" 20861443 endif1444 cooldown "Travel" 390001445 settimer "TravelTimer" 210001446 @setvar! TravelCooldownActive 01447 clearsysmsg 1448 replay 1449 elseif insysmsg "must wait 38"1450 if EnableOverheadMessages = 11451 overhead "I'm tired from travelling..." 20861452 wait 1500 1453 overhead "Just give me a bit to recover!" 20861454 endif1455 cooldown "Travel" 380001456 settimer "TravelTimer" 220001457 @setvar! TravelCooldownActive 01458 clearsysmsg 1459 replay 1460 elseif insysmsg "must wait 37"1461 if EnableOverheadMessages = 11462 overhead "I'm tired from travelling..." 20861463 wait 1500 1464 overhead "Just give me a bit to recover!" 20861465 endif1466 cooldown "Travel" 370001467 settimer "TravelTimer" 230001468 @setvar! TravelCooldownActive 01469 clearsysmsg 1470 replay 1471 elseif insysmsg "must wait 36"1472 if EnableOverheadMessages = 11473 overhead "I'm tired from travelling..." 20861474 wait 1500 1475 overhead "Just give me a bit to recover!" 20861476 endif1477 cooldown "Travel" 360001478 settimer "TravelTimer" 240001479 @setvar! TravelCooldownActive 01480 clearsysmsg 1481 replay 1482 elseif insysmsg "must wait 35"1483 if EnableOverheadMessages = 11484 overhead "I'm tired from travelling..." 20861485 wait 1500 1486 overhead "Just give me a bit to recover!" 20861487 endif1488 cooldown "Travel" 350001489 settimer "TravelTimer" 250001490 @setvar! TravelCooldownActive 01491 clearsysmsg 1492 replay 1493 elseif insysmsg "must wait 34"1494 if EnableOverheadMessages = 11495 overhead "I'm tired from travelling..." 20861496 wait 1500 1497 overhead "Just give me a bit to recover!" 20861498 endif1499 cooldown "Travel" 340001500 settimer "TravelTimer" 260001501 @setvar! TravelCooldownActive 01502 clearsysmsg 1503 replay 1504 elseif insysmsg "must wait 33"1505 if EnableOverheadMessages = 11506 overhead "I'm tired from travelling..." 20861507 wait 1500 1508 overhead "Just give me a bit to recover!" 20861509 endif1510 cooldown "Travel" 330001511 settimer "TravelTimer" 270001512 @setvar! TravelCooldownActive 01513 clearsysmsg 1514 replay 1515 elseif insysmsg "must wait 32"1516 if EnableOverheadMessages = 11517 overhead "I'm tired from travelling..." 20861518 wait 1500 1519 overhead "Just give me a bit to recover!" 20861520 endif1521 cooldown "Travel" 320001522 settimer "TravelTimer" 280001523 @setvar! TravelCooldownActive 01524 clearsysmsg 1525 replay 1526 elseif insysmsg "must wait 31"1527 if EnableOverheadMessages = 11528 overhead "I'm tired from travelling..." 20861529 wait 1500 1530 overhead "Just give me a bit to recover!" 20861531 endif1532 cooldown "Travel" 310001533 settimer "TravelTimer" 290001534 @setvar! TravelCooldownActive 01535 clearsysmsg 1536 replay 1537 elseif insysmsg "must wait 30"1538 if EnableOverheadMessages = 11539 overhead "I'm tired from travelling..." 20861540 wait 1500 1541 overhead "Just give me a bit to recover!" 20861542 endif1543 cooldown "Travel" 300001544 settimer "TravelTimer" 300001545 @setvar! TravelCooldownActive 01546 clearsysmsg 1547 replay 1548 elseif insysmsg "must wait 29"1549 if EnableOverheadMessages = 11550 overhead "I'm tired from travelling..." 20861551 wait 1500 1552 overhead "Just give me a bit to recover!" 20861553 endif1554 cooldown "Travel" 290001555 settimer "TravelTimer" 310001556 @setvar! TravelCooldownActive 01557 clearsysmsg 1558 replay 1559 elseif insysmsg "must wait 28"1560 if EnableOverheadMessages = 11561 overhead "I'm tired from travelling..." 20861562 wait 1500 1563 overhead "Just give me a bit to recover!" 20861564 endif1565 cooldown "Travel" 280001566 settimer "TravelTimer" 320001567 @setvar! TravelCooldownActive 01568 clearsysmsg 1569 replay 1570 elseif insysmsg "must wait 27"1571 if EnableOverheadMessages = 11572 overhead "I'm tired from travelling..." 20861573 wait 1500 1574 overhead "Just give me a bit longer to recover!" 20861575 endif1576 cooldown "Travel" 270001577 settimer "TravelTimer" 330001578 @setvar! TravelCooldownActive 01579 clearsysmsg 1580 replay 1581 elseif insysmsg "must wait 26"1582 if EnableOverheadMessages = 11583 overhead "I'm tired from travelling..." 20861584 wait 1500 1585 overhead "Just give me a bit longer to recover!" 20861586 endif1587 cooldown "Travel" 260001588 settimer "TravelTimer" 340001589 @setvar! TravelCooldownActive 01590 clearsysmsg 1591 replay 1592 elseif insysmsg "must wait 25"1593 if EnableOverheadMessages = 11594 overhead "I'm tired from travelling..." 20861595 wait 1500 1596 overhead "Just give me a bit longer to recover!" 20861597 endif1598 cooldown "Travel" 250001599 settimer "TravelTimer" 350001600 @setvar! TravelCooldownActive 01601 clearsysmsg 1602 replay 1603 elseif insysmsg "must wait 24"1604 if EnableOverheadMessages = 11605 overhead "I'm tired from travelling..." 20861606 wait 1500 1607 overhead "Just give me a bit longer to recover!" 20861608 endif1609 cooldown "Travel" 240001610 settimer "TravelTimer" 360001611 @setvar! TravelCooldownActive 01612 clearsysmsg 1613 replay 1614 elseif insysmsg "must wait 23"1615 if EnableOverheadMessages = 11616 overhead "I'm tired from travelling..." 20861617 wait 1500 1618 overhead "Just give me a bit longer to recover!" 20861619 endif1620 cooldown "Travel" 230001621 settimer "TravelTimer" 370001622 @setvar! TravelCooldownActive 01623 clearsysmsg 1624 replay 1625 elseif insysmsg "must wait 22"1626 if EnableOverheadMessages = 11627 overhead "I'm tired from travelling..." 20861628 wait 1500 1629 overhead "Just give me a bit longer to recover!" 20861630 endif1631 cooldown "Travel" 220001632 settimer "TravelTimer" 380001633 @setvar! TravelCooldownActive 01634 clearsysmsg 1635 replay 1636 elseif insysmsg "must wait 21"1637 if EnableOverheadMessages = 11638 overhead "I'm tired from travelling..." 20861639 wait 1500 1640 overhead "Just give me a bit longer to recover!" 20861641 endif1642 cooldown "Travel" 210001643 settimer "TravelTimer" 390001644 @setvar! TravelCooldownActive 01645 clearsysmsg 1646 replay 1647 elseif insysmsg "must wait 20"1648 if EnableOverheadMessages = 11649 overhead "I'm tired from travelling..." 20861650 wait 1500 1651 overhead "Just give me a bit longer to recover!" 20861652 endif1653 cooldown "Travel" 200001654 settimer "TravelTimer" 400001655 @setvar! TravelCooldownActive 01656 clearsysmsg 1657 replay 1658 elseif insysmsg "must wait 19"1659 if EnableOverheadMessages = 11660 overhead "I'm tired from travelling..." 20861661 wait 1500 1662 overhead "Just give me a bit longer to recover!" 20861663 endif1664 cooldown "Travel" 190001665 settimer "TravelTimer" 410001666 @setvar! TravelCooldownActive 01667 clearsysmsg 1668 replay 1669 elseif insysmsg "must wait 18"1670 if EnableOverheadMessages = 11671 overhead "I'm tired from travelling..." 20861672 wait 1500 1673 overhead "Just give me a bit longer to recover!" 20861674 endif1675 cooldown "Travel" 180001676 settimer "TravelTimer" 420001677 @setvar! TravelCooldownActive 01678 clearsysmsg 1679 replay 1680 elseif insysmsg "must wait 17"1681 if EnableOverheadMessages = 11682 overhead "I'm tired from travelling..." 20861683 wait 1500 1684 overhead "Just give me a bit longer to recover!" 20861685 endif1686 cooldown "Travel" 170001687 settimer "TravelTimer" 430001688 @setvar! TravelCooldownActive 01689 clearsysmsg 1690 replay 1691 elseif insysmsg "must wait 16"1692 if EnableOverheadMessages = 11693 overhead "I'm tired from travelling..." 20861694 wait 1500 1695 overhead "Just give me a bit longer to recover!" 20861696 endif1697 cooldown "Travel" 160001698 settimer "TravelTimer" 440001699 @setvar! TravelCooldownActive 01700 clearsysmsg 1701 replay 1702 elseif insysmsg "must wait 15"1703 if EnableOverheadMessages = 11704 overhead "I'm tired from travelling..." 20861705 wait 1500 1706 overhead "Just give me a bit longer to recover!" 20861707 endif1708 cooldown "Travel" 150001709 settimer "TravelTimer" 450001710 @setvar! TravelCooldownActive 01711 clearsysmsg 1712 replay 1713 elseif insysmsg "must wait 14"1714 if EnableOverheadMessages = 11715 overhead "I'm tired from travelling..." 20861716 wait 1500 1717 overhead "Just give me a bit longer to recover!" 20861718 endif1719 cooldown "Travel" 140001720 settimer "TravelTimer" 460001721 @setvar! TravelCooldownActive 01722 clearsysmsg 1723 replay 1724 elseif insysmsg "must wait 13"1725 if EnableOverheadMessages = 11726 overhead "I'm tired from travelling..." 20861727 wait 1500 1728 overhead "Just give me a little bit longer to recover!" 20861729 endif1730 cooldown "Travel" 130001731 settimer "TravelTimer" 470001732 @setvar! TravelCooldownActive 01733 clearsysmsg 1734 replay 1735 elseif insysmsg "must wait 12"1736 if EnableOverheadMessages = 11737 overhead "I'm tired from travelling..." 20861738 wait 1500 1739 overhead "Just give me a little bit longer to recover!" 20861740 endif1741 cooldown "Travel" 120001742 settimer "TravelTimer" 480001743 @setvar! TravelCooldownActive 01744 clearsysmsg 1745 replay 1746 elseif insysmsg "must wait 11"1747 if EnableOverheadMessages = 11748 overhead "I'm tired from travelling..." 20861749 wait 1500 1750 overhead "Just give me a little bit longer to recover!" 20861751 endif1752 cooldown "Travel" 110001753 settimer "TravelTimer" 490001754 @setvar! TravelCooldownActive 01755 clearsysmsg 1756 replay 1757 elseif insysmsg "must wait 10"1758 if EnableOverheadMessages = 11759 overhead "I'm tired from travelling..." 20861760 wait 1500 1761 overhead "Just give me a little bit longer to recover!" 20861762 endif1763 cooldown "Travel" 100001764 settimer "TravelTimer" 500001765 @setvar! TravelCooldownActive 01766 clearsysmsg 1767 replay 1768 elseif insysmsg "must wait 9"1769 if EnableOverheadMessages = 11770 overhead "I'm tired from travelling..." 20861771 wait 1500 1772 overhead "Just give me a few more seconds to recover!" 20861773 endif1774 cooldown "Travel" 90001775 settimer "TravelTimer" 510001776 @setvar! TravelCooldownActive 01777 clearsysmsg 1778 replay 1779 elseif insysmsg "must wait 8"1780 if EnableOverheadMessages = 11781 overhead "I'm tired from travelling..." 20861782 wait 1500 1783 overhead "Just give me a few more seconds to recover!" 20861784 endif1785 cooldown "Travel" 80001786 settimer "TravelTimer" 820001787 @setvar! TravelCooldownActive 01788 clearsysmsg 1789 replay 1790 elseif insysmsg "must wait 7"1791 if EnableOverheadMessages = 11792 overhead "I'm tired from travelling..." 20861793 wait 1500 1794 overhead "Just give me a few more seconds to recover!" 20861795 endif1796 cooldown "Travel" 70001797 settimer "TravelTimer" 530001798 @setvar! TravelCooldownActive 01799 clearsysmsg 1800 replay 1801 if EnableOverheadMessages = 11802 overhead "I'm tired from travelling..." 20861803 wait 1500 1804 overhead "Just give me a few more seconds to recover!" 20861805 endif1806 cooldown "Travel" 60001807 settimer "TravelTimer" 540001808 @setvar! TravelCooldownActive 01809 clearsysmsg 1810 replay 1811 elseif insysmsg "must wait 5"1812 if EnableOverheadMessages = 11813 overhead "I'm tired from travelling..." 20861814 wait 1500 1815 overhead "Just give me a few more seconds to recover!" 20861816 endif1817 cooldown "Travel" 50001818 settimer "TravelTimer" 550001819 @setvar! TravelCooldownActive 01820 clearsysmsg 1821 replay 1822 elseif insysmsg "must wait 4"1823 if EnableOverheadMessages = 11824 overhead "I'm tired from travelling..." 20861825 wait 1500 1826 overhead "Just give me a few more seconds to recover!" 20861827 endif1828 cooldown "Travel" 40001829 settimer "TravelTimer" 560001830 @setvar! TravelCooldownActive 01831 clearsysmsg 1832 replay 1833 elseif insysmsg "must wait 3"1834 if EnableOverheadMessages = 11835 overhead "I'm tired from travelling..." 20861836 wait 1500 1837 overhead "Just give me a few more seconds to recover!" 20861838 endif1839 cooldown "Travel" 30001840 settimer "TravelTimer" 570001841 @setvar! TravelCooldownActive 01842 clearsysmsg 1843 replay 1844 elseif insysmsg "must wait 2"1845 if EnableOverheadMessages = 11846 overhead "I'm tired from travelling..." 20861847 wait 1500 1848 overhead "Just give me a couple more seconds to recover!" 20861849 endif1850 cooldown "Travel" 20001851 settimer "TravelTimer" 580001852 @setvar! TravelCooldownActive 01853 clearsysmsg 1854 replay 1855 elseif insysmsg "must wait 1"1856 if EnableOverheadMessages = 11857 overhead "I'm tired from travelling..." 20861858 wait 1500 1859 overhead "Just give me a second to recover!" 20861860 endif1861 cooldown "Travel" 10001862 settimer "TravelTimer" 590001863 @setvar! TravelCooldownActive 01864 clearsysmsg 1865 replay 1866 else 1867 @setvar! TravelCooldownActive 01868 clearsysmsg 1869 replay 1870 endif 1871 endwhile1872 1873 1874 /////////////////////////1875 // AUTO RECALL LOOP: //1876 /////////////////////////1877 1878 if TimeToGo = 11879 1880 settimer "TargetTimer" 01881 settimer "NoTargetTimer" 01882 settimer "InventoryTimer" 35001883 settimer ""ManaTimer" 35001884 1885 if EnableAutoRedRecall = 1 and RedTargetFound = 1 and DungeonMode = 01886 @setvar! MurdererFound 1 1887 if EnableDIYRecallScript = 11888 @setvar! RedTargetFound 0 1889 foreach RecallScript in DIYRecallScriptList1890 script RecallScript1891 endfor1892 else1893 while mana < 111894 if timer "ManaTimer" > 3500 and EnableOverheadMessages = 11895 overhead "[ MOVE!! ]" 121896 settimer "ManaTimer" 01897 endif 1898 wait 5001899 endwhile1900 @setvar! RECALLTIME 11901 endif 1902 elseif EnableTrackingAutoRecall = 1 and RedTargetFound = 1 and DungeonMode = 01903 @setvar! MurdererFound 1 1904 if EnableDIYRecallScript = 11905 @setvar! RedTargetFound 0 1906 foreach RecallScript in DIYRecallScriptList1907 script RecallScript1908 endfor1909 else1910 while mana < 111911 if timer "ManaTimer" > 3500 and EnableOverheadMessages = 11912 overhead "[ MOVE!! ]" 121913 settimer "ManaTimer" 01914 endif 1915 wait 5001916 endwhile1917 @setvar! RECALLTIME 11918 endif 1919 elseif EnableRecallAfterDungeonGate = 1 and DungeonGateThenTimeToGo = 1 1920 if EnableDIYRecallScript = 11921 @setvar! DungeonGateThenTimeToGo 01922 foreach RecallScript in DIYRecallScriptList1923 script RecallScript1924 endfor1925 else1926 while mana < 111927 if timer "ManaTimer" > 3500 and EnableOverheadMessages = 11928 overhead "*waiting for mana...*" 121929 settimer "ManaTimer" 01930 endif 1931 wait 5001932 endwhile1933 if EnableOverheadMessages = 11934 overhead "[ AUTO RECALL! ]" 881935 wait 10001936 endif1937 @setvar! DungeonGateThenTimeToGo 01938 @setvar! TimeToGo 01939 @setvar! RECALLTIME 11940 endif1941 elseif EnableRecallAfterRessurection = 1 and ResThenTimeToGo = 11942 if EnableDIYRecallScript = 11943 @setvar! ResThenTimeToGo 01944 foreach RecallScript in DIYRecallScriptList1945 script RecallScript1946 endfor1947 else1948 while mana < 111949 if timer "ManaTimer" > 3500 and EnableOverheadMessages = 11950 overhead "*waiting for mana...*" 121951 settimer "ManaTimer" 01952 endif 1953 wait 5001954 endwhile1955 if EnableOverheadMessages = 11956 overhead "[ AUTO RECALL! ]" 881957 wait 10001958 endif1959 @setvar! ResThenTimeToGo 01960 @setvar! RECALLTIME 11961 endif1962 elseif warmode and DungeonMode = 11963 if EnableAutoRedDungeonGate = 1 or EnableAutoWeightDungeonGate = 1 or EnableWarModeDungeonGate = 11964 settimer "TargetTimer" 35001965 1966 if RedTargetFound = 1 and timer "TargetTimer" > 3500 and EnableRedAlertOverhead = 11967 overhead "[ !! RED ALERT !! ]" 37 1968 settimer "TargetTimer" 01969 @setvar! MurdererFound 0 1970 endif1971 1972 settimer "NoTargetTimer" 3500 1973 if not timerexists "Dungeon Escape"1974 createtimer "Dungeon Escape"1975 settimer "Dungeon Escape" 01976 endif 1977 settimer "Dungeon Escape" 01978 wait 5001979 1980 while timer "Dungeon Escape" < 1200001981 if EnablePKradar = 1 and skill 'Tracking' < 501982 if not timerexists "PK Radar" 1983 createtimer "PK Radar"1984 settimer "PK Radar" 01985 endif 1986 1987 if timer "PK Radar" > 10001988 clearsysmsg1989 hotkey 'Next Murderer Player Target'1990 wait 2501991 if insysmsg "No one matching that was found"1992 if not timerexists "EscapeTimer"1993 createtimer "EscapeTimer"1994 settimer "EscapeTimer" 1200001995 else 1996 settimer "EscapeTimer" 1200001997 endif1998 if EnableOverheadMessages = 1 and timer "EscapeTimer" > 1200001999 overhead "[ GATE ESCAPE! ]" 882000 settimer "EscapeTimer" 02001 endif 2002 settimer "PK Radar" 02003 clearsysmsg2004 else2005 if EnableRedAlertOverhead = 1 and timer "TargetTimer" > 35002006 overhead "[ !! RED ALERT !! ]" 372007 settimer "TargetTimer" 02008 @setvar! MurdererTarget lasttarget2009 endif 2010 endif 2011 endif2012 endif 2013 2014 if skill 'Healing' > 302015 if counttype 'clean bandage%s%' = 0 2016 if EnableOverheadMessages = 1 and timer "InventoryTimer" > 35002017 overhead "[ NO BANDAGES! ]" 3372018 settimer "InventoryTimer" 02019 endif2020 endif 2021 if not bandaging 2022 if hp < maxhp or poisoned or findbuff "bleed" or findbuff "disease" 2023 if counttype 'clean bandage%s%' < 10 2024 if EnableOverheadMessages = 1 and timer "InventoryTimer" > 35002025 overhead "[ BANDAGES LOW! ]" 3392026 settimer "InventoryTimer" 02027 endif2028 hotkey "Bandage Self"2029 else2030 if EnableOverheadMessages = 12031 overhead '[ BANDAGING... ]' 882032 endif2033 hotkey "Bandage Self"2034 wait 5002035 endif 2036 endif 2037 endif2038 endif2039 2040 if EnableHealPotion = 1 or EnableHealPotion = 22041 if diffhits > HealPotHPdiff and timer "HealingPotionTimer" > HealingPotionCooldown2042 if findtype "Yellow Potion" self as healpot2043 dclick healpot2044 wait 7502045 if insysmsg "Potion satchel used"2046 if EnableOverheadMessages = 1 2047 overhead "*drinking free heal potion...*" 2532048 endif2049 clearsysmsg2050 else 2051 if EnableOverheadMessages = 1 2052 overhead '*drinking heal potion...*' 2532053 endif2054 clearsysmsg2055 endif2056 settimer "HealingPotionTimer" 02057 cooldown "Healing Potion" HealingPotionCooldown2058 else 2059 if timer "InventoryTimer" > 60002060 if EnableOverheadMessages = 1 2061 overhead '[ NO HEAL POTS! ]' 3372062 endif2063 settimer "InventoryTimer" 02064 endif2065 endif2066 wait 500 2067 endif2068 endif 2069 2070 if EnableCurePotion = 1 or EnableCurePotion = 22071 if poisoned and timer "CurePotionTimer" > CurePotionCooldown2072 if findtype "Orange Potion" self as curepot2073 dclick curepot2074 wait 5002075 if insysmsg "Potion satchel used"2076 if EnableOverheadMessages = 1 2077 overhead "*drinking free cure potion...*" 442078 endif2079 clearsysmsg2080 else 2081 if EnableOverheadMessages = 1 2082 overhead '*drinking cure potion...*' 442083 endif2084 clearsysmsg2085 endif2086 settimer "CurePotionTimer" 02087 cooldown "Cure Potion" CurePotionCooldown2088 else2089 if timer "InventoryTimer" > 60002090 if EnableOverheadMessages = 1 2091 overhead '[ NO CURE POTS! ]' 3372092 endif2093 settimer "InventoryTimer" 02094 endif2095 endif2096 wait 500 2097 endif2098 endif 2099 2100 if EnableRefreshPotion = 1 or EnableRefreshPotion = 22101 if diffstam >= RefreshPotSPdiff and timer "RefreshPotionTimer" > RefreshPotionCooldown2102 if findtype "Red Potion" self as refreshpot2103 dclick refreshpot2104 wait 5002105 if insysmsg "Potion satchel used"2106 if EnableOverheadMessages = 1 2107 overhead "*drinking free refresh potion...*" 342108 endif2109 clearsysmsg2110 else 2111 if EnableOverheadMessages = 1 2112 overhead '*drinking refresh potion...*' 342113 endif2114 clearsysmsg2115 endif2116 settimer "RefreshPotionTimer" 02117 cooldown "Refresh Potion" RefreshPotionCooldown2118 else 2119 if timer "InventoryTimer" > 60002120 if EnableOverheadMessages = 1 2121 overhead '[ NO REFRESH POTS! ]' 3372122 endif2123 settimer "InventoryTimer" 02124 endif2125 endif2126 wait 500 2127 endif2128 endif 2129 2130 if EnableAutoParalyzePouch = 12131 if paralyzed2132 if findtype "pouch" self2133 yell "[pouch"2134 @setvar! TimeToGo 12135 @setvar! RedTargetFound 12136 replay2137 else2138 if EnableOverheadMessages = 12139 overhead "[ NO MORE POUCHES! ]" 3372140 endif2141 endif2142 endif2143 endif2144 2145 if EnableDropGoldWhenOverweight = 12146 while weight > maxweight 2147 if timer "InventoryTimer" > 3500 and EnableOverheadMessages = 12148 overhead "[ OVERWEIGHT! ]" 37 2149 settimer "InventoryTimer" 02150 endif 2151 if findtype "gold coin" backpack as easygo2152 lift easygo DropGoldAmount2153 droprelloc 0 02154 wait 5002155 if insysmsg "cannot drop anything"2156 drop backpack -1 -1 -12157 endif2158 if not timerexists "Gold Vacuum"2159 createtimer "Gold Vacuum"2160 endif 2161 settimer "Gold Vacuum" 02162 else2163 if timer "InventoryTimer" > 3500 and EnableOverheadMessages = 12164 overhead "[ OVERWEIGHT! ]" 37 2165 settimer "InventoryTimer" 02166 endif 2167 endif2168 endwhile 2169 endif 2170 2171 if not warmode2172 if EnableOverheadMessages = 12173 overhead "[ ESCAPE CANCELLED! ]" 882174 else 2175 overhead " � " 882176 endif2177 replay2178 endif 2179 2180 while not gumpexists 3899019871 and findtype "blue moongate" ground 0 1 2 as EscapeGate2181 dclick EscapeGate2182 endwhile2183 2184 if gumpexists 3899019871 and findtype "blue moongate" ground 0 1 2 as EscapeGate2185 while gumpexists 3899019871 and findtype "blue moongate" ground 0 1 2 as EscapeGate2186 gumpresponse 2 38990198712187 wait 2002188 endwhile2189 wait 15002190 @setvar! TimeToGo 02191 if EnableDIYRecallScript = 12192 foreach RecallScript in DIYRecallScriptList2193 script RecallScript2194 endfor2195 else 2196 @setvar! TimeToGo 12197 @setvar! DungeonGateThenTimeToGo 12198 replay2199 endif2200 endif2201 2202 while not gumpexists 3899019871 and findtype 30528 ground 2091 1 1 as EscapeGate2203 dclick EscapeGate2204 endwhile2205 2206 if gumpexists 3899019871 and findtype 30528 ground 2091 1 1 as EscapeGate2207 while gumpexists 3899019871 and findtype 30528 ground 2091 1 1 as EscapeGate2208 gumpresponse 2 38990198712209 wait 2002210 endwhile2211 @setvar! TimeToGo 02212 if EnableDIYRecallScript = 12213 foreach RecallScript in DIYRecallScriptList2214 script RecallScript2215 endfor2216 else 2217 @setvar! TimeToGo 12218 @setvar! DungeonGateThenTimeToGo 12219 replay2220 endif2221 endif2222 2223 while not gumpexists 3773199800 and findtype "blue moongate" ground -1 1 2 as EscapeGate2224 dclick EscapeGate2225 endwhile2226 2227 if gumpexists 3773199800 and findtype "blue moongate" ground -1 1 2 as EscapeGate2228 while gumpexists 3773199800 and findtype "blue moongate" ground -1 1 2 as EscapeGate2229 gumpresponse 2 37731998002230 wait 2002231 endwhile2232 wait 15002233 @setvar! TimeToGo 02234 if EnableDIYRecallScript = 12235 foreach RecallScript in DIYRecallScriptList2236 script RecallScript2237 endfor2238 else 2239 @setvar! TimeToGo 12240 @setvar! DungeonGateThenTimeToGo 12241 replay2242 endif2243 endif2244 2245 while not gumpexists 3899019871 and findtype "moongate" ground -1 -1 2 as EscapeGate2246 dclick EscapeGate2247 endwhile2248 2249 if gumpexists 3899019871 and findtype "moongate" ground -1 -1 2 as EscapeGate2250 while gumpexists 3899019871 and findtype "moongate" ground -1 -1 2 as EscapeGate2251 gumpresponse 2 38990198712252 wait 2002253 endwhile2254 wait 15002255 @setvar! TimeToGo 02256 if EnableDIYRecallScript = 12257 foreach RecallScript in DIYRecallScriptList2258 script RecallScript2259 endfor2260 else 2261 @setvar! TimeToGo 12262 @setvar! DungeonGateThenTimeToGo 12263 replay2264 endif2265 endif2266 2267 if findtype "moongate" ground -1 1 12 or findtype "blue moongate" ground -1 1 12 as EscapeGate2268 if timer "TargetTimer" > 3500 2269 if EnableOverheadMessages = 1 2270 overhead "[ GET CLOSER! ]" 692271 else 2272 overhead " � " 692273 endif2274 settimer "TargetTimer" 02275 endif2276 if timer "NoTargetTimer" > 3500 2277 overhead " � " 253 EscapeGate2278 settimer "NoTargetTimer" 02279 endif2280 else 2281 if timer "TargetTimer" > 35002282 if EnableOverheadMessages = 1 2283 overhead "[ GET TO A GATE... ]" 2532284 else2285 overhead " � " 2532286 endif2287 settimer "TargetTimer" 02288 endif 2289 endif2290 endwhile2291 endif 2292 endif 2293 2294 if RECALLTIME = 12295 if skill "Magery" >= 60 and EnableCastRecall = 12296 cast "Recall"2297 while casting2298 wait 1002299 endwhile 2300 if CasttoRunebook = 12301 if skill "Lockpicking" > 502302 target dungeoncrawler_runebook 2303 elseif skill "Fishing" > 50 2304 target fishing_runebook 2305 elseif skill "Mining" > 502306 target mining_runebook2307 elseif skill "Lumberjacking" > 50 2308 target lumber_runebook 2309 endif 2310 elseif CasttoRune = 12311 if skill "Lockpicking" > 502312 target dungeoncrawler_rune 2313 elseif skill "Fishing" > 50 2314 target fishing_rune 2315 elseif skill "Mining" > 502316 target mining_rune2317 elseif skill "Lumberjacking" > 50 2318 target lumber_rune 2319 endif 2320 endif 2321 wait 10002322 for 52323 wait 5002324 if insysmsg 'Your concentration is disturbed'2325 if diffhits > 25 timer "HealingPotionTimer" > HealingPotionCooldown2326 if findtype "Yellow Potion" self as healpot2327 dclick healpot2328 wait 7502329 cooldown "Healing Potion" HealingPotionCooldown2330 endif2331 endif2332 2333 if poisoned and timer "CurePotionTimer" > CurePotionCooldown2334 if findtype "Orange Potion" self as curepot2335 dclick curepot2336 wait 5002337 cooldown "Cure Potion" CurePotionCooldown2338 endif2339 endif2340 clearsysmsg2341 overhead '[ INTERUPTED! ]' 1532342 cast "Recall"2343 while casting 2344 wait 1002345 endwhile2346 if CasttoRunebook = 12347 if skill "Lockpicking" > 502348 target dungeoncrawler_runebook 2349 elseif skill "Fishing" > 50 2350 target fishing_runebook 2351 elseif skill "Mining" > 502352 target mining_runebook2353 elseif skill "Lumberjacking" > 50 2354 target lumber_runebook 2355 endif 2356 elseif CasttoRune = 12357 if skill "Lockpicking" > 502358 target dungeoncrawler_rune 2359 elseif skill "Fishing" > 50 2360 target fishing_rune 2361 elseif skill "Mining" > 502362 target mining_rune2363 elseif skill "Lumberjacking" > 50 2364 target lumber_rune 2365 endif 2366 endif2367 if insysmsg 'Your concentration is disturbed'2368 wait 10002369 else 2370 break2371 endif 2372 endif2373 endfor2374 else2375 if skill "Lockpicking" > 502376 dclick dungeoncrawler_runebook2377 elseif skill "Fishing" > 502378 dclick fishing_runebook 2379 elseif skill "Mining" > 502380 dclick mining_runebook2381 elseif skill "Lumberjacking" > 50 2382 dclick lumber_runebook2383 endif 2384 waitforgump 1551740969 2385 gumpresponse 22386 wait 1000 2387 for 52388 wait 5002389 if insysmsg 'Your concentration is disturbed'2390 if diffhits > 25 and timer "HealingPotionTimer" > HealingPotionCooldown2391 if findtype "Yellow Potion" self as healpot2392 dclick healpot2393 wait 7502394 cooldown "Healing Potion" HealingPotionCooldown2395 endif2396 endif2397 2398 if poisoned and timer "CurePotionTimer" > CurePotionCooldown2399 if findtype "Orange Potion" self as curepot2400 dclick curepot2401 wait 5002402 cooldown "Cure Potion" CurePotionCooldown2403 endif2404 endif2405 clearsysmsg2406 overhead '[ INTERUPTED! ]' 1532407 if skill "Lockpicking" > 502408 dclick dungeoncrawler_runebook2409 elseif skill "Fishing" > 502410 dclick fishing_runebook 2411 elseif skill "Mining" > 502412 dclick mining_runebook2413 elseif skill "Lumberjacking" > 502414 dclick lumber_runebook2415 endif 2416 clearsysmsg2417 waitforgump 1551740969 2418 gumpresponse 22419 wait 1000 2420 clearsysmsg 2421 endif 2422 endfor2423 endif2424 2425 wait 25002426 2427 if OutsideHouseRecall = 12428 wait 20002429 if find MyDoor ground -1 -1 2 and EnableCloseMyDoor = 12430 dclick MyDoor 2431 overhead "*door slams!*" 0 MyDoor2432 wait 10002433 endif2434 wait 25002435 elseif OwnerInnRecall = 12436 wait 5002437 say "Innkeeper, I need a room!"2438 waitforgump 23938324112439 gumpresponse 42440 wait 15002441 elseif CoOwnerInnRecall = 12442 wait 5002443 say "Innkeeper, I need a room!"2444 waitforgump 23938324112445 gumpresponse 52446 wait 5002447 gumpresponse 1002448 wait 15002449 elseif InsideHouseRecall = 12450 wait 5002451 elseif BankRecall = 12452 say "Open my bank!"2453 wait 10002454 else 2455 wait 5002456 endif2457 2458 if HideAtHomeorInn = 12459 useskill "Hiding"2460 endif2461 2462 clearignore 2463 @setvar! RECALLTIME 02464 2465 if EnableWeaponCheck = 1 and DEAD != 12466 if skill 'Swordsmanship' >= 50 2467 if not findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' self 2468 overhead "[ NO WEAPON! ]" 3372469 else2470 if not findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' hand 2471 if findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' backpack as weapon2472 for 102473 getlabel weapon WeaponLabel2474 wait 5002475 if "aspect" in WeaponLabel2476 break2477 else2478 @ignore weapon2479 wait 1502480 if findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' backpack as weapon2481 getlabel weapon WeaponLabel2482 endif2483 endif 2484 endfor 2485 wait 1502486 dclick weapon2487 wait 5002488 endif 2489 endif2490 endif2491 elseif skill 'Mace Fighting' >= 50 2492 if not findtype '3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182' self2493 overhead "[ NO WEAPON! ]" 3372494 else2495 if not findtype '3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182' hand 2496 if findtype '3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182' backpack as weapon2497 for 102498 getlabel weapon WeaponLabel2499 wait 5002500 if "aspect" in WeaponLabel2501 break2502 else2503 @ignore weapon2504 wait 1502505 if findtype '3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182' backpack as weapon2506 getlabel weapon WeaponLabel2507 endif2508 endif 2509 endfor 2510 wait 1502511 dclick weapon2512 wait 5002513 endif 2514 endif2515 endif2516 elseif skill "Magery" >= 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook2517 getlabel myspellbook SpellbookLabel2518 for 52519 wait 5002520 if "aspect" in SpellbookLabel2521 break2522 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 2523 @ignore myspellbook 2524 wait 2502525 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook2526 getlabel myspellbook SpellbookLabel2527 else 2528 overhead "[ NO SPELLBOOK! ]" 3372529 break2530 endif2531 endif 2532 endfor2533 dclick myspellbook2534 endif2535 2536 if MurdererFound = 1 2537 if EnableOverheadMessages = 12538 overhead "Whew! I think we got away..." 20862539 endif2540 wait 15002541 @setvar! MurdererFound 0 2542 if not varexist GuardHomeComment 2543 @setvar! GuardHomeComment 12544 endif2545 if EnableOverheadMessages = 12546 if EnableSummons = 1 and GuardHomeComment = 1 and followers >= 12547 wait 15002548 overhead "Yes Master, that was a close one..." 44 myMainTankPet2549 menu myMainTankPet 32550 clearsysmsg 2551 @setvar! GuardHomeComment 22552 wait 5002553 elseif EnableSummons = 1 and GuardHomeComment = 2 and followers >= 12554 wait 15002555 overhead "Yes Master, your script is truly God-like..." 44 myMainTankPet2556 menu myMainTankPet 32557 clearsysmsg 2558 @setvar! GuardHomeComment 32559 wait 5002560 elseif EnableSummons = 1 and GuardHomeComment = 3 and followers >= 12561 wait 15002562 overhead "Yes Master, these red humans are quite annoying..." 44 myMainTankPet2563 menu myMainTankPet 32564 clearsysmsg 2565 @setvar! GuardHomeComment 42566 wait 5002567 elseif EnableSummons = 1 and GuardHomeComment = 4 and followers >= 12568 wait 15002569 overhead "I think we could have taken them..." 44 myMainTankPet2570 menu myMainTankPet 32571 clearsysmsg 2572 @setvar! GuardHomeComment 52573 wait 5002574 elseif EnableSummons = 1 and GuardHomeComment = 5 and followers >= 12575 wait 15002576 overhead "I've worked for that human before... total prick..." 44 myMainTankPet2577 menu myMainTankPet 32578 clearsysmsg 2579 @setvar! GuardHomeComment 62580 wait 5002581 elseif EnableSummons = 1 and GuardHomeComment = 6 and followers >= 12582 wait 15002583 overhead "I don't think tonight is our night, Master.." 44 myMainTankPet2584 menu myMainTankPet 32585 clearsysmsg 2586 @setvar! GuardHomeComment 12587 wait 5002588 endif2589 endif 2590 endif 2591 2592 if OpenIngotBag = 1 2593 dclick IngotBag2594 wait 5002595 endif2596 2597 if OpenBoardBag = 1 2598 wait 5002599 dclick BoardBag2600 wait 5002601 endif 2602 2603 if findtype "wooden box" backpack as LootBox2604 if findtype "copper key" backpack as LootKey2605 getlabel LootBox LootBoxLabel2606 if "items" in LootBoxLabel2607 // Do nothing2608 else2609 dclick LootKey2610 wft 10002611 target LootBox2612 overhead "[lockbox opened]" 69 LootBox2613 wait 7502614 dclick LootBox2615 wait 5002616 endif2617 else 2618 if EnableOverheadMessages = 12619 overhead "I lost my lockbox key!" 20862620 else 2621 overhead "[ NO LOCKBOX KEY ]" 3372622 endif2623 endif2624 endif2625 2626 while findtype "iron ore" backpack as ore2627 if findtype "forge" ground -1 -1 2 as forge or findtype 0x0FB1 ground -1 -1 2 as forge2628 if EnableOverheadMessages = 12629 overhead "*smelting ore...*" 2114 forge2630 endif2631 dclick ore2632 if EnableOverheadMessages = 12633 overhead "*forging ingots...*" 21172634 endif2635 wait 5002636 endif 2637 endwhile 2638 2639 while findtype 'log%s' backpack and LogsToBoards = 1 2640 wait 5002641 overhead '*making boards...*' 02642 dclicktype 'log%s' 2643 wait 5002644 if SetBoardBagtoOrganizer01 = 12645 hotkey 'Organizer Agent-01'2646 endif 2647 wait 10002648 endwhile 2649 2650 if EnableLootBag = 12651 dclick LootBag2652 wait 5002653 endif2654 2655 if EnableLootChest = 12656 wait 5002657 dclick LootChest2658 wait 5002659 endif2660 2661 if PutLootinLockBox = 12662 if findtype "wooden box" backpack as LootBox2663 if findtype "copper key" backpack as LootKey2664 getlabel LootBox LootBoxLabel2665 if "items" in LootBoxLabel2666 // Do nothing2667 else2668 dclick LootKey2669 wft 10002670 target LootBox2671 overhead "[lockbox opened]" 692672 wait 7502673 dclick LootBox2674 endif2675 else 2676 if EnableOverheadMessages = 12677 overhead "I lost my lockbox key!" 20862678 else 2679 overhead "[ NO LOCKBOX KEY ]" 3372680 endif2681 endif2682 endif2683 endif2684 2685 if EnableSafeDeposit = 12686 if findtype "bank deposit safe" ground -1 -1 2 as safe2687 while findtype "gold coin" backpack as gold2688 lift gold 600002689 if EnableOverheadMessages = 12690 overhead "*depositing gold..." 1492691 else 2692 overhead " � " 1492693 endif 2694 drop safe -1 -1 -12695 wait 15002696 endwhile2697 while findtype 2539 backpack as dubs2698 if EnableOverheadMessages = 12699 overhead "depositing dubs..." 1492700 else 2701 overhead " � " 1492702 endif 2703 lift dubs 600002704 drop safe -1 -1 -12705 wait 15002706 endwhile2707 else2708 overhead "[ NO BANK SAFE FOUND ]" 3372709 wait 15002710 endif2711 endif 2712 2713 if EnableResourceStockpile = 12714 if findtype "resource container" ground -1 -1 2 as resource2715 menu resource 02716 wft 5002717 target self2718 if EnableOverheadMessages = 12719 overhead "*piling resources...*" 842720 else 2721 overhead " � " 842722 endif 2723 wait 15002724 else2725 overhead "[ NO RESOURCE STOCKPILE FOUND ]" 3372726 wait 15002727 endif2728 endif 2729 2730 if EnableRepairBench = 1 2731 if findtype "repair bench" ground -1 -1 3 as RepairBench2732 clearsysmsg 2733 dclick RepairBench2734 wait 5002735 if insysmsg "You do not have any items equipped or in your backpack in need of repairs."2736 if EnableOverheadMessages = 12737 overhead "[ NOTHING TO REPAIR! ]" 02738 endif 2739 wait 15002740 else2741 if EnableOverheadMessages = 12742 overhead "*repairing equipment...*" 3392743 else 2744 overhead " � " 3392745 endif 2746 settimer RepairTimer 02747 while timer RepairTimer <= 5000 2748 if insysmsg "Repair"2749 break2750 endif2751 endwhile2752 if EnableOverheadMessages = 12753 overhead "[ ITEMS REPAIRED! ]" 02754 wait 5002755 overhead "Repair took: {{RepairTimer}}ms" 772756 else 2757 overhead " � " 02758 endif 2759 removetimer RepairTimer2760 wait 5002761 endif2762 else2763 overhead "[ NO REPAIR BENCH FOUND ]" 3372764 wait 15002765 endif2766 endif 2767 2768 if EnableMagicRecycler = 12769 if findtype "ornate elven chest|magic item recycler" ground -1 -1 2 as recycler2770 for 22771 getlabel recycler recyclerdesc2772 if "(125 items" in recyclerdesc2773 dclick recycler2774 waitforgump 40451111012775 gumpresponse 72776 waitforgump 40451111012777 gumpresponse 62778 waitforgump 40451111012779 gumpresponse 62780 if EnableOverheadMessages = 12781 overhead "*recycling junk...*" 662782 else 2783 overhead " � " 662784 endif2785 wait 5002786 gumpclose 40451111012787 if findtype "resource container" ground -1 -1 2 as resource and EnableResourceStockpile = 12788 menu resource 02789 wft 15002790 target recycler2791 wait 10002792 if EnableOverheadMessages = 12793 overhead "*piling resources...*" 1122794 else 2795 overhead " � " 1122796 endif2797 wait 5002798 else2799 overhead "[ NO RESOURCE STOCKPILE FOUND ]" 3372800 endif2801 menu recycler 12802 wait 5002803 if insysmsg "0 recyclable"2804 break2805 else2806 if EnableOverheadMessages = 12807 overhead "*adding to recycler...*" 62808 else 2809 overhead " � " 62810 endif2811 wait 15002812 endif2813 break2814 else 2815 menu recycler 12816 wait 5002817 if insysmsg "0 recyclable"2818 if timer "InventoryTimer" > 3500 2819 if EnableOverheadMessages = 12820 overhead "[ NO MAGIC LOOT! ]" 62821 else 2822 overhead " � " 62823 endif2824 settimer "InventoryTimer" 02825 endif2826 break2827 else2828 if EnableOverheadMessages = 12829 overhead "*adding to recycler...*" 62830 else 2831 overhead " � " 62832 endif2833 settimer "InventoryTimer" 02834 wait 15002835 endif2836 endif2837 wait 5002838 endfor2839 else2840 overhead "[ NO MAGIC ITEM RECYCLER FOUND ]" 3372841 endif2842 endif 2843 2844 if EnableLootChest = 12845 dclick LootChest2846 if EnableOverheadMessages = 12847 overhead "*stashing loot...*" 692848 else 2849 overhead " � " 692850 endif 2851 wait 5002852 for 22853 hotkey "Organizer Agent-06"2854 wait 2502855 hotkey "Organizer Agent-07"2856 wait 2502857 hotkey "Organizer Agent-08"2858 wait 2502859 hotkey "Organizer Agent-09"2860 wait 2502861 endfor2862 while queued2863 wait 1002864 endwhile 2865 endif 2866 2867 if EnableStorageTomes = 12868 if findtype "book" ground -1 -1 2 as StorageTome or findtype "book" LootChest as StorageTome2869 while findtype "book" ground -1 -1 2 as StorageTome2870 menu StorageTome 02871 if EnableOverheadMessages = 1 and timer "InventoryTimer" > 3500 2872 overhead "*storing tome items...*" 21172873 settimer "InventoryTimer" 02874 elseif EnableOverheadMessages = 0 and timer "InventoryTimer" > 35002875 overhead " � " 21172876 settimer "InventoryTimer" 02877 endif2878 wait 250 2879 @ignore StorageTome2880 endwhile2881 while findtype "book" LootChest as StorageTome2882 menu StorageTome 02883 if EnableOverheadMessages = 1 and timer "InventoryTimer" > 3500 2884 overhead "*storing tome items...*" 21172885 settimer "InventoryTimer" 02886 elseif EnableOverheadMessages = 0 and timer "InventoryTimer" > 35002887 overhead " � " 21172888 settimer "InventoryTimer" 02889 endif2890 wait 250 2891 @ignore StorageTome2892 endwhile2893 @clearignore 2894 else2895 overhead "[ NO STORAGE TOMES FOUND ]" 3372896 wait 15002897 endif2898 endif2899 2900 if EnableStorageShelf = 12901 if findtype "storage shelf" ground -1 -1 2 as shelf2902 if DEAD != 12903 menu shelf 02904 wft 5002905 target self2906 if EnableOverheadMessages = 12907 overhead "*storing goods...*" 21142908 else 2909 overhead " � " 21142910 endif 2911 wait 5002912 gumpclose 32328259652913 wait 10002914 endif 2915 menu shelf 12916 if EnableOverheadMessages = 12917 overhead "*resupplying...*" 932918 wait 5002919 else 2920 overhead " � " 932921 endif 2922 wait 10002923 else2924 overhead "[ NO STORAGE SHELF FOUND ]" 3372925 wait 15002926 endif2927 endif 2928 2929 if EnableReagentSplitter = 12930 // This section uses a Reg Splitter script I adapted from dennozz' script found here: https://outlands.uorazorscripts.com/script/d8f50c97-3d9c-468b-9114-0a0623003e19 // 2931 if findtype "reagent satchel" self as MyWizardBag 2932 sysmsg "Disable 'EnableReagentSplitter' in script variables to turn off this feature!" 0 2933 dclick MyWizardBag2934 overhead "*splitting reagents...*" 1112935 @setvar! amount 02936 @setvar! regsID 39812937 @setvar! myCounter 02938 while findtype regsID self as r 2939 @setvar! myCounter index2940 @ignore r2941 endwhile 2942 @clearignore2943 if counttype regsID self <= 152944 @setvar! amount 22945 elseif counttype regsID self <= 302946 @setvar! amount 4 2947 elseif counttype regsID self <= 502948 @setvar! amount 10 2949 elseif counttype regsID self <= 1002950 @setvar! amount 20 2951 elseif counttype regsID self <= 1502952 @setvar! amount 302953 elseif counttype regsID self <= 2002954 @setvar! amount 402955 else 2956 @setvar! amount 502957 endif2958 while findtype regsID self as regs2959 @setvar! moveRegs 0 2960 if myCounter = 02961 @setvar! moveRegs 12962 elseif myCounter != 0 and not find regs MyWizardBag2963 @setvar! moveRegs 12964 endif 2965 if moveRegs = 1 2966 if index = 02967 lift regs amount2968 drop MyWizardBag 44 65 0 2969 wait 150 2970 elseif index = 12971 lift regs amount2972 drop MyWizardBag 68 65 0 2973 wait 150 2974 elseif index = 22975 lift regs amount2976 drop MyWizardBag 96 65 0 2977 wait 150 2978 elseif index = 32979 lift regs amount2980 drop MyWizardBag 121 65 0 2981 wait 150 2982 else2983 lift regs amount2984 drop MyWizardBag 142 65 0 2985 wait 150 2986 endif2987 endif 2988 @ignore regs 2989 if moveRegs = 12990 wait 5002991 endif2992 endwhile2993 @setvar! regsID 39622994 @setvar! myCounter 02995 while findtype regsID self as r 2996 @setvar! myCounter index2997 @ignore r2998 endwhile2999 @clearignore3000 if counttype regsID self <= 103001 @setvar! amount 23002 elseif counttype regsID self <= 203003 @setvar! amount 4 3004 elseif counttype regsID self <= 503005 @setvar! amount 10 3006 elseif counttype regsID self <= 1003007 @setvar! amount 20 3008 elseif counttype regsID self <= 1503009 @setvar! amount 303010 elseif counttype regsID self <= 2003011 @setvar! amount 403012 else 3013 @setvar! amount 503014 endif3015 while findtype regsID self as regs3016 @setvar! moveRegs 0 3017 if myCounter = 03018 @setvar! moveRegs 13019 elseif myCounter != 0 and not find regs MyWizardBag3020 @setvar! moveRegs 13021 endif3022 if moveRegs = 1 3023 if index = 03024 lift regs amount3025 drop MyWizardBag 44 76 0 3026 wait 150 3027 elseif index = 13028 lift regs amount3029 drop MyWizardBag 68 76 0 3030 wait 150 3031 elseif index = 23032 lift regs amount3033 drop MyWizardBag 96 76 0 3034 wait 150 3035 elseif index = 33036 lift regs amount3037 drop MyWizardBag 121 76 0 3038 wait 150 3039 else3040 lift regs amount3041 drop MyWizardBag 142 76 0 3042 wait 150 3043 endif3044 endif 3045 @ignore regs 3046 if moveRegs = 13047 wait 5003048 endif3049 endwhile3050 @setvar! regsID 39763051 @setvar! myCounter 03052 while findtype regsID self as r 3053 @setvar! myCounter index3054 @ignore r3055 endwhile 3056 @clearignore3057 if counttype regsID self <= 103058 @setvar! amount 23059 elseif counttype regsID self <= 203060 @setvar! amount 4 3061 elseif counttype regsID self <= 503062 @setvar! amount 10 3063 elseif counttype regsID self <= 1003064 @setvar! amount 20 3065 elseif counttype regsID self <= 1503066 @setvar! amount 303067 elseif counttype regsID self <= 2003068 @setvar! amount 403069 else 3070 @setvar! amount 503071 endif3072 while findtype regsID self as regs3073 @setvar! moveRegs 0 3074 if myCounter = 03075 @setvar! moveRegs 13076 elseif myCounter != 0 and not find regs MyWizardBag3077 @setvar! moveRegs 13078 endif 3079 if moveRegs = 1 3080 if index = 03081 lift regs amount3082 drop MyWizardBag 44 88 0 3083 wait 150 3084 elseif index = 13085 lift regs amount3086 drop MyWizardBag 68 88 0 3087 wait 150 3088 elseif index = 23089 lift regs amount3090 drop MyWizardBag 96 88 0 3091 wait 150 3092 elseif index = 33093 lift regs amount3094 drop MyWizardBag 121 88 0 3095 wait 150 3096 else3097 lift regs amount3098 drop MyWizardBag 142 88 0 3099 wait 150 3100 endif3101 endif 3102 @ignore regs 3103 if moveRegs = 13104 wait 5003105 endif3106 endwhile3107 @setvar! regsID 39743108 @setvar! myCounter 03109 while findtype regsID self as r 3110 @setvar! myCounter index3111 @ignore r3112 endwhile 3113 @clearignore3114 if counttype regsID self <= 103115 @setvar! amount 23116 elseif counttype regsID self <= 203117 @setvar! amount 4 3118 elseif counttype regsID self <= 503119 @setvar! amount 10 3120 elseif counttype regsID self <= 1003121 @setvar! amount 20 3122 elseif counttype regsID self <= 1503123 @setvar! amount 303124 elseif counttype regsID self <= 2003125 @setvar! amount 403126 else 3127 @setvar! amount 503128 endif3129 while findtype regsID self as regs3130 @setvar! moveRegs 0 3131 if myCounter = 03132 @setvar! moveRegs 13133 elseif myCounter != 0 and not find regs MyWizardBag3134 @setvar! moveRegs 13135 endif 3136 if moveRegs = 1 3137 if index = 03138 lift regs amount3139 drop MyWizardBag 44 100 0 3140 wait 150 3141 elseif index = 13142 lift regs amount3143 drop MyWizardBag 68 100 0 3144 wait 150 3145 elseif index = 23146 lift regs amount3147 drop MyWizardBag 96 100 0 3148 wait 150 3149 elseif index = 33150 lift regs amount3151 drop MyWizardBag 121 100 0 3152 wait 150 3153 else3154 lift regs amount3155 drop MyWizardBag 142 100 0 3156 wait 150 3157 endif3158 endif 3159 @ignore regs 3160 if moveRegs = 13161 wait 5003162 endif3163 endwhile3164 @setvar! regsID 39803165 @setvar! myCounter 03166 while findtype regsID self as r 3167 @setvar! myCounter index3168 @ignore r3169 endwhile3170 @clearignore3171 if counttype regsID self <= 103172 @setvar! amount 23173 elseif counttype regsID self <= 203174 @setvar! amount 4 3175 elseif counttype regsID self <= 503176 @setvar! amount 10 3177 elseif counttype regsID self <= 1003178 @setvar! amount 20 3179 elseif counttype regsID self <= 1503180 @setvar! amount 303181 elseif counttype regsID self <= 2003182 @setvar! amount 403183 else 3184 @setvar! amount 503185 endif3186 while findtype regsID self as regs3187 @setvar! moveRegs 0 3188 if myCounter = 03189 @setvar! moveRegs 13190 elseif myCounter != 0 and not find regs MyWizardBag3191 @setvar! moveRegs 1 3192 endif 3193 if moveRegs = 1 3194 if index = 03195 lift regs amount3196 drop MyWizardBag 44 112 03197 wait 150 3198 elseif index = 1 3199 lift regs amount3200 drop MyWizardBag 68 112 0 3201 wait 150 3202 elseif index = 23203 lift regs amount3204 drop MyWizardBag 96 112 0 3205 wait 150 3206 elseif index = 33207 lift regs amount3208 drop MyWizardBag 121 112 0 3209 wait 150 3210 else3211 lift regs amount3212 drop MyWizardBag 142 112 0 3213 wait 150 3214 endif3215 endif 3216 @ignore regs 3217 if moveRegs = 13218 wait 5003219 endif3220 endwhile3221 @setvar! regsID 39733222 @setvar! myCounter 03223 while findtype regsID self as r 3224 @setvar! myCounter index3225 @ignore r3226 endwhile 3227 @clearignore3228 if counttype regsID self <= 103229 @setvar! amount 23230 elseif counttype regsID self <= 203231 @setvar! amount 4 3232 elseif counttype regsID self <= 503233 @setvar! amount 10 3234 elseif counttype regsID self <= 1003235 @setvar! amount 20 3236 elseif counttype regsID self <= 1503237 @setvar! amount 303238 elseif counttype regsID self <= 2003239 @setvar! amount 403240 else 3241 @setvar! amount 503242 endif3243 while findtype regsID self as regs3244 @setvar! moveRegs 0 3245 if myCounter = 03246 @setvar! moveRegs 13247 elseif myCounter != 0 and not find regs MyWizardBag3248 @setvar! moveRegs 13249 endif 3250 if moveRegs = 1 3251 if index = 03252 lift regs amount3253 drop MyWizardBag 44 124 0 3254 wait 150 3255 elseif index = 13256 lift regs amount3257 drop MyWizardBag 68 124 03258 wait 150 3259 elseif index = 23260 lift regs amount3261 drop MyWizardBag 96 124 0 3262 wait 150 3263 elseif index = 33264 lift regs amount3265 drop MyWizardBag 121 124 0 3266 wait 150 3267 else3268 lift regs amount3269 drop MyWizardBag 142 124 0 3270 wait 150 3271 endif3272 endif 3273 @ignore regs 3274 if moveRegs = 13275 wait 5003276 endif3277 endwhile3278 @setvar! regsID 39633279 @setvar! myCounter 03280 while findtype regsID self as r 3281 @setvar! myCounter index3282 @ignore r3283 endwhile 3284 @clearignore3285 if counttype regsID self <= 103286 @setvar! amount 23287 elseif counttype regsID self <= 203288 @setvar! amount 4 3289 elseif counttype regsID self <= 503290 @setvar! amount 10 3291 elseif counttype regsID self <= 1003292 @setvar! amount 20 3293 elseif counttype regsID self <= 1503294 @setvar! amount 303295 elseif counttype regsID self <= 2003296 @setvar! amount 403297 else 3298 @setvar! amount 503299 endif3300 while findtype regsID self as regs3301 @setvar! moveRegs 0 3302 if myCounter = 03303 @setvar! moveRegs 13304 elseif myCounter != 0 and not find regs MyWizardBag3305 @setvar! moveRegs 13306 endif 3307 if moveRegs = 1 3308 if index = 03309 lift regs amount3310 drop MyWizardBag 44 136 0 3311 wait 150 3312 elseif index = 13313 lift regs amount3314 drop MyWizardBag 68 136 0 3315 wait 150 3316 elseif index = 23317 lift regs amount3318 drop MyWizardBag 96 136 0 3319 wait 150 3320 elseif index = 33321 lift regs amount3322 drop MyWizardBag 121 136 0 3323 wait 150 3324 else3325 lift regs amount3326 drop MyWizardBag 142 136 0 3327 wait 150 3328 endif3329 endif 3330 @ignore regs 3331 if moveRegs = 13332 wait 5003333 endif3334 endwhile3335 @setvar! regsID 39723336 @setvar! myCounter 03337 while findtype regsID self as r 3338 @setvar! myCounter index3339 @ignore r3340 endwhile 3341 @clearignore3342 if counttype regsID self <= 103343 @setvar! amount 23344 elseif counttype regsID self <= 203345 @setvar! amount 4 3346 elseif counttype regsID self <= 503347 @setvar! amount 10 3348 elseif counttype regsID self <= 1003349 @setvar! amount 20 3350 elseif counttype regsID self <= 1503351 @setvar! amount 303352 elseif counttype regsID self <= 2003353 @setvar! amount 403354 else 3355 @setvar! amount 503356 endif3357 while findtype regsID self as regs3358 @setvar! moveRegs 0 3359 if myCounter = 03360 @setvar! moveRegs 13361 elseif myCounter != 0 and not find regs MyWizardBag3362 @setvar! moveRegs 13363 endif 3364 if moveRegs = 1 3365 if index = 03366 lift regs amount3367 drop MyWizardBag 44 148 0 3368 wait 150 3369 elseif index = 13370 lift regs amount3371 drop MyWizardBag 68 148 0 3372 wait 150 3373 elseif index = 23374 lift regs amount3375 drop MyWizardBag 96 148 0 3376 wait 150 3377 elseif index = 33378 lift regs amount3379 drop MyWizardBag 121 148 0 3380 wait 150 3381 else3382 lift regs amount3383 drop MyWizardBag 142 148 0 3384 wait 150 3385 endif3386 endif3387 @ignore regs 3388 if moveRegs = 13389 wait 5003390 endif3391 endwhile3392 @setvar! regsID 80123393 @setvar! myCounter 03394 while findtype regsID self as r 3395 @setvar! myCounter index3396 @ignore r3397 endwhile 3398 @clearignore3399 if counttype regsID self <= 53400 @setvar! amount 13401 elseif counttype regsID self <= 103402 @setvar! amount 2 3403 elseif counttype regsID self <= 203404 @setvar! amount 4 3405 elseif counttype regsID self <= 403406 @setvar! amount 8 3407 else 3408 @setvar! amount 153409 endif3410 while findtype regsID self as regs3411 @setvar! moveRegs 0 3412 if myCounter = 03413 @setvar! moveRegs 13414 elseif myCounter != 0 and not find regs MyWizardBag3415 @setvar! moveRegs 13416 endif3417 @ignore regs 3418 if moveRegs = 13419 wait 5003420 endif3421 endwhile3422 else 3423 overhead "[ NO WIZARD BAG! ]" 3373424 endif3425 endif3426 overhead "[ SCRIPT COMPLETE! ]" 843427 @setvar! DEAD 03428 @setvar! RedTargetFound 03429 @setvar! RECALLTIME 03430 @setvar! TimeToGo 0 3431 stop3432 endif 3433 endif3434 endif3435 3436 3437 //////////////////////////3438 // SCRIPT STARTS: //3439 //////////////////////////3440 3441 if insysmsg "Captcha successful" and EnableOverheadMessages = 13442 overhead "I guess you got the magic numbers correct??" 20863443 wait 15003444 if EnableSummons = 1 and followers >= 13445 wait 10003446 overhead "Umm... who are you speaking to, Master?" 44 myMainTankPet3447 menu myMainTankPet 33448 clearsysmsg3449 wait 10003450 overhead "Nevermind that... let's get back to work..." 20863451 else3452 overhead "Alright, let's harvest..." 20863453 clearsysmsg3454 endif3455 endif3456 3457 if EnableHealPotion = 1 or EnableHealPotion = 23458 if diffhits > HealPotHPdiff and timer "HealingPotionTimer" > HealingPotionCooldown3459 if findtype "Yellow Potion" self as healpot3460 dclick healpot3461 wait 7503462 if insysmsg "Potion satchel used"3463 if EnableOverheadMessages = 1 3464 overhead "*drinking free heal potion...*" 2533465 endif3466 clearsysmsg3467 else 3468 if EnableOverheadMessages = 1 3469 overhead '*drinking heal potion...*' 2533470 endif3471 clearsysmsg3472 endif3473 settimer "HealingPotionTimer" 03474 cooldown "Healing Potion" HealingPotionCooldown3475 else 3476 if timer "InventoryTimer" > 60003477 if EnableOverheadMessages = 1 3478 overhead '[ NO HEAL POTS! ]' 3373479 endif3480 settimer "InventoryTimer" 03481 endif3482 endif3483 wait 500 3484 endif3485 endif 3486 3487 if skill 'Healing' > 303488 if counttype 'clean bandage%s%' = 0 3489 if EnableOverheadMessages = 1 and timer "InventoryTimer" > 60003490 overhead "[ NO BANDAGES! ]" 3373491 settimer "InventoryTimer" 03492 endif3493 endif 3494 if not bandaging 3495 if hp < maxhp or poisoned or findbuff "bleed" or findbuff "disease" 3496 if counttype 'clean bandage%s%' < 10 3497 if EnableOverheadMessages = 1 and timer "InventoryTimer" > 60003498 overhead "[ BANDAGES LOW! ]" 3393499 settimer "InventoryTimer" 03500 endif3501 hotkey "Bandage Self" 3502 else3503 if EnableOverheadMessages = 13504 overhead '[ BANDAGING... ]' 883505 endif3506 hotkey "Bandage Self"3507 wait 5003508 endif 3509 endif 3510 endif3511 endif3512 3513 if EnableCurePotion = 1 or EnableCurePotion = 23514 if poisoned and timer "CurePotionTimer" > CurePotionCooldown3515 if findtype "Orange Potion" self as curepot3516 dclick curepot3517 wait 5003518 if insysmsg "Potion satchel used"3519 if EnableOverheadMessages = 1 3520 overhead "*drinking free cure potion...*" 443521 endif3522 clearsysmsg3523 else 3524 if EnableOverheadMessages = 1 3525 overhead '*drinking cure potion...*' 443526 endif3527 clearsysmsg3528 endif3529 settimer "CurePotionTimer" 03530 cooldown "Cure Potion" CurePotionCooldown3531 else3532 if timer "InventoryTimer" > 35003533 if EnableOverheadMessages = 1 3534 overhead '[ NO CURE POTS! ]' 3373535 endif3536 settimer "InventoryTimer" 03537 endif3538 endif3539 wait 500 3540 endif3541 endif 3542 3543 if EnableCastHeal = 13544 if skill 'Magery' >= 50 and diffhits > CastHealHPlowdiff and diffhits < CastHealHPhighdiff and mana >= 43545 if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook3546 getlabel myspellbook SpellbookLabel3547 for 53548 wait 2503549 if "aspect" in SpellbookLabel3550 break3551 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 3552 @ignore myspellbook 3553 wait 2503554 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook3555 getlabel myspellbook SpellbookLabel3556 else 3557 overhead "[ NO SPELLBOOK! ]" 3373558 break3559 endif3560 endif 3561 endfor3562 dclick myspellbook3563 wait 5003564 endif3565 cast 'Heal'3566 wait 1003567 while not casting 3568 if targetexists3569 hotkey 'cancel current target'3570 endif3571 cast 'Heal'3572 wait 1003573 endwhile 3574 wft 15003575 target 'self' 3576 wait 250 3577 elseif skill 'Magery' >= 60 and diffhits > CastHealHPhighdiff and mana >= 113578 if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook3579 getlabel myspellbook SpellbookLabel3580 for 53581 wait 2503582 if "aspect" in SpellbookLabel3583 break3584 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 3585 @ignore myspellbook 3586 wait 2503587 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook3588 getlabel myspellbook SpellbookLabel3589 else 3590 overhead "[ NO SPELLBOOK! ]" 3373591 break3592 endif3593 endif 3594 endfor3595 dclick myspellbook3596 wait 5003597 endif3598 cast 'Greater Heal'3599 wait 1003600 while not casting 3601 if targetexists3602 hotkey 'cancel current target'3603 endif3604 cast 'Greater Heal'3605 wait 1003606 endwhile 3607 wft 15003608 target 'self' 3609 wait 250 3610 endif3611 endif 3612 3613 if EnableCastCure = 13614 if poisoned and skill 'Magery' >= 40 and mana >= 63615 if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook3616 getlabel myspellbook SpellbookLabel3617 for 53618 wait 2503619 if "aspect" in SpellbookLabel3620 break3621 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 3622 @ignore myspellbook 3623 wait 2503624 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook3625 getlabel myspellbook SpellbookLabel3626 else 3627 overhead "[ NO SPELLBOOK! ]" 3373628 break3629 endif3630 endif 3631 endfor3632 dclick myspellbook3633 wait 5003634 endif3635 cast 'Cure'3636 wait 1003637 while not casting 3638 if targetexists3639 hotkey 'cancel current target'3640 endif3641 cast 'Cure' 3642 wait 1003643 endwhile 3644 wft 15003645 target 'self' 3646 wait 250 3647 endif 3648 endif3649 3650 if EnableRefreshPotion = 1 or EnableRefreshPotion = 23651 if diffstam >= RefreshPotSPdiff and timer "RefreshPotionTimer" > RefreshPotionCooldown3652 if findtype "Red Potion" self as refreshpot3653 dclick refreshpot3654 wait 5003655 if insysmsg "Potion satchel used"3656 if EnableOverheadMessages = 1 3657 overhead "*drinking free refresh potion...*" 343658 endif3659 clearsysmsg3660 else 3661 if EnableOverheadMessages = 1 3662 overhead '*drinking refresh potion...*' 343663 endif3664 clearsysmsg3665 endif3666 settimer "RefreshPotionTimer" 03667 cooldown "Refresh Potion" RefreshPotionCooldown3668 else 3669 if timer "InventoryTimer" > 60003670 if EnableOverheadMessages = 1 3671 overhead '[ NO REFRESH POTS! ]' 3373672 endif3673 settimer "InventoryTimer" 03674 endif3675 endif3676 wait 500 3677 endif3678 endif 3679 3680 if EnableMagicResistPotion = 13681 if not findbuff "Magic Resist Potion"3682 if findtype "Black Potion" self as magicresistpot3683 dclick magicresistpot3684 wait 5003685 if EnableOverheadMessages = 1 3686 if insysmsg "Potion satchel used" 3687 overhead '*drinking free resist potion*' 24063688 clearsysmsg3689 else 3690 overhead '*drinking resist potion*' 24063691 clearsysmsg3692 endif3693 endif 3694 else 3695 if timer "InventoryTimer" > 60003696 overhead '[ NO RESIST POTS! ]' 3373697 settimer "InventoryTimer" 03698 endif3699 endif3700 wait 5003701 endif3702 endif3703 3704 if EnableStrengthPotion = 1 3705 if skill 'Alchemy' = 1 3706 if insysmsg "You may now use a strength" or not findbuff "Strength"3707 if findtype "White Potion" self as strengthpot3708 dclick strengthpot3709 wait 5003710 if EnableOverheadMessages = 1 3711 if insysmsg "Potion satchel used" 3712 overhead '*drinking free strength potion*' 9563713 clearsysmsg3714 else 3715 overhead '*drinking strength potion*' 9563716 clearsysmsg3717 endif3718 endif3719 else 3720 if timer "InventoryTimer" > 60003721 overhead '[ NO STRENGTH POTS! ]' 3373722 settimer "InventoryTimer" 03723 endif3724 endif3725 wait 5003726 endif3727 elseif not findbuff "Strength"3728 if findtype "White Potion" self as strengthpot3729 dclick strengthpot3730 wait 5003731 if EnableOverheadMessages = 1 3732 if insysmsg "Potion satchel used" 3733 overhead '*drinking free strength potion*' 9563734 clearsysmsg3735 else 3736 overhead '*drinking strength potion*' 9563737 clearsysmsg3738 endif3739 endif3740 else 3741 if timer "InventoryTimer" > 60003742 overhead '[ NO STRENGTH POTS! ]' 3373743 settimer "InventoryTimer" 03744 endif3745 endif3746 wait 5003747 endif3748 endif3749 3750 if EnableAgilityPotion = 13751 if not findbuff "Agility"3752 if findtype "Blue Potion" self as agilitypot3753 dclick agilitypot3754 wait 5003755 if EnableOverheadMessages = 1 3756 if insysmsg "Potion satchel used" 3757 overhead '*drinking free agility potion*' 933758 clearsysmsg3759 else 3760 overhead '*drinking agility potion*' 933761 clearsysmsg3762 endif3763 endif3764 else 3765 if timer "InventoryTimer" > 60003766 overhead '[ NO AGILITY POTS! ]' 3373767 settimer "InventoryTimer" 03768 endif3769 endif3770 wait 5003771 endif3772 endif3773 3774 if EnableMagicReflection = 1 3775 if not timerexists "MagicReflect"3776 createtimer "MagicReflect"3777 settimer "MagicReflect" 300003778 endif3779 if skill 'Magery' >= 60 and not findbuff 'Magic Reflection' and mana > 14 and TimeToGo != 1 and timer "MagicReflect" > 300003780 if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook and skill 'Magery' >= 803781 getlabel myspellbook SpellbookLabel3782 for 53783 wait 2503784 if "aspect" in SpellbookLabel3785 break3786 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 3787 @ignore myspellbook 3788 wait 2503789 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook3790 getlabel myspellbook SpellbookLabel3791 else 3792 overhead "[ NO SPELLBOOK! ]" 3373793 break3794 endif3795 endif 3796 endfor3797 dclick myspellbook3798 wait 5003799 endif3800 for 103801 cast 'Magic Reflection' 3802 waitfortarget 15003803 hotkey 'Target Self'3804 wait 10003805 if insysmsg "That spell will not adhere"3806 settimer "Magic Shield" 03807 if EnableOverheadMessages = 13808 overhead "Too soon for a new shield. Give me a sec..." 20863809 endif3810 replay3811 endif 3812 wait 10003813 if not findbuff 'Magic Reflection'3814 wait 10003815 if EnableOverheadMessages = 13816 overhead "Let me try that again..." 20863817 endif3818 wait 10003819 else3820 break3821 endif 3822 endfor 3823 wait 15003824 replay3825 endif 3826 endif3827 3828 if EnableReactiveArmour = 1 3829 if not timerexists "MagicArmor"3830 createtimer "MagicArmor"3831 settimer "MagicArmor" 300003832 endif3833 if skill 'Magery' >= 60 and not findbuff 'Reactive Armor' and mana >= 4 and TimeToGo != 1 and timer "MagicArmor" > 300003834 if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook and skill 'Magery' >= 80 3835 getlabel myspellbook SpellbookLabel3836 for 53837 wait 2503838 if "aspect" in SpellbookLabel3839 break3840 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 3841 @ignore myspellbook 3842 wait 2503843 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook3844 getlabel myspellbook SpellbookLabel3845 else 3846 overhead "[ NO SPELLBOOK! ]" 3373847 break3848 endif3849 endif 3850 endfor3851 dclick myspellbook3852 wait 5003853 endif3854 for 103855 cast 'Reactive Armor' 3856 waitfortarget 15003857 hotkey 'Target Self'3858 wait 10003859 if insysmsg "That spell will not adhere"3860 settimer "MagicArmor" 03861 if EnableOverheadMessages = 13862 overhead "Too soon for a new magic armor. Give me a sec..." 20863863 endif3864 replay3865 endif 3866 wait 10003867 if not findbuff 'Reactive Armor'3868 wait 5003869 if EnableOverheadMessages = 13870 overhead "Let me try that again..." 20863871 endif 3872 wait 5003873 else3874 break3875 endif 3876 endfor 3877 wait 10003878 replay3879 endif 3880 endif3881 3882 if skill "Spirit Speak" >= 803883 if not timerexists "SpiritSpeak"3884 createtimer "SpiritSpeak"3885 settimer "SpiritSpeak" 105003886 endif3887 if findtype "corpse" ground -1 -1 12 as batteries and timer "SpiritSpeak" > 105003888 useskill "spiritspeak"3889 @ignore batteries3890 settimer "SpiritSpeak" 03891 wait 5003892 endif 3893 endif3894 3895 if EnableAutoCarving = 13896 if findtype 'Elven SpellBlade' self 3897 if findtype "corpse" ground -1 -1 2 as deadbody3898 dclicktype "Elven Spellblade"3899 wft 10003900 targettype "Elven Spellblade"3901 if EnableOverheadMessages = 1 3902 overhead "*skinning corpse...*" 3393903 endif3904 wait 5003905 @ignore deadbody3906 endif3907 else3908 if timer "InventoryTimer" > 60003909 if EnableOverheadMessages = 1 3910 overhead "[ NO SKINNING KNIFE! ]" 3373911 sysmsg "Disable EnableAutoCarving in script variables to turn off this overhead message!" 03912 endif3913 settimer "InventoryTimer" 03914 endif3915 endif3916 endif 3917 3918 if skill 'Fishing' >= 50 and EnableFishing = 1 3919 if insysmsg "You fish a" and EnableOverheadMessages = 13920 overhead "Nothing biting on that one..." 20863921 clearsysmsg 3922 endif3923 if insysmsg "You catch a fish"3924 overhead "*you harvest fish*" 773925 clearsysmsg 3926 endif 3927 endif3928 3929 if EnableGoldVacuum = 13930 if not timerexists "Gold Vacuum" 3931 createtimer "Gold Vacuum"3932 settimer "Gold Vacuum" 03933 endif 3934 if not timerexists "Gold Radar"3935 createtimer "Gold Radar"3936 settimer "Gold Radar" 03937 endif 3938 if findtype "gold coin" ground -1 -1 12 as droppedmoney and timer "Gold Radar" > 35003939 overhead "[ $ ]" 149 droppedmoney3940 overhead "�" 149 droppedmoney3941 settimer "Gold Radar" 03942 endif3943 while findtype "gold coin" ground -1 -1 2 as droppedmoney and timer "Gold Vacuum" > 5003944 overhead " � " 1493945 hotkey "Grab Item"3946 wft 25003947 target droppedmoney3948 wait 5003949 if insysmsg "Invalid or inaccessible item"3950 wait 5003951 @ignore droppedmoney3952 endif3953 wait 500 3954 endwhile 3955 settimer "Gold Vacuum" 03956 endif 3957 3958 3959 /////////////////////////3960 // MAGERY SUMMONS: //3961 /////////////////////////3962 3963 if skill 'Magery' >= 80 and skill 'Spirit Speak' >= 80 and EnableSummons = 1 and TotalFollowerCount > 0 3964 if followers = 03965 @setvar! NeedtoSummon 13966 elseif followers = 1 and TotalFollowerCount > 03967 @setvar! NeedtoSummon 1 3968 elseif followers = 2 and TotalFollowerCount = 13969 @setvar! NeedtoSummon 0 3970 elseif followers = 2 and TotalFollowerCount = 23971 @setvar! NeedtoSummon 13972 elseif followers = 2 and TotalFollowerCount = 33973 @setvar! NeedtoSummon 13974 elseif followers = 2 and TotalFollowerCount = 43975 @setvar! NeedtoSummon 1 3976 elseif followers = 3 and TotalFollowerCount = 13977 @setvar! NeedtoSummon 0 3978 elseif followers = 3 and TotalFollowerCount = 23979 @setvar! NeedtoSummon 03980 elseif followers = 3 and TotalFollowerCount = 33981 @setvar! NeedtoSummon 13982 elseif followers = 3 and TotalFollowerCount = 43983 @setvar! NeedtoSummon 1 3984 elseif followers = 4 and TotalFollowerCount = 13985 @setvar! NeedtoSummon 0 3986 elseif followers = 4 and TotalFollowerCount = 23987 @setvar! NeedtoSummon 03988 elseif followers = 4 and TotalFollowerCount = 33989 @setvar! NeedtoSummon 03990 elseif followers = 4 and TotalFollowerCount = 43991 @setvar! NeedtoSummon 1 3992 elseif followers = 53993 @setvar! NeedtoSummon 03994 endif 3995 wait 250 3996 if NeedtoSummon = 1 3997 removelist summonList3998 createlist summonList 3999 if not varexist myMainTankPet4000 @setvar! myMainTankPet 04001 endif4002 if not varexist fireOne4003 @setvar! fireOne 04004 endif 4005 if not varexist fireTwo4006 @setvar! fireTwo 04007 endif4008 if not varexist earthOne4009 @setvar! earthOne 04010 endif4011 if not varexist earthTwo4012 @setvar! earthTwo 04013 endif4014 if not varexist demonOne4015 @setvar! demonOne 04016 endif4017 if not varexist demonTwo4018 @setvar! demonTwo 04019 endif4020 if not varexist airOne4021 @setvar! airOne 04022 endif4023 if not varexist airTwo4024 @setvar! airTwo 04025 endif4026 if not varexist waterOne4027 @setvar! waterOne 04028 endif4029 if not varexist waterTwo4030 @setvar! waterTwo 04031 endif 4032 if dead myMainTankPet4033 if not dead earthOne4034 @setvar! myMainTankPet earthOne4035 elseif not dead earthTwo4036 @setvar! myMainTankPet earthTwo4037 elseif not dead waterOne4038 @setvar! myMainTankPet waterOne4039 elseif not dead waterTwo4040 @setvar! myMainTankPet waterTwo4041 elseif not dead demonOne4042 @setvar! myMainTankPet demonOne4043 elseif not dead demonTwo4044 @setvar! myMainTankPet demonTwo4045 elseif not dead fireOne4046 @setvar! myMainTankPet fireOne4047 elseif not dead fireTwo4048 @setvar! myMainTankPet fireTwo4049 elseif not dead airOne4050 @setvar! myMainTankPet airOne4051 elseif not dead airTwo4052 @setvar! myMainTankPet airTwo4053 endif4054 endif 4055 overhead "*summoning a bodyguard...*" 6 4056 if followers <= 14057 wait 10004058 if EnableOverheadMessages = 14059 overhead "I call upon the power of the elements..." 20864060 endif 4061 endif 4062 if SummonEarthElemental > 04063 if dead earthOne or not find earthOne ground -1 -1 18 4064 pushlist summonList "Earth Elemental"4065 @setvar! earthOne 14066 @setvar! NameEarth 14067 @setvar! NameFire 04068 @setvar! NameDemon 04069 @setvar! NameAir 04070 @setvar! NameWater 04071 endif4072 if SummonEarthElemental > 14073 if dead earthTwo or not find earthTwo ground -1 -1 184074 pushlist summonList "Earth Elemental"4075 @setvar! earthTwo 14076 @setvar! NameEarth 14077 @setvar! NameFire 04078 @setvar! NameDemon 04079 @setvar! NameAir 04080 @setvar! NameWater 04081 endif4082 endif4083 endif4084 if SummonFireElemental > 04085 if dead fireOne or not find fireOne ground -1 -1 18 4086 pushlist summonList "Fire Elemental"4087 @setvar! fireOne 14088 @setvar! NameEarth 04089 @setvar! NameFire 14090 @setvar! NameDemon 04091 @setvar! NameAir 04092 @setvar! NameWater 04093 endif4094 if SummonFireElemental > 14095 if dead fireTwo or not find fireTwo ground -1 -1 184096 pushlist summonList "Fire Elemental"4097 @setvar! fireTwo 14098 @setvar! NameEarth 04099 @setvar! NameFire 14100 @setvar! NameDemon 04101 @setvar! NameAir 04102 @setvar! NameWater 04103 endif4104 endif4105 endif4106 if SummonDemon > 04107 if dead demonOne or not find demonOne ground -1 -1 184108 pushlist summonList "Summon Daemon"4109 @setvar! demonOne 14110 @setvar! NameEarth 04111 @setvar! NameFire 04112 @setvar! NameDemon 14113 @setvar! NameAir 04114 @setvar! NameWater 04115 endif4116 if SummonDemon > 14117 if dead demonTwo or not find demonTwo ground -1 -1 184118 pushlist summonList "Summon Daemon"4119 @setvar! demonTwo 14120 @setvar! NameEarth 04121 @setvar! NameFire 04122 @setvar! NameDemon 14123 @setvar! NameAir 04124 @setvar! NameWater 04125 endif4126 endif4127 endif4128 if SummonAirElemental > 04129 if dead airOne or not find airOne ground -1 -1 184130 pushlist summonList "Air Elemental"4131 @setvar! airOne 14132 @setvar! NameEarth 04133 @setvar! NameFire 04134 @setvar! NameDemon 04135 @setvar! NameAir 14136 @setvar! NameWater 04137 endif4138 if SummonAirElemental > 14139 if dead airTwo or not find airTwo ground -1 -1 184140 pushlist summonList "Air Elemental"4141 @setvar! airTwo 14142 @setvar! NameEarth 04143 @setvar! NameFire 04144 @setvar! NameDemon 04145 @setvar! NameAir 14146 @setvar! NameWater 04147 endif4148 endif4149 endif4150 if SummonWaterElemental > 04151 if dead waterOne or not find waterOne ground -1 -1 184152 pushlist summonList "Water Elemental"4153 @setvar! waterOne 14154 @setvar! NameEarth 04155 @setvar! NameFire 04156 @setvar! NameDemon 04157 @setvar! NameAir 04158 @setvar! NameWater 14159 endif4160 if SummonWaterElemental > 14161 if dead waterTwo or not find waterTwo ground -1 -1 184162 pushlist summonList "Water Elemental"4163 @setvar! waterTwo 14164 @setvar! NameEarth 04165 @setvar! NameFire 04166 @setvar! NameDemon 04167 @setvar! NameAir 04168 @setvar! NameWater 14169 endif4170 endif4171 endif 4172 foreach summon in summonList4173 while diffmana > 504174 if diffhits >= 354175 replay4176 endif4177 wait 5004178 if not findbuff "Actively Meditating"4179 useskill "meditation"4180 overhead "*meditating...*" 104181 endif4182 wait 10004183 if insysmsg "Now tracking"4184 replay4185 endif4186 endwhile 4187 4188 if skill "Magery" >= 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook4189 getlabel myspellbook SpellbookLabel4190 for 54191 wait 2504192 if "harvest aspect" in SpellbookLabel4193 break4194 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 4195 @ignore myspellbook 4196 wait 2504197 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook4198 getlabel myspellbook SpellbookLabel4199 else 4200 overhead "[ NO SPELLBOOK! ]" 3374201 break4202 endif4203 endif 4204 endfor4205 dclick myspellbook4206 endif 4207 4208 cast summon4209 wft 5004210 4211 if targetexists 4212 hotkey "Target Self"4213 wait 2504214 endif 4215 4216 wait 5004217 4218 if EnableOverheadMessages = 14219 if SummonName = 2 4220 overhead "I summon thee, Protector of Harvesters!" 20864221 elseif SummonName = 34222 overhead "I require another protector!" 20864223 elseif SummonName = 44224 overhead "There's still room in the back!" 20864225 else4226 overhead "Send me a worthy protector!" 20864227 endif 4228 endif 4229 4230 while casting 4231 wait 504232 if diffhits >= 404233 if EnableOverheadMessages = 14234 overhead "Hang on, I need a heal!" 20864235 endif 4236 hotkey '> Interrupt'4237 replay4238 endif4239 endwhile4240 4241 wait 250 4242 @setvar! myFreshlySummonedPet 0 4243 if summon = "Earth Elemental" and findtype 14 ground -1 -1 2 as myPet4244 for 54245 if findtype 14 ground -1 -1 2 as myPet4246 getlabel myPet myPetLabel4247 if "earth elemental" in myPetLabel4248 @setvar! myFreshlySummonedPet myPet4249 break4250 else 4251 @ignore myPet4252 endif 4253 endif 4254 endfor4255 if earthOne = 14256 @setvar! earthOne myPet4257 elseif earthTwo = 14258 @setvar! earthTwo myPet4259 endif4260 elseif summon = "Fire Elemental" and findtype 15 ground -1 -1 2 as myPet 4261 for 54262 if findtype 15 ground -1 -1 2 as myPet4263 getlabel myPet myPetLabel4264 if "fire elemental" in myPetLabel4265 @setvar! myFreshlySummonedPet myPet4266 break4267 else 4268 @ignore myPet4269 endif 4270 endif 4271 endfor 4272 if fireOne = 14273 @setvar! fireOne myPet4274 elseif fireTwo = 14275 @setvar! fireTwo myPet4276 endif4277 elseif summon = "Summon Daemon" and findtype 9 ground -1 -1 2 as myPet4278 for 54279 if findtype 9 ground -1 -1 2 as myPet4280 getlabel myPet myPetLabel4281 if "daemon" in myPetLabel4282 @setvar! myFreshlySummonedPet myPet4283 break4284 else 4285 @ignore myPet4286 endif 4287 endif 4288 endfor4289 if demonOne = 14290 @setvar! demonOne myPet4291 elseif demonTwo = 14292 @setvar! demonTwo myPet4293 endif4294 elseif summon = "Water Elemental" and findtype 16 ground -1 -1 2 as myPet4295 for 54296 if findtype 16 ground -1 -1 2 as myPet4297 getlabel myPet myPetLabel4298 if "water elemental" in myPetLabel4299 @setvar! myFreshlySummonedPet myPet4300 break4301 else 4302 @ignore myPet4303 endif 4304 endif 4305 endfor4306 if waterOne = 14307 @setvar! waterOne myPet4308 elseif waterTwo = 14309 @setvar! waterTwo myPet4310 endif4311 elseif summon = "Air Elemental" and findtype 13 ground -1 -1 2 as myPet4312 for 54313 if findtype 13 ground -1 -1 2 as myPet4314 getlabel myPet myPetLabel4315 if "air elemental" in myPetLabel4316 @setvar! myFreshlySummonedPet myPet4317 break4318 else 4319 @ignore myPet4320 endif 4321 endif 4322 endfor4323 if airOne = 14324 @setvar! airOne myPet4325 elseif airTwo = 14326 @setvar! airTwo myPet4327 endif4328 endif 4329 if myFreshlySummonedPet = 04330 if EnableOverheadMessages = 14331 overhead "I can't see my elemental..." 20864332 endif4333 wait 5004334 break4335 endif 4336 if NameSummonedPets = 04337 wait 20004338 if EnableOverheadMessages = 14339 overhead "{{summon}} will protect you now...." 1909 myFreshlySummonedPet4340 endif4341 menu myFreshlySummonedPet 34342 @ignore myFreshlySummonedPet 4343 wait 5004344 poplist summonList "front"4345 break 4346 elseif NameSummonedPets = 14347 for 24348 if SummonName = 14349 wait 15004350 if EnableOverheadMessages = 14351 overhead "What is your name, minion?" 20864352 endif 4353 wait 5004354 if NameFire = 1 or NameFire = 2 and list FireEleNamesList > 04355 foreach myEleName in FireEleNamesList 4356 rename myFreshlySummonedPet myEleName4357 wait 5004358 if insysmsg "That name is unacceptable"4359 sysmsg "Unable to name summon: {{myEleName}}" 344360 clearsysmsg 4361 poplist FireEleNamesList "front"4362 wait 5004363 else 4364 break4365 endif4366 endfor4367 if EnableOverheadMessages = 14368 wait 5004369 overhead "You may call me {{myEleName}}, Master." 1909 myFreshlySummonedPet4370 wait 25004371 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4372 wait 10004373 overhead "Thank you, {{myEleName}}" 20864374 wait 5004375 endif 4376 elseif NameDemon = 1 or NameDemon = 2 and list DemonNamesList > 04377 foreach myEleName in DemonNamesList 4378 rename myFreshlySummonedPet myEleName4379 wait 5004380 if insysmsg "That name is unacceptable"4381 sysmsg "Unable to name summon: {{myEleName}}" 344382 clearsysmsg 4383 poplist DemonNamesList "front"4384 wait 5004385 else 4386 break4387 endif4388 endfor 4389 if EnableOverheadMessages = 1 4390 wait 5004391 overhead "You may call me {{myEleName}}, Master." 1909 myFreshlySummonedPet4392 wait 25004393 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4394 wait 10004395 overhead "Thank you, {{myEleName}}" 20864396 wait 5004397 endif 4398 elseif NameAir = 1 or NameAir = 2 and list AirEleNamesList > 04399 foreach myEleName in AirEleNamesList 4400 rename myFreshlySummonedPet myEleName4401 wait 2504402 if insysmsg "That name is unacceptable"4403 sysmsg "Unable to name summon: {{myEleName}}" 344404 clearsysmsg 4405 poplist AirEleNamesList "front"4406 wait 5004407 else 4408 break4409 endif4410 endfor 4411 if EnableOverheadMessages = 1 4412 wait 5004413 overhead "You may call me {{myEleName}}, Master." 1909 myFreshlySummonedPet4414 wait 25004415 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4416 wait 10004417 overhead "Thank you, {{myEleName}}" 20864418 wait 5004419 endif 4420 elseif NameWater = 1 or NameWater = 2 and list WaterEleNamesList > 0 4421 foreach myEleName in WaterEleNamesList 4422 rename myFreshlySummonedPet myEleName4423 wait 2504424 if insysmsg "That name is unacceptable"4425 sysmsg "Unable to name summon: {{myEleName}}" 344426 clearsysmsg 4427 poplist WaterEleNamesList "front"4428 wait 5004429 else 4430 break4431 endif4432 endfor 4433 if EnableOverheadMessages = 14434 wait 5004435 overhead "You may call me {{myEleName}}, Master." 1909 myFreshlySummonedPet4436 wait 25004437 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4438 wait 2504439 wait 10004440 overhead "Thank you, {{myEleName}}" 20864441 wait 5004442 endif 4443 elseif NameEarth = 1 or NameEarth = 2 and list EarthEleNamesList > 0 4444 foreach myEleName in EarthEleNamesList 4445 rename myFreshlySummonedPet myEleName4446 wait 2504447 if insysmsg "That name is unacceptable"4448 sysmsg "Unable to name summon: {{myEleName}}" 344449 clearsysmsg 4450 poplist EarthEleNamesList "front"4451 wait 5004452 else 4453 break4454 endif4455 endfor 4456 if EnableOverheadMessages = 14457 wait 5004458 overhead "You may call me {{myEleName}}, Master." 1909 myFreshlySummonedPet4459 wait 25004460 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4461 wait 10004462 overhead "Thank you, {{myEleName}}" 20864463 wait 5004464 endif 4465 endif 4466 @setvar! NameOne EleName4467 menu myFreshlySummonedPet 34468 @ignore myFreshlySummonedPet 4469 if followers = 04470 @setvar! NeedtoSummon 14471 elseif followers = 1 and TotalFollowerCount > 04472 @setvar! NeedtoSummon 1 4473 elseif followers = 2 and TotalFollowerCount = 14474 @setvar! NeedtoSummon 0 4475 @setvar! SummonName 14476 elseif followers = 2 and TotalFollowerCount = 24477 @setvar! NeedtoSummon 14478 elseif followers = 2 and TotalFollowerCount = 34479 @setvar! NeedtoSummon 14480 elseif followers = 2 and TotalFollowerCount = 44481 @setvar! NeedtoSummon 1 4482 elseif followers = 3 and TotalFollowerCount = 14483 @setvar! NeedtoSummon 0 4484 @setvar! SummonName 14485 elseif followers = 3 and TotalFollowerCount = 24486 @setvar! NeedtoSummon 04487 @setvar! SummonName 14488 elseif followers = 3 and TotalFollowerCount = 34489 @setvar! NeedtoSummon 14490 elseif followers = 3 and TotalFollowerCount = 44491 @setvar! NeedtoSummon 1 4492 elseif followers = 4 and TotalFollowerCount = 14493 @setvar! NeedtoSummon 0 4494 @setvar! SummonName 14495 elseif followers = 4 and TotalFollowerCount = 24496 @setvar! NeedtoSummon 04497 @setvar! SummonName 14498 elseif followers = 4 and TotalFollowerCount = 34499 @setvar! NeedtoSummon 04500 @setvar! SummonName 14501 elseif followers = 4 and TotalFollowerCount = 44502 @setvar! NeedtoSummon 1 4503 elseif followers = 54504 @setvar! NeedtoSummon 04505 @setvar! SummonName 14506 endif 4507 if NameFire = 14508 poplist FireEleNamesList front4509 elseif NameDemon = 14510 poplist DemonNamesList front4511 elseif NameAir = 14512 poplist AirEleNamesList front4513 elseif NameWater = 14514 poplist WaterEleNamesList front4515 elseif NameEarth = 14516 poplist EarthEleNamesList front4517 endif 4518 if NeedtoSummon = 04519 @setvar! SummonName 14520 wait 5004521 if EnableOverheadMessages = 14522 overhead "Let's get going..." 20864523 wait 5004524 endif4525 elseif NeedtoSummon = 14526 if EnableOverheadMessages = 14527 wait 10004528 overhead "...but you're going to need some more help!" 20864529 endif4530 @setvar! SummonName 24531 @ignore myFreshlySummonedPet4532 wait 5004533 else 4534 break4535 endif4536 break 4537 elseif SummonName = 24538 if EnableOverheadMessages = 14539 wait 15004540 overhead "Welcome.. and your name is?" 20864541 endif 4542 wait 5004543 if NameFire = 1 and list FireEleNamesList > 04544 foreach myEleName in FireEleNamesList 4545 wait 5004546 rename myFreshlySummonedPet myEleName4547 wait 5004548 if insysmsg "That name is unacceptable"4549 sysmsg "Unable to name summon: {{myEleName}}" 344550 clearsysmsg 4551 poplist FireEleNamesList "front"4552 wait 5004553 else 4554 break4555 endif4556 endfor4557 if EnableOverheadMessages = 14558 wait 10004559 overhead "I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4560 wait 25004561 overhead "{{myEleName}} is yours to command..." 1909 myFreshlySummonedPet4562 endif 4563 wait 2504564 elseif NameDemon = 1 and list DemonNamesList > 04565 foreach myEleName in DemonNamesList 4566 rename myFreshlySummonedPet myEleName4567 wait 5004568 if insysmsg "That name is unacceptable"4569 sysmsg "Unable to name summon: {{myEleName}}" 344570 clearsysmsg 4571 poplist DemonNamesList "front"4572 wait 5004573 else 4574 break4575 endif4576 endfor 4577 if EnableOverheadMessages = 1 4578 wait 10004579 overhead "I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4580 wait 25004581 overhead "{{myEleName}} is yours to command..." 1909 myFreshlySummonedPet4582 endif 4583 wait 2504584 elseif NameAir = 1 and list AirEleNamesList > 04585 foreach myEleName in AirEleNamesList 4586 rename myFreshlySummonedPet myEleName4587 wait 2504588 if insysmsg "That name is unacceptable"4589 sysmsg "Unable to name summon: {{myEleName}}" 344590 clearsysmsg 4591 poplist AirEleNamesList "front"4592 wait 5004593 else 4594 break4595 endif4596 endfor 4597 if EnableOverheadMessages = 1 4598 wait 10004599 overhead "I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4600 wait 25004601 overhead "{{myEleName}} is yours to command..." 1909 myFreshlySummonedPet4602 endif 4603 wait 2504604 elseif NameWater = 1 and list WaterEleNamesList > 0 4605 foreach myEleName in WaterEleNamesList 4606 rename myFreshlySummonedPet myEleName4607 wait 2504608 if insysmsg "That name is unacceptable"4609 sysmsg "Unable to name summon: {{myEleName}}" 344610 clearsysmsg 4611 poplist WaterEleNamesList "front"4612 wait 5004613 else 4614 break4615 endif4616 endfor 4617 if EnableOverheadMessages = 1 4618 wait 10004619 overhead "I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4620 wait 25004621 overhead "{{myEleName}} is yours to command..." 1909 myFreshlySummonedPet4622 endif4623 wait 2504624 elseif NameEarth = 1 and list EarthEleNamesList > 0 4625 foreach myEleName in EarthEleNamesList 4626 rename myFreshlySummonedPet myEleName4627 wait 2504628 if insysmsg "That name is unacceptable"4629 sysmsg "Unable to name summon: {{myEleName}}" 344630 clearsysmsg 4631 poplist EarthEleNamesList "front"4632 wait 5004633 else 4634 break4635 endif4636 endfor 4637 if EnableOverheadMessages = 14638 wait 10004639 overhead "I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4640 wait 25004641 overhead "{{myEleName}} is yours to command..." 1909 myFreshlySummonedPet4642 endif4643 wait 2504644 endif 4645 @setvar! NameTwo EleName4646 menu myFreshlySummonedPet 34647 @ignore myFreshlySummonedPet4648 if NameFire = 14649 poplist FireEleNamesList front4650 elseif NameDemon = 14651 poplist DemonNamesList front4652 elseif NameAir = 14653 poplist AirEleNamesList front4654 elseif NameWater = 14655 poplist WaterEleNamesList front4656 elseif NameEarth = 14657 poplist EarthEleNamesList front4658 endif 4659 if followers = 04660 @setvar! NeedtoSummon 14661 elseif followers = 1 and TotalFollowerCount > 04662 @setvar! NeedtoSummon 1 4663 elseif followers = 2 and TotalFollowerCount = 14664 @setvar! NeedtoSummon 0 4665 @setvar! SummonName 14666 elseif followers = 2 and TotalFollowerCount = 24667 @setvar! NeedtoSummon 14668 elseif followers = 2 and TotalFollowerCount = 34669 @setvar! NeedtoSummon 14670 elseif followers = 2 and TotalFollowerCount = 44671 @setvar! NeedtoSummon 14672 elseif followers = 3 and TotalFollowerCount = 14673 @setvar! NeedtoSummon 0 4674 @setvar! SummonName 14675 elseif followers = 3 and TotalFollowerCount = 24676 @setvar! NeedtoSummon 04677 @setvar! SummonName 14678 elseif followers = 3 and TotalFollowerCount = 34679 @setvar! NeedtoSummon 14680 elseif followers = 3 and TotalFollowerCount = 44681 @setvar! NeedtoSummon 14682 elseif followers = 4 and TotalFollowerCount = 14683 @setvar! NeedtoSummon 0 4684 @setvar! SummonName 14685 elseif followers = 4 and TotalFollowerCount = 24686 @setvar! NeedtoSummon 04687 @setvar! SummonName 14688 elseif followers = 4 and TotalFollowerCount = 34689 @setvar! NeedtoSummon 04690 @setvar! SummonName 14691 elseif followers = 4 and TotalFollowerCount = 44692 @setvar! NeedtoSummon 1 4693 elseif followers = 54694 @setvar! NeedtoSummon 04695 @setvar! SummonName 14696 endif 4697 if NeedtoSummon = 04698 @setvar! SummonName 14699 if EnableOverheadMessages = 14700 wait 15004701 overhead "Alright team, let's do this!" 20864702 endif 4703 elseif NeedtoSummon = 14704 if EnableOverheadMessages = 14705 wait 5004706 overhead "Hmm... I think we should bring even more..."4707 endif 4708 wait 5004709 @setvar! SummonName 34710 if NameFire = 14711 poplist FireEleNamesList front4712 elseif NameDemon = 14713 poplist DemonNamesList front4714 elseif NameAir = 14715 poplist AirEleNamesList front4716 elseif NameWater = 14717 poplist WaterEleNamesList front4718 elseif NameEarth = 14719 poplist EarthEleNamesList front4720 endif 4721 else 4722 break4723 endif4724 break 4725 elseif SummonName = 34726 if EnableOverheadMessages = 14727 wait 15004728 overhead "Introduce yourself to the team..." 20864729 endif4730 wait 5004731 if NameFire = 1 and list FireEleNamesList > 04732 foreach myEleName in FireEleNamesList 4733 rename myFreshlySummonedPet myEleName4734 wait 5004735 if insysmsg "That name is unacceptable"4736 sysmsg "Unable to name summon: {{myEleName}}" 344737 clearsysmsg 4738 poplist FireEleNamesList "front"4739 wait 5004740 else 4741 break4742 endif4743 endfor4744 if EnableOverheadMessages = 14745 wait 10004746 overhead "{{myEleName}} is what they call me..." 1909 myFreshlySummonedPet4747 wait 20004748 overhead "{{myEleName}} will kill for you, my Lord." 1909 myFreshlySummonedPet4749 endif 4750 wait 2504751 elseif NameDemon = 1 and list DemonNamesList > 04752 foreach myEleName in DemonNamesList 4753 rename myFreshlySummonedPet myEleName4754 wait 5004755 if insysmsg "That name is unacceptable"4756 sysmsg "Unable to name summon: {{myEleName}}" 344757 clearsysmsg 4758 poplist DemonNamesList "front"4759 wait 5004760 else 4761 break4762 endif4763 endfor 4764 if EnableOverheadMessages = 14765 wait 10004766 overhead "{{myEleName}} is what they call me..." 1909 myFreshlySummonedPet4767 wait 20004768 overhead "{{myEleName}} will kill for you, my Lord." 1909 myFreshlySummonedPet4769 endif 4770 wait 2504771 elseif NameAir = 1 and list AirEleNamesList > 04772 foreach myEleName in AirEleNamesList 4773 rename myFreshlySummonedPet myEleName4774 wait 2504775 if insysmsg "That name is unacceptable"4776 sysmsg "Unable to name summon: {{myEleName}}" 344777 clearsysmsg 4778 poplist AirEleNamesList "front"4779 wait 5004780 else 4781 break4782 endif4783 endfor 4784 if EnableOverheadMessages = 1 4785 wait 10004786 overhead "{{myEleName}} is what they call me..." 1909 myFreshlySummonedPet4787 wait 20004788 overhead "{{myEleName}} will kill for you, my Lord." 1909 myFreshlySummonedPet4789 endif 4790 wait 2504791 elseif NameWater = 1 and list WaterEleNamesList > 0 4792 foreach myEleName in WaterEleNamesList 4793 rename myFreshlySummonedPet myEleName4794 wait 2504795 if insysmsg "That name is unacceptable"4796 sysmsg "Unable to name summon: {{myEleName}}" 344797 clearsysmsg 4798 poplist WaterEleNamesList "front"4799 wait 5004800 else 4801 break4802 endif4803 endfor 4804 if EnableOverheadMessages = 14805 wait 10004806 overhead "{{myEleName}} is what they call me..." 1909 myFreshlySummonedPet4807 wait 20004808 overhead "{{myEleName}} will kill for you, my Lord." 1909 myFreshlySummonedPet4809 endif 4810 wait 2504811 elseif NameEarth = 1 and list EarthEleNamesList > 0 4812 foreach myEleName in EarthEleNamesList 4813 rename myFreshlySummonedPet myEleName4814 wait 2504815 if insysmsg "That name is unacceptable"4816 sysmsg "Unable to name summon: {{myEleName}}" 344817 clearsysmsg 4818 poplist EarthEleNamesList "front"4819 wait 5004820 else 4821 break4822 endif4823 endfor 4824 if EnableOverheadMessages = 14825 wait 10004826 overhead "{{myEleName}} is what they call me..." 1909 myFreshlySummonedPet4827 wait 20004828 overhead "{{myEleName}} will kill for you, my Lord." 1909 myFreshlySummonedPet4829 endif4830 wait 2504831 endif 4832 @setvar! NameThree EleName4833 menu myFreshlySummonedPet 34834 @ignore myFreshlySummonedPet4835 if NameFire = 14836 poplist FireEleNamesList front4837 elseif NameDemon = 14838 poplist DemonNamesList front4839 elseif NameAir = 14840 poplist AirEleNamesList front4841 elseif NameWater = 14842 poplist WaterEleNamesList front4843 elseif NameEarth = 14844 poplist EarthEleNamesList front4845 endif 4846 if followers = 04847 @setvar! NeedtoSummon 14848 elseif followers = 1 and TotalFollowerCount > 04849 @setvar! NeedtoSummon 1 4850 elseif followers = 2 and TotalFollowerCount = 14851 @setvar! NeedtoSummon 0 4852 @setvar! SummonName 14853 elseif followers = 2 and TotalFollowerCount = 24854 @setvar! NeedtoSummon 14855 elseif followers = 2 and TotalFollowerCount = 34856 @setvar! NeedtoSummon 14857 elseif followers = 2 and TotalFollowerCount = 44858 @setvar! NeedtoSummon 14859 elseif followers = 3 and TotalFollowerCount = 14860 @setvar! NeedtoSummon 0 4861 @setvar! SummonName 14862 elseif followers = 3 and TotalFollowerCount = 24863 @setvar! NeedtoSummon 04864 @setvar! SummonName 14865 elseif followers = 3 and TotalFollowerCount = 34866 @setvar! NeedtoSummon 14867 elseif followers = 3 and TotalFollowerCount = 44868 @setvar! NeedtoSummon 14869 elseif followers = 4 and TotalFollowerCount = 14870 @setvar! NeedtoSummon 0 4871 @setvar! SummonName 14872 elseif followers = 4 and TotalFollowerCount = 24873 @setvar! NeedtoSummon 04874 @setvar! SummonName 14875 elseif followers = 4 and TotalFollowerCount = 34876 @setvar! NeedtoSummon 04877 @setvar! SummonName 14878 elseif followers = 4 and TotalFollowerCount = 44879 @setvar! NeedtoSummon 1 4880 elseif followers = 54881 @setvar! NeedtoSummon 04882 @setvar! SummonName 14883 endif 4884 if NeedtoSummon = 04885 @setvar! SummonName 14886 if EnableOverheadMessages = 14887 wait 15004888 overhead "That's what I like to hear! Time to work..." 20864889 endif4890 elseif NeedtoSummon = 14891 @setvar! SummonName 44892 if EnableOverheadMessages = 14893 wait 5004894 overhead "Hmm.. I think see room for one more...." 20864895 endif 4896 wait 5004897 if NameFire = 14898 poplist FireEleNamesList front4899 elseif NameDemon = 14900 poplist DemonNamesList front4901 elseif NameAir = 14902 poplist AirEleNamesList front4903 elseif NameWater = 14904 poplist WaterEleNamesList front4905 elseif NameEarth = 14906 poplist EarthEleNamesList front4907 endif 4908 else 4909 break4910 endif4911 break 4912 elseif SummonName = 44913 if EnableOverheadMessages = 14914 wait 15004915 overhead "Do you have a name?" 20864916 endif 4917 wait 5004918 if NameFire = 1 and list FireEleNamesList > 04919 foreach myEleName in FireEleNamesList 4920 rename myFreshlySummonedPet myEleName4921 wait 5004922 if insysmsg "That name is unacceptable"4923 sysmsg "Unable to name summon: {{myEleName}}" 344924 clearsysmsg 4925 poplist FireEleNamesList "front"4926 wait 5004927 else 4928 break4929 endif4930 endfor4931 if EnableOverheadMessages = 14932 wait 10004933 overhead "Yes, I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4934 wait 20004935 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4936 endif 4937 wait 2504938 elseif NameDemon = 1 and list DemonNamesList > 04939 foreach myEleName in DemonNamesList 4940 rename myFreshlySummonedPet myEleName4941 wait 5004942 if insysmsg "That name is unacceptable"4943 sysmsg "Unable to name summon: {{myEleName}}" 344944 clearsysmsg 4945 poplist DemonNamesList "front"4946 wait 5004947 else 4948 break4949 endif4950 endfor 4951 if EnableOverheadMessages = 1 4952 wait 10004953 overhead "Yes, I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4954 wait 20004955 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4956 endif 4957 wait 2504958 elseif NameAir = 1 and list AirEleNamesList > 04959 foreach myEleName in AirEleNamesList 4960 rename myFreshlySummonedPet myEleName4961 wait 2504962 if insysmsg "That name is unacceptable"4963 sysmsg "Unable to name summon: {{myEleName}}" 344964 clearsysmsg 4965 poplist AirEleNamesList "front"4966 wait 5004967 else 4968 break4969 endif4970 endfor 4971 if EnableOverheadMessages = 14972 wait 10004973 overhead "Yes, I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4974 wait 20004975 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4976 endif 4977 wait 2504978 elseif NameWater = 1 and list WaterEleNamesList > 0 4979 foreach myEleName in WaterEleNamesList 4980 rename myFreshlySummonedPet myEleName4981 wait 2504982 if insysmsg "That name is unacceptable"4983 sysmsg "Unable to name summon: {{myEleName}}" 344984 clearsysmsg 4985 poplist WaterEleNamesList "front"4986 wait 5004987 else 4988 break4989 endif4990 endfor 4991 if EnableOverheadMessages = 1 4992 wait 10004993 overhead "Yes, I am {{myEleName}}, Master." 1909 myFreshlySummonedPet4994 wait 20004995 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet4996 endif 4997 wait 2504998 elseif NameEarth = 1 and list EarthEleNamesList > 0 4999 foreach myEleName in EarthEleNamesList 5000 rename myFreshlySummonedPet myEleName5001 wait 2505002 if insysmsg "That name is unacceptable"5003 sysmsg "Unable to name summon: {{myEleName}}" 345004 clearsysmsg 5005 poplist EarthEleNamesList "front"5006 wait 5005007 else 5008 break5009 endif5010 endfor 5011 if EnableOverheadMessages = 15012 wait 10005013 overhead "Yes, I am {{myEleName}}, Master." 1909 myFreshlySummonedPet5014 wait 20005015 overhead "{{myEleName}} will protect you now...." 1909 myFreshlySummonedPet5016 endif 5017 wait 2505018 endif 5019 @setvar! NameFour EleName5020 menu myFreshlySummonedPet 35021 @ignore myFreshlySummonedPet5022 @setvar! SummonName 15023 if NameFire = 15024 poplist FireEleNamesList front5025 elseif NameDemon = 15026 poplist DemonNamesList front5027 elseif NameAir = 15028 poplist AirEleNamesList front5029 elseif NameWater = 15030 poplist WaterEleNamesList front5031 elseif NameEarth = 15032 poplist EarthEleNamesList front5033 endif 5034 if EnableOverheadMessages = 1 5035 wait 15005036 overhead "Alright team, let's do this!" 20865037 endif5038 break5039 else 5040 @setvar! SummonName 15041 endif 5042 endfor 5043 endif 5044 if followers = 05045 @setvar! NeedtoSummon 15046 elseif followers = 1 and TotalFollowerCount > 05047 @setvar! NeedtoSummon 1 5048 elseif followers = 2 and TotalFollowerCount = 15049 @setvar! NeedtoSummon 0 5050 @setvar! SummonName 15051 break5052 elseif followers = 2 and TotalFollowerCount = 25053 @setvar! NeedtoSummon 15054 elseif followers = 2 and TotalFollowerCount = 35055 @setvar! NeedtoSummon 15056 elseif followers = 2 and TotalFollowerCount = 45057 @setvar! NeedtoSummon 15058 elseif followers = 3 and TotalFollowerCount = 15059 @setvar! NeedtoSummon 0 5060 @setvar! SummonName 15061 break5062 elseif followers = 3 and TotalFollowerCount = 25063 @setvar! NeedtoSummon 05064 @setvar! SummonName 15065 break5066 elseif followers = 3 and TotalFollowerCount = 35067 @setvar! NeedtoSummon 15068 elseif followers = 3 and TotalFollowerCount = 45069 @setvar! NeedtoSummon 15070 elseif followers = 4 and TotalFollowerCount = 15071 @setvar! NeedtoSummon 0 5072 @setvar! SummonName 15073 break5074 elseif followers = 4 and TotalFollowerCount = 25075 @setvar! NeedtoSummon 05076 @setvar! SummonName 15077 break5078 elseif followers = 4 and TotalFollowerCount = 35079 @setvar! NeedtoSummon 05080 @setvar! SummonName 15081 break5082 elseif followers = 4 and TotalFollowerCount = 45083 @setvar! NeedtoSummon 1 5084 elseif followers = 55085 @setvar! NeedtoSummon 05086 @setvar! SummonName 15087 break5088 endif5089 endfor5090 replay5091 endif5092 endif5093 5094 if EnableSummons = 1 5095 if dead myMainTankPet5096 if not dead earthOne5097 @setvar! myMainTankPet earthOne5098 elseif not dead earthTwo5099 @setvar! myMainTankPet earthTwo5100 elseif not dead waterOne5101 @setvar! myMainTankPet waterOne5102 elseif not dead waterTwo5103 @setvar! myMainTankPet waterTwo5104 elseif not dead demonOne5105 @setvar! myMainTankPet demonOne5106 elseif not dead demonTwo5107 @setvar! myMainTankPet demonTwo5108 elseif not dead fireOne5109 @setvar! myMainTankPet fireOne5110 elseif not dead fireTwo5111 @setvar! myMainTankPet fireTwo5112 elseif not dead airOne5113 @setvar! myMainTankPet airOne5114 elseif not dead airTwo5115 @setvar! myMainTankPet airTwo5116 endif5117 else 5118 if not timerexists "GuardCommentTimer" 5119 createtimer "GuardCommentTimer" 5120 settimer "GuardCommentTimer" 05121 endif 5122 5123 if EnableSummons = 1 and followers >= 1 and timer "GuardCommentTimer" > 420000 and EnableOverheadMessages = 15124 if GuardComment = 1 5125 overhead "I'll keep watch, Master..." 44 myMainTankPet5126 menu myMainTankPet 35127 @setvar! GuardComment 25128 wait 5005129 settimer "GuardCommentTimer" 05130 elseif GuardComment = 25131 overhead "*looks around menacingly...*" 2117 myMainTankPet5132 menu myMainTankPet 35133 @setvar! GuardComment 35134 wait 5005135 settimer "GuardCommentTimer" 05136 elseif GuardComment = 35137 overhead "*cracks knuckles...*" 2117 myMainTankPet5138 menu myMainTankPet 35139 @setvar! GuardComment 45140 wait 5005141 settimer "GuardCommentTimer" 05142 elseif GuardComment = 45143 overhead "*scanning for threats...*" 2117 myMainTankPet5144 menu myMainTankPet 35145 wait 5005146 @setvar! GuardComment 55147 settimer "GuardCommentTimer" 05148 elseif GuardComment = 55149 overhead "*growls...*" 2117 myMainTankPet5150 menu myMainTankPet 35151 @setvar! GuardComment 65152 wait 5005153 settimer "GuardCommentTimer" 05154 elseif GuardComment = 65155 overhead "This isn't very exciting, is it?" 44 myMainTankPet5156 menu myMainTankPet 35157 @setvar! GuardComment 75158 wait 5005159 settimer "GuardCommentTimer" 05160 elseif GuardComment = 75161 overhead "I think we've already passed that tree today..." 44 myMainTankPet5162 menu myMainTankPet 35163 @setvar! GuardComment 85164 wait 5005165 settimer "GuardCommentTimer" 05166 elseif GuardComment = 85167 overhead "Do you know any good jokes?" 44 myMainTankPet5168 menu myMainTankPet 35169 @setvar! GuardComment 95170 wait 15005171 overhead "Ever heard of a place called 'Nantucket'?" 20865172 settimer "GuardCommentTimer" 05173 elseif GuardComment = 95174 overhead "Can I give that a try?" 44 myMainTankPet5175 menu myMainTankPet 35176 @setvar! GuardComment 105177 wait 15005178 overhead "Be my guest, big fella" 20865179 settimer "GuardCommentTimer" 05180 elseif GuardComment = 105181 overhead "I see a PK!! Oh... nope, just some dog shit..." 44 myMainTankPet5182 menu myMainTankPet 35183 @setvar! GuardComment 115184 wait 15005185 overhead "lol" 20865186 settimer "GuardCommentTimer" 05187 elseif GuardComment = 115188 overhead "Wouldn't it be more fun to kill something?" 44 myMainTankPet5189 menu myMainTankPet 35190 @setvar! GuardComment 125191 wait 15005192 overhead "I am but a humble harvester..." 20865193 settimer "GuardCommentTimer" 05194 elseif GuardComment = 125195 overhead "*yawns*" 2117 myMainTankPet5196 overhead "What time is lunch break?" 44 myMainTankPet5197 menu myMainTankPet 35198 @setvar! GuardComment 135199 wait 15005200 overhead "We just started!" 20865201 settimer "GuardCommentTimer" 05202 elseif GuardComment = 135203 overhead "My last gig was in Aegis 4... this is slightly less exciting...." 44 myMainTankPet5204 menu myMainTankPet 35205 @setvar! GuardComment 145206 wait 5005207 settimer "GuardCommentTimer" 05208 elseif GuardComment = 145209 overhead "How about I do the harvesting and you be the bodyguard?" 44 myMainTankPet5210 menu myMainTankPet 35211 @setvar! GuardComment 155212 wait 15005213 overhead "Fine be me... I'd settle for you carrying something, at least..5214 settimer "GuardCommentTimer" 05215 elseif GuardComment = 155216 overhead "I should have stayed in school..." 44 myMainTankPet5217 menu myMainTankPet 35218 @setvar! GuardComment 15219 wait 15005220 overhead "You're tellin me, bud..."5221 settimer "GuardCommentTimer" 0 5222 else5223 overhead "*snarls...*" 2117 myMainTankPet5224 menu myMainTankPet 35225 @setvar! GuardComment 15226 wait 15005227 overhead "*barks!*" 23295228 wait 15005229 overhead "You're weird..." 44 myMainTankPet5230 settimer "GuardCommentTimer" 05231 endif5232 endif 5233 endif 5234 endif 5235 5236 if skill "Magery" >= 80 and counttype "mushroom" self = 0 and EnableMushroomMaker = 15237 if not timerexists "MushroomTimer" 5238 createtimer "MushroomTimer" 5239 settimer "MushroomTimer" 05240 endif 5241 if skill "Magery" >= 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook5242 getlabel myspellbook SpellbookLabel5243 for 55244 wait 2505245 if "aspect" in SpellbookLabel5246 break5247 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 5248 @ignore myspellbook 5249 wait 2505250 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook5251 getlabel myspellbook SpellbookLabel5252 else 5253 overhead "[ NO SPELLBOOK! ]" 3375254 break5255 endif5256 endif 5257 endfor5258 dclick myspellbook5259 wait 5005260 endif 5261 if EnableOverheadMessages = 15262 overhead "Hang on, I need to make some shrooms..." 20865263 endif 5264 wait 1000 5265 for 1005266 if counttype "Ginseng" self > 0 and counttype "Garlic" self > 0 and counttype "Mandrake Root%s%" self > 0 and mana >= 45267 cast "create food"5268 wait 1005269 while casting 5270 wait 505271 endwhile5272 if counttype "mushroom" self >= MakeMushroomAmount5273 break5274 endif5275 else5276 if EnableOverheadMessages = 15277 overhead "...I'm out of regs!" 2086 5278 endif5279 @setvar! TimeToGo 15280 replay5281 endif 5282 endfor5283 if EnableOverheadMessages = 15284 overhead "There, that's better!" 20865285 endif 5286 wait 500 5287 endif5288 5289 5290 //////////////////////////5291 // UTILITY SECTION: //5292 //////////////////////////5293 5294 if EnableEatingFood = 15295 if not findbuff 'food satisfaction' and findtype "tray" self5296 if EnableOverheadMessages = 15297 overhead "Hold on, I'm hungry..." 20865298 wait 10005299 endif5300 if findtype "tray" backpack as food5301 overhead "*eating food...*" 05302 dclick food5303 if EnableOverheadMessages = 15304 wait 15005305 overhead "Ok, I'm ready to get to work!" 20865306 endif 5307 endif5308 endif 5309 endif 5310 5311 if EnableToolCountdown = 15312 if findtype 'pickaxe|hatchet' hand as MyAxe5313 getlabel MyAxe AxeLabel5314 if '(5 uses' in AxeLabel or '(4 uses' in AxeLabel or '(3 uses' in AxeLabel or '(2 uses' in AxeLabel or '(1 use' in AxeLabel5315 if EnableRecycleTool = 05316 sysmsg "YOUR TOOL IS ABOUT TO BREAK....." 1535317 endif 5318 if EnableRecycleTool = 15319 sysmsg "YOUR TOOL IS ABOUT TO BE RECYCLED....." 935320 endif 5321 endif 5322 endif 5323 endif5324 5325 if EnableRecycleTool = 15326 if findtype 'tool kit' self as ToolKit5327 if findtype 'pickaxe|hatchet' hand as MyAxe5328 getlabel MyAxe AxeLabel5329 if '(2 use' in AxeLabel5330 overhead "*recycling tool...*" 935331 clearhands both5332 wait 2505333 if not gumpexists 949095101 5334 dclick ToolKit5335 waitforgump 949095101 20005336 endif 5337 for 55338 gumpresponse 3 9490951015339 wait 2505340 if insysmsg "Target an individual item"5341 target MyAxe5342 wait 2505343 gumpclose 9490951015344 wait 10005345 if EnableOverheadMessages = 15346 overhead "Every little bit counts..." 20865347 endif 5348 if SetIngotBagtoOrganizer03 = 15349 hotkey 'Organizer Agent-03' 5350 endif 5351 replay5352 else5353 gumpresponse 25354 wait 2505355 endfor 5356 endif 5357 endif 5358 endif 5359 endif5360 if not findtype 'tool kit' self and timer "InventoryTimer" > 150005361 overhead "[ NO TOOL KIT ]" 3375362 settimer "InventoryTimer" 05363 sysmsg "Disable 'EnableRecycleTool' in script variables to turn off this overhead message!" 05364 endif5365 endif 5366 5367 if insysmsg "As the owner" or insysmsg "Your house and its contents"5368 wait 10005369 if find MyDoor ground -1 -1 2 and CloseMyDoor = 15370 overhead "*door slams!*" 0 MyDoor5371 dclick MyDoor 5372 wait 5005373 endif5374 endif 5375 5376 5377 /////////////////////////5378 // AUTO TARGET MOBS: //5379 /////////////////////////5380 5381 if EnableAutoAttackGreyMOB = 1 5382 if skill "Magery" >= 80 or skill "Swordsmanship" >= 50 or skill "Mace Fighting" >= 50 and warmode 5383 if EnableOverheadMessages = 15384 overhead "*cracks knuckles...*" 20865385 else 5386 overhead "[ WAR MODE ON! ]" 21175387 endif 5388 if EnableWeaponCheck = 15389 if skill 'Swordsmanship' >= 50 5390 if not findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' self5391 overhead "[ NO WEAPON! ]" 3375392 wait 20005393 else5394 if not findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' hand 5395 if findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' backpack as weapon5396 for 105397 getlabel weapon WeaponLabel5398 wait 5005399 if "aspect" in WeaponLabel5400 break5401 else5402 @ignore weapon5403 wait 1505404 if findtype '30988|5049|3909|3911|3915|3917|3934|3937|5046|5115|5119|5182|5185|5187|31128|31190' backpack as weapon5405 getlabel weapon WeaponLabel5406 endif5407 endif5408 endfor5409 wait 1505410 dclick weapon5411 wait 5005412 endif 5413 endif5414 endif5415 elseif skill 'Mace Fighting' >= 50 5416 if not findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182' self5417 overhead "[ NO WEAPON! ]" 3375418 wait 20005419 else5420 if not findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182' hand 5421 if findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182' backpack as weapon5422 for 105423 getlabel weapon WeaponLabel5424 wait 5005425 if "aspect" in WeaponLabel5426 break5427 else5428 @ignore weapon5429 wait 1505430 if findtype '31180|3568|3713|3721|3932|5040|5044|5112|5127|5177|5179|5181|30991|30999|31000|31001|31014|31178|31180|31182' backpack as weapon5431 getlabel weapon WeaponLabel5432 endif5433 endif 5434 endfor 5435 wait 1505436 dclick weapon5437 wait 5005438 endif 5439 endif5440 endif5441 elseif skill "Magery" >= 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook5442 getlabel myspellbook SpellbookLabel5443 for 55444 wait 2505445 if "aspect" in SpellbookLabel5446 break5447 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel5448 @ignore myspellbook 5449 wait 2505450 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook5451 getlabel myspellbook SpellbookLabel5452 else 5453 overhead "[ NO SPELLBOOK! ]" 3375454 break5455 endif5456 endif 5457 endfor5458 dclick myspellbook5459 wait 5005460 endif 5461 endif5462 5463 clearsysmsg 5464 for 1000 5465 hotkey 'Target Closest Non-Friendly Monster'5466 wait 5005467 5468 if insysmsg "No one matching that was found" 5469 hotkey 'Cancel Current Target' 5470 @setvar CurrentTarget 05471 if EnableOverheadMessages = 15472 wait 7505473 overhead "Is there no one else??" 20865474 wait 10005475 overhead "Alright then, I guess it's back to work..." 20865476 else 5477 overhead "[ WAR MODE OFF ]" 845478 endif 5479 wait 10005480 hotkey 'Toggle Peace Only'5481 hotkey 'Clear Target Queue'5482 clearsysmsg 5483 replay 5484 else 5485 @setvar CurrentTarget lasttarget 5486 getlabel CurrentTarget TargetDesc5487 endif 5488 5489 while not dead CurrentTarget 5490 if EnableTrackingAutoRecall = 15491 if PKTrackingRange = 60 5492 if insysmsg ": 60 step" or insysmsg "60 space" or insysmsg ": 59 step" or insysmsg "59 space" or insysmsg ": 58 step" or insysmsg "58 space" or insysmsg ": 57 step" or insysmsg "57 space" or insysmsg ": 56 step" or insysmsg "56 space" or insysmsg ": 55 step" or insysmsg "55 space" or insysmsg ": 54 step" or insysmsg "54 space" or insysmsg ": 53 step" or insysmsg "53 space" or insysmsg ": 52 step" or insysmsg "52 space" or insysmsg ": 51 step" or insysmsg "51 space" or insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"5493 if EnableRedAlertOverhead = 15494 overhead "[ !! RED ALERT !! ]" 375495 endif 5496 if DungeonMode = 1 and EnableAutoRedDungeonGate = 15497 hotkey 'Toggle War Only'5498 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 05499 if not hidden5500 useskill 'Hiding'5501 endif5502 elseif DungeonMode = 05503 @setvar! RedTargetFound 15504 @setvar! TimeToGo 15505 clearsysmsg5506 endif 5507 endif5508 elseif PKTrackingRange = 50 5509 if insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"5510 if EnableRedAlertOverhead = 15511 overhead "[ !! RED ALERT !! ]" 375512 endif 5513 if DungeonMode = 1 and EnableAutoRedDungeonGate = 15514 hotkey 'Toggle War Only'5515 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 05516 if not hidden5517 useskill 'Hiding'5518 endif5519 elseif DungeonMode = 05520 @setvar! RedTargetFound 15521 @setvar! TimeToGo 15522 clearsysmsg5523 endif 5524 endif5525 elseif PKTrackingRange = 405526 if insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"5527 if EnableRedAlertOverhead = 15528 overhead "[ !! RED ALERT !! ]" 375529 endif 5530 if DungeonMode = 1 and EnableAutoRedDungeonGate = 15531 hotkey 'Toggle War Only'5532 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 05533 if not hidden5534 useskill 'Hiding'5535 endif5536 elseif DungeonMode = 05537 @setvar! RedTargetFound 15538 @setvar! TimeToGo 15539 clearsysmsg5540 endif 5541 endif5542 elseif PKTrackingRange = 0 5543 if insysmsg "Now tracking"5544 if EnableRedAlertOverhead = 15545 overhead "[ !! RED ALERT !! ]" 375546 endif 5547 if DungeonMode = 1 and EnableAutoRedDungeonGate = 15548 hotkey 'Toggle War Only'5549 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 05550 if not hidden5551 useskill 'Hiding'5552 endif5553 elseif DungeonMode = 05554 @setvar! RedTargetFound 15555 @setvar! TimeToGo 15556 clearsysmsg5557 endif 5558 endif5559 endif 5560 endif5561 5562 if EnablePKradar = 1 and skill 'Tracking' < 505563 if not timerexists "PK Radar" 5564 createtimer "PK Radar"5565 settimer "PK Radar" 05566 endif 5567 if timer "PK Radar" > 10005568 hotkey 'Next Murderer Player Target'5569 wait 5005570 if insysmsg "No one matching that was found"5571 settimer "PK Radar" 05572 else5573 if DungeonMode = 1 and EnableAutoRedDungeonGate = 15574 hotkey 'Toggle War Only'5575 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 05576 if not hidden5577 useskill 'Hiding'5578 endif5579 elseif DungeonMode = 05580 @setvar! RedTargetFound 15581 @setvar! TimeToGo 15582 endif 5583 @setvar! MurdererTarget lasttarget5584 clearsysmsg5585 replay 5586 endif 5587 endif5588 endif 5589 5590 if timer "TargetTimer" > 40005591 if EnableOverheadMessages = 15592 if "Paragon" in TargetDesc5593 overhead " � PARAGON! � " 12 CurrentTarget 5594 settimer "TargetTimer" 05595 else 5596 overhead " � TARGET � " 253 CurrentTarget 5597 settimer "TargetTimer" 05598 endif 5599 else5600 if "Paragon" in TargetDesc5601 overhead " � " 12 CurrentTarget 5602 settimer "TargetTimer" 05603 else 5604 overhead " � " 253 CurrentTarget 5605 settimer "TargetTimer" 05606 endif5607 endif 5608 endif5609 5610 if not warmode 5611 if EnableOverheadMessages = 15612 overhead "I don't have time for this shit..." 20865613 else 5614 overhead "[ WAR MODE OFF ]" 845615 endif 5616 wait 5005617 replay5618 endif5619 5620 if EnableHealPotion = 1 or EnableHealPotion = 25621 if diffhits > HealPotHPdiff and timer "HealingPotionTimer" > HealingPotionCooldown5622 if findtype "Yellow Potion" self as healpot5623 dclick healpot5624 wait 7505625 if insysmsg "Potion satchel used"5626 if EnableOverheadMessages = 1 5627 overhead "*drinking free heal potion...*" 2535628 endif5629 clearsysmsg5630 else 5631 if EnableOverheadMessages = 1 5632 overhead '*drinking heal potion...*' 2535633 endif5634 clearsysmsg5635 endif5636 settimer "HealingPotionTimer" 05637 cooldown "Healing Potion" HealingPotionCooldown5638 else 5639 if timer "InventoryTimer" > 60005640 if EnableOverheadMessages = 1 5641 overhead '[ NO HEAL POTS! ]' 3375642 endif5643 settimer "InventoryTimer" 05644 endif5645 endif5646 wait 500 5647 endif5648 endif 5649 5650 if skill 'Healing' > 305651 if not bandaging 5652 if hp < maxhp or poisoned or findbuff "bleed" or findbuff "disease" 5653 if counttype 'clean bandage%s%' self < 10 and counttype 'clean bandage%s%' self != 05654 if timer "InventoryTimer" > 60005655 overhead "[ BANDAGES LOW! ]" 3395656 settimer "InventoryTimer" 05657 endif5658 if EnableOverheadMessages = 15659 overhead '*applying bandages...*' 885660 endif 5661 hotkey "Bandage Self" 5662 elseif counttype 'clean bandage%s%' self = 0 and timer "InventoryTimer" > 6000 5663 overhead "[ NO BANDAGES! ]" 3375664 settimer "InventoryTimer" 05665 elseif poisoned or findbuff "bleed" or findbuff "disease" 5666 if EnableOverheadMessages = 15667 overhead '*applying bandages...*' 885668 endif 5669 hotkey "Bandage Self" 5670 else 5671 if EnableOverheadMessages = 15672 overhead '*applying bandages...*' 885673 endif 5674 hotkey "Bandage Self" 5675 endif 5676 endif5677 endif 5678 endif5679 5680 if EnableCurePotion = 1 or EnableCurePotion = 25681 if poisoned and timer "CurePotionTimer" > CurePotionCooldown5682 if findtype "Orange Potion" self as curepot5683 dclick curepot5684 wait 5005685 if insysmsg "Potion satchel used"5686 if EnableOverheadMessages = 1 5687 overhead "*drinking free cure potion...*" 445688 endif5689 clearsysmsg5690 else 5691 if EnableOverheadMessages = 1 5692 overhead '*drinking cure potion...*' 445693 endif5694 clearsysmsg5695 endif5696 settimer "CurePotionTimer" 05697 cooldown "Cure Potion" CurePotionCooldown5698 else5699 if timer "InventoryTimer" > 60005700 if EnableOverheadMessages = 1 5701 overhead '[ NO CURE POTS! ]' 3375702 endif5703 settimer "InventoryTimer" 05704 endif5705 endif5706 wait 500 5707 endif5708 endif 5709 5710 if EnableCastHeal = 15711 if skill 'Magery' >= 50 and diffhits > CastHealHPlowdiff and diffhits < CastHealHPhighdiff and mana >= 45712 cast 'Heal'5713 wait 1005714 while not casting 5715 if targetexists5716 hotkey 'cancel current target'5717 endif5718 cast 'Heal'5719 wait 1005720 endwhile 5721 wft 15005722 target 'self' 5723 wait 250 5724 elseif skill 'Magery' >= 60 and diffhits > CastHealHPhighdiff and mana >= 115725 cast 'Greater Heal'5726 wait 1005727 while not casting 5728 if targetexists5729 hotkey 'cancel current target'5730 endif5731 cast 'Greater Heal'5732 wait 1005733 endwhile 5734 wft 15005735 target 'self' 5736 wait 250 5737 endif 5738 endif5739 5740 if EnableCastCure = 15741 if poisoned and skill 'Magery' >= 40 and mana >= 65742 cast 'Cure'5743 wait 1005744 while not casting 5745 if targetexists5746 hotkey 'cancel current target'5747 endif5748 cast 'Cure' 5749 wait 1005750 endwhile 5751 wft 15005752 target 'self' 5753 wait 250 5754 endif 5755 endif5756 5757 if EnableRefreshPotion = 1 or EnableRefreshPotion = 25758 if diffstam >= RefreshPotSPdiff and timer "RefreshPotionTimer" > RefreshPotionCooldown5759 if findtype "Red Potion" self as refreshpot5760 dclick refreshpot5761 wait 5005762 if insysmsg "Potion satchel used"5763 if EnableOverheadMessages = 1 5764 overhead "*drinking free refresh potion...*" 345765 endif5766 clearsysmsg5767 else 5768 if EnableOverheadMessages = 1 5769 overhead '*drinking refresh potion...*' 345770 endif5771 clearsysmsg5772 endif5773 settimer "RefreshPotionTimer" 05774 cooldown "Refresh Potion" RefreshPotionCooldown5775 else 5776 if timer "InventoryTimer" > 60005777 if EnableOverheadMessages = 1 5778 overhead '[ NO REFRESH POTS! ]' 3375779 endif5780 settimer "InventoryTimer" 05781 endif5782 endif5783 wait 500 5784 endif5785 endif 5786 5787 if EnableMagicResistPotion = 1 or EnableMagicResistPotion = 25788 if not findbuff "Magic Resist Potion"5789 if findtype "Black Potion" self as magicresistpot5790 dclick magicresistpot5791 wait 5005792 if EnableOverheadMessages = 1 5793 if insysmsg "Potion satchel used" 5794 overhead '*drinking free resist potion*' 24065795 clearsysmsg5796 else 5797 overhead '*drinking resist potion*' 24065798 clearsysmsg5799 endif5800 endif 5801 else 5802 if timer "InventoryTimer" > 60005803 overhead '[ NO RESIST POTS! ]' 3375804 settimer "InventoryTimer" 05805 endif5806 endif5807 wait 5005808 endif5809 endif5810 5811 if EnableStrengthPotion = 1 or EnableStrengthPotion = 25812 if skill 'Alchemy' = 1 5813 if insysmsg "You may now use a strength" or not findbuff "Strength"5814 if findtype "White Potion" self as strengthpot5815 dclick strengthpot5816 wait 5005817 if EnableOverheadMessages = 1 5818 if insysmsg "Potion satchel used" 5819 overhead '*drinking free strength potion*' 9565820 clearsysmsg5821 else 5822 overhead '*drinking strength potion*' 9565823 clearsysmsg5824 endif5825 endif5826 else 5827 if timer "InventoryTimer" > 60005828 overhead '[ NO STRENGTH POTS! ]' 3375829 settimer "InventoryTimer" 05830 endif5831 endif5832 wait 5005833 endif5834 elseif not findbuff "Strength"5835 if findtype "White Potion" self as strengthpot5836 dclick strengthpot5837 wait 5005838 if EnableOverheadMessages = 1 5839 if insysmsg "Potion satchel used" 5840 overhead '*drinking free strength potion*' 9565841 clearsysmsg5842 else 5843 overhead '*drinking strength potion*' 9565844 clearsysmsg5845 endif5846 endif5847 else 5848 if timer "InventoryTimer" > 60005849 overhead '[ NO STRENGTH POTS! ]' 3375850 settimer "InventoryTimer" 05851 endif5852 endif5853 wait 5005854 endif5855 endif5856 5857 if EnableAgilityPotion = 1 or EnableAgilityPotion = 25858 if not findbuff "Agility"5859 if findtype "Blue Potion" self as agilitypot5860 dclick agilitypot5861 wait 5005862 if EnableOverheadMessages = 1 5863 if insysmsg "Potion satchel used" 5864 overhead '*drinking free agility potion*' 935865 clearsysmsg5866 else 5867 overhead '*drinking agility potion*' 935868 clearsysmsg5869 endif5870 endif5871 else 5872 if timer "InventoryTimer" > 60005873 overhead '[ NO AGILITY POTS! ]' 3375874 settimer "InventoryTimer" 05875 endif5876 endif5877 wait 5005878 endif5879 endif5880 5881 if EnableMagicReflection = 15882 if not timerexists "MagicShield"5883 createtimer "MagicShield"5884 settimer "MagicShield" 300005885 endif5886 if skill 'Magery' >= 60 and not findbuff 'Magic Reflection' and mana > 14 and TimeToGo != 15887 for 105888 cast 'Magic Reflection' 5889 waitfortarget 15005890 hotkey 'Target Self'5891 wait 10005892 if insysmsg "That spell will not adhere"5893 settimer "MagicShield" 05894 if EnableOverheadMessages = 1 5895 overhead "Too soon for a new shield. Give me a sec..." 20865896 endif 5897 replay5898 endif 5899 wait 10005900 if not findbuff 'Magic Reflection' 5901 wait 10005902 if EnableOverheadMessages = 1 5903 overhead "Let me try that again..." 20865904 endif 5905 wait 10005906 else5907 break5908 endif 5909 endfor 5910 wait 15005911 replay5912 endif 5913 endif5914 5915 if EnableReactiveArmour = 15916 if not timerexists "MagicArmor"5917 createtimer "MagicArmor"5918 settimer "MagicArmor" 300005919 endif5920 if skill 'Magery' >= 50 and not findbuff 'Reactive Armor' and mana >= 4 and TimeToGo != 15921 for 105922 cast 'Reactive Armor' 5923 waitfortarget 15005924 hotkey 'Target Self'5925 wait 10005926 if insysmsg "That spell will not adhere"5927 settimer "MagicArmor" 05928 if EnableOverheadMessages = 1 5929 overhead "Too soon for a new magic armor. Give me a sec..." 20865930 endif 5931 replay5932 endif 5933 wait 10005934 if not findbuff 'Magic Reflection' 5935 wait 5005936 if EnableOverheadMessages = 1 5937 overhead "Let me try that again..." 20865938 wait 5005939 endif 5940 else5941 break5942 endif 5943 endfor 5944 wait 10005945 replay5946 endif 5947 endif5948 5949 if paralyzed and EnableAutoParalyzePouch = 15950 if EnableOverheadMessages = 1 5951 overhead "[ [ [ [ POP! ] ] ] ]" 21175952 endif5953 say "[pouch" 5954 @setvar! MurdererFound 15955 @setvar! TimeToGo 15956 replay5957 endif5958 5959 if EnableProtection = 15960 if skill 'Magery' >= 60 and not findbuff 'Protection' and diffmana < 105961 for 35962 cast 'Protection' 5963 wait 1005964 while casting 5965 wait 505966 endwhile5967 wait 10005968 if not findbuff 'Protection'5969 if EnableOverheadMessages = 1 5970 overhead "Shit, let me try that again..." 20865971 endif 5972 wait 5005973 else5974 break5975 endif 5976 endfor 5977 wait 2505978 endif 5979 endif5980 5981 if skill "Mace Fighting" or skill "Swordsmanship" > 50 5982 attack CurrentTarget 5983 wait 500 5984 elseif skill "Magery" >= 805985 if EnableMagicMushroom = 15986 if not timerexists MushroomTimer5987 settimer MushroomTimer MushroomCooldown5988 endif5989 if mana < 50 and timer MushroomTimer >= MushroomCooldown and findtype "mushroom" backpack as magicmushroom5990 if EnableOverheadMessages = 15991 overhead "*eating shrooms...*" 315992 endif5993 dclick magicmushroom5994 wait 5005995 if insysmsg "You consume a magic mushroom and restore some mana."5996 settimer MushroomTimer 0 5997 elseif insysmsg "before you may consume another magic mushroom" or insysmsg "been in combat with another"5998 settimer MushroomTimer 300005999 endif6000 cooldown "Mushroom" MushroomCooldown6001 endif6002 endif 6003 6004 if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook6005 getlabel myspellbook SpellbookLabel6006 for 56007 wait 2506008 if "aspect" in SpellbookLabel6009 break6010 elseif "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel or "spells)" in SpellbookLabel 6011 @ignore myspellbook 6012 wait 2506013 if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook6014 getlabel myspellbook SpellbookLabel6015 else 6016 overhead "[ NO SPELLBOOK! ]" 3376017 break6018 endif6019 endif 6020 endfor6021 dclick myspellbook6022 wait 5006023 endif6024 6025 if find CurrentTarget ground -1 -1 86026 if not timerexists "WeakenCD" 6027 createtimer "WeakenCD" 6028 settimer "WeakenCD" WeakenCooldown6029 endif 6030 if not timerexists "MagicArrowCD"6031 createtimer "MagicArrowCD"6032 settimer "MagicArrowCD" MagicArrowCooldown6033 endif 6034 if not timerexists "HarmCD"6035 createtimer "HarmCD"6036 settimer "HarmCD" HarmCooldown6037 endif 6038 if not timerexists "CurseCD"6039 createtimer "CurseCD"6040 settimer "CurseCD" CurseCooldown6041 endif 6042 if not timerexists "ExplosionCD"6043 createtimer "ExplosionCD"6044 settimer "ExplosionCD" ExplosionCooldown6045 endif 6046 if not timerexists "MindblastCD"6047 createtimer "MindblastCD"6048 settimer "MindblastCD" 06049 endif 6050 if not timerexists "EnergyBoltCD"6051 createtimer "EnergyBoltCD"6052 settimer "EnergyBoltCD" EnergyBoltCooldown6053 endif 6054 if not timerexists "LightningCD"6055 createtimer "LightningCD"6056 settimer "LightningCD" LightningCooldown6057 endif 6058 if not timerexists "FlamestrikeCD"6059 createtimer "FlamestrikeCD"6060 settimer "FlamestrikeCD" FlamestrikeCooldown6061 endif 6062 if not timerexists "FireballCD"6063 createtimer "FireballCD"6064 settimer "FireballCD" FireballCooldown6065 endif 6066 if not timerexists "MeteorSwarmCD"6067 createtimer "MeteorSwarmCD"6068 settimer "MeteorSwarmCD" MeteorSwarmCooldown6069 endif 6070 if not timerexists "ChainLightningCD"6071 createtimer "ChainLightningCD"6072 settimer "ChainLightningCD" ChainLightningCooldown6073 endif 6074 6075 if mana >= 4 and EnableCastWeaken = 1 and timer "WeakenCD" > WeakenCooldown6076 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306077 hotkey '> Interrupt'6078 break6079 else6080 cast 'weaken'6081 wait 1006082 while casting 6083 wait 506084 endwhile6085 endif 6086 wft 25006087 target CurrentTarget6088 wait 2506089 if insysmsg "cannot be seen" 6090 if EnableOverheadMessages = 16091 overhead "I can't see that!" 20866092 endif 6093 wait 5006094 else 6095 settimer WeakenCD 06096 endif 6097 elseif mana >= 4 and EnableCastMagicArrow = 1 and timer "MagicArrowCD" > MagicArrowCooldown6098 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306099 hotkey '> Interrupt'6100 break6101 else6102 cast 'magic arrow'6103 wait 1006104 while casting 6105 wait 506106 endwhile6107 endif 6108 wft 25006109 target CurrentTarget6110 wait 2506111 if insysmsg "cannot be seen" 6112 if EnableOverheadMessages = 16113 overhead "I can't see that!" 20866114 endif 6115 wait 5006116 else 6117 settimer MagicArrowCD 06118 endif6119 elseif mana >= 6 and EnableCastHarm = 1 and timer "HarmCD" > HarmCooldown6120 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306121 hotkey '> Interrupt'6122 break6123 else6124 cast 'harm'6125 wait 1006126 while casting 6127 wait 506128 endwhile6129 endif 6130 wft 25006131 target CurrentTarget6132 wait 2506133 if insysmsg "cannot be seen"6134 if EnableOverheadMessages = 16135 overhead "I can't see that!" 20866136 endif 6137 wait 5006138 else 6139 settimer "HarmCD" 0 6140 endif 6141 elseif mana >= 11 and EnableCastCurse = 1 and timer "CurseCD" > CurseCooldown6142 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306143 hotkey '> Interrupt'6144 break6145 else6146 cast 'curse'6147 wait 1006148 while casting 6149 wait 506150 endwhile6151 endif 6152 wft 25006153 target CurrentTarget6154 wait 2506155 if insysmsg "cannot be seen"6156 if EnableOverheadMessages = 16157 overhead "I can't see that!" 20866158 endif 6159 wait 5006160 else 6161 settimer "CurseCD" 0 6162 endif 6163 elseif mana >= 20 and EnableCastExplosion = 1 and timer "ExplosionCD" > ExplosionCooldown6164 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306165 hotkey '> Interrupt'6166 break6167 else6168 cast 'explosion'6169 wait 1006170 while casting 6171 wait 506172 endwhile6173 endif 6174 wft 25006175 target CurrentTarget6176 wait 2506177 if insysmsg "cannot be seen"6178 if EnableOverheadMessages = 16179 overhead "I can't see that!" 20866180 endif 6181 wait 5006182 else 6183 settimer "ExplosionCD" 06184 endif6185 elseif mana >= 14 and EnableCastMindblast = 1 and timer "MindblastCD" > MindblastCooldown6186 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306187 hotkey '> Interrupt'6188 break6189 else6190 cast 'mindblast'6191 wait 1006192 while casting 6193 wait 506194 endwhile6195 endif 6196 wft 25006197 target CurrentTarget6198 wait 2506199 if insysmsg "cannot be seen"6200 if EnableOverheadMessages = 16201 overhead "I can't see that!" 20866202 endif 6203 wait 5006204 else 6205 settimer "MindblastCD" 06206 endif 6207 elseif mana >= 20 and EnableCastEnergyBolt = 1 and timer "EnergyBoltCD" > EnergyBoltCooldown6208 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306209 hotkey '> Interrupt'6210 break6211 else6212 cast 'energy bolt'6213 wait 1006214 while casting 6215 wait 506216 endwhile6217 endif 6218 wft 25006219 target CurrentTarget6220 wait 2506221 if insysmsg "cannot be seen"6222 if EnableOverheadMessages = 16223 overhead "I can't see that!" 20866224 endif 6225 wait 5006226 else 6227 settimer "EnergyBoltCD" 06228 endif6229 elseif mana >= 11 and EnableCastLightning = 1 and timer "LightningCD" > LightningCooldown6230 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306231 hotkey '> Interrupt'6232 break6233 else6234 cast 'lightning'6235 wait 1006236 while casting 6237 wait 506238 endwhile6239 endif 6240 wft 25006241 target CurrentTarget6242 wait 2506243 if insysmsg "cannot be seen"6244 if EnableOverheadMessages = 16245 overhead "I can't see that!" 20866246 endif 6247 wait 5006248 else 6249 settimer "LightningCD" 06250 endif6251 elseif mana >= 40 and EnableCastFlamestrike = 1 and timer "FlamestrikeCD" > FlamestrikeCooldown6252 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306253 hotkey '> Interrupt'6254 break6255 else6256 cast 'flamestrike'6257 wait 1006258 while casting 6259 wait 506260 endwhile6261 endif 6262 wft 25006263 target CurrentTarget6264 wait 2506265 if insysmsg "cannot be seen"6266 if EnableOverheadMessages = 16267 overhead "I can't see that!" 20866268 endif 6269 wait 5006270 else 6271 settimer "FlamestrikeCD" 0 6272 endif6273 elseif mana >= 9 and EnableCastFireball = 1 and timer "FireballCD" > FireballCooldown6274 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306275 hotkey '> Interrupt'6276 break6277 else6278 cast 'fireball'6279 wait 1006280 while casting 6281 wait 506282 endwhile6283 endif 6284 wft 25006285 target CurrentTarget6286 wait 2506287 if insysmsg "cannot be seen"6288 if EnableOverheadMessages = 16289 overhead "I can't see that!" 20866290 endif 6291 wait 5006292 else 6293 settimer "FireballCD" 06294 endif6295 elseif mana >= 40 and EnableCastMeteorSwarm = 1 and timer "MeteorSwarmCD" > MeteorSwarmCooldown6296 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306297 hotkey '> Interrupt'6298 break6299 else6300 cast 'meteor swarm'6301 wait 1006302 while casting 6303 wait 506304 endwhile6305 endif 6306 wft 25006307 target CurrentTarget6308 wait 2506309 if insysmsg "cannot be seen"6310 if EnableOverheadMessages = 16311 overhead "I can't see that!" 20866312 endif 6313 wait 5006314 else 6315 settimer "MeteorSwarmCD" 06316 endif6317 elseif mana >= 40 and EnableCastChainLightning = 1 and timer "ChainLightningCD" > ChainLightningCooldown6318 if not find CurrentTarget ground -1 -1 15 or diffhits >= 306319 hotkey '> Interrupt'6320 break6321 else6322 cast 'chain lightning'6323 wait 1006324 while casting 6325 wait 506326 endwhile6327 endif 6328 wft 25006329 target CurrentTarget6330 wait 2506331 if insysmsg "cannot be seen"6332 if EnableOverheadMessages = 16333 overhead "I can't see that!" 20866334 endif 6335 wait 5006336 else 6337 settimer "ChainLightningCD" 06338 endif6339 endif 6340 wait 5006341 if not dead CurrentTarget6342 getlabel CurrentTarget TargetName6343 else 6344 break6345 endif 6346 endif 6347 endif6348 endwhile6349 6350 if insysmsg "You have gained"6351 if EnableOverheadMessages = 1 6352 overhead "Did you see that?? I just killed {{TargetName}}!" 20866353 endif 6354 wait 5006355 hotkey 'Cancel Current Target'6356 @setvar CurrentTarget 06357 clearsysmsg6358 wait 5006359 endif6360 6361 if skill "Spirit Speak" >= 80 6362 if not timerexists "SpiritSpeak"6363 createtimer "SpiritSpeak"6364 settimer "SpiritSpeak" 105006365 endif6366 if timer "SpiritSpeak" > 105006367 useskill "spiritspeak"6368 settimer "Spirit Speak" 06369 endif6370 endif6371 6372 if findtype 'Elven SpellBlade' backpack and EnableAutoCarving = 16373 if findtype "corpse" ground -1 -1 2 as corpse6374 hotkey 'Cancel Current Target'6375 dclicktype "Elven Spellblade"6376 wft 15006377 target self6378 if EnableOverheadMessages = 16379 overhead "*skinning...*" 3396380 endif6381 @ignore corpse6382 endif 6383 endif6384 6385 if insysmsg "You have unlocked a codex upgrade point"6386 if EnableOverheadMessages = 16387 overhead "[ CODEX POINT UNLOCKED! ]" 21146388 else 6389 overhead "� CODEX �" 21146390 endif 6391 if EnableSummons = 1 and followers >= 1 and EnableOverheadMessages = 16392 wait 10006393 overhead "Well done, Master..." 44 myMainTankPet6394 menu myMainTankPet 36395 endif6396 endif6397 6398 if insysmsg "unlocked a point for your wizard's grimoire"6399 if EnableOverheadMessages = 16400 overhead "[ GRIMOIRE POINT UNLOCKED! ]" 76401 else 6402 overhead "� GRIMOIRE �" 76403 endif 6404 if EnableSummons = 1 and followers >= 1 and EnableOverheadMessages = 16405 wait 10006406 overhead "You seem stronger, Master..." 44 myMainTankPet6407 menu myMainTankPet 36408 endif6409 endif6410 6411 if insysmsg "enough experience to upgrade"6412 if EnableOverheadMessages = 16413 overhead "[ ASPECT TIER UNLOCKED! ]" 20866414 else 6415 overhead "� ASPECT �" 20866416 endif 6417 if EnableSummons = 1 and followers >= 1 and EnableOverheadMessages = 16418 wait 5006419 overhead "Time to spend some more gold, it would seem..." 44 myMainTankPet6420 menu myMainTankPet 36421 wait 5006422 endif6423 endif6424 6425 if insysmsg "upgrade point for Fire Elemental" or insysmsg "upgrade point for Air Elemental" or insysmsg "upgrade point for Water Elemental" or insysmsg "upgrade point for Earth Elemental" and EnableSummons = 1 and followers >= 1 and EnableOverheadMessages = 16426 overhead "Hmm.. I suddenly feel stronger!" 44 myMainTankPet6427 menu myMainTankPet 36428 wait 5006429 overhead "*cracks knuckles...*" 2117 myMainTankPet6430 endif6431 6432 if insysmsg "something invisible out of the way"6433 if EnableOverheadMessages = 16434 overhead "[ � SOMEONE HIDDEN! � ]" 66435 else6436 overhead "[ � ]" 66437 endif 6438 if EnableSummons = 1 and followers >= 1 and EnableOverheadMessages = 16439 wait 5006440 overhead "There is a foul stench upon the air..." 44 myMainTankPet6441 menu myMainTankPet 36442 wait 5006443 endif6444 endif 6445 6446 if paralyzed and EnableAutoParalyzePouch = 16447 if EnableOverheadMessages = 16448 overhead "[ [ [ [POP] ] ] ]" 21176449 endif 6450 say "[pouch" 6451 @setvar! TimeToGo 16452 @setvar! MurdererFound 16453 if EnableSummons = 1 and followers >= 1 and EnableOverheadMessages = 16454 overhead "That was unwise, criminal..." 44 myMainTankPet6455 menu myMainTankPet 36456 clearsysmsg 6457 endif6458 endif6459 6460 if not findbuff "Actively Meditating" and diffmana > 50 and diffhits < 306461 if not timerexists "MeditatingTimer"6462 createtimer "MeditatingTimer"6463 settimer "MeditatingTimer" 06464 endif6465 clearhands both6466 useskill "meditation"6467 settimer "MeditatingTimer" 06468 if EnableOverheadMessages = 16469 overhead "*meditating...*" 106470 endif6471 wait 5006472 while findbuff "Actively Meditating" and diffmana > 50 6473 if insysmsg "Now tracking"6474 replay6475 endif 6476 if not findbuff "Actively Meditating" 6477 break6478 endif 6479 if diffhits > 30 6480 break6481 elseif timer "MeditatingTimer" > 5000 6482 if EnableOverheadMessages = 16483 overhead "*meditating...*" 106484 endif6485 settimer "MeditatingTimer" 06486 endif6487 if not warmode 6488 if EnableOverheadMessages = 16489 overhead "I need to get back to work..." 20866490 endif 6491 wait 5006492 replay6493 endif6494 endwhile6495 endif6496 endfor 6497 6498 if skill "Mace Fighting" > 50 and not findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" self or skill "Swordsmanship" > 50 and not findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" self6499 if EnableOverheadMessages = 16500 overhead "I can't fight without a weapon!" 20866501 endif 6502 hotkey 'Cancel Current Target'6503 @setvar! TimeToGo 16504 replay 6505 endif 6506 hotkey 'Cancel Current Target'6507 hotkey 'Toggle Peace Only'6508 replay6509 endif6510 endif 6511 6512 6513 //////////////////////6514 // MINING SCRIPT: //6515 //////////////////////6516 6517 if skill "Mining" >= 50 and EnableMining = 1 and timer "TravelTimer" > 600006518 6519 @setvar! DungeonMode 06520 6521 if hidden 6522 overhead "[ HIDDEN... ]" 66523 wait 10006524 sysmsg "You cannot mine while hidden! Please unhide and try again..." 06525 wait 30006526 replay6527 endif6528 6529 if PutIngotsinLockedChest = 16530 if not findtype "wooden box" backpack or not findtype "copper key" backpack6531 overhead "[ NO LOCKBOX FOUND! ]" 3396532 wait 500 6533 elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1 6534 overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 3396535 wait 500 6536 elseif findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key6537 getlabel lockbox lockboxLabel6538 if "items" in lockboxLabel6539 dclick key6540 wft 10006541 target lockbox6542 wait 5006543 overhead "[lockbox secured]" 846544 endif6545 endif 6546 endif6547 6548 if EnableIngotBag = 1 6549 if not find IngotBag self6550 overhead "Please select your ingot storage bag..." 886551 wait 5006552 setvar IngotBag6553 wft 5006554 while targetexists6555 wait 1006556 endwhile6557 overhead "[ INGOT BAG SET! ]" 936558 endif6559 endif6560 6561 if EnablePlayerForgeRadar = 16562 if not timerexists "ForgeRadar"6563 createtimer "ForgeRadar"6564 settimer "ForgeRadar" 35006565 endif 6566 if findtype "4017|6526|6538|6550|6562" ground -1 -1 15 as forge or findtype 0x0FB1 ground -1 -1 15 as forge and findtype "iron ore" backpack and timer "ForgeRadar" > 35006567 if EnableOverheadMessages = 16568 overhead "[ FORGE ]" 44 forge6569 overhead "�" 44 forge6570 else 6571 overhead "�" 44 forge6572 endif 6573 settimer "ForgeRadar" 06574 endif 6575 endif6576 6577 if EnableOreVacuum = 16578 if not timerexists "OreRadar"6579 createtimer "OreRadar"6580 settimer "OreRadar" 35006581 endif 6582 if findtype "iron ore" ground -1 -1 15 as droppedore and timer "OreRadar" > 3500 6583 if EnableOverheadMessages = 16584 overhead "[ ORE ]" 93 droppedore 6585 overhead "�" 93 droppedore6586 else 6587 overhead "�" 93 droppedore6588 endif6589 settimer "OreRadar" 06590 endif6591 if not timerexists "IngotRadar"6592 createtimer "IngotRadar"6593 settimer "IngotRadar" 35006594 endif6595 if findtype "iron ingot%s" ground -1 -1 15 as droppedingots and timer "IngotRadar" > 3500 6596 if EnableOverheadMessages = 1 6597 overhead "[ INGOTS ]" 69 droppedingots 6598 overhead "�" 69 droppedingots6599 else6600 overhead "�" 69 droppedingots6601 endif 6602 settimer "IngotRadar" 06603 endif6604 while findtype "iron ore|iron ingot%s" ground -1 -1 2 as droppedmetal6605 clearsysmsg6606 if EnableOverheadMessages = 1 6607 overhead "*picking up metal...*" 936608 endif 6609 hotkey "Grab Item"6610 wft 15006611 target droppedmetal6612 wait 5006613 if insysmsg "Invalid or inaccessible item"6614 if EnableOverheadMessages = 1 6615 overhead "I can't get to that!" 20866616 endif 6617 @ignore droppedmetal6618 endif6619 if SetIngotBagtoOrganizer03 = 16620 hotkey 'Organizer Agent-03' 6621 endif 6622 endwhile6623 endif 6624 6625 if counttype "iron ingot%s" backpack > IngotRecallAmount and EnableIngotAutoRecall = 16626 if EnableOverheadMessages = 1 6627 overhead "I'd hate to lose all this hard work..." 20866628 wait 25006629 overhead "I'm going to go unload before it's too late!" 20866630 sysmsg "Disable 'EnableIngotAutoRecall' in script variables to turn off this feature!" 06631 wait 20006632 endif 6633 @setvar! TimeToGo 16634 replay6635 endif6636 6637 if EnablePackAnimals = 16638 if not varexist idonthaveapacky6639 @setvar! idonthaveapacky 06640 endif 6641 6642 if dead myMainPackAnimal or not varexist myMainPackAnimal and PackAnimalCount = 16643 wait 10006644 overhead "[ SELECT YOUR MAIN PACK ANIMAL... ]" 2536645 setvar myMainPackAnimal6646 wft 5006647 while targetexists 6648 wait 1006649 endwhile6650 overhead "[ MAIN PACKY SET! ]" 936651 wait 1500 6652 endif 6653 6654 if dead mySecondPackAnimal or not varexist mySecondPackAnimal and PackAnimalCount = 26655 wait 10006656 overhead "[ SELECT YOUR 2ND PACK ANIMAL... ]" 2536657 setvar mySecondPackAnimal6658 wft 5006659 while targetexists 6660 wait 1006661 endwhile6662 overhead "[ TWO PACKY SET! ]" 936663 wait 1500 6664 endif 6665 6666 if not find myMainPackAnimal ground -1 -1 12 or not find mySecondPackAnimal ground -1 -1 12 and PackAnimalCount = 26667 if findtype "291|292" ground -1 -1 2 as PackAnimal6668 if noto PackAnimal = "friend"6669 if not find myMainPackAnimal 6670 @setvar PackAnimal myMainPackAnimal 6671 elseif not find mySecondPackAnimal6672 @setvar PackAnimal mySecondPackAnimal6673 endif6674 else6675 if EnableOverheadMessages = 1 6676 overhead "Where did that damn animal go now..." 20866677 wait 1500 6678 endif 6679 @setvar! idonthaveapacky 16680 endif6681 endif6682 endif 6683 6684 if not timerexists "PackyFollowOne" 6685 createtimer "PackyFollowOne" 6686 settimer "PackyFollowOne" 300006687 endif6688 6689 if not timerexists "PackyFollowTwo" 6690 createtimer "PackyFollowTwo" 6691 settimer "PackyFollowTwo" 300006692 endif6693 6694 if timer "PackyFollowOne" > 30000 and PackAnimalCount = 16695 menu myMainPackAnimal 46696 settimer "PackyFollowOne" 06697 endif6698 6699 if timer "PackyFollowTwo" > 30000 and PackAnimalCount = 26700 menu mySecondPackAnimal 46701 settimer "PackyFollowTwo" 06702 endif 6703 endif6704 6705 if EnableAutoSmeltPlayerForge = 16706 if not timerexists "SmeltingTimer" 6707 createtimer "SmeltingTimer" 6708 settimer "SmeltingTimer" 35006709 endif 6710 if not timerexists "ForgingTimer" 6711 createtimer "ForgingTimer" 6712 settimer "ForgingTimer" 35006713 endif 6714 if findtype "forge" ground -1 -1 2 as forge or findtype 0x0FB1 ground -1 -1 2 as forge and findtype "iron ore" backpack as ore6715 while findtype "iron ore" backpack as ore 6716 if timer "SmeltingTimer" > 3500 and EnableOverheadMessages = 16717 overhead "*smelting ore...*" 2114 forge6718 settimer "SmeltingTimer" 06719 endif 6720 dclick ore6721 if timer "ForgingTimer" > 3500 and EnableOverheadMessages = 16722 overhead "*forging ingots...*" 21176723 settimer "ForgingTimer" 06724 endif6725 wait 10006726 @setvar! NeedtoSecureIngots 16727 if insysmsg "You do not see any nearby forges"6728 settimer AutoSmeltNaturalForgeTimer 06729 @setvar! ForgeFound 06730 break6731 endif6732 if SetIngotBagtoOrganizer03 = 16733 hotkey 'Organizer Agent-03' 6734 wait 5006735 endif 6736 endwhile6737 6738 if EnablePackAnimals = 16739 if not timerexists "PackySmeltTimer" 6740 createtimer "PackySmeltTimer" 6741 settimer "PackySmeltTimer" 35006742 endif 6743 if find myMainPackAnimal ground -1 -1 26744 getlabel myMainPackAnimal PackyLabel6745 if "[0/2000" in PackyLabel6746 // Do nothing6747 else6748 dclick myMainPackAnimal 6749 wait 5006750 while findtype "iron ore" myMainPackAnimal as packyoretosmelt6751 dclick packyoretosmelt6752 if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages = 1 6753 overhead "*smelting from pack animal...*" 2114 myMainPackAnimal 6754 settimer "PackySmeltTimer" 06755 endif 6756 wait 6506757 endwhile6758 @setvar! NeedtoSecureIngots 16759 endif6760 endif 6761 6762 if find mySecondPackAnimal ground -1 -1 26763 getlabel mySecondPackAnimal TwoPackyLabel6764 if "[0/2000" in TwoPackyLabel6765 // Do nothing6766 else6767 dclick mySecondPackAnimal 6768 wait 5006769 while findtype "iron ore" myMainPackAnimal as twopackyoretosmelt6770 dclick twopackyoretosmelt6771 if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages = 16772 overhead "*smelting from pack animal...*" 2114 mySecondPackAnimal 6773 settimer "PackySmeltTimer" 06774 endif 6775 wait 6506776 endwhile6777 @setvar! NeedtoSecureIngots 16778 endif6779 endif 6780 endif 6781 endif6782 endif6783 6784 if EnableAutoSmeltNaturalForge = 1 6785 if findtype "iron ore" backpack as ore and MiningActive = 06786 @setvar! ForgeFound 0 6787 if not timerexists AutoSmeltNaturalForgeTimer6788 settimer AutoSmeltNaturalForgeTimer 25006789 endif6790 if timer AutoSmeltNaturalForgeTimer >= 25006791 dclick ore6792 wait 5006793 if insysmsg "You do not see any nearby forges"6794 settimer AutoSmeltNaturalForgeTimer 06795 clearsysmsg6796 else6797 @setvar! ForgeFound 16798 clearsysmsg6799 if EnableOverheadMessages = 1 6800 overhead "*found a forge!*" 21176801 endif 6802 endif6803 endif6804 endif 6805 6806 if ForgeFound = 1 6807 while findtype "iron ore" backpack as ore6808 dclick ore6809 wait 5006810 @setvar! NeedtoSecureIngots 16811 if insysmsg "You do not see any nearby forges"6812 settimer AutoSmeltNaturalForgeTimer 06813 @setvar! ForgeFound 06814 clearsysmsg6815 break6816 endif6817 if SetIngotBagtoOrganizer03 = 16818 hotkey 'Organizer Agent-03' 6819 wait 5006820 endif 6821 endwhile6822 6823 if EnablePackAnimals = 16824 if not timerexists "PackySmeltTimer" 6825 createtimer "PackySmeltTimer" 6826 settimer "PackySmeltTimer" 35006827 endif 6828 if find myMainPackAnimal ground -1 -1 26829 getlabel myMainPackAnimal PackyLabel6830 if "[0/2000" in PackyLabel6831 // Do nothing6832 else6833 dclick myMainPackAnimal 6834 wait 5006835 while findtype "iron ore" myMainPackAnimal as packyoretosmelt6836 dclick packyoretosmelt6837 if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages = 16838 overhead "*smelting from pack animal...*" 2114 myMainPackAnimal 6839 settimer "PackySmeltTimer" 06840 endif 6841 wait 6506842 if insysmsg "You do not see any nearby forges"6843 @setvar! ForgeFound 06844 break6845 endif 6846 endwhile6847 @setvar! NeedtoSecureIngots 16848 endif6849 endif 6850 6851 if find mySecondPackAnimal ground -1 -1 26852 getlabel mySecondPackAnimal TwoPackyLabel6853 if "[0/2000" in TwoPackyLabel6854 // Do nothing6855 else6856 dclick mySecondPackAnimal 6857 wait 5006858 while findtype "iron ore" myMainPackAnimal as twopackyoretosmelt6859 dclick twopackyoretosmelt6860 if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages = 16861 overhead "*smelting from pack animal...*" 2114 mySecondPackAnimal 6862 settimer "PackySmeltTimer" 06863 endif 6864 wait 6506865 if insysmsg "You do not see any nearby forges"6866 @setvar! ForgeFound 06867 break 6868 endif6869 endwhile6870 @setvar! NeedtoSecureIngots 16871 endif6872 endif 6873 endif 6874 endif6875 endif 6876 6877 if EnableWeightWarningMessage = 16878 if not timerexists "WeightTimer" 6879 createtimer "WeightTimer" 6880 settimer "WeightTimer" 50006881 endif 6882 if diffweight < GreenWarningDiffWeight and diffweight > YellowWarningDiffWeight and timer "WeightTimer" > 50006883 overhead "[ WEIGHT WARNING... ]" 776884 settimer "WeightTimer" 06885 elseif diffweight < YellowWarningDiffWeight and diffweight > RedWeightLimitDiffWeight and timer "WeightTimer" > 50006886 overhead "[ TIME TO FORGE! ]" 1536887 settimer "WeightTimer" 06888 elseif diffweight < RedWeightLimitDiffWeight and timer "WeightTimer" > 50006889 overhead "[ WEIGHT LIMIT REACHED! ]" 376890 settimer "WeightTimer" 06891 wait 15006892 overhead "Find a forge in order to continue..." 06893 replay6894 endif 6895 endif 6896 6897 if not findtype 'pickaxe' hand and findtype 'pickaxe' backpack6898 dclicktype 'pickaxe' backpack6899 wait 5006900 endif6901 6902 if EnableWeightWarningMessage = 1 and diffweight < RedWeightLimitDiffWeight 6903 replay6904 else6905 hotkey 'Use item in hand' 6906 wft 15006907 hotkey 'Target Self' 6908 wait 6506909 endif 6910 6911 if insysmsg 'world is saving' 6912 for 506913 wait 1006914 if insysmsg 'world save complete' 6915 if EnableOverheadMessages = 16916 overhead '[ SAVE COMPLETE! ]' 2536917 endif 6918 clearsysmsg 6919 endif 6920 endfor 6921 replay 6922 elseif insysmsg 'Harvesting is not allowed'6923 if EnableOverheadMessages = 1 6924 overhead 'We need to leave the safe zone...' 846925 else6926 overhead "[ LEAVE TOWN! ]" 846927 endif6928 clearsysmsg 6929 wait 5000 6930 replay 6931 elseif insysmsg 'You have worn out your tool' 6932 if EnableOverheadMessages = 1 6933 overhead "Hang on, my pickaxe just broke!" 2086=6934 wait 1500 6935 endif6936 if counttype 'pickaxe' self > 0 6937 wait 5006938 if EnableOverheadMessages = 1 6939 overhead "But I think I have another.. one sec..." 20866940 wait 15006941 endif6942 else 6943 if EnableOverheadMessages = 1 6944 overhead "Dammit, that's my last pickaxe. Time to resupply!" 20866945 wait 15006946 endif6947 @setvar! TimeToGo 16948 endif 6949 clearsysmsg6950 replay6951 elseif insysmsg "You have recently traveled"6952 @setvar! TravelCooldownActive 16953 replay6954 elseif insysmsg 'You do not see any' or insysmsg 'You cannot produce any'6955 6956 @setvar! MiningActive 06957 6958 if not timerexists "MoveTimer" 6959 createtimer "MoveTimer" 6960 settimer "MoveTimer" 25006961 endif6962 6963 if MOVE = 1 6964 if timer "MoveTimer" > 25006965 @setvar! MOVE 06966 overhead "[ KEEP MOVING... ]" 886967 settimer "MoveTimer" 06968 @setvar! MOVE 06969 endif6970 elseif MOVE = 06971 if timer "MoveTimer" > 25006972 overhead "[ KEEP MOVING... ]" 15906973 settimer "MoveTimer" 06974 @setvar! MOVE 16975 endif6976 else 6977 if timer "MoveTimer" > 25006978 overhead "[ KEEP MOVING... ]" 15906979 settimer "MoveTimer" 06980 @setvar! MOVE 16981 endif6982 endif6983 6984 if not timerexists "OreStacker" 6985 createtimer "OreStacker" 6986 settimer "OreStacker" 600006987 endif 6988 6989 if findtype "iron ore" backpack as oretostack and EnableOreStacker = 1 and timer "OreStacker" > 600006990 if findtype "iron ore" backpack as oretostack6991 while findtype 'iron ore' backpack as oretostack6992 if find oretostack IngotBag6993 @ignore oretostack6994 else6995 if not timerexists "StackerTimer" 6996 createtimer "StackerTimer" 6997 settimer "StackerTimer" 35006998 endif 6999 if timer "StackerTimer" > 3500 and EnableOverheadMessages = 17000 overhead "*stacking ore...*" 777001 settimer "StackerTimer" 07002 endif 7003 lift oretostack 99997004 if StackOreinIngotBag = 17005 drop IngotBag7006 wait 5007007 else 7008 drop backpack 100 100 07009 @ignore oretostack7010 wait 5007011 endif7012 endif7013 endwhile 7014 endif7015 clearignore 7016 settimer "OreStacker" 07017 endif7018 7019 if EnablePackAnimals = 1 and idonthaveapacky != 17020 if find myMainPackAnimal ground -1 -1 12 7021 if findtype "6585" backpack as oretostoreinpacky and StoreinMainPacky = 17022 if not timerexists "PackyStorageTimer" 7023 createtimer "PackyStorageTimer" 7024 settimer "PackyStorageTimer" 35007025 endif 7026 if counttype oretostoreinpacky > OreTransfertoPackyAmount and OreTransfertoPackyAmount != 0 7027 while findtype "6585" as oretostoreinpacky backpack 7028 lift oretostoreinpacky 600007029 if timer "PackyStorageTimer" > 35007030 overhead "*moving ore to pack animal...*" 3497031 settimer "PackyStorageTimer" 07032 endif 7033 drop myMainPackAnimal 7034 wait 650 7035 endwhile 7036 elseif diffweight < TransfertoPackyWeightDiff and TransfertoPackyWeightDiff != 0 7037 while findtype "6585" as oretostoreinpacky backpack 7038 lift oretostoreinpacky 600007039 if timer "PackyStorageTimer" > 35007040 overhead "*moving ore to pack animal...*" 3497041 settimer "PackyStorageTimer" 07042 endif 7043 drop myMainPackAnimal 7044 wait 650 7045 endwhile 7046 endif 7047 elseif findtype "6585" backpack as oretostoreinpacky and StoreinSecondPacky = 17048 if counttype oretostoreinpacky > OreTransfertoPackyAmount and OreTransfertoPackyAmount != 0 7049 while findtype "6585" as oretostoreinpacky backpack 7050 lift oretostoreinpacky 600007051 if timer "PackyStorageTimer" > 35007052 overhead "*moving ore to pack animal...*" 3497053 settimer "PackyStorageTimer" 07054 endif 7055 drop mySecondPackAnimal7056 wait 650 7057 endwhile 7058 elseif diffweight < TransfertoPackyWeightDiff and TransfertoPackyWeightDiff != 0 7059 while findtype "6585" as oretostoreinpacky backpack 7060 lift oretostoreinpacky 600007061 if timer "PackyStorageTimer" > 35007062 overhead "*moving ore to pack animal...*" 3497063 settimer "PackyStorageTimer" 07064 endif 7065 drop mySecondPackAnimal7066 wait 650 7067 endwhile 7068 endif 7069 endif7070 7071 if not timerexists "PackyCheckTimer" 7072 createtimer "PackyCheckTimer" 7073 settimer "PackyCheckTimer" 150007074 endif 7075 7076 if timer "PackyCheckTimer" > 150007077 getlabel myMainPackAnimal MainPackyWeight7078 if '[1998/2000' in MainPackyWeight or '[1999/2000' in MainPackyWeight '[2000/2000' in MainPackyWeight7079 @setvar! StoreinMainPacky 07080 else 7081 @setvar! StoreinMainPacky 17082 endif 7083 getlabel mySecondPackAnimal SecondPackyWeight7084 if '[1998/2000' in SecondPackyWeight or '[1999/2000' in SecondPackyWeight '[2000/2000' in SecondPackyWeight7085 @setvar! StoreinSecondPacky 07086 else 7087 @setvar! StoreinSecondPacky 17088 endif 7089 settimer "PackyCheckTimer" 07090 endif 7091 7092 if StoreinMainPacky = 0 and PackAnimalCount = 17093 if EnableOverheadMessages = 17094 overhead "My packy is full!" 20867095 else 7096 overhead "[ PACKY FULL! ]" 337 myMainPackAnimal 7097 endif7098 wait 2500 7099 elseif StoreinMainPacky = 0 and PackAnimalCount = 27100 @setvar! StoreinSecondPacky 17101 elseif StoreinMainPacky = 0 and StoreinSecondPacky = 0 7102 if EnableOverheadMessages = 17103 overhead "All my pack animals are full!" 20867104 else 7105 overhead "[ PACKY FULL! ]" 337 mySecondPackAnimal 7106 endif 7107 wait 2500 7108 endif 7109 else 7110 if EnableOverheadMessages = 17111 overhead "Slow ass pack animal... c'mon!" 20867112 overhead "*whistles!*" 23297113 endif 7114 @setvar! idonthaveapacky 17115 endif 7116 elseif idonthaveapacky = 17117 if find myMainPackAnimal ground -1 -1 2 7118 @setvar! idonthaveapacky 07119 replay7120 endif7121 endif7122 7123 if not timerexists "HarvestDelay"7124 createtimer "HarvestDelay"7125 settimer "HarvestDelay" 50007126 endif7127 7128 if timer "HarvestDelay" > 50007129 if not timerexists "MinerOrganizer"7130 createtimer "MinerOrganizer"7131 settimer "MinerOrganizer" 300007132 endif7133 7134 if timer "MinerOrganizer" > 300007135 hotkey 'Organizer Agent-04'7136 settimer "MinerOrganizer" 07137 endif7138 7139 if EnableSatchels = 17140 if not timerexists "WizardSatchelTimer" 7141 createtimer "WizardSatchelTimer" 7142 settimer "WizardSatchelTimer" 600007143 endif7144 if not timerexists "PotionSatchelTimer" 7145 createtimer "PotionSatchelTimer" 7146 settimer "PotionSatchelTimer" 600007147 endif7148 if findtype "Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" backpack and findtype "reagent satchel" self as MyWizardBag7149 if timer "WizardSatchelTimer" > 600007150 menu MyWizardBag 07151 wait 2507152 settimer "WizardSatchelTimer" 07153 endif7154 endif 7155 if findtype "Yellow Potion|Orange Potion|Red Potion|White Potion|Blue Potion|Black Potion|" backpack and findtype 31262 self as MyPotBag7156 if timer "PotionSatchelTimer" > 60000 7157 menu MyPotBag 07158 wait 2507159 settimer "PotionSatchelTimer" 07160 endif7161 endif 7162 endif 7163 endif7164 7165 if insysmsg "Being perfectly rested" and EnableOverheadMessages = 17166 overhead "Outta my way! I've got a pickaxe and know how to use it..." 20867167 if EnableSummons = 1 and followers >= 17168 wait 15007169 overhead "Shall we incinerate them, master?" 44 myMainTankPet7170 menu myMainTankPet 37171 endif7172 endif 7173 7174 if paralyzed and EnableAutoParalyzePouch = 17175 if EnableOverheadMessages = 17176 overhead "[ [ [ [ POP! ] ] ] ]" 21177177 endif 7178 say "[pouch" 7179 @setvar! TimeToGo 17180 @setvar! MurdererFound 17181 replay7182 endif 7183 7184 if PutIngotsinLockedChest = 1 and NeedtoSecureIngots = 17185 if not findtype "wooden box" backpack or not findtype "copper key" backpack7186 overhead "[ NO LOCKBOX FOUND! ]" 3397187 wait 1500 7188 elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1 7189 overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 3397190 wait 1500 7191 else 7192 if findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key7193 if findtype 'iron ingot%s' backpack as ingotstostore 7194 getlabel lockbox lockboxLabel7195 if "items" in lockboxLabel7196 wait 5007197 if EnableOverheadMessages = 17198 overhead "*securing ingots...*" 1497199 endif 7200 while findtype 'iron ingot%s' backpack as ingotstostore7201 if find ingotstostore lockbox7202 @ignore ingotstostore7203 else 7204 clearsysmsg 7205 lift ingotstostore 99997206 wait 150 7207 drop lockbox -1 -1 -17208 wait 2507209 endif7210 endwhile 7211 dclick key7212 wft 15007213 target lockbox7214 overhead "[ingot box locked]" 697215 @setvar! NeedtoSecureIngots 0 7216 else 7217 overhead "[ingot box unlocked]" 847218 dclick key7219 wft 15007220 target lockbox7221 if EnableOverheadMessages = 17222 overhead "*securing ingots...*" 1497223 endif 7224 while findtype 'iron ingot%s' backpack as ingotstostore7225 if find ingotstostore lockbox7226 @ignore ingotstostore7227 else 7228 clearsysmsg 7229 lift ingotstostore 99997230 wait 1507231 drop lockbox -1 -1 -17232 wait 2507233 endif7234 endwhile 7235 dclick key7236 wft 15007237 target lockbox7238 overhead "[ingot box locked]" 697239 @setvar! NeedtoSecureIngots 07240 endif 7241 endif 7242 wait 150 7243 getlabel lockbox lockboxLabel 7244 if "items" in lockboxLabel7245 dclick key7246 wft 15007247 target lockbox7248 @setvar! NeedtoSecureIngots 07249 endif7250 endif7251 endif 7252 elseif StackIngotsinIngotBag = 17253 while findtype 'iron ingot%s' backpack as metaltomove7254 if find IngotBag self7255 if OpenIngotBag = 17256 dclick IngotBag7257 wait 2507258 endif7259 wait 5007260 if EnableOverheadMessages = 17261 overhead "*stacking ingots...*" 20867262 endif7263 lift metaltomove 99997264 drop IngotBag 1 1 07265 wait 5007266 @ignore metaltomove7267 else 7268 overhead "[ NO INGOT BAG! ]" 3377269 endif 7270 endwhile7271 else 7272 if SetIngotBagtoOrganizer03 = 17273 hotkey 'Organizer Agent-03'7274 wait 250 7275 endif 7276 endif7277 replay7278 endif7279 7280 @setvar! MiningActive 17281 7282 7283 ////////////////////7284 // MINING LOOP: //7285 ////////////////////7286 7287 while MiningActive = 1 7288 if warmode and EnableAutoAttackGreyMOB = 17289 replay7290 endif7291 7292 if diffhits > 257293 replay7294 endif7295 7296 if EnableTrackingAutoRecall = 17297 if PKTrackingRange = 60 7298 if insysmsg ": 60 step" or insysmsg "60 space" or insysmsg ": 59 step" or insysmsg "59 space" or insysmsg ": 58 step" or insysmsg "58 space" or insysmsg ": 57 step" or insysmsg "57 space" or insysmsg ": 56 step" or insysmsg "56 space" or insysmsg ": 55 step" or insysmsg "55 space" or insysmsg ": 54 step" or insysmsg "54 space" or insysmsg ": 53 step" or insysmsg "53 space" or insysmsg ": 52 step" or insysmsg "52 space" or insysmsg ": 51 step" or insysmsg "51 space" or insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"7299 if EnableRedAlertOverhead = 17300 overhead "[ !! RED ALERT !! ]" 377301 endif 7302 if DungeonMode = 1 and EnableAutoRedDungeonGate = 17303 hotkey 'Toggle War Only'7304 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 07305 if not hidden7306 useskill 'Hiding'7307 endif7308 elseif DungeonMode = 07309 @setvar! RedTargetFound 17310 @setvar! TimeToGo 17311 clearsysmsg7312 endif 7313 endif7314 elseif PKTrackingRange = 50 7315 if insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"7316 if EnableRedAlertOverhead = 17317 overhead "[ !! RED ALERT !! ]" 377318 endif 7319 if DungeonMode = 1 and EnableAutoRedDungeonGate = 17320 hotkey 'Toggle War Only'7321 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 07322 if not hidden7323 useskill 'Hiding'7324 endif7325 elseif DungeonMode = 07326 @setvar! RedTargetFound 17327 @setvar! TimeToGo 17328 clearsysmsg7329 endif 7330 endif7331 elseif PKTrackingRange = 407332 if insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"7333 if EnableRedAlertOverhead = 17334 overhead "[ !! RED ALERT !! ]" 377335 endif 7336 if DungeonMode = 1 and EnableAutoRedDungeonGate = 17337 hotkey 'Toggle War Only'7338 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 07339 if not hidden7340 useskill 'Hiding'7341 endif7342 elseif DungeonMode = 07343 @setvar! RedTargetFound 17344 @setvar! TimeToGo 17345 clearsysmsg7346 endif 7347 endif7348 elseif PKTrackingRange = 0 7349 if insysmsg "Now tracking"7350 if EnableRedAlertOverhead = 17351 overhead "[ !! RED ALERT !! ]" 377352 endif 7353 if DungeonMode = 1 and EnableAutoRedDungeonGate = 17354 hotkey 'Toggle War Only'7355 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 07356 if not hidden7357 useskill 'Hiding'7358 endif7359 elseif DungeonMode = 07360 @setvar! RedTargetFound 17361 @setvar! TimeToGo 17362 clearsysmsg7363 endif 7364 endif7365 endif 7366 endif7367 7368 if EnablePKradar = 1 and skill 'Tracking' < 507369 if not timerexists "PK Radar" 7370 createtimer "PK Radar"7371 settimer "PK Radar" 07372 endif 7373 if timer "PK Radar" > 10007374 hotkey 'Next Murderer Player Target'7375 wait 5007376 if insysmsg "No one matching that was found"7377 settimer "PK Radar" 07378 else7379 if DungeonMode = 1 and EnableAutoRedDungeonGate = 17380 hotkey 'Toggle War Only'7381 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 07382 if not hidden7383 useskill 'Hiding'7384 endif7385 elseif DungeonMode = 07386 @setvar! RedTargetFound 17387 @setvar! TimeToGo 17388 endif 7389 @setvar! MurdererTarget lasttarget7390 clearsysmsg7391 replay 7392 endif 7393 endif7394 endif 7395 7396 if insysmsg "Mining skillgain" and EnableOverheadMessages = 17397 if skill 'Mining' > 100.0 and skill 'Mining' < 119.97398 sysmsg "Hmm... these stones are tricky to work with..." 84 7399 clearsysmsg 7400 elseif skill 'Mining' = 119.97401 overhead "THIS COULD BE IT......" 20867402 sysmsg "Hmm... there is something special about these stones..." 84 7403 clearsysmsg 7404 elseif skill 'Mining' = 120.07405 overhead "FINALLY!!!" 20867406 wait 20007407 overhead "We made it!" 20867408 wait 15007409 clearsysmsg 7410 overhead "TIME FOR A WELL DESERVED BREAK!" 20867411 stop 7412 endif 7413 endif 7414 7415 if EnableWeightWarningMessage = 1 7416 if not timerexists "WeightTimer" 7417 createtimer "WeightTimer" 7418 settimer "WeightTimer" 50007419 endif 7420 if diffweight < GreenWarningDiffWeight and diffweight > YellowWarningDiffWeight and timer "WeightTimer" > 50007421 overhead "[ WEIGHT WARNING... ]" 777422 settimer "WeightTimer" 07423 elseif diffweight < YellowWarningDiffWeight and diffweight > RedWeightLimitDiffWeight and timer "WeightTimer" > 50007424 overhead "[ TIME TO FORGE! ]" 1537425 settimer "WeightTimer" 07426 elseif diffweight < RedWeightLimitDiffWeight and timer "WeightTimer" > 50007427 overhead "[ WEIGHT LIMIT REACHED! ]" 377428 settimer "WeightTimer" 07429 wait 15007430 overhead "Find a forge in order to continue..." 07431 replay7432 endif 7433 endif 7434 7435 if EnablePlayerForgeRadar = 17436 if not timerexists "ForgeRadar"7437 createtimer "ForgeRadar"7438 settimer "ForgeRadar" 35007439 endif 7440 if findtype "4017|6526|6538|6550|6562" ground -1 -1 15 as forge or findtype 0x0FB1 ground -1 -1 15 as forge and findtype "iron ore" backpack and timer "ForgeRadar" > 35007441 overhead "�" 44 forge7442 settimer "ForgeRadar" 07443 endif 7444 endif7445 7446 if EnableOreVacuum = 17447 if not timerexists "OreRadar"7448 createtimer "OreRadar"7449 settimer "OreRadar" 35007450 endif 7451 if findtype "iron ore" ground -1 -1 15 as droppedore and timer "OreRadar" > 3500 7452 overhead "�" 93 droppedore7453 settimer "OreRadar" 07454 endif7455 if not timerexists "IngotRadar"7456 createtimer "IngotRadar"7457 settimer "IngotRadar" 35007458 endif7459 if findtype "iron ingot%s" ground -1 -1 15 as droppedingots and timer "IngotRadar" > 3500 7460 overhead "�" 69 droppedingots7461 settimer "IngotRadar" 07462 endif7463 endif 7464 7465 if EnableGoldVacuum = 17466 if not timerexists "Gold Radar"7467 createtimer "Gold Radar"7468 settimer "Gold Radar" 35007469 endif 7470 if findtype "gold coin" ground -1 -1 12 as droppedmoney and timer "Gold Radar" > 35007471 overhead "�" 149 droppedmoney7472 settimer "Gold Radar" 07473 endif7474 endif 7475 7476 if EnableSummons = 1 7477 if dead myMainTankPet7478 if not dead earthOne7479 @setvar! myMainTankPet earthOne7480 elseif not dead earthTwo7481 @setvar! myMainTankPet earthTwo7482 elseif not dead waterOne7483 @setvar! myMainTankPet waterOne7484 elseif not dead waterTwo7485 @setvar! myMainTankPet waterTwo7486 elseif not dead demonOne7487 @setvar! myMainTankPet demonOne7488 elseif not dead demonTwo7489 @setvar! myMainTankPet demonTwo7490 elseif not dead fireOne7491 @setvar! myMainTankPet fireOne7492 elseif not dead fireTwo7493 @setvar! myMainTankPet fireTwo7494 elseif not dead airOne7495 @setvar! myMainTankPet airOne7496 elseif not dead airTwo7497 @setvar! myMainTankPet airTwo7498 endif7499 if EnableOverheadMessages = 17500 overhead "Hold on..." 20867501 endif7502 replay7503 endif7504 endif 7505 7506 if insysmsg 'world is saving' 7507 for 507508 wait 1007509 if insysmsg 'world save complete' 7510 wait 1007511 if EnableOverheadMessages = 17512 overhead '[ SAVE COMPLETE! ]' 253 7513 endif 7514 clearsysmsg 7515 break7516 endif 7517 endfor 7518 clearsysmsg7519 elseif insysmsg "You loosen some rocks"7520 overhead '*you fail to harvest anything...*' 3377521 clearsysmsg 7522 elseif insysmsg "You dig some iron ore" 7523 if insysmsg "Harvest double yield"7524 overhead '*you double harvest iron ore*' 1900 7525 else 7526 overhead '*you harvest iron ore*' 19007527 endif7528 clearsysmsg7529 elseif insysmsg "You dig some dull copper ore" 7530 if insysmsg "Harvest double yield"7531 overhead '*you double harvest dullcopper ore*' 2419 7532 else 7533 overhead '*you harvest dullcopper ore*' 24197534 endif7535 clearsysmsg 7536 elseif insysmsg "You dig some shadow iron ore" 7537 if insysmsg "Harvest double yield"7538 overhead '*you double harvest shadowiron ore*' 2406 7539 else 7540 overhead '*you harvest shadowiron ore*' 24067541 endif7542 clearsysmsg 7543 elseif insysmsg "You dig some copper ore" 7544 if insysmsg "Harvest double yield"7545 overhead '*you double harvest copper ore*' 2413 7546 else 7547 overhead '*you harvest copper ore*' 24137548 endif7549 clearsysmsg 7550 elseif insysmsg "You dig some bronze ore" 7551 if insysmsg "Harvest double yield"7552 overhead '*you double harvest bronze ore*' 2418 7553 else 7554 overhead '*you harvest bronze ore*' 24187555 endif7556 clearsysmsg7557 elseif insysmsg "You dig some golden ore" 7558 if insysmsg "Harvest double yield"7559 overhead '*you double harvest golden ore!*' 2213 7560 else 7561 overhead '*you harvest golden ore*' 22137562 endif7563 clearsysmsg7564 elseif insysmsg "You dig some agapite ore" 7565 if insysmsg "Harvest double yield"7566 overhead '*you double harvest agapite ore!*' 2425 7567 else 7568 overhead '*you harvest agapite ore*' 24257569 endif7570 clearsysmsg7571 elseif insysmsg "You dig some verite ore" 7572 if insysmsg "Harvest double yield"7573 overhead '*you double harvest verite ore!!*' 2207 7574 else 7575 overhead '*you harvest verite ore!*' 22077576 endif7577 clearsysmsg7578 elseif insysmsg "You dig some valorite ore" 7579 if insysmsg "Harvest double yield"7580 overhead '*you double harvest valorite ore!!*' 2219 7581 else 7582 overhead '*you harvest valorite ore!*' 22197583 endif7584 clearsysmsg7585 elseif insysmsg "You dig some avarite ore" 7586 if insysmsg "Harvest double yield"7587 overhead '*you double harvest avarite ore!!!*' 1763 7588 if EnableOverheadMessages = 1 7589 overhead 'Woot! Woot!!' 2086 7590 endif 7591 else 7592 overhead '*you harvest avarite ore!!*' 17637593 if EnableOverheadMessages = 1 7594 overhead 'Woot!' 20867595 endif 7596 endif7597 clearsysmsg7598 elseif insysmsg "You have recently traveled"7599 @setvar! TravelCooldownActive 17600 replay7601 elseif insysmsg 'You have worn out your tool' 7602 if EnableOverheadMessages = 1 7603 overhead "Hang on, my pickaxe just broke!" 20867604 wait 1500 7605 endif7606 clearsysmsg7607 if counttype 'pickaxe' self > 07608 wait 10007609 if EnableOverheadMessages = 1 7610 overhead "But I think I have another.. one sec..." 20867611 wait 15007612 endif 7613 else7614 if EnableOverheadMessages = 1 7615 overhead "Dammit, that's my last pickaxe. Time to resupply!" 20867616 endif 7617 @setvar! TimeToGo 17618 wait 15007619 endif 7620 replay 7621 elseif insysmsg 'You do not see any' or insysmsg 'You cannot produce any'7622 if EnableSummons = 17623 menu myMainTankPet 37624 wait 2507625 endif7626 7627 if PackAnimalCount = 1 or PackAnimalCount = 27628 menu myMainPackAnimal 47629 wait 2507630 endif7631 7632 if PackAnimalCount = 27633 menu mySecondPackAnimal 47634 wait 2507635 endif 7636 7637 if not timerexists "HarvestDelay"7638 createtimer "HarvestDelay"7639 settimer "HarvestDelay" 07640 endif7641 settimer "HarvestDelay" 07642 overhead "[ TIME TO MOVE ]" 697643 @setvar! MiningActive 07644 clearsysmsg7645 replay7646 endif7647 7648 if not findtype 'pickaxe' hand and findtype 'pickaxe' backpack7649 dclicktype 'pickaxe' backpack7650 wait 6507651 endif7652 7653 if diffweight < RedWeightLimitDiffWeight7654 replay7655 else 7656 hotkey 'Use item in hand' 7657 wft 15007658 hotkey 'Target Self' 7659 endif 7660 endwhile7661 replay 7662 endif7663 7664 7665 //////////////////////7666 // LUMBER SCRIPT: //7667 //////////////////////7668 7669 if skill "Lumberjacking" > 49.9 and EnableLumberjacking = 1 and TravelCooldownActive != 1 and timer "TravelTimer" > 600007670 7671 @setvar! DungeonMode 07672 7673 if hidden 7674 overhead "[ HIDDEN... ]" 67675 wait 10007676 sysmsg "You cannot chop wood while hidden! Please unhide and try again..." 07677 wait 30007678 replay7679 endif7680 7681 if PutBoardsinLockedChest = 17682 if not findtype "wooden box" backpack or not findtype "copper key" backpack7683 overhead "[ NO LOCKBOX FOUND! ]" 3397684 wait 500 7685 elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1 7686 overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 3397687 wait 500 7688 elseif findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key7689 getlabel lockbox lockboxLabel7690 if "items" in lockboxLabel7691 dclick key7692 wft 10007693 target lockbox7694 wait 2507695 overhead "[board box locked]" 847696 endif7697 endif 7698 endif7699 7700 if EnableBoardBag = 17701 if not find BoardBag self7702 overhead "Please select your board storage bag..." 887703 wait 5007704 setvar BoardBag7705 wft 5007706 while targetexists7707 wait 1007708 endwhile7709 overhead "[ BOARD BAG SET! ]" 937710 endif7711 endif7712 7713 if counttype "board%s" backpack > BoardRecallAmount and EnableBoardAutoRecall = 17714 if EnableOverheadMessages = 1 7715 overhead "I'd hate to lose all this hard work..." 20867716 wait 25007717 overhead "I'm going to go unload before it's too late!" 20867718 sysmsg "Disable 'EnableBoardAutoRecall' in script variables to turn off this feature!" 07719 wait 20007720 endif7721 @setvar! TimeToGo 17722 replay7723 endif7724 7725 if not findtype 'hatchet' self7726 if EnableOverheadMessages = 1 7727 overhead "I can't work with no hatchet!" 20867728 wait 15007729 endif 7730 @setvar! TimeToGo 17731 replay7732 endif7733 7734 if not findtype 'hatchet' hand and findtype 'hatchet' backpack7735 dclicktype 'hatchet' backpack7736 wait 5007737 endif7738 7739 if EnableWeightWarningMessage = 17740 if not timerexists "WeightTimer" 7741 createtimer "WeightTimer" 7742 settimer "WeightTimer" 50007743 endif 7744 if diffweight < GreenWarningDiffWeight and diffweight > YellowWarningDiffWeight and timer "WeightTimer" > 50007745 overhead "[ WEIGHT WARNING... ]" 777746 settimer "WeightTimer" 07747 elseif diffweight < YellowWarningDiffWeight and diffweight > RedWeightLimitDiffWeight and timer "WeightTimer" > 50007748 overhead "[ WEIGHT WARNING! ]" 1537749 settimer "WeightTimer" 07750 elseif diffweight < RedWeightLimitDiffWeight and timer "WeightTimer" > 50007751 overhead "[ WEIGHT LIMIT REACHED! ]" 377752 wait 15007753 stop7754 endif 7755 endif 7756 7757 for 27758 hotkey 'Use item in hand' 7759 wft 15007760 if insysmsg "use this item on"7761 break7762 else 7763 wait 5007764 endif7765 endfor 7766 target self 7767 wait 5007768 7769 if insysmsg 'world is saving' 7770 for 507771 wait 1007772 if insysmsg 'world save complete' 7773 wait 1007774 if EnableOverheadMessages = 1 7775 overhead '[ SAVE COMPLETE! ]' 253 7776 endif 7777 clearsysmsg 7778 endif 7779 endfor 7780 clearsysmsg 7781 elseif insysmsg 'Harvesting is not allowed'7782 if EnableOverheadMessages = 1 7783 overhead 'You need to leave the safe area...' 0 7784 else 7785 overhead [ LEAVE TOWN ]" 847786 endif7787 wait 5000 7788 replay 7789 elseif insysmsg 'You broke your axe' 7790 if EnableOverheadMessages = 1 7791 overhead "My axe broke!" 20867792 wait 15007793 endif 7794 if counttype 'hatchet' self > 07795 if EnableOverheadMessages = 1 7796 wait 10007797 overhead "But I think I have another... one sec..." 20867798 endif7799 wait 5007800 else 7801 if EnableOverheadMessages = 1 7802 overhead "Dammit, that was my last hatchet! Time to resupply..." 20867803 endif 7804 @setvar! TimeToGo 17805 wait 50037806 endif7807 replay 7808 elseif insysmsg "You have recently traveled"7809 @setvar! TravelCooldownActive 17810 replay7811 elseif insysmsg 'You do not see any' or insysmsg 'You cannot produce any'7812 if not timerexists "MoveTimer" 7813 createtimer "MoveTimer" 7814 settimer "MoveTimer" 25007815 endif7816 if MOVE = 1 7817 if timer "MoveTimer" > 25007818 @setvar! MOVE 07819 overhead "[ KEEP MOVING... ]" 22347820 settimer "MoveTimer" 07821 @setvar! MOVE 07822 endif7823 elseif MOVE = 07824 if timer "MoveTimer" > 25007825 overhead "[ KEEP MOVING... ]" 15907826 settimer "MoveTimer" 07827 @setvar! MOVE 17828 endif7829 else 7830 @setvar! MOVE 17831 endif7832 7833 if EnableLogStacker = 17834 if not timerexists "LogStackerTimer" 7835 createtimer "LogStackerTimer"7836 settimer "LogStackerTimer" 100007837 endif7838 if findtype "log%s" backpack as logstostack and timer "LogStackerTimer" > 100007839 lift logstostack 99997840 drop backpack 100 100 07841 wait 250 7842 settimer "LogStackerTimer" 07843 endif 7844 endif7845 7846 if not timerexists "LumberOrganizer"7847 createtimer "LumberOrganizer"7848 settimer "LumberOrganizer" 300007849 endif7850 7851 if timer "LumberOrganizer" > 300007852 hotkey 'Organizer Agent-02'7853 settimer "LumberOrganizer" 07854 endif7855 7856 if EnableSatchels = 17857 if not timerexists "WizardSatchelTimer" 7858 createtimer "WizardSatchelTimer" 7859 settimer "WizardSatchelTimer" 600007860 endif7861 if not timerexists "PotionSatchelTimer" 7862 createtimer "PotionSatchelTimer" 7863 settimer "PotionSatchelTimer" 600007864 endif7865 if findtype "Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" backpack and findtype "reagent satchel" self as MyWizardBag7866 if timer "WizardSatchelTimer" > 600007867 menu MyWizardBag 07868 wait 2507869 settimer "WizardSatchelTimer" 07870 endif7871 endif 7872 if findtype "Yellow Potion|Orange Potion|Red Potion|White Potion|Blue Potion|Black Potion|" backpack and findtype 31262 self as MyPotBag7873 if timer "PotionSatchelTimer" > 60000 7874 menu MyPotBag 07875 wait 2507876 settimer "PotionSatchelTimer" 07877 endif7878 endif 7879 endif 7880 7881 if insysmsg "Being perfectly rested" and EnableOverheadMessages = 17882 overhead "Outta my way! I've got a pickaxe and know how to use it..." 20867883 if EnableSummons = 1 and followers >= 17884 wait 15007885 overhead "Shall we incinerate them, master?" 44 myMainTankPet7886 menu myMainTankPet 37887 endif7888 endif7889 7890 if paralyzed and EnableAutoParalyzePouch = 17891 if EnableOverheadMessages = 17892 overhead "[ [ [ [ POP! ] ] ] ]" 21177893 endif 7894 say "[pouch" 7895 @setvar! TimeToGo 17896 @setvar! MurdererFound 17897 replay7898 endif7899 7900 while findtype 'log%s' backpack and LogsToBoards = 17901 if not timerexists "BoardTimer" 7902 createtimer "BoardTimer" 7903 settimer "BoardTimer" 35007904 endif 7905 if timer "BoardTimer" > 35007906 overhead '*making boards...*' 07907 settimer "BoardTimer" 07908 endif 7909 dclicktype 'log%s' 7910 wait 5007911 @setvar! NeedtoSecureBoards 17912 endwhile7913 7914 if PutBoardsinLockedChest = 1 and NeedtoSecureBoards = 17915 if not findtype "wooden box" backpack or not findtype "copper key" backpack7916 overhead "[ NO LOCKBOX FOUND! ]" 3397917 wait 1500 7918 elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1 7919 overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 3397920 wait 1500 7921 else 7922 if findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key7923 if findtype 'board%s' backpack as boardstostore 7924 getlabel lockbox lockboxLabel7925 if "items" in lockboxLabel7926 wait 5007927 if EnableOverheadMessages = 17928 overhead "*securing boards...*" 1497929 endif 7930 while findtype 'board%s' backpack as boardstostore7931 if find boardstostore lockbox7932 @ignore boardstostore7933 else 7934 clearsysmsg 7935 lift boardstostore 99997936 wait 150 7937 drop lockbox -1 -1 -17938 wait 2507939 endif7940 endwhile 7941 dclick key7942 wft 15007943 target lockbox7944 overhead "[board box locked]" 697945 @setvar! NeedtoSecureBoards 0 7946 else 7947 overhead "[board box unlocked]" 847948 dclick key7949 wft 15007950 target lockbox7951 if EnableOverheadMessages = 17952 overhead "*securing boards...*" 1497953 endif 7954 while findtype 'board%s' backpack as boardstostore7955 if find boardstostore lockbox7956 @ignore boardstostore7957 else 7958 clearsysmsg 7959 lift boardstostore 99997960 wait 1507961 drop lockbox -1 -1 -17962 wait 2507963 endif7964 endwhile 7965 dclick key7966 wft 15007967 target lockbox7968 overhead "[board box locked]" 697969 @setvar! NeedtoSecureBoards 07970 endif 7971 endif 7972 wait 150 7973 getlabel lockbox lockboxLabel7974 if "items" in lockboxLabel7975 dclick key7976 wft 15007977 target lockbox7978 @setvar! NeedtoSecureBoards 07979 endif7980 endif7981 endif 7982 elseif StackBoardsinBoardBag = 17983 while findtype 'board%s' backpack as woodtomove7984 if find BoardBag self7985 if OpenBoardBag = 17986 dclick BoardBag7987 wait 2507988 endif7989 wait 5007990 if not timerexists "StackingTimer" 7991 createtimer "StackingTimer" 7992 settimer "StackingTimer" 35007993 endif 7994 if timer "StackingTimer" > 3500 and EnableOverheadMessages = 17995 overhead "*stacking boards...*" 20867996 settimer "StackingTimer" 07997 endif 7998 lift woodtomove 99997999 drop BoardBag 1 1 08000 wait 5008001 @ignore woodtomove8002 else 8003 overhead "[ NO BOARD BAG! ]" 3378004 endif 8005 endwhile8006 else 8007 if SetBoardBagtoOrganizer01 = 18008 hotkey 'Organizer Agent-01'8009 wait 250 8010 endif 8011 endif8012 hotkey 'Organizer Agent-02'8013 replay8014 clearsysmsg8015 @setvar! MOVE 18016 replay 8017 else 8018 overhead '*chopping wood...*' 21288019 settimer "MoveTimer" 08020 wait 5008021 endif 8022 8023 while timer "MoveTimer" < 6000 8024 if PKTrackingRange = 60 8025 if insysmsg ": 60 step" or insysmsg "60 space" or insysmsg ": 59 step" or insysmsg "59 space" or insysmsg ": 58 step" or insysmsg "58 space" or insysmsg ": 57 step" or insysmsg "57 space" or insysmsg ": 56 step" or insysmsg "56 space" or insysmsg ": 55 step" or insysmsg "55 space" or insysmsg ": 54 step" or insysmsg "54 space" or insysmsg ": 53 step" or insysmsg "53 space" or insysmsg ": 52 step" or insysmsg "52 space" or insysmsg ": 51 step" or insysmsg "51 space" or insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"8026 if EnableRedAlertOverhead = 18027 overhead "[ !! RED ALERT !! ]" 378028 endif 8029 if DungeonMode = 1 and EnableAutoRedDungeonGate = 18030 hotkey 'Toggle War Only'8031 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 08032 if not hidden8033 useskill 'Hiding'8034 endif8035 elseif DungeonMode = 08036 @setvar! RedTargetFound 18037 @setvar! TimeToGo 18038 clearsysmsg8039 endif 8040 endif8041 elseif PKTrackingRange = 50 8042 if insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"8043 if EnableRedAlertOverhead = 18044 overhead "[ !! RED ALERT !! ]" 378045 endif 8046 if DungeonMode = 1 and EnableAutoRedDungeonGate = 18047 hotkey 'Toggle War Only'8048 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 08049 if not hidden8050 useskill 'Hiding'8051 endif8052 elseif DungeonMode = 08053 @setvar! RedTargetFound 18054 @setvar! TimeToGo 18055 clearsysmsg8056 endif 8057 endif8058 elseif PKTrackingRange = 408059 if insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"8060 if EnableRedAlertOverhead = 18061 overhead "[ !! RED ALERT !! ]" 378062 endif 8063 if DungeonMode = 1 and EnableAutoRedDungeonGate = 18064 hotkey 'Toggle War Only'8065 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 08066 if not hidden8067 useskill 'Hiding'8068 endif8069 elseif DungeonMode = 08070 @setvar! RedTargetFound 18071 @setvar! TimeToGo 18072 clearsysmsg8073 endif 8074 endif8075 elseif PKTrackingRange = 0 8076 if insysmsg "Now tracking"8077 if EnableRedAlertOverhead = 18078 overhead "[ !! RED ALERT !! ]" 378079 endif 8080 if DungeonMode = 1 and EnableAutoRedDungeonGate = 18081 hotkey 'Toggle War Only'8082 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 08083 if not hidden8084 useskill 'Hiding'8085 endif8086 elseif DungeonMode = 08087 @setvar! RedTargetFound 18088 @setvar! TimeToGo 18089 clearsysmsg8090 endif 8091 endif8092 endif 8093 endif8094 8095 if EnablePKradar = 1 and skill 'Tracking' < 508096 if not timerexists "PK Radar" 8097 createtimer "PK Radar"8098 settimer "PK Radar" 08099 endif 8100 if timer "PK Radar" > 10008101 hotkey 'Next Murderer Player Target'8102 wait 5008103 if insysmsg "No one matching that was found"8104 settimer "PK Radar" 08105 else8106 if DungeonMode = 1 and EnableAutoRedDungeonGate = 18107 hotkey 'Toggle War Only'8108 elseif DungeonMode = 1 and EnableAutoRedDungeonGate = 08109 if not hidden8110 useskill 'Hiding'8111 endif8112 elseif DungeonMode = 08113 @setvar! RedTargetFound 18114 @setvar! TimeToGo 18115 endif 8116 @setvar! MurdererTarget lasttarget8117 clearsysmsg8118 replay 8119 endif 8120 endif8121 endif 8122 8123 if paralyzed and EnableAutoParalyzePouch = 18124 if EnableOverheadMessages = 18125 overhead "[ [ [ [ POP! ] ] ] ]" 21178126 endif 8127 say "[pouch" 8128 @setvar! TimeToGo 18129 @setvar! MurdererFound 18130 replay8131 endif8132 8133 if warmode and EnableAutoAttackGreyMOB = 18134 replay8135 endif8136 8137 if diffhits > 08138 replay8139 endif8140 8141 if EnableRefreshPotion = 1 or EnableRefreshPotion = 28142 if diffstam >= RefreshPotSPdiff and timer "RefreshPotionTimer" > RefreshPotionCooldown8143 if findtype "Red Potion" self as refreshpot8144 dclick refreshpot8145 wait 5008146 if insysmsg "Potion satchel used"8147 if EnableOverheadMessages = 1 8148 overhead "*drinking free refresh potion...*" 348149 endif8150 clearsysmsg8151 else 8152 if EnableOverheadMessages = 1 8153 overhead '*drinking refresh potion...*' 348154 endif8155 clearsysmsg8156 endif8157 settimer "RefreshPotionTimer" 08158 cooldown "Refresh Potion" RefreshPotionCooldown8159 else 8160 if timer "InventoryTimer" > 60008161 overhead '[ NO REFRESH POTS! ]' 3378162 settimer "InventoryTimer" 08163 endif8164 endif8165 wait 500 8166 endif8167 endif 8168 8169 if EnableMagicResistPotion = 18170 if not findbuff "Magic Resist Potion"8171 if findtype "Black Potion" self as magicresistpot8172 dclick magicresistpot8173 wait 5008174 if EnableOverheadMessages = 1 8175 if insysmsg "Potion satchel used" 8176 overhead '*drinking free resist potion*' 24068177 clearsysmsg8178 else 8179 overhead '*drinking resist potion*' 24068180 clearsysmsg8181 endif8182 endif 8183 else 8184 if timer "InventoryTimer" > 60008185 overhead '[ NO RESIST POTS! ]' 3378186 settimer "InventoryTimer" 08187 endif8188 endif8189 wait 5008190 endif8191 endif8192 8193 if EnableStrengthPotion = 1 8194 if skill 'Alchemy' = 1 8195 if insysmsg "You may now use a strength" or not findbuff "Strength"8196 if findtype "White Potion" self as strengthpot8197 dclick strengthpot8198 wait 5008199 if EnableOverheadMessages = 1 8200 if insysmsg "Potion satchel used" 8201 overhead '*drinking free strength potion*' 9568202 clearsysmsg8203 else 8204 overhead '*drinking strength potion*' 9568205 clearsysmsg8206 endif8207 endif8208 else 8209 if timer "InventoryTimer" > 60008210 overhead '[ NO STRENGTH POTS! ]' 3378211 settimer "InventoryTimer" 08212 endif8213 endif8214 wait 5008215 endif8216 elseif not findbuff "Strength"8217 if findtype "White Potion" self as strengthpot8218 dclick strengthpot8219 wait 5008220 if EnableOverheadMessages = 1 8221 if insysmsg "Potion satchel used" 8222 overhead '*drinking free strength potion*' 9568223 clearsysmsg8224 else 8225 overhead '*drinking strength potion*' 9568226 clearsysmsg8227 endif8228 endif8229 else 8230 if timer "InventoryTimer" > 60008231 overhead '[ NO STRENGTH POTS! ]' 3378232 settimer "InventoryTimer" 08233 endif8234 endif8235 wait 5008236 endif8237 endif8238 8239 if EnableAgilityPotion = 18240 if not findbuff "Agility"8241 if findtype "Blue Potion" self as agilitypot8242 dclick agilitypot8243 wait 5008244 if EnableOverheadMessages = 1 8245 if insysmsg "Potion satchel used" 8246 overhead '*drinking free agility potion*' 938247 clearsysmsg8248 else 8249 overhead '*drinking agility potion*' 938250 clearsysmsg8251 endif8252 endif8253 else 8254 if timer "InventoryTimer" > 60008255 overhead '[ NO AGILITY POTS! ]' 3378256 settimer "InventoryTimer" 08257 endif8258 endif8259 wait 5008260 endif8261 endif8262 8263 if EnableMagicReflection = 1 8264 if skill 'Magery' >= 60 and not findbuff 'Magic Reflection' and mana > 14 and TimeToGo != 18265 replay8266 endif 8267 endif 8268 8269 if insysmsg "Lumberjacking skillgain" and EnableOverheadMessages = 18270 if skill 'Lumberjacking' > 100.0 and skill 'Lumberjacking' < 119.98271 sysmsg "Hmm... this tree will really test my skills..." 84 8272 clearsysmsg 8273 elseif skill 'Lumberjacking' = 119.98274 overhead "THIS COULD BE IT......" 20868275 sysmsg "Hmm... there is something special about this tree..." 84 8276 clearsysmsg 8277 elseif skill 'Lumberjacking' = 120.08278 overhead "FINALLY!!!" 20868279 wait 20008280 overhead "We made it!" 20868281 wait 15008282 clearsysmsg 8283 overhead "TIME FOR A WELL DESERVED BREAK!" 20868284 stop8285 endif8286 endif8287 8288 if insysmsg 'world is saving' 8289 for 508290 wait 1008291 if insysmsg 'world save complete' 8292 wait 1008293 if EnableOverheadMessages = 18294 overhead '[ SAVE COMPLETE! ]' 253 8295 endif8296 clearsysmsg 8297 endif 8298 endfor 8299 clearsysmsg 8300 endif8301 8302 if EnableSummons = 1 and dead myMainTankPet8303 if not dead earthOne8304 @setvar! myMainTankPet earthOne8305 elseif not dead earthTwo8306 @setvar! myMainTankPet earthTwo8307 elseif not dead waterOne8308 @setvar! myMainTankPet waterOne8309 elseif not dead waterTwo8310 @setvar! myMainTankPet waterTwo8311 elseif not dead demonOne8312 @setvar! myMainTankPet demonOne8313 elseif not dead demonTwo8314 @setvar! myMainTankPet demonTwo8315 elseif not dead fireOne8316 @setvar! myMainTankPet fireOne8317 elseif not dead fireTwo8318 @setvar! myMainTankPet fireTwo8319 elseif not dead airOne8320 @setvar! myMainTankPet airOne8321 elseif not dead airTwo8322 @setvar! myMainTankPet airTwo8323 endif8324 if EnableOverheadMessages = 18325 overhead "Hold on..." 20868326 endif8327 wait 5008328 replay 8329 endif8330 8331 if insysmsg "You hack"8332 overhead '*you fail to harvest anything...*' 3378333 replay 8334 elseif insysmsg "You chop some logs" 8335 if insysmsg "Harvest double yield"8336 overhead '*you double harvest logs!*' 349 8337 else 8338 overhead '*you harvest logs*' 3498339 endif8340 replay8341 elseif insysmsg "You chop some dullwood logs" 8342 if insysmsg "Harvest double yield"8343 overhead '*you double harvest dullwood!*' 2419 8344 else 8345 overhead '*you harvest dullwood*' 24198346 endif8347 replay8348 elseif insysmsg "You chop some shadowwood logs" 8349 if insysmsg "Harvest double yield"8350 overhead '*you double harvest shadowwood!*' 2406 8351 else 8352 overhead '*you harvest shadowwood*' 24068353 endif8354 replay8355 elseif insysmsg "You chop some copperwood logs" 8356 if insysmsg "Harvest double yield"8357 overhead '*you double harvest copperwood!*' 2413 8358 else 8359 overhead '*you harvest copperwood*' 24138360 endif8361 replay8362 elseif insysmsg "You chop some bronzewood logs" 8363 if insysmsg "Harvest double yield"8364 overhead '*you double harvest bronzewood!*' 2418 8365 else 8366 overhead '*you harvest bronzewood*' 24188367 endif8368 replay8369 elseif insysmsg "You chop some goldenwood logs" 8370 if insysmsg "Harvest double yield"8371 overhead '*you double harvest goldenwood!*' 2213 8372 else 8373 overhead '*you harvest goldenwood!*' 22138374 endif 8375 replay8376 elseif insysmsg "You chop some rosewood logs" 8377 if insysmsg "Harvest double yield"8378 overhead '*you double harvest rosewood!*' 2425 8379 else 8380 overhead '*you harvest rosewood!*' 24258381 endif8382 replay8383 elseif insysmsg "You chop some verewood logs" 8384 if insysmsg "Harvest double yield"8385 overhead '*you double harvest verewood!*' 2207 8386 else 8387 overhead '*you harvest verewood!*' 22078388 endif8389 replay8390 elseif insysmsg "You chop some valewood logs" 8391 if insysmsg "Harvest double yield"8392 overhead '*you double harvest valewood!*' 2219 8393 else 8394 overhead '*you harvest valewood!*' 22198395 endif8396 replay8397 elseif insysmsg "You chop some avarwood logs" 8398 if insysmsg "Harvest double yield"8399 overhead '*you double harvest avarwood!!!*' 1763 8400 if EnableOverheadMessages = 18401 overhead 'Woot! Woot!!' 2086 8402 endif 8403 else 8404 overhead '*you harvest avarwood!!*' 17638405 if EnableOverheadMessages = 18406 overhead 'Woot!' 20868407 endif 8408 endif8409 replay8410 elseif insysmsg "travel"8411 break8412 endif 8413 endwhile 8414 replay8415 endif8416 8417 8418 ///////////////////////8419 // FISHING SCRIPT: //8420 ///////////////////////8421 8422 if skill 'Fishing' >= 50 and EnableFishing = 1 8423 8424 @setvar! DungeonMode 08425 8426 if insysmsg "You fish a" and EnableOverheadMessages = 18427 overhead "Nothing on that one..." 20868428 endif8429 8430 if insysmsg "You catch a fish" and EnableOverheadMessages = 18431 overhead "*you harvest fish*" 778432 endif 8433 8434 if PutSpecialNetsinLockedChest = 18435 if not findtype "wooden box" backpack or not findtype "copper key" backpack8436 overhead "[ NO LOCKBOX FOUND! ]" 3398437 wait 500 8438 elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1 8439 overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 3398440 wait 500 8441 elseif findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key8442 getlabel lockbox lockboxLabel8443 if "items" in lockboxLabel8444 dclick key8445 wft 10008446 target lockbox8447 wait 5008448 overhead "[lockbox secured]" 848449 endif8450 endif 8451 endif 8452 8453 if EnableWeightWarningMessage = 1 8454 if not timerexists "WeightTimer" 8455 createtimer "WeightTimer" 8456 settimer "WeightTimer" 50008457 endif 8458 if diffweight < GreenWarningDiffWeight and diffweight > YellowWarningDiffWeight and timer "WeightTimer" > 50008459 overhead "[ WEIGHT WARNING... ]" 778460 settimer "WeightTimer" 08461 elseif diffweight < YellowWarningDiffWeight and diffweight > RedWeightLimitDiffWeight and timer "WeightTimer" > 50008462 overhead "[ WEIGHT WARNING! ]" 1538463 settimer "WeightTimer" 08464 elseif diffweight < RedWeightLimitDiffWeight and timer "WeightTimer" > 50008465 overhead "[ WEIGHT LIMIT REACHED! ]" 378466 settimer "WeightTimer" 08467 wait 15008468 stop8469 endif 8470 endif 8471 8472 if PutSpecialNetsinBag = 18473 if not varexist FishBag8474 wait 10008475 overhead "[ SELECT YOUR SPECIAL NET STORAGE BAG... ]" 888476 setvar FishBag8477 wft 5008478 while targetexists 8479 wait 1008480 endwhile8481 overhead "[ STORAGE BAG SET! ]" 938482 wait 15008483 endif 8484 endif 8485 8486 if not timerexists CastTimer8487 createtimer CastTimer8488 settimer 'CastTimer' 80008489 endif8490 8491 if not timerexists NetTimer8492 createtimer NetTimer8493 settimer 'NetTimer' 45008494 endif8495 8496 if not timerexists SpyglassTimer8497 createtimer SpyglassTimer8498 settimer 'SpyglassTimer' 65008499 endif8500 8501 if warmode 8502 if TrawlingMode = 08503 overhead "[ TRAWLING MODE... ]" 838504 endif 8505 @setvar! TrawlingMode 18506 @setvar! CastingMode 08507 if EnableTrawling = 18508 if findtype "Fishing Pole" hand or lhandempty8509 if findtype 31172|31169 self as MyFishingWeapon8510 dclick MyFishingWeapon8511 wait 2508512 else 8513 if EnableOverheadMessages = 18514 overhead "I have no harpoon or trident!" 20868515 wait 15008516 else8517 overhead "[ NO HARPOON ]" 3378518 endif 8519 endif8520 else8521 if timer 'NetTimer' > 40008522 if findtype "fishing net" backpack as MyNet8523 dclick MyNet8524 wft 15008525 target "self"8526 settimer 'NetTimer' 08527 else 8528 if EnableOverheadMessages = 18529 overhead "I have no fishing nets!" 20868530 else 8531 overhead "[ NO NETS ]" 3378532 endif8533 settimer 'NetTimer' 08534 endif8535 wait 1000 8536 if insysmsg "You don't see anything nearby that requires a fishing net" 8537 overhead "Nothing here to catch with my nets..." 20868538 hotkey 'Toggle Peace Only' 8539 replay8540 else 8541 overhead "*throwing a net...*" 838542 endif 8543 endif8544 endif8545 else 8546 // Do nothing8547 endif8548 else 8549 if EnableOverheadMessages = 18550 if insysmsg "You fish a"8551 overhead "Nothing on that one..." 20868552 endif8553 if insysmsg "You catch a fish"8554 overhead "*you harvest fish*" 778555 endif 8556 endif8557 if CastingMode = 08558 overhead "[ CASTING MODE... ]" 938559 endif8560 @setvar! TrawlingMode 08561 @setvar! CastingMode 18562 if EnableCasting = 1 8563 if timer 'CastTimer' > 75008564 if findtype 31172|31169 hand or lhandempty8565 if findtype "fishing pole" self8566 dress "Fishing Pole"8567 wait 2508568 else 8569 if EnableOverheadMessages = 18570 overhead "I have no fishing pole!" 20868571 else 8572 overhead "[ NO POLE ]" 3378573 endif8574 settimer 'CastTimer' 08575 endif8576 elseif findtype "fishing pole" hand8577 hotkey "Use item in hand"8578 wft 15008579 target "self"8580 settimer 'CastTimer' 08581 endif8582 wait 10008583 if insysmsg "You may only fish inside of a house"8584 if EnableOverheadMessages = 18585 overhead "I can't do that in here..." 20868586 else 8587 overheard "[ NO FISHING HERE ]" 3378588 endif8589 wait 3500 8590 clearsysmsg 8591 elseif insysmsg "You do not see any harvestable" 8592 if EnableOverheadMessages = 18593 overhead "I don't think I'm going to find any fish here...." 20868594 else 8595 overheard "[ NO FISHING HERE ]" 3378596 endif8597 clearsysmsg 8598 else 8599 overhead "*casting a line...*" 938600 endif 8601 endif8602 if timer "SpyglassTimer" > 6500 and EnableSpyglass = 18603 gumpclose 28900209408604 if targetexists8605 hotkey 'Cancel Current Target'8606 endif8607 if findtype "spyglass" self as MySpyglass8608 dclick MySpyglass8609 else 8610 if EnableOverheadMessages = 18611 overhead "I have no spyglass!" 20868612 else 8613 overheard "[ NO SPYGLASS ]" 3378614 endif8615 @setvar! EnableSpyglass 08616 endif 8617 wft 5008618 if targetexists neutral8619 target 'self'8620 endif8621 wait 5008622 if insysmsg "You don't see anything nearby worth searching"8623 overhead "I don't see anything to search for..." 20868624 wait 15008625 else 8626 overhead "*using spyglass...*" 28627 endif 8628 waitforgump 2890020940 10008629 gumpresponse 11 28900209408630 waitforgump 2890020940 10008631 gumpresponse 4 28900209408632 waitforgump 2890020940 10008633 settimer 'SpyglassTimer' 08634 endif 8635 else 8636 //Do nothing8637 endif 8638 endif 8639 8640 if counttype 'cooked fish' backpack > FishCarveCount and EnableFishCarver = 1 and DisableFishCarver != 18641 while findtype 'cooked fish' self as FishtoCarve8642 if findtype 'dagger' self as MyKnife8643 dclick MyKnife8644 wft 1500 8645 if EnableOverheadMessages = 1 8646 overhead "*carving fish steaks...*" 08647 endif 8648 target FishtoCarve8649 else 8650 if EnableOverheadMessages = 1 8651 overhead "I have no dagger to carve these with..."8652 else 8653 overheard "[ NO DAGGER ]" 3378654 endif8655 @setvar! DisableFishCarver 18656 break8657 endif8658 endwhile8659 endif8660 8661 if not findtype 'dagger' self8662 @setvar! DisableFishCarver 18663 else 8664 @setvar! DisableFishCarver 08665 endif 8666 8667 if not timerexists "SpecialNetCheckTimer" 8668 createtimer "SpecialNetCheckTimer" 8669 settimer "SpecialNetCheckTimer" 300008670 endif8671 if timer "SpecialNetCheckTimer" > 300008672 while findtype "fishing net" backpack as FishingNet 8673 getlabel FishingNet FishingNetname8674 if "special" in FishingNetname8675 overhead "This net looks special.. I'd better hide it!" 20868676 if PutSpecialNetsinBag = 18677 lift FishingNet8678 drop FishBag -1 -1 08679 wait 2508680 else 8681 @setvar! NeedtoSecureSpecialNet 18682 endif 8683 else 8684 @ignore FishingNet8685 endif8686 endwhile8687 settimer "SpecialNetCheckTimer" 08688 @clearignore 8689 endif 8690 8691 if PutSpecialNetsinLockedChest = 1 and NeedtoSecureSpecialNet = 18692 if not findtype "wooden box" backpack or not findtype "copper key" backpack8693 overhead "[ NO LOCKBOX FOUND! ]" 3398694 wait 1500 8695 elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1 8696 overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 3398697 wait 1500 8698 else 8699 if findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key 8700 getlabel lockbox lockboxLabel8701 if "items" in lockboxLabel8702 wait 5008703 if EnableOverheadMessages = 1 8704 overhead "*securing special net...*" 1498705 endif 8706 lift FishingNet8707 drop lockbox -1 -1 -18708 wait 2508709 dclick key8710 wft 15008711 target lockbox8712 overhead "[storage box locked]" 698713 @setvar! NeedtoSecureIngots 0 8714 else 8715 overhead "[storage box unlocked]" 848716 dclick key8717 wft 15008718 target lockbox 8719 if EnableOverheadMessages = 18720 overhead "*securing special net...*" 1498721 endif8722 lift FishingNet8723 drop lockbox -1 -1 -18724 wait 2508725 dclick key8726 wft 15008727 target lockbox8728 overhead "[storage box locked]" 698729 @setvar! NeedtoSecureSpecialNet 08730 endif 8731 endif8732 endif 8733 endif 8734 replay8735 endif8736 8737 8738 //////////////////////8739 // PICKER SCRIPT: //8740 //////////////////////8741 8742 if skill 'Lockpicking' >= 50 and skill 'Detecting Hidden' >= 50 and skill 'Hiding' >= 50 and EnableDungeonPicker = 1 8743 8744 @setvar! DungeonMode 1 8745 if not varexist Stealthing8746 @setvar! Stealthing 08747 endif8748 8749 if not varexist ChestTarget8750 @setvar! ChestTarget 08751 endif8752 8753 if not timerexists ChestTimer8754 createtimer ChestTimer8755 settimer ChestTimer 40008756 endif8757 8758 if not timerexists HidingTimer8759 createtimer HidingTimer8760 settimer HidingTimer 110008761 endif8762 8763 if not timerexists ChestRadar8764 createtimer ChestRadar8765 settimer ChestRadar 110008766 endif 8767 8768 if not timerexists OrganizerTimer8769 createtimer OrganizerTimer8770 settimer OrganizerTimer 300008771 endif 8772 8773 if timer OrganizerTimer > 300008774 hotkey 'Organizer Agent-05' 8775 settimer OrganizerTimer 08776 endif 8777 8778 if findtype "wooden box" backpack8779 @setvar! NoLockbox 08780 endif 8781 8782 while find TargetDungeonChest ground -1 -1 2 and findtype 3821|31169|31172|7109|30988|31190|31128|30988|31142|31141|31002|31130|31000|31001|31180|31182|31178|30991|30999|31014|20016|20014|20012|20010|20008|20006|30992|30997|31176|31188|30998|30989|30996|30995|31186|31184|30994|30990|30993|31017|31019|31021|31023|31025|31027|31029|31031|31033|31035|31037|31038|31041|31043|31045|31047|31049|31051|31053|31055|37181|4026|4025|3962|3963|3972|3973|3974|3976|3980|3981|31010|31008|31007|31006|31015|31005|31009|31012|31011|31004|31003|31191|39911|17686|31014|30994|31142|31190|24434|43206|29363|43166|22336|29348|17087|3985|8826|3827|29030|3836|5981|4248|5359|3839|3838|3843|2597|29036|48407|3834|3865|3859|3885|3856|3878|3877|3873|3861|3862|576|5123|7177|7027|3920|5131|5179|5075|3980|5060|5076|5042|10245|3938|3913|7169|3909|5063|5089|3981|7170|7033|3976|3762|5040|5103|5117|7181|7029|3568|6264|3742|5139|6263|7026|5125|3740|5121|3973|3974|5204|5105|5185|5078|5115|7175|5059|7034|3713|3915|5112|5070|5049|5119|5205|5046|3962|3934|7035|3911|7179|5106|5143|3573|3719|5177|7610|5181|3917|5132|3963|7031|5207|5056|5085|3763|5129|5187|3721|3972|5138|3570|5101|5061|5074|5142|5182|5146|6265|5090|5203|5044|5144|3932|5201|5127|3572|7173|5135|3937|3571|22326|27611|9917|3821|5356|8455|5362|45315|8454|22187|5901|7163|3903|12686 TargetDungeonChest as item8783 if timer "TargetTimer" > 40008784 overhead "*looting chest...*" 998785 settimer "TargetTimer" 08786 endif 8787 getlabel item lootDesc8788 overhead "{{lootDesc}}" 2538789 wait 2508790 hotkey 'Grab Item'8791 target item8792 while queued8793 wait 508794 endwhile8795 endwhile8796 8797 if PutLootinLockedChest = 1 and NeedtoSecureLoot = 1 and NoLockbox != 18798 if not findtype "wooden box" backpack or not findtype "copper key" backpack8799 overhead "[ NO LOCKBOX FOUND! ]" 3398800 @setvar! NoLockbox 18801 wait 1500 8802 elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1 8803 overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 3398804 @setvar! NoLockbox 18805 wait 1500 8806 else 8807 if findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key8808 if findtype '3821|31169|31172|7109|30988|31190|31128|30988|31142|31141|31002|31130|31000|31001|31180|31182|31178|30991|30999|31014|20016|20014|20012|20010|20008|20006|30992|30997|31176|31188|30998|30989|30996|30995|31186|31184|30994|30990|30993|31017|31019|31021|31023|31025|31027|31029|31031|31033|31035|31037|31038|31041|31043|31045|31047|31049|31051|31053|31055|37181|4026|4025|3962|3963|3972|3973|3974|3976|3980|3981|31010|31008|31007|31006|31015|31005|31009|31012|31011|31004|31003|31191|39911|17686|31014|30994|31142|31190|24434|43206|29363|43166|22336|29348|17087|3985|8826|3827|29030|3836|5981|4248|5359|3839|3838|3843|2597|29036|48407|3834|3865|3859|3885|3856|3878|3877|3873|3861|3862|576|5123|7177|7027|3920|5131|5179|5075|3980|5060|5076|5042|10245|3938|3913|7169|3909|5063|5089|3981|7170|7033|3976|3762|5040|5103|5117|7181|7029|3568|6264|3742|5139|6263|7026|5125|3740|5121|3973|3974|5204|5105|5185|5078|5115|7175|5059|7034|3713|3915|5112|5070|5049|5119|5205|5046|3962|3934|7035|3911|7179|5106|5143|3573|3719|5177|7610|5181|3917|5132|3963|7031|5207|5056|5085|3763|5129|5187|3721|3972|5138|3570|5101|5061|5074|5142|5182|5146|6265|5090|5203|5044|5144|3932|5201|5127|3572|7173|5135|3937|3571|22326|27611|9917|3821|5356|8455|5362|45315|8454|22187|5901|7163|3903|126867981|7982|7983|7984|7985|7986|7987|7988|7989|7990|7991|7992|7993|7994|7995|7996|7997|7998|7999|8000|8001|8002|8003|8004|8005|8006|8007|8008|8009|8010|8011|8012|8013|8014|8015|8016|8017|8018|8019|8020|8021|8022|8023|8024|8025|8026|8027|8028|8029|8030|8031|8032|8033|8034|8035|8036|8037|8038|8039|8040|8041|8042|8033|8044' backpack as loottostore 8809 getlabel lockbox lockboxLabel8810 if "items" in lockboxLabel8811 wait 5008812 if timer "NoTargetTimer" > 50008813 if EnableOverheadMessages = 18814 overhead "*securing loot...*" 4208815 endif8816 settimer "NoTargetTimer" 08817 endif 8818 else 8819 overhead "[loot box unlocked]" 84 lockbox8820 dclick key8821 wft 15008822 target lockbox8823 if timer "NoTargetTimer" > 50008824 if EnableOverheadMessages = 18825 overhead "*securing loot...*" 4208826 endif 8827 settimer "NoTargetTimer" 08828 endif8829 endif 8830 while findtype '3821|31169|31172|7109|30988|31190|31128|30988|31142|31141|31002|31130|31000|31001|31180|31182|31178|30991|30999|31014|20016|20014|20012|20010|20008|20006|30992|30997|31176|31188|30998|30989|30996|30995|31186|31184|30994|30990|30993|31017|31019|31021|31023|31025|31027|31029|31031|31033|31035|31037|31038|31041|31043|31045|31047|31049|31051|31053|31055|37181|4026|4025|3962|3963|3972|3973|3974|3976|3980|3981|31010|31008|31007|31006|31015|31005|31009|31012|31011|31004|31003|31191|39911|17686|31014|30994|31142|31190|24434|43206|29363|43166|22336|29348|17087|3985|8826|3827|29030|3836|5981|4248|5359|3839|3838|3843|2597|29036|48407|3834|3865|3859|3885|3856|3878|3877|3873|3861|3862|576|5123|7177|7027|3920|5131|5179|5075|3980|5060|5076|5042|10245|3938|3913|7169|3909|5063|5089|3981|7170|7033|3976|3762|5040|5103|5117|7181|7029|3568|6264|3742|5139|6263|7026|5125|3740|5121|3973|3974|5204|5105|5185|5078|5115|7175|5059|7034|3713|3915|5112|5070|5049|5119|5205|5046|3962|3934|7035|3911|7179|5106|5143|3573|3719|5177|7610|5181|3917|5132|3963|7031|5207|5056|5085|3763|5129|5187|3721|3972|5138|3570|5101|5061|5074|5142|5182|5146|6265|5090|5203|5044|5144|3932|5201|5127|3572|7173|5135|3937|3571|22326|27611|9917|3821|5356|8455|5362|45315|8454|22187|5901|7163|3903|126867981|7982|7983|7984|7985|7986|7987|7988|7989|7990|7991|7992|7993|7994|7995|7996|7997|7998|7999|8000|8001|8002|8003|8004|8005|8006|8007|8008|8009|8010|8011|8012|8013|8014|8015|8016|8017|8018|8019|8020|8021|8022|8023|8024|8025|8026|8027|8028|8029|8030|8031|8032|8033|8034|8035|8036|8037|8038|8039|8040|8041|8042|8033|8044' backpack as loottostore8831 if find loottostore lockbox8832 @ignore loottostore8833 else 8834 clearsysmsg 8835 lift loottostore 99998836 wait 150 8837 drop lockbox -1 -1 -18838 wait 2508839 endif8840 endwhile8841 dclick key8842 wft 15008843 target lockbox8844 overhead "[loot box locked]" 69 lockbox8845 @setvar! NeedtoSecureLoot 0 8846 wait 500 8847 endif 8848 wait 150 8849 getlabel lockbox lockboxLabel8850 if "items" in lockboxLabel8851 dclick key8852 wft 15008853 target lockbox8854 @setvar! NeedtoSecureLoot 08855 endif8856 endif8857 endif 8858 endif8859 8860 if EnableWeightWarningMessage = 18861 if not timerexists "WeightTimer" 8862 createtimer "WeightTimer" 8863 settimer "WeightTimer" 50008864 endif 8865 if diffweight < GreenWarningDiffWeight and diffweight > YellowWarningDiffWeight and timer "WeightTimer" > 50008866 overhead "[ WEIGHT WARNING... ]" 778867 settimer "WeightTimer" 08868 elseif diffweight < YellowWarningDiffWeight and diffweight > RedWeightLimitDiffWeight and timer "WeightTimer" > 50008869 overhead "[ WEIGHT WARNING! ]" 1538870 settimer "WeightTimer" 08871 elseif diffweight < RedWeightLimitDiffWeight and timer "WeightTimer" > 50008872 overhead "[ WEIGHT LIMIT REACHED! ]" 378873 settimer "WeightTimer" 08874 wait 15008875 if EnableAutoWeightDungeonGate = 18876 @setvar! TimeToGo 18877 hotkey 'Toggle War Only'8878 replay8879 endif 8880 stop8881 endif 8882 endif 8883 8884 if EnableSkinningMode = 1 8885 if findtype 'Elven SpellBlade' hand8886 @setvar! SkinningMode 18887 wait 250 8888 if hidden 8889 if findtype "clean bandage%s%" self as bandages8890 dclick bandages8891 wft 5008892 hotkey 'Cancel Current Target'8893 else 8894 say "."8895 endif 8896 endif 8897 wait 250 8898 while SkinningMode = 18899 if hidden8900 overhead "[ SKINNING MODE OFF! ]" 11828901 clearhands right 8902 @setvar! SkinningMode 0 8903 break 8904 endif 8905 8906 if insysmsg "Now tracking" 8907 useskill 'Hiding'8908 overhead "[ HIDING! ]" 68909 clearhands right 8910 @setvar! SkinningMode 0 8911 replay 8912 endif 8913 8914 if not timerexists "SkinningModeTimer" 8915 createtimer "SkinningModeTimer" 8916 settimer "SkinningModeTimer" 35008917 endif 8918 8919 if timer "SkinningModeTimer" > 35008920 overhead "[ SKINNING MODE! ]" 11828921 settimer "SkinningModeTimer" 08922 endif8923 8924 if EnableChestRadar = 1 8925 if timer ChestRadar >= 45008926 if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 18 as DungeonChest8927 getlabel DungeonChest descChest8928 if "lock" in descChest8929 overhead "descChest" 69 DungeonChest8930 overhead "�" 69 DungeonChest 8931 settimer ChestRadar 08932 else 8933 overhead "�" 34 DungeonChest8934 settimer ChestRadar 08935 endif8936 endif8937 endif8938 endif 8939 8940 if skill 'Healing' > 308941 if not bandaging 8942 if hp < maxhp or poisoned or findbuff "bleed" or findbuff "disease" 8943 if counttype 'clean bandage%s%' self < 10 and counttype 'clean bandage%s%' self != 08944 if timer "InventoryTimer" > 60008945 overhead "[ BANDAGES LOW! ]" 3398946 settimer "InventoryTimer" 08947 endif8948 if EnableOverheadMessages = 18949 overhead '*applying bandages...*' 888950 endif8951 hotkey "Bandage Self" 8952 elseif counttype 'clean bandage%s%' self = 0 and timer "InventoryTimer" > 6000 8953 overhead "[ NO BANDAGES! ]" 3378954 settimer "InventoryTimer" 08955 elseif poisoned or findbuff "bleed" or findbuff "disease" 8956 if EnableOverheadMessages = 18957 overhead '*applying bandages...*' 888958 endif8959 hotkey "Bandage Self" 8960 else 8961 if EnableOverheadMessages = 18962 overhead '*applying bandages...*' 888963 endif8964 hotkey "Bandage Self" 8965 endif 8966 endif8967 endif 8968 endif8969 8970 if EnableHealPotion = 1 or EnableHealPotion = 28971 if diffhits > HealPotHPdiff and timer "HealingPotionTimer" > HealingPotionCooldown8972 if findtype "Yellow Potion" self as healpot8973 dclick healpot8974 wait 7508975 if insysmsg "Potion satchel used"8976 if EnableOverheadMessages = 1 8977 overhead "*drinking free heal potion...*" 2538978 endif8979 clearsysmsg8980 else 8981 if EnableOverheadMessages = 1 8982 overhead '*drinking heal potion...*' 2538983 endif8984 clearsysmsg8985 endif8986 settimer "HealingPotionTimer" 08987 cooldown "Healing Potion" HealingPotionCooldown8988 else 8989 if timer "InventoryTimer" > 60008990 overhead '[ NO HEAL POTS! ]' 3378991 settimer "InventoryTimer" 08992 endif8993 endif8994 wait 500 8995 endif8996 endif 8997 8998 if EnableCurePotion = 1 or EnableCurePotion = 28999 if poisoned and timer "CurePotionTimer" > CurePotionCooldown9000 if findtype "Orange Potion" self as curepot9001 dclick curepot9002 wait 5009003 if insysmsg "Potion satchel used"9004 if EnableOverheadMessages = 1 9005 overhead "*drinking free cure potion...*" 449006 endif9007 clearsysmsg9008 else 9009 if EnableOverheadMessages = 1 9010 overhead '*drinking cure potion...*' 449011 endif9012 clearsysmsg9013 endif9014 settimer "CurePotionTimer" 09015 cooldown "Cure Potion" CurePotionCooldown9016 else9017 if timer "InventoryTimer" > 60009018 overhead '[ NO CURE POTS! ]' 3379019 settimer "InventoryTimer" 09020 endif9021 endif9022 wait 500 9023 endif9024 endif 9025 9026 if EnableRefreshPotion = 1 or EnableRefreshPotion = 29027 if diffstam >= RefreshPotSPdiff and timer "RefreshPotionTimer" > RefreshPotionCooldown9028 if findtype "Red Potion" self as refreshpot9029 dclick refreshpot9030 wait 5009031 if insysmsg "Potion satchel used"9032 if EnableOverheadMessages = 1 9033 overhead "*drinking free refresh potion...*" 349034 endif9035 clearsysmsg9036 else 9037 if EnableOverheadMessages = 1 9038 overhead '*drinking refresh potion...*' 349039 endif9040 clearsysmsg9041 endif9042 settimer "RefreshPotionTimer" 09043 cooldown "Refresh Potion" RefreshPotionCooldown9044 else 9045 if timer "InventoryTimer" > 60009046 overhead '[ NO REFRESH POTS! ]' 3379047 settimer "InventoryTimer" 09048 endif9049 endif9050 wait 500 9051 endif9052 endif 9053 9054 if EnableMagicResistPotion = 19055 if not findbuff "Magic Resist Potion"9056 if findtype "Black Potion" self as magicresistpot9057 dclick magicresistpot9058 wait 5009059 if EnableOverheadMessages = 1 9060 if insysmsg "Potion satchel used" 9061 overhead '*drinking free resist potion*' 24069062 clearsysmsg9063 else 9064 overhead '*drinking resist potion*' 24069065 clearsysmsg9066 endif9067 endif 9068 else 9069 if timer "InventoryTimer" > 60009070 overhead '[ NO RESIST POTS! ]' 3379071 settimer "InventoryTimer" 09072 endif9073 endif9074 wait 5009075 endif9076 endif9077 9078 if EnableStrengthPotion = 1 9079 if skill 'Alchemy' = 1 9080 if insysmsg "You may now use a strength" or not findbuff "Strength"9081 if findtype "White Potion" self as strengthpot9082 dclick strengthpot9083 wait 5009084 if EnableOverheadMessages = 1 9085 if insysmsg "Potion satchel used" 9086 overhead '*drinking free strength potion*' 9569087 clearsysmsg9088 else 9089 overhead '*drinking strength potion*' 9569090 clearsysmsg9091 endif9092 endif9093 else 9094 if timer "InventoryTimer" > 60009095 overhead '[ NO STRENGTH POTS! ]' 3379096 settimer "InventoryTimer" 09097 endif9098 endif9099 wait 5009100 endif9101 elseif not findbuff "Strength"9102 if findtype "White Potion" self as strengthpot9103 dclick strengthpot9104 wait 5009105 if EnableOverheadMessages = 1 9106 if insysmsg "Potion satchel used" 9107 overhead '*drinking free strength potion*' 9569108 clearsysmsg9109 else 9110 overhead '*drinking strength potion*' 9569111 clearsysmsg9112 endif9113 endif9114 else 9115 if timer "InventoryTimer" > 60009116 overhead '[ NO STRENGTH POTS! ]' 3379117 settimer "InventoryTimer" 09118 endif9119 endif9120 wait 5009121 endif9122 endif9123 9124 if EnableAgilityPotion = 19125 if not findbuff "Agility"9126 if findtype "Blue Potion" self as agilitypot9127 dclick agilitypot9128 wait 5009129 if EnableOverheadMessages = 1 9130 if insysmsg "Potion satchel used" 9131 overhead '*drinking free agility potion*' 939132 clearsysmsg9133 else 9134 overhead '*drinking agility potion*' 939135 clearsysmsg9136 endif9137 endif9138 else 9139 if timer "InventoryTimer" > 60009140 overhead '[ NO AGILITY POTS! ]' 3379141 settimer "InventoryTimer" 09142 endif9143 endif9144 wait 5009145 endif9146 endif9147 9148 if findtype 'Elven SpellBlade' self9149 dclicktype "Elven Spellblade"9150 wft 15009151 target 'self'9152 wait 5009153 if insysmsg "You dont see anything"9154 wait 5009155 clearsysmsg 9156 else 9157 wait 20009158 clearsysmsg 9159 endif 9160 else 9161 if timer "InventoryTimer" > 50009162 overhead "[ NO SKINNING KNIFE! ]" 3379163 settimer "InventoryTimer" 09164 endif9165 endif 9166 if findtype 'Elven SpellBlade' hand9167 // Do nothing9168 else 9169 overhead "[ SKINNING MODE OFF! ]" 11829170 @setvar! SkinningMode 09171 break9172 endif9173 if dead9174 replay9175 endif 9176 if warmode9177 @setvar! TimeToGo 19178 replay9179 endif 9180 9181 if EnableGoldVacuum = 19182 if not timerexists "Gold Vacuum" 9183 createtimer "Gold Vacuum"9184 settimer "Gold Vacuum" 09185 endif 9186 if not timerexists "Gold Radar"9187 createtimer "Gold Radar"9188 settimer "Gold Radar" 09189 endif 9190 if findtype "gold coin" ground -1 -1 12 as droppedmoney and timer "Gold Radar" > 35009191 overhead "[ $ ]" 149 droppedmoney9192 overhead "�" 149 droppedmoney9193 settimer "Gold Radar" 09194 endif9195 while findtype "gold coin" ground -1 -1 2 as droppedmoney and timer "Gold Vacuum" > 5009196 overhead " � " 1499197 hotkey "Grab Item"9198 wft 25009199 target droppedmoney9200 wait 5009201 if insysmsg "Invalid or inaccessible item"9202 wait 5009203 @ignore droppedmoney9204 endif9205 wait 500 9206 endwhile 9207 settimer "Gold Vacuum" 09208 endif 9209 9210 if EnableDungeonCleanup = 1 9211 if not timerexists "DungeonCleanupRadar" 9212 createtimer "DungeonCleanupRadar" 9213 settimer "DungeonCleanupRadar" 35009214 endif 9215 if not timerexists "DungeonCleanupTimer" 9216 createtimer "DungeonCleanupTimer" 9217 settimer "DungeonCleanupTimer" 10009218 endif 9219 if findtype "iron ingot%s|board%s|cut leather|Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" ground -1 -1 18 as AnotherMansTreasure and timer "DungeonCleanupRadar" > 3500 9220 overhead "�" 333 AnotherMansTreasure9221 settimer "DungeonCleanupRadar" 09222 endif9223 while findtype "iron ingot%s|board%s|cut leather|Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" ground -1 -1 2 as AnotherMansTreasure and timer "DungeonCleanupTimer" > 5009224 if timer "InventoryTimer" > 3500 and EnableOverheadMessages = 19225 overhead "[ CLEANUP... ]" 3339226 settimer "InventoryTimer" 09227 endif9228 hotkey "Grab Item"9229 wft 25009230 target AnotherMansTreasure 9231 wait 5009232 if insysmsg "Invalid or inaccessible item"9233 if EnableOverheadMessages = 19234 overhead "I can't get to that!" 20869235 wait 5009236 endif 9237 @ignore AnotherMansTreasure 9238 endif 9239 settimer "DungeonCleanupTimer" 09240 endwhile9241 endif 9242 endwhile9243 endif 9244 endif9245 9246 if hidden and not cooldown "Hiding"9247 @setvar! Stealthing 19248 endif 9249 9250 while not hidden 9251 if warmode9252 @setvar! TimeToGo 19253 replay 9254 endif 9255 9256 if dead9257 replay9258 endif 9259 9260 if hidden9261 break9262 endif9263 9264 if timer OrganizerTimer > 300009265 hotkey 'Organizer Agent-05' 9266 if EnableSatchels = 19267 if not timerexists "WizardSatchelTimer" 9268 createtimer "WizardSatchelTimer" 9269 settimer "WizardSatchelTimer" 600009270 endif9271 if not timerexists "PotionSatchelTimer" 9272 createtimer "PotionSatchelTimer" 9273 settimer "PotionSatchelTimer" 600009274 endif9275 if findtype "Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" backpack and findtype "reagent satchel" self as MyWizardBag9276 if timer "WizardSatchelTimer" > 600009277 menu MyWizardBag 09278 wait 2509279 settimer "WizardSatchelTimer" 09280 endif9281 endif 9282 if findtype "Yellow Potion|Orange Potion|Red Potion|White Potion|Blue Potion|Black Potion|" backpack and findtype 31262 self as MyPotBag9283 if timer "PotionSatchelTimer" > 60000 9284 menu MyPotBag 09285 wait 2509286 settimer "PotionSatchelTimer" 09287 endif9288 endif 9289 endif 9290 settimer OrganizerTimer 09291 endif 9292 9293 if EnableGoldVacuum = 19294 if not timerexists "Gold Vacuum" 9295 createtimer "Gold Vacuum"9296 settimer "Gold Vacuum" 09297 endif 9298 if not timerexists "Gold Radar"9299 createtimer "Gold Radar"9300 settimer "Gold Radar" 09301 endif 9302 if findtype "gold coin" ground -1 -1 12 as droppedmoney and timer "Gold Radar" > 35009303 overhead "[ $ ]" 149 droppedmoney9304 overhead "�" 149 droppedmoney9305 settimer "Gold Radar" 09306 endif9307 while findtype "gold coin" ground -1 -1 2 as droppedmoney and timer "Gold Vacuum" > 5009308 overhead " � " 1499309 hotkey "Grab Item"9310 wft 25009311 target droppedmoney9312 wait 5009313 if insysmsg "Invalid or inaccessible item"9314 wait 5009315 @ignore droppedmoney9316 endif9317 wait 500 9318 endwhile 9319 settimer "Gold Vacuum" 09320 endif 9321 9322 if EnableDungeonCleanup = 1 9323 if not timerexists "DungeonCleanupRadar" 9324 createtimer "DungeonCleanupRadar" 9325 settimer "DungeonCleanupRadar" 35009326 endif 9327 if not timerexists "DungeonCleanupTimer" 9328 createtimer "DungeonCleanupTimer" 9329 settimer "DungeonCleanupTimer" 10009330 endif 9331 if findtype "iron ingot%s|board%s|cut leather|Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" ground -1 -1 18 as AnotherMansTreasure and timer "DungeonCleanupRadar" > 3500 9332 overhead "�" 333 AnotherMansTreasure9333 settimer "DungeonCleanupRadar" 09334 endif9335 while findtype "iron ingot%s|board%s|cut leather|Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" ground -1 -1 2 as AnotherMansTreasure and timer "DungeonCleanupTimer" > 5009336 if timer "InventoryTimer" > 3500 and EnableOverheadMessages = 19337 overhead "[ CLEANUP... ]" 3339338 settimer "InventoryTimer" 09339 endif9340 hotkey "Grab Item"9341 wft 25009342 target AnotherMansTreasure 9343 wait 5009344 if insysmsg "Invalid or inaccessible item"9345 if EnableOverheadMessages = 19346 overhead "I can't get to that!" 20869347 wait 5009348 endif 9349 @ignore AnotherMansTreasure 9350 endif 9351 settimer "DungeonCleanupTimer" 09352 endwhile9353 endif 9354 9355 if EnableChestRadar = 1 9356 if timer ChestRadar >= 45009357 if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 18 as DungeonChest9358 getlabel DungeonChest descChest9359 if "lock" in descChest9360 overhead "descChest" 69 DungeonChest9361 overhead "�" 69 DungeonChest 9362 settimer ChestRadar 09363 else 9364 overhead "�" 34 DungeonChest9365 settimer ChestRadar 09366 endif9367 endif9368 endif9369 endif 9370 9371 if findtype 'Elven SpellBlade' self9372 if findtype "corpse" ground -1 -1 2 as deadbody9373 dclicktype "Elven Spellblade"9374 wft 15009375 target 'self'9376 wait 7509377 if insysmsg "You don't see anything"9378 @ignore deadbody9379 else 9380 @ignore deadbody9381 cooldown "Hiding" 20009382 endif9383 endif 9384 else9385 if timer "InventoryTimer" > 150009386 overhead "[ NO SKINNING KNIFE! ]" 3379387 sysmsg "Disable EnableAutoCarving in script variables to turn off this overhead message!" 09388 settimer "InventoryTimer" 09389 endif9390 endif 9391 9392 if skill 'Healing' > 309393 if not bandaging 9394 if hp < maxhp or poisoned or findbuff "bleed" or findbuff "disease" 9395 if counttype 'clean bandage%s%' self < 10 and counttype 'clean bandage%s%' self != 09396 if timer "InventoryTimer" > 60009397 overhead "[ BANDAGES LOW! ]" 3399398 settimer "InventoryTimer" 09399 endif9400 if EnableOverheadMessages = 19401 overhead '*applying bandages...*' 889402 endif 9403 hotkey "Bandage Self" 9404 elseif counttype 'clean bandage%s%' self = 0 and timer "InventoryTimer" > 60009405 overhead "[ NO BANDAGES! ]" 3379406 settimer "InventoryTimer" 09407 elseif poisoned or findbuff "bleed" or findbuff "disease" 9408 if EnableOverheadMessages = 19409 overhead '*applying bandages...*' 889410 endif 9411 hotkey "Bandage Self" 9412 else 9413 if EnableOverheadMessages = 19414 overhead '*applying bandages...*' 889415 endif 9416 hotkey "Bandage Self" 9417 endif 9418 endif9419 endif 9420 endif 9421 9422 if EnableHealPotion = 1 or EnableHealPotion = 29423 if diffhits > HealPotHPdiff and timer "HealingPotionTimer" > HealingPotionCooldown9424 if findtype "Yellow Potion" self as healpot9425 dclick healpot9426 wait 7509427 if insysmsg "Potion satchel used"9428 if EnableOverheadMessages = 1 9429 overhead "*drinking free heal potion...*" 2539430 endif9431 clearsysmsg9432 else 9433 if EnableOverheadMessages = 1 9434 overhead '*drinking heal potion...*' 2539435 endif9436 clearsysmsg9437 endif9438 settimer "HealingPotionTimer" 09439 cooldown "Healing Potion" HealingPotionCooldown9440 else 9441 if timer "InventoryTimer" > 60009442 overhead '[ NO HEAL POTS! ]' 3379443 settimer "InventoryTimer" 09444 endif9445 endif9446 wait 500 9447 endif9448 endif 9449 9450 if EnableCurePotion = 1 or EnableCurePotion = 29451 if poisoned and timer "CurePotionTimer" > CurePotionCooldown9452 if findtype "Orange Potion" self as curepot9453 dclick curepot9454 wait 5009455 if insysmsg "Potion satchel used"9456 if EnableOverheadMessages = 1 9457 overhead "*drinking free cure potion...*" 449458 endif9459 clearsysmsg9460 else 9461 if EnableOverheadMessages = 1 9462 overhead '*drinking cure potion...*' 449463 endif9464 clearsysmsg9465 endif9466 settimer "CurePotionTimer" 09467 cooldown "Cure Potion" CurePotionCooldown9468 else9469 if timer "InventoryTimer" > 60009470 overhead '[ NO CURE POTS! ]' 3379471 settimer "InventoryTimer" 09472 endif9473 endif9474 wait 500 9475 endif9476 endif 9477 9478 if EnableRefreshPotion = 1 or EnableRefreshPotion = 29479 if diffstam >= RefreshPotSPdiff and timer "RefreshPotionTimer" > RefreshPotionCooldown9480 if findtype "Red Potion" self as refreshpot9481 dclick refreshpot9482 wait 5009483 if insysmsg "Potion satchel used"9484 if EnableOverheadMessages = 1 9485 overhead "*drinking free refresh potion...*" 349486 endif9487 clearsysmsg9488 else 9489 if EnableOverheadMessages = 1 9490 overhead '*drinking refresh potion...*' 349491 endif9492 clearsysmsg9493 endif9494 settimer "RefreshPotionTimer" 09495 cooldown "Refresh Potion" RefreshPotionCooldown9496 else 9497 if timer "InventoryTimer" > 60009498 overhead '[ NO REFRESH POTS! ]' 3379499 settimer "InventoryTimer" 09500 endif9501 endif9502 wait 500 9503 endif9504 endif 9505 9506 if EnableMagicResistPotion = 19507 if not findbuff "Magic Resist Potion"9508 if findtype "Black Potion" self as magicresistpot9509 dclick magicresistpot9510 wait 5009511 if EnableOverheadMessages = 1 9512 if insysmsg "Potion satchel used" 9513 overhead '*drinking free resist potion*' 24069514 clearsysmsg9515 else 9516 overhead '*drinking resist potion*' 24069517 clearsysmsg9518 endif9519 endif 9520 else 9521 if timer "InventoryTimer" > 60009522 overhead '[ NO RESIST POTS! ]' 3379523 settimer "InventoryTimer" 09524 endif9525 endif9526 wait 5009527 endif9528 endif9529 9530 if EnableStrengthPotion = 1 9531 if skill 'Alchemy' = 1 9532 if insysmsg "You may now use a strength" or not findbuff "Strength"9533 if findtype "White Potion" self as strengthpot9534 dclick strengthpot9535 wait 5009536 if EnableOverheadMessages = 1 9537 if insysmsg "Potion satchel used" 9538 overhead '*drinking free strength potion*' 9569539 clearsysmsg9540 else 9541 overhead '*drinking strength potion*' 9569542 clearsysmsg9543 endif9544 endif9545 else 9546 if timer "InventoryTimer" > 60009547 overhead '[ NO STRENGTH POTS! ]' 3379548 settimer "InventoryTimer" 09549 endif9550 endif9551 wait 5009552 endif9553 elseif not findbuff "Strength"9554 if findtype "White Potion" self as strengthpot9555 dclick strengthpot9556 wait 5009557 if EnableOverheadMessages = 1 9558 if insysmsg "Potion satchel used" 9559 overhead '*drinking free strength potion*' 9569560 clearsysmsg9561 else 9562 overhead '*drinking strength potion*' 9569563 clearsysmsg9564 endif9565 endif9566 else 9567 if timer "InventoryTimer" > 60009568 overhead '[ NO STRENGTH POTS! ]' 3379569 settimer "InventoryTimer" 09570 endif9571 endif9572 wait 5009573 endif9574 endif9575 9576 if EnableAgilityPotion = 19577 if not findbuff "Agility"9578 if findtype "Blue Potion" self as agilitypot9579 dclick agilitypot9580 wait 5009581 if EnableOverheadMessages = 1 9582 if insysmsg "Potion satchel used" 9583 overhead '*drinking free agility potion*' 939584 clearsysmsg9585 else 9586 overhead '*drinking agility potion*' 939587 clearsysmsg9588 endif9589 endif9590 else 9591 if timer "InventoryTimer" > 60009592 overhead '[ NO AGILITY POTS! ]' 3379593 settimer "InventoryTimer" 09594 endif9595 endif9596 wait 5009597 endif9598 endif9599 9600 if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2 as TargetDungeonChest and EnableAutoPickDungeonChests = 19601 getlabel TargetDungeonChest TargetDungeonChestdesc9602 if "lock" in TargetDungeonChestdesc9603 dclick TargetDungeonChest9604 @setvar! ChestTarget TargetDungeonChest9605 wait 500 9606 @setvar! TimetoPick 09607 @setvar! NeedtoRemoveTrap 19608 for 109609 overhead "*working on chest...*" 11829610 if not hidden and not cooldown "Hiding" and timer "StealthCheck" > 105009611 useskill 'Hiding'9612 endif 9613 settimer ChestRadar 09614 while gumpexists 7360380709615 if not hidden and not cooldown "Hiding" and timer "StealthCheck" > 105009616 useskill 'Hiding'9617 endif 9618 if insysmsg "successfully cleared it of traps"9619 overhead "*screech*" 2114 TargetDungeonChest9620 if EnableOverheadMessages = 19621 overhead "There! That should disable the traps..." 20869622 endif 9623 settimer ChestRadar 09624 clearsysmsg 9625 wait 5009626 @setvar! TimetoPick 19627 if findtype "lockpicks" backpack as Lockpicks and TimetoPick = 19628 gumpresponse 4 7360380709629 else 9630 if EnableOverheadMessages = 19631 overhead "I'm out of lockpicks!" 20869632 else 9633 overhead "[ NO LOCKPICKS! ]" 3379634 endif9635 endif9636 endif 9637 if NeedtoRemoveTrap = 19638 if findtype "drill" backpack as RemoveTrapTool9639 gumpresponse 7 7360380709640 wait 2509641 if insysmsg "You do not have any trap tools of that material"9642 gumpresponse 5 7360380709643 endif9644 @setvar! NeedtoRemoveTrap 09645 else 9646 if EnableOverheadMessages = 19647 overhead "I'm out of trap removal tools!" 20869648 else 9649 overhead "[ NO TRAP TOOLS! ]" 3379650 endif9651 replay9652 endif9653 endif9654 if insysmsg "successfully pick the lock" 9655 overhead "*click*" 2117 TargetDungeonChest9656 if EnableOverheadMessages = 19657 overhead "Bingo! That does it..." 20869658 endif 9659 settimer ChestRadar 09660 wait 5009661 clearsysmsg 9662 replay 9663 endif 9664 wait 5009665 endwhile9666 endfor 9667 else 9668 if timer "NoTargetTimer" > 40009669 if EnableOverheadMessages = 19670 overhead "This one is already empty..." 20869671 endif 9672 settimer "NoTargetTimer" 09673 endif 9674 endif 9675 endif 9676 endwhile9677 9678 wait 2509679 9680 while cooldown "Hiding" 9681 if warmode 9682 @setvar! TimeToGo 19683 replay9684 endif 9685 if findtype 'Elven SpellBlade' hand9686 replay9687 endif9688 if timer "TargetTimer" > 20009689 overhead "� WAIT... �" 2539690 settimer "TargetTimer" 09691 endif 9692 if not hidden9693 settimer HidingTimer 0 9694 replay9695 endif 9696 if not cooldown "Hiding" 9697 settimer "TargetTimer" 09698 break9699 endif 9700 endwhile9701 9702 wait 250 9703 9704 while hidden and timer HidingTimer > 10000 and Stealthing = 09705 @setvar! ChestTarget 09706 wait 5009707 if not hidden9708 settimer HidingTimer 0 9709 replay9710 endif9711 if findtype 'Elven SpellBlade' hand9712 replay9713 endif9714 if EnableChestRadar = 1 9715 if timer ChestRadar >= 45009716 if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 18 as DungeonChest9717 getlabel DungeonChest descChest9718 if "lock" in descChest9719 overhead "descChest" 69 DungeonChest9720 overhead "�" 69 DungeonChest 9721 settimer ChestRadar 09722 else 9723 overhead "�" 34 DungeonChest9724 settimer ChestRadar 09725 endif9726 endif 9727 endif9728 endif 9729 if insysmsg "You feel comfortable enough"9730 overhead "� READY! �" 699731 settimer "TargetTimer" 09732 clearsysmsg 9733 while not insysmsg "You begin to move quietly."9734 if timer OrganizerTimer > 300009735 hotkey 'Organizer Agent-05' 9736 settimer OrganizerTimer 09737 endif 9738 if not hidden9739 settimer HidingTimer 0 9740 replay9741 endif 9742 if warmode 9743 @setvar! TimeToGo 19744 replay9745 endif 9746 if timer "TargetTimer" > 40009747 overhead "� . . . �" 699748 settimer "TargetTimer" 09749 endif9750 if EnableSkinningMode = 1 9751 if findtype 'Elven SpellBlade' hand9752 @setvar! SkinningMode 19753 break9754 endif 9755 endif 9756 if EnableChestRadar = 1 9757 if timer ChestRadar >= 45009758 if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 18 as DungeonChest9759 getlabel DungeonChest descChest9760 if "lock" in descChest9761 overhead "descChest" 69 DungeonChest9762 overhead "�" 69 DungeonChest 9763 settimer ChestRadar 09764 else 9765 overhead "�" 34 DungeonChest9766 settimer ChestRadar 09767 endif9768 endif9769 endif9770 endif 9771 if Stealthing = 1 9772 wait 2509773 break9774 endif 9775 if insysmsg "You begin to move quietly"9776 overhead "� START �" 69 9777 settimer "StealthCheck" 09778 settimer "TargetTimer" 09779 @setvar! Stealthing 19780 clearsysmsg 9781 break9782 endif 9783 if insysmsg "Now tracking" 9784 replay9785 endif 9786 endwhile9787 if insysmsg "You begin to move quietly"9788 @setvar! Stealthing 19789 clearsysmsg 9790 break9791 endif 9792 endif 9793 endwhile9794 9795 wait 250 9796 9797 while Stealthing = 19798 if dead9799 replay9800 endif 9801 9802 if not hidden9803 @setvar! Stealthing 09804 replay9805 endif 9806 9807 if timer OrganizerTimer > 300009808 hotkey 'Organizer Agent-05' 9809 settimer OrganizerTimer 09810 endif 9811 9812 if warmode 9813 @setvar! TimeToGo 19814 replay9815 endif 9816 9817 if findtype 'Elven SpellBlade' hand9818 replay9819 endif9820 9821 if not timerexists "StealthCheck" 9822 createtimer "StealthCheck" 9823 settimer "StealthCheck" 09824 endif 9825 9826 if insysmsg "You will automatically stealth when out of steps."9827 @setvar! KeepOnTruckin 19828 clearsysmsg 9829 elseif timer "StealthCheck" < 105009830 @setvar! KeepOnTruckin 09831 endif 9832 9833 if insysmsg "You begin to move quietly"9834 settimer "StealthCheck" 09835 cooldown "Stealth" 105009836 settimer "TargetTimer" 09837 @setvar! Stealthing 19838 clearsysmsg 9839 endif9840 9841 if insysmsg "You feel ready to continue stealthing."9842 @setvar! KeepOnTruckin 1 9843 clearsysmsg9844 endif 9845 9846 if insysmsg "You have 1 stealth steps" or insysmsg "You have 0 stealth steps"9847 if KeepOnTruckin = 1 or insysmsg "You feel ready to continue stealthing."9848 @setvar! KeepOnTruckin 09849 if timer "TargetTimer" > 2500 9850 overhead "� KEEP GOING! �" 699851 settimer "TargetTimer" 09852 endif 9853 clearsysmsg 9854 else 9855 clearsysmsg 9856 while timer "StealthCheck" < 105009857 if not timerexists "StealthTimer" 9858 createtimer "StealthTimer"9859 settimer "StealthTimer" 09860 endif9861 if timer "StealthTimer" > 5009862 overhead "� SLOW... �" 1499863 settimer "StealthTimer" 0 9864 settimer "TargetTimer" 09865 clearsysmsg 9866 endif9867 if not hidden 9868 @setvar! Stealthing 09869 replay9870 endif9871 if timer "StealthCheck" > 105009872 break9873 endif9874 if insysmsg "You have 0 stealth steps remaining."9875 clearsysmsg9876 if KeepOnTruckin = 1 or insysmsg "You feel ready to continue stealthing."9877 @setvar! KeepOnTruckin 09878 if timer "TargetTimer" > 2500 9879 overhead "� KEEP GOING! �" 699880 settimer "TargetTimer" 09881 endif 9882 else 9883 while timer "StealthCheck" < 105009884 if not timerexists "StealthTimer" 9885 createtimer "StealthTimer"9886 settimer "StealthTimer" 09887 endif9888 if timer "StealthTimer" > 5009889 overhead "� STOP! �" 379890 settimer "StealthTimer" 0 9891 settimer "TargetTimer" 09892 clearsysmsg 9893 endif9894 wait 5009895 if insysmsg "You feel ready to continue stealthing"9896 overhead "� READY! �" 699897 settimer "TargetTimer" 09898 wait 5009899 clearsysmsg 9900 break9901 endif9902 if not hidden 9903 @setvar! Stealthing 09904 replay9905 endif9906 if timer "StealthCheck" > 105009907 break9908 endif 9909 endwhile9910 endif 9911 endif 9912 if EnableChestRadar = 1 9913 if timer ChestRadar >= 45009914 if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 18 as DungeonChest9915 getlabel DungeonChest descChest9916 if "lock" in descChest9917 overhead "descChest" 69 DungeonChest9918 overhead "�" 69 DungeonChest 9919 settimer ChestRadar 09920 else 9921 overhead "�" 34 DungeonChest9922 settimer ChestRadar 09923 endif9924 endif 9925 endif9926 endif 9927 endwhile9928 endif 9929 endif 9930 9931 if insysmsg "You feel ready to continue stealthing"9932 overhead "� READY! �" 699933 settimer "TargetTimer" 09934 wait 5009935 clearsysmsg 9936 endif9937 9938 if insysmsg "stealth steps remaining"9939 settimer "TargetTimer" 09940 endif 9941 9942 if timer "TargetTimer" > 4000 and not cooldown "Hiding" and timer "StealthCheck" > 105009943 overhead "�" 699944 settimer "TargetTimer" 09945 endif9946 9947 if EnableSkinningMode = 1 9948 if findtype 'Elven SpellBlade' hand9949 @setvar! SkinningMode 19950 replay9951 endif 9952 endif 9953 9954 if EnableGoldVacuum = 19955 if not timerexists "Gold Vacuum" 9956 createtimer "Gold Vacuum"9957 settimer "Gold Vacuum" 09958 endif 9959 9960 if not timerexists "Gold Radar"9961 createtimer "Gold Radar"9962 settimer "Gold Radar" 09963 endif 9964 9965 if findtype "gold coin" ground -1 -1 12 as droppedmoney and timer "Gold Radar" > 35009966 overhead "[ $ ]" 149 droppedmoney9967 overhead "�" 149 droppedmoney9968 settimer "Gold Radar" 09969 endif9970 9971 while findtype "gold coin" ground -1 -1 2 as droppedmoney and timer "Gold Vacuum" > 5009972 overhead " � " 1499973 hotkey "Grab Item"9974 wft 25009975 target droppedmoney9976 wait 5009977 if insysmsg "Invalid or inaccessible item"9978 wait 5009979 @ignore droppedmoney9980 endif9981 wait 500 9982 endwhile 9983 settimer "Gold Vacuum" 09984 endif 9985 9986 if EnableDungeonCleanup = 1 9987 if not timerexists "DungeonCleanupRadar" 9988 createtimer "DungeonCleanupRadar" 9989 settimer "DungeonCleanupRadar" 35009990 endif 9991 if not timerexists "DungeonCleanupTimer" 9992 createtimer "DungeonCleanupTimer" 9993 settimer "DungeonCleanupTimer" 10009994 endif 9995 if findtype "iron ingot%s|board%s|cut leather|Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" ground -1 -1 18 as AnotherMansTreasure and timer "DungeonCleanupRadar" > 3500 9996 overhead "�" 333 AnotherMansTreasure9997 settimer "DungeonCleanupRadar" 09998 endif9999 while findtype "iron ingot%s|board%s|cut leather|Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" ground -1 -1 2 as AnotherMansTreasure and timer "DungeonCleanupTimer" > 50010000 if timer "InventoryTimer" > 3500 and EnableOverheadMessages = 110001 overhead "[ CLEANUP... ]" 33310002 settimer "InventoryTimer" 010003 endif10004 hotkey "Grab Item"10005 wft 250010006 target AnotherMansTreasure 10007 wait 50010008 if insysmsg "Invalid or inaccessible item"10009 if EnableOverheadMessages = 110010 overhead "I can't get to that!" 208610011 endif 10012 wait 50010013 @ignore AnotherMansTreasure 10014 endif 10015 settimer "DungeonCleanupTimer" 010016 endwhile10017 endif 10018 10019 if EnableChestRadar = 1 10020 if timer ChestRadar >= 450010021 if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 18 as DungeonChest10022 getlabel DungeonChest descChest10023 if "lock" in descChest10024 overhead "descChest" 69 DungeonChest10025 overhead "�" 69 DungeonChest 10026 settimer ChestRadar 010027 else 10028 overhead "�" 34 DungeonChest10029 settimer ChestRadar 010030 endif10031 endif10032 endif10033 endif 10034 10035 if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2 as TargetDungeonChest and EnableAutoPickDungeonChests = 110036 getlabel TargetDungeonChest TargetDungeonChestdesc10037 if "lock" in TargetDungeonChestdesc10038 dclick TargetDungeonChest10039 @setvar! ChestTarget TargetDungeonChest10040 wait 500 10041 @setvar! TimetoPick 010042 @setvar! NeedtoRemoveTrap 110043 for 1010044 overhead "*working on chest...*" 118210045 if not hidden and not cooldown "Hiding" and timer "StealthCheck" > 10500 10046 useskill 'Hiding'10047 endif 10048 settimer ChestRadar 010049 while gumpexists 73603807010050 if not hidden and not cooldown "Hiding" and timer "StealthCheck" > 10500 10051 useskill 'Hiding'10052 endif 10053 if insysmsg "successfully cleared it of traps"10054 overhead "*screech*" 2114 TargetDungeonChest10055 if EnableOverheadMessages = 110056 overhead "There! That should disable the traps..." 208610057 endif 10058 settimer ChestRadar 010059 clearsysmsg 10060 wait 50010061 @setvar! TimetoPick 110062 if findtype "lockpicks" backpack as Lockpicks and TimetoPick = 110063 gumpresponse 4 73603807010064 else 10065 if EnableOverheadMessages = 110066 overhead "I'm out of lockpicks!" 208610067 else 10068 overhead "[ NO LOCKPICKS! ]" 33710069 endif 10070 endif10071 endif 10072 if NeedtoRemoveTrap = 110073 if findtype "drill" backpack as RemoveTrapTool10074 gumpresponse 7 73603807010075 wait 25010076 if insysmsg "You do not have any trap tools of that material"10077 gumpresponse 5 73603807010078 endif10079 @setvar! NeedtoRemoveTrap 010080 else 10081 if EnableOverheadMessages = 110082 overhead "I'm out of trap removal tools!" 208610083 else 10084 overhead "[ NO TRAP TOOLS! ]" 33710085 endif 10086 replay10087 endif10088 endif10089 if insysmsg "successfully pick the lock" 10090 overhead "*click*" 2117 TargetDungeonChest10091 if EnableOverheadMessages = 110092 overhead "Bingo! That does it..." 208610093 endif 10094 settimer ChestRadar 010095 wait 50010096 clearsysmsg 10097 replay 10098 endif 10099 wait 50010100 endwhile10101 endfor 10102 else 10103 if timer "TargetTimer" > 4000 10104 if EnableOverheadMessages = 110105 overhead "This one is already empty..." 208610106 endif 10107 settimer "TargetTimer" 010108 endif 10109 endif 10110 @setvar! NeedtoSecureLoot 110111 wait 25010112 replay10113 endif10114 endwhile10115 replay 10116 endif 10117 10118 if timer "TravelTimer" > 60000 and skill 'Mining' < 50 and skill 'Lumberjacking' < 50 and skill 'Fishing' < 50 and skill 'Lockpicking' < 5010119 wait 50010120 overhead "Train harvesting skill to 50.0 at NPC and then restart script!" 010121 wait 250010122 overhead '[ STOPPING SCRIPT... ]' 33710123 stop 10124 elseif timer "TravelTimer" < 6000010125 if timer "InventoryTimer" > 6000 10126 if EnableOverheadMessages = 110127 overhead "*resting...*" 010128 else 10129 overhead " � " 010130 endif10131 settimer "InventoryTimer" 010132 endif10133 10134 if EnableSummons = 1 and timer "NoTargetTimer" > 45000 and followers >= 1 and EnableOverheadMessages = 110135 wait 250010136 overhead "*yawns...*" 2117 myMainTankPet10137 menu myMainTankPet 310138 settimer "NoTargetTimer" 010139 endif 10140 10141 if EnableSatchels = 110142 if not timerexists "WizardSatchelTimer" 10143 createtimer "WizardSatchelTimer" 10144 settimer "WizardSatchelTimer" 6000010145 endif10146 if not timerexists "PotionSatchelTimer" 10147 createtimer "PotionSatchelTimer" 10148 settimer "PotionSatchelTimer" 6000010149 endif10150 if findtype "Ginseng|Garlic|Blood Moss|Sulfurous Ash|Mandrake Root%s%|Nightshade|Black Pearl%s%|Spider's Silk" backpack and findtype "reagent satchel" self as MyWizardBag10151 if timer "WizardSatchelTimer" > 6000010152 menu MyWizardBag 010153 wait 25010154 settimer "WizardSatchelTimer" 010155 endif10156 endif 10157 if findtype "Yellow Potion|Orange Potion|Red Potion|White Potion|Blue Potion|Black Potion|" backpack and findtype 31262 self as MyPotBag10158 if timer "PotionSatchelTimer" > 60000 10159 menu MyPotBag 010160 wait 25010161 settimer "PotionSatchelTimer" 010162 endif10163 endif 10164 endif 10165 10166 if insysmsg "Being perfectly rested" and EnableOverheadMessages = 110167 overhead "Leave me alone, I'm tryin to rest here..." 208610168 wait 50010169 if EnableSummons = 1 and timer "NoTargetTimer" > 30000 and followers >= 1 10170 wait 250010171 overhead "*growls...*" 2117 myMainTankPet10172 menu myMainTankPet 310173 settimer "NoTargetTimer" 010174 endif 10175 clearsysmsg 10176 endif 10177 10178 if paralyzed and EnableAutoParalyzePouch = 110179 if EnableOverheadMessages = 110180 overhead "[ [ [ [ POP! ] ] ] ]" 211710181 endif 10182 say "[pouch" 10183 @setvar! TimeToGo 110184 @setvar! MurdererFound 110185 replay10186 endif10187 replay10188 else 10189 replay10190 endif 10191replay10192 10193 10194 /////////////////////10195 // DEATH LOOP: //10196 /////////////////////10197 10198elseif dead10199 overhead "[ R.I.P. ]" 33710200 wait 150010201 settimer "TargetTimer" 010202 settimer "NoTargetTimer" 400010203 settimer "InventoryTimer" 010204 while dead10205 @setvar! DEAD 110206 wait 50010207 10208 if timer "NoTargetTimer" > 400010209 overhead "[ FIND A HEALER! ]" 010210 settimer "NoTargetTimer" 010211 endif 10212 10213 if findtype "blue moongate|30528|moongate" ground -1 -1 12 as EscapeGate10214 if timer "TargetTimer" > 100010215 overhead " � " 253 EscapeGate10216 settimer "TargetTimer" 010217 endif 10218 endif 10219 10220 while gumpexists 377319980010221 gumpresponse 1610222 wait 50010223 waitforgump 377319980010224 gumpresponse 210225 if EnableOverheadMessages = 110226 overhead "[ GATING TO TOWN... ]" 8810227 endif 10228 break10229 endwhile 10230 10231 while gumpexists 295781022510232 if EnableOverheadMessages = 110233 overhead "[ HEALED! ]" 8410234 endif10235 gumpresponse 110236 wait 100010237 gumpclose 2957810225 10238 if EnableRecallAfterRessurection = 110239 @setvar! TimeToGo 110240 @setvar! ResThenTimeToGo 110241 wait 100010242 replay 10243 else10244 wait 250010245 overhead "[ STOPPING SCRIPT ]" 8810246 stop10247 endif10248 endwhile 10249 endwhile10250endif10251 10252 10253////////////////10254// THE END! //10255////////////////10256 10257