AUTO RECALL & MORE!) by danstock._98439

Created: 05/09/2024
Last Updated: 5 months ago
Warning: This is potentially a huge script, skipping formatting.

You can still attempt to use [Copy Script] but may need to use the [Download Script] button so you get the full script as a file instead.
/////////
////////        DanStock's ULTIMATE MINING AUTO PILOT UO OUTLANDS RAZOR SCRIPT - Last Updated Nov 28, 2024
///////
//////              MINING AUTOBOT (DEXXER, MAGE AND/OR SUMMONER w/ AUTO RECALL & MORE!) 
/////             
////                    Compiled by DanStock. - Email any bug reports/tips to dan@danstockman.com
///                     Inspired by & learned from many scripts found on https://outlands.uorazorscripts.com/
//            
 

                ##########################################################################################################
                ####    PLEASE READ SCRIPT DETAILS BELOW FOR IMPORTANT COOLDOWN, FILTER AND VARIABLE INSTRUCTIONS!    ####
                ####             Most features are turned OFF by default and can be enabled below.                   ####
                ##########################################################################################################



    //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    /////  ANYTIME YOU NEED TO RESET OR CHANGE PERMANENT VARIABLES (ie. ESCAPE RUNEBOOKS, TREASURE CHEST, INGOT AND BOARD BAGS)  ///// 
    //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
    //                                                                                                                              //
    //                                                                                                                              //
    //      Run script once with this SCRIPTRESET set to 1 to clear ALL variables.                                                  //
    //      Then reset SCRIPTRESET back to 0 and restart script to prompt for new targets!                                          //
    //                                                                                                                              //
                @setvar! SCRIPTRESET 0
    //                                                                                                                              //      
    //      This will reset the script to it's "first run" status if something goes wrong in the initial setup!                     //
    //                                                                                                                              //
    //                                                                                                      - DanStock.             //
    //                                                                                             (aka. Pax Augustus of Terran)    //
    //                                                                                                                              //
    //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


# Required (or suggested *) inventory items:

    # Pickaxe
    # A blessed escape runebook (charged w/ recall scrolls if no Magery skill)
    # Trapped pouches 
    # Healing, Cure and Refresh potions (Resist, and Strength pots *)
    # Skinning knife *
    # Bandages * 
    # Adventurer's rope *
    # Tool Kit *
    # Potion Satchel *
    # Wizard's Satchel (w/ regs) *
    # Magic Mushrooms *
    # Harvest Aspect weapon of choice (script supports Swords, Macing or Spellbook) *
    # Harvest Aspect armour of choice *


# IMPORTANT: Please add the following COOLDOWNS (case sensitive) in UO client under Options -> Cooldowns:

    // Healing Potion
    // Cure Potion
    // Refresh Potion
    // Travel
    // Target Timer
    // Move Timer
    // Weight Timer
    // Inventory Timer
    // Satchel Timer
    // Forge Radar
    // Ore Radar
    // Gold Radar
    // Ore Vacuum
    // Gold Vacuum
    // HarmCD
    // WeakenCD
    // CurseCD
    // MindblastCD
    // MagicArrowCD
    // FireballCD
    // LightningCD
    // ExplosionCD
    // EnergyBoltCD
    // FlamestrikeCD
    // MeteorSwarmCD
    // ChainLightningCD
    // Spirit Speak
    // Mushroom
    // Magic Shield
    // Spell Fail    (w/ overhead text trigger of "The spell fizzles" and a 2 second default cooldown)


# Use the following optional organizer agents (or swap for your own):

    # Organizer Agent-03 hotbag   (for ingots, seeds, etc.)
    # Organizer Agent-04 hotbag   (for main MINING inventory items)

    # Organizer Agent-05 hotbag * (optional - for unloading at HOME or INN ROOM - Turn on EnableOrganizerAgents below)
    // See Shared Variables section below to turn on or off the use of Resource Stockpile, Storage Shelf, Bank Safe and Magic Item Recycler in lieu of Organizer Agent-05!

    // Use the following optional agents to unload non-stockpile or shelf items (Turn on EnableTreasureChest below):
    # Organizer Agent-06 hotbag * (optional - I use for unloading Tmaps, SS, orbs, RM, etc.)
    # Organizer Agent-07 hotbag * (optional - I use for unloading Runes)
    # Organizer Agent-08 hotbag * (optional - I use for unloading Black Goods, etc.)
    # Organizer Agent-09 hotbag * (optional - I use for unloading seeds, soil, grain, etc.)


# Optional system messages to TEXT FILTER in Razor for cleaner UI:

    // "What do you want to use this item on?" 
    // "You do not see any harvestable resources nearby"
    // "You dig some"
    // "You loosen some"
    // "You smelt the ore"
    // "You must wait"
    // "You do not see any"
    // "You do not have any"
    // "Mining skillgain"
    // "No one matching that"
    // "You will now hunt"
    // "Organize Agent"
    // "queue"
    // "Macro"
    // "Achievement"
    // "You have worn out your tool"
    // "You carve materials from the corpse"
    // "Target item to grab"
    // "There are no nearby corpses"
    // "item to satchel"
    // "You begin hunting"
    // "Container not set"
    // "Invalid or inaccessible item"
   

    
    #################################################
    //              User Variables:                //
    #################################################

@setvar! EnableRedAlertRecall 1
@setvar! EnableParalyzePouch 1
@setvar! EnableAutoAttackGreyMOB 1

@setvar! EnableHealPotion 1
@setvar! HealPotHP 45

@setvar! EnableCurePotion 1
@setvar! CurePotHP 85

@setvar! EnableRefreshPotion 1
@setvar! RefreshPotSPdiff 11

    // Enable for auto buff check and consumption during combat:
@setvar! EnableMagicResistPotion 0
@setvar! EnableStrengthPotion 0
@setvar! EnableAgilityPotion 0

@setvar! AllInventoryMessage 1
    // or
@setvar! YellowInventoryMessage 1
@setvar! OrangeInventoryMessage 1
@setvar! RedInventoryMessage 1
@setvar! WhiteInventoryMessage 0
@setvar! BlueInventoryMessage 0
@setvar! BlackInventoryMessage 0
@setvar! RopeInventoryMessage 0

@setvar! EnableAutoCarving 0
@setvar! EnableGoldVacuum 0
@setvar! EnableCheeseTimer 0
@setvar! EnableToolCountdown 0
@setvar! EnableRecycleTool 0
@setvar! EnableSatchels 0
@setvar! EnableWeaponWarning 0

    // Choose only one (or none) for AUTO RECALL destination:
@setvar! OwnerInnRecall 0 
@setvar! CoOwnerInnRecall 0
@setvar! HouseRecall 0

    # Use ">info" to ID your own house door:
@setvar! MyDoor 0x50F70A17
@setvar! HideAtHomeorInn 1

    # Script can use Razor Organizer Agents to organize or you can use Resource Stockpile, Storage Shelf, etc. instead:
@setvar! EnableOrganizerAgents 0
    // or
@setvar! EnableBankSafe 0
@setvar! EnableStockpile 0
@setvar! EnableStorageShelf 0
@setvar! EnableMagicRecycler 0
@setvar! EnableRepairBench 0
@setvar! EnableTreasureChest 0


    #################################################
    //         Mining Specific Variables:          //
    #################################################

@setvar! EnableOreVacuum 1
@setvar! EnablePlayerForgeRadar 1
@setvar! EnableAutoSmeltPlayerForge 1
@setvar! EnableAutoSmeltNaturalForge 1

@setvar! EnableIngotAutoRecall 1
@setvar! IngotRecallAmount 3000

@setvar! EnableIngotBag 1
@setvar! OpenIngotBag 0

@setvar! EnableWeightWarningMessage 1
@setvar! GreenWarningWeight 400
@setvar! YellowWarningWeight 430
@setvar! RedWeightLimit 445


    #################################################
    //         Magery Specific Variables:          //
    #################################################
    
    if skill "Magery" >= 50

    # Defensive:
@setvar! EnableCastRecall 1
@setvar! EnableMagicReflection 1
@setvar! EnableReactiveArmour 1
@setvar! EnableProtection 0
@setvar! EnableCastHeal 1
@setvar! EnableCastCure 1
@setvar! CastHealHPlowdiff 5
@setvar! CastHealHPmeddiff 25
@setvar! CastHealHPhighdiff 50
@setvar! EnableReagentSplitter 0

    # Offensive:
@setvar! EnableCastHarm 0
@setvar! HarmCooldown 30000
@setvar! EnableCastWeaken 0
@setvar! WeakenCooldown 30000
@setvar! EnableCastCurse 0
@setvar! CurseCooldown 30000
@setvar! EnableCastMindBlast 0
@setvar! MindblastCooldown 30000
@setvar! EnableCastMagicArrow 0
@setvar! MagicArrowCooldown 30000
@setvar! EnableCastFireball 0
@setvar! FireballCooldown 30000
@setvar! EnableCastLightning 1
@setvar! LightningCooldown 30000
@setvar! EnableCastExplosion 1
@setvar! ExplosionCooldown 10000
@setvar! EnableCastEnergyBolt 1
@setvar! EnergyBoltCooldown 10000
@setvar! EnableCastFlamestrike 1
@setvar! FlamestrikeCooldown 10000
@setvar! EnableCastMeteorSwarm 0
@setvar! MeteorSwarmCooldown 30000
@setvar! EnableCastChainLightning 0
@setvar! ChainLightningCooldown 30000

@setvar! EnableMagicMushroom 0
@setvar! MushroomCooldown 60000
@setvar! EnableMushroomMaker 0
@setvar! MakeMushroomAmount 5

    # Summons:
@setvar! EnableSummons 0
@setvar! NameSummonedPets 0
@setvar! TotalSummonCount 0

    // Number of summoned pets (0, 1 or 2 each - up to 4 total):
@setvar! SummonFireElemental 0
@setvar! SummonEarthElemental 0
@setvar! SummonAirElemental 0
@setvar! SummonWaterElemental 0
@setvar! SummonDemon 0


    // Add pet names to list below (must be unique):
    if NameSummonedPets = 1
            if not listexists petNameList
                createlist petNameList
            endif

        if list petNameList = 0
            pushlist petNameList "ExamplePetName1"
            pushlist petNameList "ExamplePetName2"
            pushlist petNameList "ExamplePetName3"
            pushlist petNameList "ExamplePetName4"
            pushlist petNameList "ExamplePetName5"
            pushlist petNameList "ExamplePetName6"
            pushlist petNameList "ExamplePetName7"
            pushlist petNameList "ExamplePetName8"
            pushlist petNameList "ExamplePetName9"
            pushlist petNameList "ExamplePetName10"
        endif
    else
            clearlist petNameList
    endif         



####  EDIT BELOW THIS LINE AT YOUR OWN RISK!  ####  EDIT BELOW THIS LINE AT YOUR OWN RISK!  ####  EDIT BELOW THIS LINE AT YOUR OWN RISK!  ####  EDIT BELOW THIS LINE AT YOUR OWN RISK!  ####


    
        /////////////////////////////////////////////
        /////////    SCRIPT STARTS HERE:    /////////   
        /////////////////////////////////////////////
    

if SCRIPTRESET = 1
    unsetvar mining_runebook
    unsetvar ingotbag
    unsetvar TreasureChest
    unsetvar DanStock.
    unsetvar FIRSTRUN
    unsetvar EASTEREGG
    clearlist petNameList
    overhead "All permanent script variables reset!" 84
    wait 500
    overhead "Reset SCRIPTRESET back to 0 and restart script to prompt for new targets..." 0
    sysmsg "Make sure to set SCRIPTRESET back to 0" 253
    wait 500
    sysmsg "Stopping script..." 0
    stop    
endif 

if not varexist DanStock.
    sysmsg  "DanStock's Ultimate Harvest Auto Pilot Script" 77
    wait 500
    sysmsg "Version: 2.0.03"
    wait 500
    sysmsg "Last updated: Oct 18, 2024" 69
    wait 1000
    overhead "Thank you for trying my script!  It appears this may be your first time running it..." 0
    wait 4000
    overhead "IMPT: Please make sure to setup all the required COOLDOWNS and VARIABLES!" 153
    wait 4500
    overhead "There is a LOT this script can do with the right configuration!" 0
    wait 3500
    overhead "Email any questions/bugs to: dan@danstockman.com" 0
    wait 2500
    overhead "[ HAPPY HARVESTING! ]" 2086
    wait 500
    setvar DanStock. 1
    sysmsg "Beginning initial Harvest Auto Pilot script setup...... " 0
    wait 1500
    sysmsg "Best done from inside your Home or Inn Room!" 253
    wait 500
    hotkey 'Cancel Current Target'
endif 

if skill "Mining" >= 50 and EnableRedAlertRecall = 1
    if not varexist mining_runebook
        wait 1000
        overhead "First off, please select your Escape Runebook..." 88
        wait 1500
        overhead "[ SELECT RUNEBOOK... ]" 253
        setvar mining_runebook
        wft 500
            while targetexists
                wait 100
            endwhile
            overhead "[ RUNEBOOOK SELECTED! ]" 93
            wait 1500
            overhead "Script will use recall SCROLL (to first rune) or CAST recall (to 'default' rune)" 0
            wait 2500
    endif
endif

if skill "Mining" >= 50 and  EnableIngotBag = 1
    if not varexist ingotbag 
        wait 1000
        overhead "Next, we'll set your ingot storage bag..." 88
        wait 1500
        overhead "[ SELECT INGOT BAG... ]" 253
        setvar ingotbag
        wft 500
            while targetexists
                wait 100
            endwhile
            overhead "[ INGOT BAG SELECTED! ]" 93
            wait 1500
            overhead "Also set this bag as 'Organizer Agent-03' in Razor!" 0
            wait 3000
    endif
endif

if EnableTreasureChest = 1
    if not varexist TreasureChest
        wait 1000
        sysmsg "Disable 'EnableTreasureChest' in script variables to turn off this feature!" 0
        overhead "Now, select a container (in your Home or Inn) to store your loot..." 88
        wait 1500
        overhead "[ SELECT LOOT CHEST... ]" 253
        setvar TreasureChest
        wft 500
            while targetexists 
                wait 100
            endwhile
            overhead "[ LOOT CHEST SELECTED! ]" 93
            wait 1500
            overhead "Setup additional Organizer Agents (06-09) within this container!" 0
            wait 3500
        
    endif
endif

if not varexist FIRSTRUN
    sysmsg "Verifying initial setup is complete.......... " 0
    wait 2500
    overhead "Ok, looks like you're good to go!" 0
    wait 3000
    overhead "Good luck out there and thanks again for trying my script!" 0
    setvar FIRSTRUN 1
    wait 3000
    sysmsg "DANSTOCK'S ULTIMATE HARVEST AUTO PILIOT SCRIPT SETUP COMPLETE!" 84
    wait 1500
    overhead "[ STARTING HARVEST SCRIPT.... ]" 2086
    wait 1500
endif

if hidden 
    overhead "[ HIDDEN... ]" 6
    wait 1000
    sysmsg "You cannot use this script while hidden!  Please unhide and try again..." 0
    stop
endif

if EnableRedAlertRecall = 1
    if insysmsg "Now tracking" or insysmsg "Distance to destination"
        @setvar! TimeToGo 1
    endif
endif 

if insysmsg "Captcha successful"
    overhead "I guess you got the magic numbers correct??" 2086
    wait 1500
    if EnableSummons = 1 and followers > 1
            overhead "Umm... who are you speaking to, Master?" 44 myMainTankPet
            menu myMainTankPet 3
            clearsysmsg 
            wait 1500
            overhead "Nevermind that... let's get to work..." 2086
        else
            overhead "Alright, let's get to work..." 2086
        endif
endif

if insysmsg "You have unlocked a codex upgrade point"
    overhead "[ CODEX POINT UNLOCKED! ]" 2114
        if EnableSummons = 1 and followers > 1
            wait 1000
            overhead "Well done, Master..." 44 myMainTankPet
            menu myMainTankPet 3
        endif
endif 

if insysmsg "unlocked a point for your wizard's grimoire"
    overhead "[ GRIMOIRE POINT UNLOCKED! ]" 7
        if EnableSummons = 1 and followers > 1
            wait 1000
            overhead "You seem stronger, Master..." 44 myMainTankPet
            menu myMainTankPet 3
        endif
endif 

if insysmsg "enough experience to upgrade"
    overhead "[ ASPECT TIER UNLOCKED! ]" 2086
        if EnableSummons = 1 and followers > 1
            wait 500
            overhead "Time to spend some more gold, it would seem..." 44 myMainTankPet
            menu myMainTankPet 3
            wait 500
        endif
endif 

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
    overhead "Hmm.. I suddenly feel stronger!" 44 myMainTankPet
    menu myMainTankPet 3
    wait 500
    overhead "* cracks knuckles... *" 0 myMainTankPet
endif 


if insysmsg "something invisible out of the way"
    overhead "[ ▼ SOMEONE HIDDEN! ▼ ]" 6
        if EnableSummons = 1 and followers > 1
            wait 500
            overhead "There is a foul stench upon the air..." 44 myMainTankPet
            menu myMainTankPet 3
            wait 500
        endif
endif 

if paralyzed and EnableParalyzePouch = 1
    overhead "[[[[ POP ]]]]" 2117
    say "[pouch" 
    @setvar! TimeToGo 1
    if EnableSummons = 1 and followers > 1
            overhead "That was unwise, criminal..." 44 myMainTankPet
            menu myMainTankPet 3
            clearsysmsg 
        endif
endif

if EnableRedAlertRecall = 1 and TimeToGo = 1
    overhead "[[[[ RED ALERT ]]]]" 37
    overhead "Looks like trouble coming!" 2086
     
            if paralyzed 
                overhead "[[[[ POP ]]]]" 2117
                say "[pouch"
                wait 250 
            endif
        
            if skill 'Healing' > 50 and not bandaging and hits < maxhits
                hotkey "Bandage self"
                overhead '* applying bandages... *' 88
                wait 250
            endif 
                
            if diffhits > 25 and not cooldown "Healing Potion"
                if findtype "Yellow Potion" self as healpot
                    overhead '* drinking heal potion... *' 253
                    dclick healpot
                    cooldown "Healing Potion" 10500
                    wait 250
                else 
                    overhead '[ NO HEAL POTS! ]' 337
                endif
            endif 
            
            if poisoned and not cooldown "Cure Potion"
                if findtype "Orange Potion" self as curepot
                    overhead '* drinking cure potion... *' 44
                    dclick curepot
                    cooldown "Cure Potion" 10500
                    wait 250
                else
                    overhead [ NO CURE POTS! ]" 337
                endif
            endif
        
            if stam < maxstam and not cooldown "Refresh Potion"
                if findtype "Red Potion" self as refreshpot
                    overhead '* drinking refresh potion... *' 34
                    dclick refreshpot
                    cooldown "Refresh Potion" 10500
                    wait 250
                else 
                    overhead '[ NO REFRESH POTS! ]' 337
                endif
           endif

    if skill "Mining" >= 50
        if skill "Magery" >= 60 and CastRecall = 1
            cast "Recall"
            wft 2500
            target mining_runebook
                for 5
                wait 500
                if insysmsg 'Your concentration is disturbed'
                    overhead 'Shit! Trying that again...' 2086
                    cast "Recall"
                    wft 2500
                    target mining_runebook
                    clearsysmsg
                endif
                endfor
        else
            dclick mining_runebook
            waitforgump 1551740969 
            gumpresponse 2
            wait 500             
                for 5
                wait 500
                if insysmsg 'Your concentration is disturbed'
                    overhead 'Shit! Trying that again...' 2086
                    dclick mining_runebook
                    waitforgump 1551740969 
                    gumpresponse 2
                    wait 500 
                    clearsysmsg 
                endif
            endfor
         endif
    endif 
   
    wait 1000
    overhead "Whew. I think we got away!" 2086
        if not varexist GuardComment
            @setvar! GuardComment 1
        endif
        if EnableSummons = 1 and GuardComment = 1 and followers > 1
            wait 1500
            overhead "Yes Master, that was a close one..." 44 myMainTankPet
            menu myMainTankPet 3
            clearsysmsg 
            @setvar! GuardComment 2
            wait 500
        elseif EnableSummons = 1 and GuardComment = 2 and followers > 1
            wait 1500
            overhead "Yes Master, your script is truly God-like..." 44 myMainTankPet
            menu myMainTankPet 3
            clearsysmsg 
            @setvar! GuardComment 3
            wait 500
        elseif EnableSummons = 1 and GuardComment = 3 and followers > 1
            wait 1500
            overhead "Yes Master, these red humans are quite annoying..." 44 myMainTankPet
            menu myMainTankPet 3
            clearsysmsg 
            @setvar! GuardComment 4
            wait 500
        elseif EnableSummons = 1 and GuardComment = 4 and followers > 1
            wait 1500
            overhead "I think we could have taken them..." 44 myMainTankPet
            menu myMainTankPet 3
            clearsysmsg 
            @setvar! GuardComment 5
            wait 500
        elseif EnableSummons = 1 and GuardComment = 5 and followers > 1
            wait 1500
            overhead "I've worked for that human before... total prick..." 44 myMainTankPet
            menu myMainTankPet 3
            clearsysmsg 
            @setvar! GuardComment 6
            wait 500
        elseif EnableSummons = 1 and GuardComment = 6 and followers > 1
            wait 1500
            overhead "I don't think tonight is our night, Master.." 44 myMainTankPet
            menu myMainTankPet 3
            clearsysmsg 
            @setvar! GuardComment 1
            wait 500
        endif
    @setvar! TimeToGo 0
    sysmsg "Auto Recall trigger condition reset!" 0

    if skill "Mace Fighting" > 50 and not findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" hand and findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" backpack as weapon
        getlabel weapon WeaponLabel
            for 5
                if "unidentified" in WeaponLabel
                    ignore weapon
                    if not findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" hand and findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" self as weapon
                        getlabel weapon WeaponLabel
                    else
                        overhead "[ NO WEAPON! ]" 337
                        break
                    endif
                endif
            endfor
        dclick weapon      
    endif 

    if skill "Swordsmanship" > 50 and not findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" hand and findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" backpack as weapon
        getlabel weapon WeaponLabel
            for 5
                if "unidentified" in WeaponLabel
                    ignore weapon
                    if not findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" hand and findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" self as weapon
                        getlabel weapon WeaponLabel
                    else
                        overhead "[ NO WEAPON! ]" 337
                        break
                    endif
                endif
            endfor
        dclick weapon      
    endif 

    if skill "Magery" >= 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
        getlabel myspellbook SpellbookLabel
                for 5
                    wait 100
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore myspellbook 
                        if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                            getlabel myspellbook SpellbookLabel
                        else 
                            overhead "[ NO SPELLBOOK! ]" 337
                            break
                        endif
                    endif 
                endfor
        dclick myspellbook
    endif 

    wait 1000

    if HouseRecall = 1
        wait 1500
        if find MyDoor ground -1 -1 2 
            dclick MyDoor 
            overhead "* door slams! *" 0 MyDoor
            wait 500
        endif
    endif 

    if OwnerInnRecall = 1
        wait 2000
        say "Innkeeper, I need a room!"
        waitforgump 2393832411
        gumpresponse 4
        wait 3000
    endif

    if CoOwnerInnRecall = 1
        wait 2000
        say "Innkeeper, I need a room!"
        waitforgump 2393832411
        gumpresponse 5
        wait 2000
        gumpresponse 100
        wait 2000
    endif

    if HideAtHomeorInn = 1
        useskill "Hiding"
        wait 250
    endif

    if OpenIngotBag = 1 
        dclick ingotbag
        wait 250
    endif

    if OpenBoardBag = 1 
        dclick boardbag
        wait 250
    endif

    for 11
    if findtype "iron ore" backpack as ore
        if findtype "forge" ground -1 -1 2 as forge or findtype 0x0FB1 ground -1 -1 2 as forge
            overhead "* smelting ore... *" 2114 forge
            dclick ore
            overhead "* forging ingots... *" 2117
            wait 1000
            hotkey 'Organizer Agent-03'  
            wait 250
        endif 
    endif
    endfor     

    for 11
    if findtype 'log%s' backpack and LogsToBoards = 1 
        wait 500
        overhead '* making boards... *' 0
        dclicktype 'log%s' 
        wait 250
        hotkey 'Organizer Agent-01'
        wait 1500
    endif
    endfor   

    if EnableOrganizerAgents = 1
        if findtype "cut up leather|iron ingot%s|board%s|feather%s|seed of renewal|shaft%s|blank scroll%s%|gold coin" backpack
            overhead "* storing ingots... *" 37
            hotkey "Organizer Agent-05"
            wait 3500
            if findtype "cut up leather|iron ingot%s|board%s|feather%s|seed of renewal|shaft%s|blank scroll%s%|gold coin" backpack
                hotkey "Organizer Agent-05"
                wait 3500
            endif
            if findtype "cut up leather|iron ingot%s|board%s|feather%s|seed of renewal|shaft%s|blank scroll%s%|gold coin" backpack
                hotkey "Organizer Agent-05"
                wait 500
            endif
        endif
    endif

    if EnableBankSafe = 1
        if findtype "bank deposit safe" ground -1 -1 2 as safe
            while findtype "gold coin" self as gold
                lift gold 60000
                overhead "* depositing gold... *" 149
                drop safe -1 -1 -1
                wait 1000
            endwhile
            while findtype 2539 self as dubs
                lift dubs 60000
                drop safe -1 -1 -1
                overhead "* depositing doubloons... *" 149
                wait 1000
            endwhile
        else
            overhead "[ NO BANK SAFE FOUND ]" 337
            sysmsg "Disable 'EnableBankSafe' in script variables to turn off this feature!" 0
        endif
    endif

    if EnableStockpile = 1
        if findtype "resource container" ground -1 -1 2 as resource
            menu resource 0
            wft 500
            target self
            overhead "* unloading resources... *" 84
            wait 1000
        else
            overhead "[ NO RESOURCE STOCKPILE FOUND ]" 337
            sysmsg "Disable 'EnableStockpile' in script variables to turn off this feature!" 0
        endif
    endif

    if EnableStorageShelf = 1
        if findtype "storage shelf" ground -1 -1 2 as shelf
            menu shelf 0
            wft 500
            target self
            overhead "* restocking... *" 37
            wait 1000
            gumpclose 3232825965
        else
            overhead "[ NO STORAGE SHELF FOUND ]" 337
            sysmsg "Disable 'EnableStorageShelf' in script variables to turn off this feature!" 0
        endif       
        if findtype "storage shelf" ground -1 -1 2 as shelf
            menu shelf 1
            wft 500
            target self   
            overhead "* resupplying... *" 93
            wait 1000
        endif
    endif

    if EnableRepairBench = 1
        if findtype "repair bench" ground -1 -1 2 as RepairBench
            clearsysmsg 
            dclick RepairBench
            wait 1000
                if insysmsg "You do not have any items equipped or in your backpack in need of repairs."
                    overhead "* nothing to repair! *" 0
                else
                    settimer RepairTimer 0
                while timer RepairTimer <= 5000 
                    if insysmsg "Repair"
                        break
                    endif
                endwhile
                    overhead "* all items repaired! *" 0
                    overhead "Repair took: {{RepairTimer}}ms" 149
                    removetimer RepairTimer
                endif
            wait 500
        else
            overhead "[ NO REPAIR BENCH FOUND ]" 337
            sysmsg "Disable 'EnableRepairBench' in script variables to turn off this feature!" 0
        endif
    endif

    if EnableMagicRecycler = 1
        if findtype "ornate elven chest|magic item recycler" ground -1 -1 2 as recycler
            menu recycler 1
            wait 1000
                if insysmsg "0 recyclable"
                    overhead "* nothing to recycle! *" 6
                else
                    overhead "* recycling magic items... *" 6
                    wait 500
                endif
        else
            overhead "[ NO MAGIC ITEM RECYCLER FOUND ]" 337
            sysmsg "Disable 'EnableMagicRecycler' in script variables to turn off this feature!" 0
        endif
    endif

    if EnableTreasureChest = 1       
        if findtype "black market goods|seed of renewal|dirt patch|bag of seeds|void orb|rune|scroll of calling|bottle|dye bottle|map" self
            dclick TreasureChest
            overhead "* storing loot... *" 69
            wait 250
            hotkey "Organizer Agent-06"
            wait 250
            hotkey "Organizer Agent-07"
            wait 250
            hotkey "Organizer Agent-08"
            wait 250
            hotkey "Organizer Agent-09"
            wait 1000

            if findtype "black market goods|seed of renewal|dirt patch|bag of seeds|void orb|rune|scroll of calling|bottle|dye bottle|map" self
                wait 1000
                hotkey "Organizer Agent-06"
                wait 250
                hotkey "Organizer Agent-07"
                wait 250
                hotkey "Organizer Agent-08"
                wait 250
                hotkey "Organizer Agent-09"
            endif 
        endif 
    endif
        
    if EnableReagentSplitter = 1
        // This section uses a Reg Splitter script I adapted from dennozz' script found here: https://outlands.uorazorscripts.com/script/d8f50c97-3d9c-468b-9114-0a0623003e19 //     
        if findtype "reagent satchel" self as MyWizardBag    
            sysmsg "Disable 'EnableReagentSplitter' in script variables to turn off this feature!" 0           
            dclick MyWizardBag
            overhead "* splitting reagents... *" 112
            @setvar! amount 0
            @setvar! regsID 3981
            @setvar! myCounter 0

                while findtype regsID self as r 
                    @setvar! myCounter index
                    @ignore r
                endwhile
                
                @clearignore

        if counttype regsID self <= 15
            @setvar! amount 2
        elseif counttype regsID self <= 30
            @setvar! amount 4       
        elseif counttype regsID self <= 50
            @setvar! amount 10    
        elseif counttype regsID self <= 100
            @setvar! amount 20    
        elseif counttype regsID self <= 150
            @setvar! amount 30
        elseif counttype regsID self <= 200
            @setvar! amount 40
        else 
            @setvar! amount 50
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
    
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1
            endif
    
        # Spider Silk
            if moveRegs = 1    
                if index = 0
                    lift regs amount
                    drop MyWizardBag 44 65 0    
                    wait 150  
                elseif index = 1
                    lift regs amount
                    drop MyWizardBag 68 65 0    
                    wait 150         
                elseif index = 2
                    lift regs amount
                    drop MyWizardBag 96 65 0 
                    wait 150              
                elseif index = 3
                    lift regs amount
                    drop MyWizardBag 121 65 0     
                    wait 150         
                else
                    lift regs amount
                    drop MyWizardBag 142 65 0   
                    wait 150        
                endif
            endif
    
            @ignore regs 
    
            if moveRegs = 1
                wait 500
            endif
        endwhile

        @setvar! regsID 3962
        @setvar! myCounter 0

        while findtype regsID self as r 
            @setvar! myCounter index
            @ignore r
        endwhile

        @clearignore

        if counttype regsID self <= 10
            @setvar! amount 2
        elseif counttype regsID self <= 20
            @setvar! amount 4       
        elseif counttype regsID self <= 50
            @setvar! amount 10    
        elseif counttype regsID self <= 100
            @setvar! amount 20    
        elseif counttype regsID self <= 150
            @setvar! amount 30
        elseif counttype regsID self <= 200
            @setvar! amount 40
        else 
            @setvar! amount 50
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
   
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1
            endif

    # Black Pearl
        if moveRegs = 1    
            if index = 0
                lift regs amount
                drop MyWizardBag 44 76 0    
                wait 150    
            elseif index = 1
                lift regs amount
                drop MyWizardBag 68 76 0         
                wait 150     
            elseif index = 2
                lift regs amount
                drop MyWizardBag 96 76 0           
                wait 150     
            elseif index = 3
                lift regs amount
                drop MyWizardBag 121 76 0 
                wait 150              
            else
                lift regs amount
                drop MyWizardBag 142 76 0  
                wait 150          
            endif
        endif
    
            @ignore regs 
    
            if moveRegs = 1
                wait 500
            endif
        endwhile

        @setvar! regsID 3976
        @setvar! myCounter 0

        while findtype regsID self as r 
            @setvar! myCounter index
            @ignore r
        endwhile
        @clearignore

        if counttype regsID self <= 10
            @setvar! amount 2
        elseif counttype regsID self <= 20
            @setvar! amount 4       
        elseif counttype regsID self <= 50
            @setvar! amount 10    
        elseif counttype regsID self <= 100
            @setvar! amount 20    
        elseif counttype regsID self <= 150
            @setvar! amount 30
        elseif counttype regsID self <= 200
            @setvar! amount 40
        else 
            @setvar! amount 50
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
    
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1
            endif
    
        # Nightshade
            if moveRegs = 1    
                if index = 0
                    lift regs amount
                    drop MyWizardBag 44 88 0 
                    wait 150        
                elseif index = 1
                    lift regs amount
                    drop MyWizardBag 68 88 0     
                    wait 150          
                elseif index = 2
                    lift regs amount
                    drop MyWizardBag 96 88 0 
                    wait 150                
                elseif index = 3
                    lift regs amount
                    drop MyWizardBag 121 88 0   
                    wait 150             
                else
                    lift regs amount
                    drop MyWizardBag 142 88 0   
                    wait 150          
                endif
            endif
    
            @ignore regs 
    
            if moveRegs = 1
                wait 500
            endif

        endwhile

        @setvar! regsID 3974
        @setvar! myCounter 0

        while findtype regsID self as r 
            @setvar! myCounter index
            @ignore r
        endwhile
        @clearignore

        if counttype regsID self <= 10
            @setvar! amount 2
        elseif counttype regsID self <= 20
            @setvar! amount 4       
        elseif counttype regsID self <= 50
            @setvar! amount 10    
        elseif counttype regsID self <= 100
            @setvar! amount 20    
        elseif counttype regsID self <= 150
            @setvar! amount 30
        elseif counttype regsID self <= 200
            @setvar! amount 40
        else 
            @setvar! amount 50
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
    
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1
            endif
    
        # Mandrake root
            if moveRegs = 1    
                if index = 0
                    lift regs amount
                    drop MyWizardBag 44 100 0     
                    wait 150     
                elseif index = 1
                    lift regs amount
                    drop MyWizardBag 68 100 0   
                    wait 150            
                elseif index = 2
                    lift regs amount
                    drop MyWizardBag 96 100 0  
                    wait 150               
                elseif index = 3
                    lift regs amount
                    drop MyWizardBag 121 100 0 
                    wait 150               
                else
                    lift regs amount
                    drop MyWizardBag 142 100 0  
                    wait 150           
                endif
            endif
    
            @ignore regs 
    
            if moveRegs = 1
                wait 500
            endif
        endwhile

        @setvar! regsID 3980
        @setvar! myCounter 0

        while findtype regsID self as r 
            @setvar! myCounter index
            @ignore r
        endwhile
        @clearignore

        if counttype regsID self <= 10
            @setvar! amount 2
        elseif counttype regsID self <= 20
            @setvar! amount 4       
        elseif counttype regsID self <= 50
            @setvar! amount 10    
        elseif counttype regsID self <= 100
            @setvar! amount 20    
        elseif counttype regsID self <= 150
            @setvar! amount 30
        elseif counttype regsID self <= 200
            @setvar! amount 40
        else 
            @setvar! amount 50
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
    
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1  
            endif
    
        # Sulphurous Ash
            if moveRegs = 1    
                if index = 0
                    lift regs amount
                    drop MyWizardBag 44 112 0
                    wait 150    
                elseif index = 1 
                    lift regs amount
                    drop MyWizardBag 68 112 0         
                    wait 150      
                elseif index = 2
                    lift regs amount
                    drop MyWizardBag 96 112 0      
                    wait 150           
                elseif index = 3
                    lift regs amount
                    drop MyWizardBag 121 112 0     
                    wait 150           
                else
                    lift regs amount
                    drop MyWizardBag 142 112 0   
                    wait 150          
                endif
            endif
    
            @ignore regs 
    
            if moveRegs = 1
                wait 500
            endif
        endwhile

        @setvar! regsID 3973
        @setvar! myCounter 0

        while findtype regsID self as r 
            @setvar! myCounter index
            @ignore r
        endwhile
        @clearignore

        if counttype regsID self <= 10
            @setvar! amount 2
        elseif counttype regsID self <= 20
            @setvar! amount 4       
        elseif counttype regsID self <= 50
            @setvar! amount 10    
        elseif counttype regsID self <= 100
            @setvar! amount 20    
        elseif counttype regsID self <= 150
            @setvar! amount 30
        elseif counttype regsID self <= 200
            @setvar! amount 40
        else 
            @setvar! amount 50
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
    
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1
            endif
    
        # Ginseng
            if moveRegs = 1    
                if index = 0
                    lift regs amount
                    drop MyWizardBag 44 124 0    
                    wait 150      
                elseif index = 1
                    lift regs amount
                    drop MyWizardBag 68 124 0
                    wait 150               
                elseif index = 2
                    lift regs amount
                    drop MyWizardBag 96 124 0  
                    wait 150               
                elseif index = 3
                    lift regs amount
                    drop MyWizardBag 121 124 0        
                    wait 150        
                else
                    lift regs amount
                    drop MyWizardBag 142 124 0     
                    wait 150        
                endif
            endif
    
            @ignore regs 
    
            if moveRegs = 1
                wait 500
            endif
        endwhile

        @setvar! regsID 3963
        @setvar! myCounter 0

        while findtype regsID self as r 
            @setvar! myCounter index
            @ignore r
        endwhile
        @clearignore

        if counttype regsID self <= 10
            @setvar! amount 2
        elseif counttype regsID self <= 20
            @setvar! amount 4       
        elseif counttype regsID self <= 50
            @setvar! amount 10    
        elseif counttype regsID self <= 100
            @setvar! amount 20    
        elseif counttype regsID self <= 150
            @setvar! amount 30
        elseif counttype regsID self <= 200
            @setvar! amount 40
        else 
            @setvar! amount 50
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
    
        # Bloodmoss
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1
            endif
    
            if moveRegs = 1    
                if index = 0
                    lift regs amount
                    drop MyWizardBag 44 136 0    
                    wait 150      
                elseif index = 1
                    lift regs amount
                    drop MyWizardBag 68 136 0       
                    wait 150        
                elseif index = 2
                    lift regs amount
                    drop MyWizardBag 96 136 0    
                    wait 150             
                elseif index = 3
                    lift regs amount
                    drop MyWizardBag 121 136 0    
                    wait 150            
                else
                    lift regs amount
                    drop MyWizardBag 142 136 0     
                    wait 150        
                endif
            endif
    
            @ignore regs 
    
            if moveRegs = 1
                wait 500
            endif
        endwhile

        @setvar! regsID 3972
        @setvar! myCounter 0

        while findtype regsID self as r 
            @setvar! myCounter index
            @ignore r
        endwhile
        @clearignore

        if counttype regsID self <= 10
            @setvar! amount 2
        elseif counttype regsID self <= 20
            @setvar! amount 4       
        elseif counttype regsID self <= 50
            @setvar! amount 10    
        elseif counttype regsID self <= 100
            @setvar! amount 20    
        elseif counttype regsID self <= 150
            @setvar! amount 30
        elseif counttype regsID self <= 200
            @setvar! amount 40
        else 
            @setvar! amount 50
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
    
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1
            endif
    
        # Garlic  
            if moveRegs = 1    
                if index = 0
                    lift regs amount
                    drop MyWizardBag 44 148 0     
                    wait 150     
                elseif index = 1
                    lift regs amount
                    drop MyWizardBag 68 148 0 
                    wait 150              
                elseif index = 2
                    lift regs amount
                    drop MyWizardBag 96 148 0  
                    wait 150               
                elseif index = 3
                    lift regs amount
                    drop MyWizardBag 121 148 0    
                    wait 150            
                else
                    lift regs amount
                    drop MyWizardBag 142 148 0     
                    wait 150        
                endif
            endif
            @ignore regs 
    
            if moveRegs = 1
                wait 500
            endif
        endwhile

        @setvar! regsID 8012
        @setvar! myCounter 0

        while findtype regsID self as r 
            @setvar! myCounter index
            @ignore r
        endwhile
        @clearignore

        if counttype regsID self <= 5
            @setvar! amount 1
        elseif counttype regsID self <= 10
            @setvar! amount 2       
        elseif counttype regsID self <= 20
            @setvar! amount 4    
        elseif counttype regsID self <= 40
            @setvar! amount 8    
        else 
            @setvar! amount 15
        endif

        while findtype regsID self as regs
            @setvar! moveRegs 0 
    
            if myCounter = 0
                @setvar! moveRegs 1
            elseif myCounter != 0 and not find regs MyWizardBag
                @setvar! moveRegs 1
            endif

        #Scrolls
            if moveRegs = 1    
                if index = 0
                    lift regs amount
                    drop MyWizardBag 44 160 0   
                    wait 150       
                elseif index = 1
                    lift regs amount
                    drop MyWizardBag 68 160 0   
                    wait 150            
                elseif index = 2
                    lift regs amount
                    drop MyWizardBag 96 160 0  
                    wait 150               
                elseif index = 3
                    lift regs amount
                    drop MyWizardBag 121 160 0       
                    wait 150         
                else
                    lift regs amount
                    drop MyWizardBag 142 160 0       
                    wait 150      
                endif
            endif
    
            @ignore regs 
    
                if moveRegs = 1
                    wait 500
                endif
        endwhile
            wait 1500
            overhead "Fuck thieves!" 2086
            wait 500
        else 
            overhead "[ NO WIZARD BAG! ]" 337
        endif
    endif   
        hotkey "Organizer Agent-04"
        wait 100
        hotkey "Organizer Agent-02" 
        wait 1000
        overhead "[ SCRIPT COMPLETE! ]" 37
        stop     
endif

if EnableRedAlertRecall = 1
    if skill 'Tracking' > 50 and not findbuff 'tracking'
        overhead 'I should keep an eye out for trouble...' 2086
            while not gumpexists 4267467659
                useskill 'tracking'
                wait 250
            endwhile
                if gumpexists 4267467659
                    while not insysmsg "You will now hunt all hostile players."
                        gumpresponse 8 4267467659
                        waitforgump 4267467659 5000
                    endwhile
                    gumpresponse 6 4267467659
                    wait 1000
                    clearsysmsg                     
                endif
        gumpclose 4267467659
        overhead "[ AUTO RECALL ACTIVATED! ]" 334
    endif 
endif

if skill 'Healing' > 50 
    if not bandaging and hits < maxhits
        overhead '* applying bandages... *' 88
        hotkey "Bandage Self"
    endif
    
    if counttype 'clean bandage%s%' < 5 and not cooldown "Inventory Timer"
        overhead "[ RESTOCK BANDAGES! ]" 337
        cooldown "Inventory Timer" 15000
    endif 
endif

if EnableCastHeal = 1
    if skill 'Magery' >= 40 and diffhits > CastHealHPmeddiff and diffhits < CastHealHPhighdiff and mana >= 4
        if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
            getlabel myspellbook SpellbookLabel
                for 5
                    wait 100
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore myspellbook 
                        if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                            getlabel myspellbook SpellbookLabel
                        else 
                            overhead "[ NO SPELLBOOK! ]" 337
                            break
                        endif
                    endif 
                endfor
            dclick myspellbook
            wait 250
        endif
        cast 'Heal'
        wait 100
        while not casting                   
            if targetexists
                hotkey 'cancel current target'
            endif
                cast 'Heal'
                wait 100
        endwhile  
        wft 1500
        target 'self' 
        wait 250  

    elseif skill 'Magery' >= 60 and diffhits > CastHealHPhighdiff and mana >= 11
        if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
            getlabel myspellbook SpellbookLabel
                for 5
                    wait 100
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore myspellbook 
                        if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                            getlabel myspellbook SpellbookLabel
                        else 
                            overhead "[ NO SPELLBOOK! ]" 337
                            break
                        endif
                    endif 
                endfor
            dclick myspellbook
            wait 250
        endif
        cast 'Greater Heal'
        wait 100
        while not casting                   
            if targetexists
                hotkey 'cancel current target'
            endif
                cast 'Greater Heal'
                wait 100
        endwhile  
        wft 1500
        target 'self' 
        wait 250  
 
    elseif skill 'Magery' >= 40 and diffhits > CastHealHPhighdiff and mana >= 4 and mana < 11
        if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
            getlabel myspellbook SpellbookLabel
                for 5
                    wait 100
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore myspellbook 
                        if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                            getlabel myspellbook SpellbookLabel
                        else 
                            overhead "[ NO SPELLBOOK! ]" 337
                            break
                        endif
                    endif 
                endfor
            dclick myspellbook
            wait 250
        endif
        cast 'Heal'
        wait 100
        while not casting                   
            if targetexists
                hotkey 'cancel current target'
            endif
                cast 'Heal'
                wait 100
        endwhile  
        wft 1500
        target 'self' 
        wait 250 
    endif
endif 

if EnableCastCure = 1
    if poisoned and skill 'Magery' >= 40 and mana >= 6
        if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
            getlabel myspellbook SpellbookLabel
                for 5
                    wait 100
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore myspellbook 
                        if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                            getlabel myspellbook SpellbookLabel
                        else 
                            overhead "[ NO SPELLBOOK! ]" 337
                            break
                        endif
                    endif 
                endfor
            dclick myspellbook
            wait 250
        endif
        cast 'Cure'
        wait 100
        while not casting                   
            if targetexists
                hotkey 'cancel current target'
            endif
                cast 'Cure'  
                wait 100
        endwhile  
        wft 1500
        target 'self' 
        wait 250 
    endif 
endif
            
if EnableCurePotion = 1
    if poisoned and not cooldown "Cure Potion" and hits < CurePotHP
        if findtype "Orange Potion" self as curepot
            overhead '* drinking cure potion... *' 44
            dclick curepot
            cooldown "Cure Potion" 10500
        else
            overhead "[ NO CURE POTS! ]" 337
        endif
    endif
endif 

if EnableHealPotion = 1
    if hits < HealPotHP and not cooldown "Healing Potion"
        if findtype "Yellow Potion" self as healpot
            overhead '* drinking heal potion... *' 253
            dclick healpot
            cooldown "Healing Potion" 10500
        else 
            overhead '[ NO HEAL POTS! ]' 337
        endif
    endif
endif 

if EnableRefreshPotion = 1
    if diffstam >= RefreshPotSPdiff and not cooldown "Refresh Potion"
        if findtype "Red Potion" self as refreshpot
            overhead '* drinking refresh potion... *' 34
            dclick refreshpot
            cooldown "Refresh Potion" 10500
        else 
            overhead '[ NO REFRESH POTS! ]' 337
        endif
    endif
endif

if EnableMagicReflection = 1 
    if skill 'Magery' >= 60 and not findbuff 'Magic Reflection' and not cooldown "Magic Shield" and mana > 14 and TimeToGo = 0 
        if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
            getlabel myspellbook SpellbookLabel
                for 5
                    wait 100
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore myspellbook 
                        if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                            getlabel myspellbook SpellbookLabel
                        else 
                            overhead "[ NO SPELLBOOK! ]" 337
                            break
                        endif
                    endif 
                endfor
            dclick myspellbook
            wait 250
        endif
        for 10
            cast 'Magic Reflection' 
            waitfortarget 1500
            hotkey 'Target Self'
            wait 1000
                if insysmsg "That spell will not adhere"
                    cooldown "Magic Shield" 30000
                    overhead "Too soon for a new shield.  Give me a sec..." 2086
                    replay
                endif 
                if cooldown "Spell Fail"
                    wait 1000
                    overhead "Let me try that again..." 2086
                    wait 1000
                else
                    break
                endif 
        endfor 
        wait 500
        overhead "[ MAGIC REFLECT ACTIVE! ]" 10
        wait 1500
        replay
    endif  
endif 

if EnableReactiveArmour = 1 
    if skill 'Magery' >= 30 and not findbuff 'Reactive Armor' and mana >= 4 and TimeToGo = 0
        if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
            getlabel myspellbook SpellbookLabel
                for 5
                    wait 100
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore myspellbook 
                        if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                            getlabel myspellbook SpellbookLabel
                        else 
                            overhead "[ NO SPELLBOOK! ]" 337
                            break
                        endif
                    endif 
                endfor
            dclick myspellbook
            wait 250
        endif
        for 10
            cast 'Reactive Armor' 
            waitfortarget 1500
            hotkey 'Target Self'
            wait 1000
                if insysmsg "That spell will not adhere"
                    cooldown "Magic Armor" 30000
                    overhead "Too soon for a new magic armor.  Give me a sec..." 2086
                    replay
                endif 
                if cooldown "Spell Fail"
                    wait 500
                    overhead "Let me try that again..." 2086
                    wait 500
                else
                    break
                endif 
        endfor 
        wait 500
        overhead "[ REACTIVE ARMOR ACTIVE! ]" 77
        wait 1000
        replay
    endif  
endif 

if EnableGoldVacuum = 1
    if findtype "gold coin" ground -1 -1 15 as droppedmoney and not cooldown "Gold Radar"   
        overhead "[ $ ]" 149 droppedmoney         
        overhead "▼" 149 droppedmoney
        cooldown "Gold Radar" 3500
    endif
    
    if findtype "gold coin" ground -1 -1 2 as droppedmoney and not cooldown "Gold Vacuum"
        overhead "[ CLEANUP... ]" 149
        hotkey "Grab Item"
        wft 2500
        target droppedmoney
        wait 250
        if insysmsg "Invalid or inaccessible item"
            overhead "I can't get to that!" 2086
            wait 500
            @ignore droppedmoney
        endif  
        cooldown "Gold Vacuum" 500
    endif
endif 

if skill "Spirit Speak" >= 80 and not cooldown "Spirit Speak"
    if findtype "corpse" ground -1 -1 12 as batteries
        useskill "spiritspeak"
        @ignore batteries
        cooldown "Spirit Speak" 11000
        wait 1000
    endif 
endif

if EnableAutoCarving = 1
    if findtype 'Elven SpellBlade' self 
        if findtype "corpse" ground -1 -1 2 as deadbody
            dclicktype "Elven Spellblade"
            waitfortarget 1500
            target 'self'
            wait 750
            if insysmsg "You don't see anything"
                @ignore deadbody
                replay
            else 
                overhead "* skinning corpse... *" 337
                @ignore deadbody
            endif
        endif 
    else
        if not cooldown "Inventory Timer"
            overhead "[ NO SKINNING KNIFE! ]" 337
            sysmsg "Disable EnableAutoCarving in script variables to turn off this overhead message!" 0
            cooldown "Inventory Timer" 15000
        endif
        wait 500
    endif 
endif
        
if skill 'Magery' >= 80 and skill 'Spirit Speak' >= 80 and EnableSummons = 1 and TotalSummonCount > 0
    
    if followers = 0
        @setvar! NeedtoSummon 1
    elseif followers = 1 and TotalSummonCount > 0
        @setvar! NeedtoSummon 1      
    
    elseif followers = 2 and TotalSummonCount = 1
        @setvar! NeedtoSummon 0 
    elseif followers = 2 and TotalSummonCount = 2
        @setvar! NeedtoSummon 1
    elseif followers = 2 and TotalSummonCount = 3
        @setvar! NeedtoSummon 1
    elseif followers = 2 and TotalSummonCount = 4
        @setvar! NeedtoSummon 1
    
    elseif followers = 3 and TotalSummonCount = 1
        @setvar! NeedtoSummon 0 
    elseif followers = 3 and TotalSummonCount = 2
        @setvar! NeedtoSummon 0
    elseif followers = 3 and TotalSummonCount = 3
        @setvar! NeedtoSummon 1
    elseif followers = 3 and TotalSummonCount = 4
        @setvar! NeedtoSummon 1
    
    elseif followers = 4 and TotalSummonCount = 1
        @setvar! NeedtoSummon 0 
    elseif followers = 4 and TotalSummonCount = 2
        @setvar! NeedtoSummon 0
    elseif followers = 4 and TotalSummonCount = 3
        @setvar! NeedtoSummon 0
    elseif followers = 4 and TotalSummonCount = 4
        @setvar! NeedtoSummon 1  
    elseif followers = 5
        @setvar! NeedtoSummon 0
    endif
    
    if NeedtoSummon = 1
       
        removelist summonList
        createlist summonList
    
   if not varexist myMainTankPet
        @setvar! myMainTankPet 0
    endif
    if not varexist fireOne
        @setvar! fireOne 0
    endif 
    if not varexist fireTwo
        @setvar! fireTwo 0
    endif
    if not varexist earthOne
        @setvar! earthOne 0
    endif
    if not varexist earthTwo
        @setvar! earthTwo 0
    endif
    if not varexist demonOne
        @setvar! demonOne 0
    endif
    if not varexist demonTwo
        @setvar! demonTwo 0
    endif
    if not varexist airOne
        @setvar! airOne 0
    endif
    if not varexist airTwo
        @setvar! airTwo 0
    endif
    if not varexist waterOne
        @setvar! waterOne 0
    endif
    if not varexist waterTwo
        @setvar! waterTwo 0
    endif

    overhead "* summoning a bodyguard... *" 12
    wait 1000
    overhead "I call upon the power of the elements..." 2086
    
    if SummonEarthElemental > 0
        if dead earthOne or not find earthOne ground -1 -1 18         
            pushlist summonList "Earth Elemental"
            @setvar! earthOne 1
        endif
        if SummonEarthElemental > 1
            if dead earthTwo or not find earthTwo ground -1 -1 18
                pushlist summonList "Earth Elemental"
                @setvar! earthTwo 1
            endif
        endif
    endif

    if SummonFireElemental > 0
        if dead fireOne or not find fireOne ground -1 -1 18 
            pushlist summonList "Fire Elemental"
            @setvar! fireOne 1
        endif
        if SummonFireElemental > 1
            if dead fireTwo or not find fireTwo ground -1 -1 18
                pushlist summonList "Fire Elemental"
                @setvar! fireTwo 1
            endif
        endif
    endif

    if SummonDemon > 0
        if dead demonOne or not find demonOne ground -1 -1 18
            pushlist summonList "Earth Elemental"
            @setvar! demonOne 1
        endif
        if SummonDemon > 1
            if dead demonTwo or not find demonTwo ground -1 -1 18
                pushlist summonList "Earth Elemental"
                @setvar! demonTwo 1
            endif
        endif
    endif

    if SummonAirElemental > 0
        if dead airOne or not find airOne ground -1 -1 18
            pushlist summonList "Air Elemental"
            @setvar! airOne 1
        endif
        if SummonAirElemental > 1
            if dead airTwo or not find airTwo ground -1 -1 18
                pushlist summonList "Air Elemental"
                @setvar! airTwo 1
            endif
        endif
    endif

    if SummonWaterElemental > 0
        if dead waterOne or not find waterOne ground -1 -1 18
            pushlist summonList "Water Elemental"
            @setvar! waterOne 1
        endif
        if SummonWaterElemental > 1
            if dead waterTwo or not find waterTwo ground -1 -1 18
                pushlist summonList "Water Elemental"
                @setvar! waterTwo 1
            endif
        endif
    endif    

    if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
        getlabel myspellbook SpellbookLabel
        wait 250
            for 5
                wait 250
                if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                    ignore myspellbook 
                    if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                        getlabel myspellbook SpellbookLabel
                        wait 250
                    else 
                        overhead "[ NO SPELLBOOK! ]" 337
                        break
                    endif
                endif 
            endfor
        dclick myspellbook
    endif
    
    foreach summon in summonList
    
            while mana < 50
                if diffhits >= 50
                    replay
                endif
                wait 500
                if not findbuff "Actively Meditating"
                    useskill "meditation"
                    overhead "* meditating... *" 10
                endif
                wait 1000
            endwhile    

                    cast summon
                    wft 500
                    if targetexists 
                        hotkey "Target Self"
                        wait 200
                    endif
                    
                    wait 500
                    if SummonName = 2
                        overhead "I summon thee, Protector of Harvesters!" 2086
                    elseif SummonName = 3
                        overhead "I require another protector!" 2086
                    elseif SummonName = 4
                        overhead "There's still room in the back!" 2086
                    else
                        overhead "Send me a worthy protector!" 2086
                    endif 
                    
                    while casting 
                        wait 50
                    endwhile
                    
                    if diffhits >= 40
                        overhead "Hang on, I need a heal!" 2086
                        hotkey '> Interrupt'
                        replay
                    endif
                    wait 250                
               
        @setvar! myFreshlySummonedPet 0
        
            if summon = "Earth Elemental" and findtype 14 ground -1 -1 2 as myPet
                @setvar! myFreshlySummonedPet myPet
                if earthOne = 1
                    @setvar! earthOne myPet
                elseif earthTwo = 1
                    @setvar! earthTwo myPet
                endif

            elseif summon = "Fire Elemental" and findtype 15 ground -1 -1 2 as myPet 
                @setvar! myFreshlySummonedPet myPet
                if fireOne = 1
                    @setvar! fireOne myPet
                elseif fireTwo = 1
                    @setvar! fireTwo myPet
                endif

            elseif summon = "Summon Daemon" and findtype 9 ground -1 -1 2 as myPet
                @setvar! myFreshlySummonedPet myPet
                if demonOne = 1
                    @setvar! demonOne myPet
                elseif demonTwo = 1
                    @setvar! demonTwo myPet
                endif

            elseif summon = "Water Elemental" and findtype 16 ground -1 -1 2 as myPet
                @setvar! myFreshlySummonedPet myPet
                if waterOne = 1
                    @setvar! waterOne myPet
                elseif waterTwo = 1
                    @setvar! waterTwo myPet
                endif

            elseif summon = "Air Elemental" and findtype 13 ground -1 -1 2 as myPet
                @setvar! myFreshlySummonedPet myPet
                if airOne = 1
                    @setvar! airOne myPet
                elseif airTwo = 1
                    @setvar! airTwo myPet
                endif
            endif
        
            if myFreshlySummonedPet = 0
                overhead "I don't see my elemental..." 2086
                wait 500
                break
            endif 
            
            if NameSummonedPets = 0
                wait 2000
                overhead "{{summon}} will protect you now...." 1909 myFreshlySummonedPet
                menu myFreshlySummonedPet 3
                @ignore myFreshlySummonedPet        
                wait 500
                poplist summonList "front"
                cooldown "Guard Timer" 60000
                break
            endif
            
            if NameSummonedPets = 1 and list petNameList > 0
                for 2
                if SummonName = 1
                    wait 2000
                    overhead "What is your name, minion?" 2086
                    wait 250
                    foreach petName in petNameList
                        rename myFreshlySummonedPet petName
                        wait 250
                        if insysmsg "That name is unacceptable"
                            sysmsg "Unable to name summon: {{petName}}" 34
                            clearsysmsg 
                            poplist petNameList "front"
                            wait 500
                        else 
                            break
                        endif
                    endfor
                    wait 1000
                    overhead "You may call me {{petName}}, Master." 1909 myFreshlySummonedPet
                    wait 2500
                    overhead "{{petName}} will protect you now...." 1909 myFreshlySummonedPet
                    @setvar! NameOne petName
                    menu myFreshlySummonedPet 3
                    @ignore myFreshlySummonedPet
                    cooldown "Guard Timer" 60000
                    
                    if followers = 0
                        @setvar! NeedtoSummon 1
                    elseif followers = 1 and TotalSummonCount > 0
                        @setvar! NeedtoSummon 1      
    
                    elseif followers = 2 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 2 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 1
                    elseif followers = 2 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 1
                    elseif followers = 2 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1
    
                    elseif followers = 3 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 3 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 3 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 1
                    elseif followers = 3 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1
    
                    elseif followers = 4 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1  
                    elseif followers = 5
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    endif
                    
                    if NeedtoSummon = 0
                        @setvar! SummonName 1
                        wait 500
                        overhead "It's harvesting time!" 2086
                        wait 500
                    elseif NeedtoSummon = 1
                        wait 500
                        overhead "Thank you, {{petName}}, but you'll need some help..." 2086
                        wait 1000
                        @setvar! SummonName 2
                        poplist petNameList front
                    else 
                        poplist petNameList front
                        break
                    endif
                    poplist petNameList front
                    break
                
                elseif SummonName = 2
                    wait 1500
                    overhead "Welcome aboard! Name and rank?" 2086
                    wait 250
                    foreach petName in petNameList
                        rename myFreshlySummonedPet petName
                        wait 250
                        if insysmsg "That name is unacceptable"
                            sysmsg "Unable to name summon: {{petName}}" 34
                            clearsysmsg 
                            poplist petNameList "front"
                            wait 500
                        else 
                            break
                        endif
                    endfor
                    wait 2000
                    overhead "I am {{petName}}, Master." 1909 myFreshlySummonedPet
                    wait 2500
                    overhead "{{petName}} is yours to command..." 1909 myFreshlySummonedPet
                    @setvar! NameTwo petName
                    menu myFreshlySummonedPet 3
                    @ignore myFreshlySummonedPet
                    poplist petNameList front
                    cooldown "Guard Timer" 60000
                    
                    if followers = 0
                        @setvar! NeedtoSummon 1
                    elseif followers = 1 and TotalSummonCount > 0
                        @setvar! NeedtoSummon 1      
    
                    elseif followers = 2 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 2 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 1
                    elseif followers = 2 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 1
                    elseif followers = 2 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1
    
                    elseif followers = 3 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 3 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 3 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 1
                    elseif followers = 3 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1
    
                    elseif followers = 4 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1  
                    elseif followers = 5
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    endif
                    
                    if NeedtoSummon = 0
                        @setvar! SummonName 1
                        wait 1500
                        overhead "Alright team, let's do this!" 2086
                    elseif NeedtoSummon = 1
                        wait 500
                        overhead "Hmm... I think we should bring even more..."
                        wait 500
                        @setvar! SummonName 3
                        poplist petNameList front
                    else 
                        poplist petNameList front
                        break
                    endif
                    poplist petNameList front
                    break
                
                elseif SummonName = 3
                    wait 1500
                    overhead "Introduce yourself to the team..." 2086
                    wait 250
                    foreach petName in petNameList
                        rename myFreshlySummonedPet petName
                        wait 250
                        if insysmsg "That name is unacceptable"
                            sysmsg "Unable to name summon: {{petName}}" 34
                            clearsysmsg 
                            poplist petNameList "front"
                            wait 500
                        else 
                            break
                        endif
                    endfor
                    wait 1000
                    overhead "{{petName}} is what they call me..." 1909 myFreshlySummonedPet
                    wait 2000
                    overhead "{{petName}} will kill for you." 1909 myFreshlySummonedPet
                    @setvar! NameThree petName
                    menu myFreshlySummonedPet 3
                    @ignore myFreshlySummonedPet
                    poplist petNameList front
                    cooldown "Guard Timer" 60000

                    if followers = 0
                        @setvar! NeedtoSummon 1
                    elseif followers = 1 and TotalSummonCount > 0
                        @setvar! NeedtoSummon 1      
    
                    elseif followers = 2 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 2 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 1
                    elseif followers = 2 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 1
                    elseif followers = 2 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1
    
                    elseif followers = 3 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 3 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 3 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 1
                    elseif followers = 3 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1
    
                    elseif followers = 4 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    elseif followers = 4 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1  
                    elseif followers = 5
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                    endif
                    
                    if NeedtoSummon = 0
                        @setvar! SummonName 1
                        wait 1500
                        overhead "That's what I like to hear!  Time to work..." 2086
                    elseif NeedtoSummon = 1
                        @setvar! SummonName 4
                        wait 500
                        overhead "Hmm..  I think see room for one more...." 2086
                        wait 500
                        poplist petNameList front
                    else 
                        poplist petNameList front
                        break
                    endif
                    poplist petNameList front
                    break
                    
                elseif SummonName = 4
                    wait 1500
                    overhead "Do you have a name?" 2086
                    wait 250
                    foreach petName in petNameList
                        rename myFreshlySummonedPet petName
                        wait 250
                        if insysmsg "That name is unacceptable"
                            sysmsg "Unable to name summon: {{petName}}" 34
                            clearsysmsg 
                            poplist petNameList "front"
                            wait 500
                        else 
                            break
                        endif
                    endfor
                    wait 1000
                    overhead "Yes, I am {{petName}}, Master." 1909 myFreshlySummonedPet
                    wait 2000
                    overhead "{{petName}} will protect you now...." 1909 myFreshlySummonedPet
                    @setvar! NameFour petName
                    menu myFreshlySummonedPet 3
                    @ignore myFreshlySummonedPet
                    poplist petNameList front
                    cooldown "Guard Timer" 60000
                    @setvar! SummonName 1
                    wait 1500
                    overhead "Alright team, let's do this!" 2086
                    break
                else 
                    @setvar! SummonName 1
                endif  
                endfor              
            endif 
                    if followers = 0
                        @setvar! NeedtoSummon 1
                    elseif followers = 1 and TotalSummonCount > 0
                        @setvar! NeedtoSummon 1      
    
                    elseif followers = 2 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                        break
                    elseif followers = 2 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 1
                    elseif followers = 2 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 1
                    elseif followers = 2 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1
    
                    elseif followers = 3 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                        break
                    elseif followers = 3 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                        break
                    elseif followers = 3 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 1
                    elseif followers = 3 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1
    
                    elseif followers = 4 and TotalSummonCount = 1
                        @setvar! NeedtoSummon 0 
                        @setvar! SummonName 1
                        break
                    elseif followers = 4 and TotalSummonCount = 2
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                        break
                    elseif followers = 4 and TotalSummonCount = 3
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                        break
                    elseif followers = 4 and TotalSummonCount = 4
                        @setvar! NeedtoSummon 1  
                    elseif followers = 5
                        @setvar! NeedtoSummon 0
                        @setvar! SummonName 1
                        break
                    endif
        endfor
        replay
    endif
endif
    
if EnableSummons = 1 
    if dead myMainTankPet
        if not dead earthOne
            @setvar! myMainTankPet earthOne
        elseif not dead earthTwo
            @setvar! myMainTankPet earthTwo
        elseif not dead waterOne
            @setvar! myMainTankPet waterOne
        elseif not dead waterTwo
            @setvar! myMainTankPet waterTwo
        elseif not dead demonOne
            @setvar! myMainTankPet demonOne
        elseif not dead demonTwo
            @setvar! myMainTankPet demonTwo
        elseif not dead fireOne
            @setvar! myMainTankPet fireOne
        elseif not dead fireTwo
            @setvar! myMainTankPet fireTwo
        elseif not dead airOne
            @setvar! myMainTankPet airOne
        elseif not dead airTwo
            @setvar! myMainTankPet airTwo
        endif
    else 
        if not cooldown "Guard Timer" 
            if GuardComment = 1
                overhead "* guarding... *" 2114 myMainTankPet
                menu myMainTankPet 3
                @setvar! GuardComment 2
                wait 500
                cooldown "Guard Timer" 120000
            elseif GuardComment = 2
                overhead "* looks around menacingly... *" 2114 myMainTankPet
                menu myMainTankPet 3
                @setvar! GuardComment 3
                wait 500
                cooldown "Guard Timer" 120000
            elseif GuardComment = 3
                overhead "* cracks knuckles... *" 2114 myMainTankPet
                menu myMainTankPet 3
                @setvar! GuardComment 4
                wait 500
                cooldown "Guard Timer" 120000
            elseif GuardComment = 4
                overhead "* scanning for threats... *" 2114 myMainTankPet
                menu myMainTankPet 3
                wait 500
                @setvar! GuardComment 5
                cooldown "Guard Timer" 120000
            elseif GuardComment = 5
                overhead "* growls... *" 2114 myMainTankPet
                menu myMainTankPet 3
                @setvar! GuardComment 6
                wait 500
                cooldown "Guard Timer" 120000
           elseif GuardComment = 6
               overhead "This isn't very exciting, is it?" 44 myMainTankPet
                menu myMainTankPet 3
                @setvar! GuardComment 1
                wait 500
                cooldown "Guard Timer" 120000
            else 
                overhead "I think we've already passed that tree today..." 44 myMainTankPet
                menu myMainTankPet 3
                @setvar! GuardComment 1
                wait 500
                cooldown "Guard Timer" 120000               
            endif 
        endif
    endif 

if EnableWeaponWarning = 1
    if skill "Mace Fighting" > 50 and not findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" self and not cooldown "Inventory Timer"
        overhead "[ NO WEAPON! ]" 337
        cooldown "Inventory Timer" 10000
        sysmsg "Disable 'EnableWeaponWarning' in script variables to turn off this feature!" 0        
    endif 

    if skill "Swordsmanship" > 50 and not findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" self and not cooldown "Inventory Timer"
        overhead "[ NO WEAPON! ]" 337
        cooldown "Inventory Timer" 10000
        sysmsg "Disable 'EnableWeaponWarning' in script variables to turn off this feature!" 0        
    endif

    if skill "Magery" > 80 and findtype "spellbook" self as myspellbook and not cooldown "Inventory Timer"
        getlabel myspellbook SpellbookLabel
        wait 250 
        for 5
            if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                ignore myspellbook 
                if findtype "spellbook" self as myspellbook
                    getlabel myspellbook SpellbookLabel
                elseif not cooldown "Inventory Timer"
                    overhead "[ NO SPELLBOOK! ]" 337
                    cooldown "Inventory Timer" 10000
                    sysmsg "Disable 'EnableWeaponWarning' in script variables to turn off this feature!" 0
                    break
                endif
            endif 
        endfor
    endif 
endif

if AllInventoryMessage = 1 and not cooldown "Inventory Timer"
    if counttype "Yellow Potion" self = 0 and YellowInventoryMessage = 1
        overhead "[ RESTOCK HEAL POTS! ]" 253
        cooldown "Inventory Timer" 10000
        sysmsg "Disable YellowInventoryMessage in script variables to turn off this overhead message!" 0
    endif 

    if counttype "Orange Potion" self = 0 and OrangeInventoryMessage = 1
        overhead "[ RESTOCK CURE POTS! ]" 44
        cooldown "Inventory Timer" 10000
        sysmsg "Disable OrangeInventoryMessage in script variables to turn off this overhead message!" 0
    endif 

    if counttype "Red Potion" self = 0 and RedInventoryMessage = 1
        overhead "[ RESTOCK REFRESH POTS! ]" 37
        cooldown "Inventory Timer" 10000
        sysmsg "Disable RedInventoryMessage in script variables to turn off this overhead message!" 0
    endif 

    if counttype "White Potion" self = 0 and WhiteInventoryMessage = 1 
        overhead "[ RESTOCK STRENGTH POTS! ]" 956
        cooldown "Inventory Timer" 10000
        sysmsg "Disable WhiteInventoryMessage in script variables to turn off this overhead message!" 0
    endif 

    if counttype "Blue Potion" self = 0 and BlueInventoryMessage = 1
        overhead "[ RESTOCK AGILITY POTS! ]" 93
        cooldown "Inventory Timer" 10000
        sysmsg "Disable BlueInventoryMessage in script variables to turn off this overhead message!" 0
    endif 

    if counttype "Black Potion" self = 0 and BlackInventoryMessage = 1
        overhead "[ RESTOCK MAGIC RESIST POTS! ]" 0
        cooldown "Inventory Timer" 10000
        sysmsg "Disable BlackInventoryMessage in script variables to turn off this overhead message!" 0
    endif 

    if counttype "rope" self = 0 and RopeInventoryMessage = 1
        overhead "[ RESTOCK ROPE! ]" 2799
        cooldown "Inventory Timer" 10000
        sysmsg "Disable RopeInventoryMessage in script variables to turn off this overhead message!" 0
    endif 
endif

@setvar! PaytheMan 1

if PaytheMan = 1 and not cooldown "Inventory Timer"
    if find '0x6C0A02' 'ground' -1 -1 10 as VENDOR and not varexist EASTEREGG
        overhead "Hey! I loooove your Harvest script!" 253
        wait 1000
        overhead "It makes me so much money, I should spend it all here!" 253
        wait 2000
        overhead ":)" 2086 VENDOR
        wait 500
        overhead "Well, thank you!" 2086 VENDOR
        wait 2000
        overhead "I'd be happy to take any donations!  The chest beside me is public (shhh!) and master loves gifts!" 2086 VENDOR
        wait 4500
        overhead "Sign the guestbook!" 2086 VENDOR
        wait 500
            if find '0x4A38A441' 'ground' -1 -1 15 as DONATIONS
                wait 500
                overhead "(in this chest!)" 0 DONATIONS
            endif
        wait 2500
        overhead "Good luck out there!  Fuck PKs & thieves! :)" 2086 VENDOR
        setvar EASTEREGG 1
    else 
        cooldown "Inventory Timer" 4000
        if find '0x4A38A441' 'ground' -1 -1 15 as DONATIONS
            overhead "DONATIONS!" 253 DONATIONS
            overhead "▼" 253 DONATIONS
        endif
    endif 
endif

if EnableMushroomMaker = 1
    if skill "Magery" >= 80 and counttype "mushroom" self = 0  
    
        if skill "Magery" >= 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
            getlabel myspellbook SpellbookLabel
                for 5
                    wait 250
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore myspellbook 
                    if skill "Magery" > 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
                        getlabel myspellbook SpellbookLabel
                        endif
                    endif 
                endfor
                dclick myspellbook
            wait 250
        endif 
        
        overhead "Hang on, I need to make some shrooms..." 2086
        wait 1000    
            for 100
                if counttype "Ginseng" self > 0 and counttype "Garlic" self > 0 and counttype "Mandrake Root%s%" self > 0 and mana >= 4
                    cast "create food"
                    wait 100
                    while casting 
                        wait 50
                    endwhile
                    if counttype "mushroom" self >= MakeMushroomAmount
                        break
                    endif
                else
                    overhead "...I'm out of regs!" 2086 
                    @setvar! TimeToGo 1
                    replay
                endif
            endfor
            overhead "There, that's better!" 2086
            wait 500
        endif
    else 
        if not cooldown "Inventory Timer"
            overhead "Disable EnableMushroomMaker in script variables to turn off this feature!" 0
            cooldown "Inventory Timer" 10000
        endif
    endif
endif

if EnableCheeseTimer = 1
    if not findbuff 'food satisfaction' and findtype "wedge%s% of cheese|fish steak%s%" self
        overhead "Hold on, I shouldn't do this on an empty stomach..." 2086
        wait 500
        if findtype "wedge%s% of cheese|fish steak%s%" backpack as food
            overhead "* eating food... *" 0
            dclick food
            wait 1500
            overhead "Ok, I'm ready to get to work!" 2086
        endif
    endif 
endif 

if EnableEatFood = 1
    if not findbuff 'food satisfaction' and findtype "tray" self
        overhead "Hold on, I'm hungry..." 2086
        wait 1000
        if findtype "tray" backpack as food
            overhead "* eating food... *" 0
            dclick food
            wait 1500
            overhead "Ok, I'm ready to get to work!" 2086
        endif
    endif 
endif 

if EnableToolCountdown = 1
    if findtype 'pickaxe|hatchet' hand as MyAxe
        getlabel MyAxe AxeLabel
        if '(5 uses' in AxeLabel or '(4 uses' in AxeLabel or '(3 uses' in AxeLabel or '(2 uses' in AxeLabel or '(1 use' in AxeLabel
            if EnableRecycleTool = 0
                sysmsg "YOUR TOOL IS ABOUT TO BREAK....." 153
            endif 
            if EnableRecycleTool = 1
                sysmsg "YOUR TOOL IS ABOUT TO BE RECYCLED....." 93
            endif 
        endif 
    endif 
endif

if EnableRecycleTool = 1
    if findtype 'tool kit' self as ToolKit
        if findtype 'pickaxe|hatchet' hand as MyAxe
            getlabel MyAxe AxeLabel
            if '(2 use' in AxeLabel
                overhead "[ RECYCLING TOOL! ]" 93
                clearhands both
                wait 250
                if not gumpexists 949095101 
                    dclick ToolKit
                    waitforgump 949095101 2000
                endif 
        
                for 5
                gumpresponse 3 949095101
                wait 250
                    if insysmsg "Target an individual item"
                        target MyAxe
                        wait 250
                        gumpclose 949095101
                        wait 1000
                        overhead "Every little bit counts..." 2086
                        hotkey 'Organizer Agent-03' 
                        replay
                    else
                        gumpresponse 2
                        wait 250
                endfor 
                endif 
            endif 
        endif 
    endif

    if not findtype 'tool kit' self and not cooldown "Inventory Timer"
        overhead "[ NO TOOL KIT! ]" 337
        cooldown "Inventory Timer" 15000
        sysmsg "Disable 'EnableRecycleTool' in script variables to turn off this overhead message!" 0
    endif
endif 

if insysmsg "As the owner" or insysmsg "Your house and its contents"
    wait 1000
    if find MyDoor ground -1 -1 2
        overhead "* door slams! *" 0 MyDoor
        dclick MyDoor 
        wait 500
    endif
endif

clearsysmsg
hotkey 'Cancel Current Target'

if EnableAutoAttackGreyMOB = 1 
    if warmode
        overhead "* cracks knuckles... *" 2128
    
        if skill "Mace Fighting" > 50 and not findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" hand and findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" backpack as weapon
            getlabel weapon WeaponLabel
                for 5
                    wait 100
                    if "unidentified" in WeaponLabel
                        ignore weapon
                        if skill "Mace Fighting" > 50 and not findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" hand and findtype "sledgehammer|giant club|flail|cudgel|quarter staff|war mace|maul|war axe|mace|hammer pick" backpack as weapon
                            getlabel weapon WeaponLabel
                        endif
                    endif 
                endfor
            dclick weapon      
            wait 100
        endif 

        if skill "Swordsmanship" > 50 and not findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" hand and findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" backpack as weapon
            getlabel weapon WeaponLabel
                for 5
                    wait 100
                    if "unidentified" in WeaponLabel
                        ignore weapon
                        if skill "Swordsmanship" > 50 and not findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" hand and findtype "double axe|two handed axe|battle axe|halberd|katana|bardiche|cutlass|broadsword|scimitar|viking sword|longsword" backpack as weapon
                            getlabel weapon WeaponLabel
                        endif
                    endif 
                endfor
            dclick weapon      
            wait 100
        endif 

        if skill "Magery" >= 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as spellbook
            getlabel spellbook SpellbookLabel
                for 5
                    wait 100
                    if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                        ignore spellbook 
                        if skill "Magery" > 80 and not findtype "spellbook" hand and findtype "spellbook" backpack as spellbook
                            getlabel spellbook SpellbookLabel
                        endif
                    endif 
                endfor
            dclick spellbook
            wait 100
        endif 
                
            clearsysmsg
            for 1000
                hotkey 'Target Closest Non-Friendly Monster'
                wait 500
                            
                    if insysmsg "No one matching that was found" 
                        hotkey 'Cancel Current Target'      
                        @setvar CurrentTarget 0
                        wait 750
                        overhead "Is there no one else??" 2086
                        wait 2000
                        overhead "Alright then, I guess it's back to work..." 2086
                        hotkey 'Toggle Peace Only'
                        hotkey 'Clear Target Queue'
                        clearsysmsg 
                        replay                                    
                    endif 
                    
                    
                    @setvar CurrentTarget lasttarget 
                    getlabel CurrentTarget TargetDesc
                    

                while not dead CurrentTarget
                    if EnableRedAlertRecall = 1
                        if insysmsg "Now tracking" or insysmsg "Distance to destination"
                            @setvar! TimeToGo 1
                            hotkey 'Toggle Peace Only'
                            hotkey 'Clear Target Queue'
                            clearsysmsg 
                            replay
                        endif
                    endif 

                    if not cooldown "Target Timer"
                        if "Paragon" in TargetDesc
                            overhead " ▼ PARAGON! ▼ " 12 CurrentTarget 
                            cooldown "Target Timer" 4000
                        else 
                            overhead " ▼ TARGET ▼ " 253 CurrentTarget 
                            cooldown "Target Timer" 4000
                        endif   
                    endif

                    if not warmode 
                        overhead "I don't have time for this shit..." 2086
                        wait 1000
                        replay
                    endif
                    
                    // DEFENSIVE LOOP: 
                        
                        if skill 'Healing' > 50 and not bandaging and hits < maxhits
                            overhead '* applying bandages... *' 88
                            hotkey "Bandage Self"
                            wait 250
                        endif

                        if EnableCurePotion = 1
                            if poisoned and not cooldown "Cure Potion" and hits < CurePotHP
                                if findtype "Orange Potion" self as curepot
                                    overhead '* drinking cure potion... *' 44
                                    dclick curepot
                                    cooldown "Cure Potion" 10500
                                    wait 250
                                else
                                    overhead "[ NO CURE POTS! ]" 337
                                endif
                            endif
                        endif 

                        if EnableHealPotion = 1
                            if hits < HealPotHP and not cooldown "Healing Potion"
                                if findtype "Yellow Potion" self as healpot
                                    overhead '* drinking heal potion... *' 253
                                    dclick healpot
                                    cooldown "Healing Potion" 10500
                                    wait 250
                                else 
                                    overhead '[ NO HEAL POTS! ]' 337
                                endif
                            endif
                        endif 

                        if EnableRefreshPotion = 1
                            if diffstam >= RefreshPotSPdiff and not cooldown "Refresh Potion"
                                if findtype "Red Potion" self as refreshpot
                                    overhead '* drinking refresh potion... *' 34
                                    dclick refreshpot
                                    cooldown "Refresh Potion" 10500
                                    wait 250
                                else 
                                    overhead '[ NO REFRESH POTS! ]' 337
                                endif
                            endif
                        endif
                        
                        if EnableMagicResistPotion = 1
                            if not findbuff "Magic Resist Potion"
                                if findtype "Black Potion" self as magicresistpot
                                    overhead '* drinking resist potion... *' 0
                                    dclick magicresistpot
                                    wait 250
                                else 
                                    overhead '[ NO RESIST POTS! ]' 337
                                    wait 500
                                endif
                                wait 1000
                            endif
                        endif

                        if EnableStrengthPotion = 1
                            if not findbuff "Strength"
                                if findtype "White Potion" self as strengthpot
                                    overhead '* drinking strength potion... *' 956
                                    dclick strengthpot
                                    wait 250
                                else 
                                    overhead '[ NO STRENGTH POTS! ]' 337
                                    wait 500
                                endif
                                wait 1000
                            endif
                        endif

                        if EnableAgilityPotion = 1
                            if not findbuff "Agility"
                                if findtype "Blue Potion" self as agilitypot
                                    overhead '* drinking agility potion... *' 93
                                    dclick agilitypot
                                    wait 250
                            else 
                                overhead '[ NO AGILITY POTS! ]' 337
                                wait 500
                            endif
                                wait 1000
                            endif
                        endif
                        
                        if EnableCastHeal = 1
                            if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
                                getlabel myspellbook SpellbookLabel
                                    for 5
                                        wait 100
                                        if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                                            ignore myspellbook 
                                            if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                                                getlabel myspellbook SpellbookLabel
                                            else 
                                                overhead "[ NO SPELLBOOK! ]" 337
                                                break
                                            endif
                                        endif 
                                    endfor
                                    dclick myspellbook
                                    wait 250
                            endif

                            if skill 'Magery' >= 40 and diffhits > CastHealHPmeddiff and diffhits < CastHealHPhighdiff and mana >= 4
                                cast 'Heal'
                                wait 100
                                while not casting                   
                                    if targetexists
                                        hotkey 'cancel current target'
                                    endif
                                        cast 'Heal'
                                        wait 100
                                endwhile  
                                    wft 1500
                                    target 'self' 
                                    wait 250

                            elseif skill 'Magery' >= 60 and diffhits > CastHealHPhighdiff and mana >= 11
                                cast 'Greater Heal'
                                wait 100
                                    while not casting                   
                                        if targetexists
                                            hotkey 'cancel current target'
                                        endif
                                            cast 'Greater Heal'
                                            wait 100
                                    endwhile  
                                        wft 1500
                                        target 'self' 
                                        wait 250
 
                            elseif skill 'Magery' >= 40 and diffhits > CastHealHPhighdiff and mana >= 4 and mana < 11
                                cast 'Heal'
                                wait 100
                                    while not casting                   
                                        if targetexists
                                            hotkey 'cancel current target'
                                        endif
                                            cast 'Heal'
                                            wait 100
                                    endwhile  
                                        wft 1500
                                        target 'self' 
                                        wait 250
                            endif
                        endif

                        if EnableCastCure = 1
                            if poisoned and skill 'Magery' >= 40 and mana >= 6
                                if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
                                    getlabel myspellbook SpellbookLabel
                                    for 5
                                        wait 100
                                        if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                                            ignore myspellbook 
                                            if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                                                getlabel myspellbook SpellbookLabel
                                            else 
                                                overhead "[ NO SPELLBOOK! ]" 337
                                                break
                                            endif
                                        endif 
                                    endfor
                                    dclick myspellbook
                                    wait 250
                                endif
                                cast 'Cure'
                                wait 100
                                    while not casting                   
                                        if targetexists
                                            hotkey 'cancel current target'
                                        endif
                                            cast 'Cure'  
                                            wait 100
                                    endwhile  
                                wft 1500
                                target 'self' 
                                wait 100 
                            endif 
                        endif   
                            
                        if paralyzed and EnableParalyzePouch = 1
                            overhead "[[[[ POP ]]]]" 2117
                            say "[pouch" 
                            @setvar! TimeToGo 1
                            replay
                        endif
                        
                        if EnableProtection = 1
                            if skill 'Magery' >= 40 and not findbuff 'Protection' and mana >= 90
                                for 3
                                cast 'Protection' 
                                wait 100
                                    while casting 
                                        wait 50
                                    endwhile
                                    if cooldown "Spell Fail"
                                        overhead "Shit, let me try that again..." 2086
                                        wait 500
                                    else
                                        break
                                    endif 
                                endfor 
                                overhead "[ PROTECTION ACTIVE! ]" 77
                                wait 250
                            endif  
                        endif 
                        
                        
                // OFFENSIVE LOOP:
                        
                if skill "Mace Fighting" or skill "Swordsmanship" > 50
                        attack CurrentTarget                        
                        wait 500
                endif
                    
                if skill "Magery" >= 70
                    if EnableMagicMushroom = 1
                        if not timerexists MushroomTimer
                            settimer MushroomTimer MushroomCooldown
                        endif
                    
                        if mana < 50 and timer MushroomTimer >= MushroomCooldown and findtype "mushroom" backpack as magicmushroom
                            overhead "* eating shrooms... *" 31
                            dclick magicmushroom
                            wait 500
                            if insysmsg "You consume a magic mushroom and restore some mana."
                                settimer MushroomTimer 0    
                            elseif insysmsg "before you may consume another magic mushroom" or insysmsg "been in combat with another"
                                settimer MushroomTimer 30000
                            endif
                            cooldown "Mushroom" MushroomCooldown
                        endif
                    endif
                     
                    if not findtype "spellbook" hand and findtype "spellbook" backpack as myspellbook
                        getlabel myspellbook SpellbookLabel
                            for 5
                                wait 100
                                if "unidentified" in SpellbookLabel or "[blessed" in SpellbookLabel
                                    ignore myspellbook 
                                    if not findtype "spellbook" hand and findtype "spellbook" self as myspellbook
                                        getlabel myspellbook SpellbookLabel
                                    else 
                                        overhead "[ NO SPELLBOOK! ]" 337
                                        break
                                    endif
                                endif 
                            endfor
                        dclick myspellbook
                        wait 250
                    endif
                        
                    wait 500
                        
                    if not find CurrentTarget ground -1 -1 15
                        if not cooldown "Move Timer"
                            overhead "Did we get it??" 2086
                            wait 500
                                if EnableSummons = 1 and followers > 1
                                    wait 1000
                                    overhead "I believe that was MY kill, Master..." 1909 myMainTankPet
                                    wait 500
                                endif
                                cooldown "Move Timer" 5000
                        endif
                    else
                        if mana >= 4 and EnableCastWeaken = 1 and not cooldown "WeakenCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'weaken'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown WeakenCD WeakenCooldown
                                endif    

                        elseif mana >= 4 and EnableCastMagicArrow = 1 and not cooldown "MagicArrowCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'magic arrow'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown MagicArrowCD MagicArrowCooldown
                                endif
                        
                        elseif mana >= 6 and EnableCastHarm = 1 and not cooldown "HarmCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'harm'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown HarmCD HarmCooldown
                                endif                           
                        
                        elseif mana >= 11 and EnableCastCurse = 1 and not cooldown "CurseCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'curse'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown CurseCD CurseCooldown
                                endif                            
                         
                        elseif mana >= 20 and EnableCastExplosion = 1 and not cooldown "ExplosionCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'Explosion'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown ExplosionCD ExplosionCooldown
                                endif
                                      
                        elseif mana >= 20 and EnableCastEnergyBolt = 1 and not cooldown "EnergyBoltCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'Energy Bolt'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown EnergyBoltCD EnergyBoltCooldown
                                endif
                                
                        elseif mana >= 14 and EnableCastMindblast = 1 and not cooldown "MindblastCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'mindblast'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown MindblastCD MindblastCooldown
                                endif   
                                
                        elseif mana >= 11 and EnableCastLightning = 1 and not cooldown "LightningCD"
                           if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'Lightning'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown LightningCD LightningCooldown
                                endif
                                    
                        elseif mana >= 40 and EnableCastFlamestrike = 1 and not cooldown "FlamestrikeCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'flamestrike'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown FlamestrikeCD FlamestrikeCooldown
                                endif
                                
                        elseif mana >= 9 and EnableCastFireball = 1 and not cooldown "FireballCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'fireball'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown FireballCD FireballCooldown
                                endif
                            
                        elseif mana >= 40 and EnableCastMeteorSwarm = 1 and not cooldown "MeteorSwarmCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'meteor swarm'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown MeteorSwarmCD MeteorSwarmCooldown
                                endif
                                     
                        elseif mana >= 40 and EnableCastChainLightning = 1 and not cooldown "ChainLightningCD"
                            if not find CurrentTarget ground -1 -1 15 or diffhits >= 30
                                hotkey '> Interrupt'
                                break
                            else
                                cast 'chain lightning'
                                wait 100
                                while casting 
                                    wait 50
                                endwhile
                            endif 
                                wft 2500
                            target CurrentTarget
                            wait 250
                                if insysmsg "cannot be seen" 
                                    overhead "I can't see that!" 2086
                                    wait 500
                                else 
                                    cooldown ChainLightningCD ChainLightningCooldown
                                endif
                        endif 
                            wait 500
                    endif 
                endif
            endwhile
                            wait 500

                            if insysmsg "You have gained"
                                overhead "Did you see that?? I just killed {{TargetDesc}}!" 2086
                                hotkey 'Cancel Current Target'
                                @setvar CurrentTarget 0
                                wait 500

                                if skill "Spirit Speak" >= 80 and not cooldown "Spirit Speak"
                                    useskill "spiritspeak"
                                    cooldown "Spirit Speak" 10500
                                    wait 500
                                endif
                            endif
                            
                            if findtype 'Elven SpellBlade' backpack and EnableAutoCarving = 1
                                if findtype "corpse" ground -1 -1 2 as corpse
                                    hotkey 'Cancel Current Target'
                                    dclicktype "Elven Spellblade"
                                    wft 1500
                                    target self
                                    overhead "* skinning {{TargetDesc}}... *" 339
                                    @ignore corpse
                                endif 
                            endif  

                            if insysmsg "You have unlocked a codex upgrade point"
                                overhead "[ CODEX POINT UNLOCKED! ]" 2114
                                    if EnableSummons = 1 and followers > 1
                                        wait 1000
                                        overhead "Well done, Master..." 44 myMainTankPet
                                        menu myMainTankPet 3
                                    endif
                            endif 

                            if insysmsg "unlocked a point for your wizard's grimoire"
                                overhead "[ GRIMOIRE POINT UNLOCKED! ]" 7
                                    if EnableSummons = 1 and followers > 1
                                        wait 1000
                                        overhead "You seem stronger, Master..." 44 myMainTankPet
                                        menu myMainTankPet 3
                                    endif
                            endif 

                            if insysmsg "enough experience to upgrade"
                                overhead "[ ASPECT TIER UNLOCKED! ]" 2086
                                    if EnableSummons = 1 and followers > 1
                                        wait 500
                                        overhead "Time to spend some more gold, it would seem..." 44 myMainTankPet
                                        menu myMainTankPet 3
                                        wait 500
                                    endif
                            endif 

                            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
                                overhead "Hmm.. I suddenly feel stronger!" 44 myMainTankPet
                                menu myMainTankPet 3
                                wait 500
                                overhead "* cracks knuckles... *" 0 myMainTankPet
                            endif 


                            if insysmsg "something invisible out of the way"
                                overhead "[ ▼ SOMEONE HIDDEN! ▼ ]" 6
                                    if EnableSummons = 1 and followers > 1
                                        wait 500
                                        overhead "There is a foul stench upon the air..." 44 myMainTankPet
                                        menu myMainTankPet 3
                                        wait 500
                                    endif
                            endif 

                            if paralyzed and EnableParalyzePouch = 1
                                overhead "[[[[ POP ]]]]" 2117
                                say "[pouch" 
                                @setvar! TimeToGo 1
                                    if EnableSummons = 1 and followers > 1
                                        overhead "That was unwise, criminal..." 44 myMainTankPet
                                        menu myMainTankPet 3
                                        clearsysmsg 
                                    endif
                            endif
                        
                            if skill "Spirit Speak" >= 80 and not cooldown "Spirit Speak"
                                useskill "spiritspeak"
                                cooldown "Spirit Speak" 10500
                                wait 500
                            endif
                                
                            if not findbuff "Actively Meditating" and mana < 30 and diffhits < 30
                                clearhands both
                                hotkey "Meditation"
                                wait 100
                                while mana < 50
                                    if EnableRedAlertRecall = 1
                                        if insysmsg "Now tracking" or insysmsg "Distance to destination"
                                            @setvar! TimeToGo 1
                                            hotkey 'Toggle Peace Only'
                                            hotkey 'Clear Target Queue'
                                            clearsysmsg 
                                            replay
                                        endif
                                    endif
                                    
                                    if diffhits > 30 
                                        break
                                    elseif not cooldown "Move Timer"
                                        overhead "* meditating... *" 12
                                        cooldown "Move Timer" 4000
                                    endif

                                    if not warmode 
                                        overhead "I need to get back to work..." 2086
                                        wait 1000
                                        replay
                                    endif
                                endwhile
                            endif 
                    endfor      
                        
            hotkey 'Cancel Current Target'
            @setvar! TimeToGo 1
            replay 
        
        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" self
            overhead "I can't fight without a weapon!"  2086
            hotkey 'Toggle Peace Only'
            hotkey 'Cancel Current Target'
            @setvar! TimeToGo 1
            replay 
        endif 
        hotkey 'Cancel Current Target'
        hotkey 'Toggle Peace Only'
        replay
    endif
endif



        ////////////////////////////////
        // MINING SCRIPT STARTS HERE: //
        ////////////////////////////////

if not dead and skill "Mining" > 49.9 and not cooldown "Travel"

if EnablePlayerForgeRadar = 1
    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 not cooldown "Forge Radar"
        overhead "[ FORGE HERE! ]" 44 forge
        overhead "▼" 44 forge
        cooldown "Forge Radar" 3500
    endif 
endif
          
if EnableOreVacuum = 1
    if findtype "iron ore" ground -1 -1 15 as droppedore and not cooldown "Ore Radar"   
        overhead "[ ORE ]" 93 droppedore             
        overhead "▼" 93 droppedore
        cooldown "Ore Radar" 3500
    endif

    if findtype "iron ingot%s" ground -1 -1 15 as droppedingots and not cooldown "Ore Radar"   
        overhead "[ INGOTS ]" 69 droppedingots              
        overhead "▼" 69 droppedingots
        cooldown "Ore Radar" 3500
    endif
    
    if findtype "iron ore|iron ingot%s" ground -1 -1 2 as droppedmetal and not cooldown "Ore Vacuum"
        overhead "[ CLEANUP... ]" 93
        hotkey "Grab Item"
        wft 2500
        target droppedmetal
        wait 250
        if insysmsg "Invalid or inaccessible item"
            overhead "I can't get to that!" 2086
            wait 250
            @ignore droppedmetal
        endif
        hotkey 'Organizer Agent-03'  
        cooldown "Ore Vacuum" 500
    endif
endif 

if counttype "iron ingot%s" > IngotRecallAmount and EnableIngotAutoRecall = 1
    overhead "I'd hate to lose all this hard work..." 2086
    wait 2500
    overhead "I'm going to go unload before it's too late!" 2086
    sysmsg "Disable 'EnableIngotAutoRecall' in script variables to turn off this feature!" 0
    wait 2000
    @setvar! TimeToGo 1
    replay
endif 

if EnableAutoSmeltNaturalForge = 1 
    if findtype "iron ore" backpack as ore and Working = 0
        @setvar! ForgeFound 0
    
        if not timerexists AutoSmeltNaturalForgeTimer
            settimer AutoSmeltNaturalForgeTimer 8500
        endif

        if timer AutoSmeltNaturalForgeTimer >= 8500
            dclick ore
            wait 250
            if insysmsg "You do not see any nearby forges"
                settimer AutoSmeltNaturalForgeTimer 0
                clearsysmsg
            else
                @setvar! ForgeFound 1
                wait 250
                clearsysmsg
            endif
        endif

        for 11
        if ForgeFound = 1 and findtype "iron ore" backpack as ore
            dclick ore
            wait 500
            if insysmsg "You do not see any nearby forges"
               settimer AutoSmeltNaturalForgeTimer 0
                @setvar! ForgeFound 0
                clearsysmsg
                replay
            endif
            hotkey 'Organizer Agent-03'  
            wait 500
        endif
        endfor 
    endif
endif 

if EnableAutoSmeltPlayerForge = 1
    for 10
    if findtype "forge" ground -1 -1 2 as forge or findtype 0x0FB1 ground -1 -1 2 as forge and findtype "iron ore" backpack as ore
        overhead "* smelting ore... *" 2114 forge
        dclick ore
        overhead "* forging ingots... *" 2117
        wait 1000
        if insysmsg "You do not see any nearby forges"
           settimer AutoSmeltNaturalForgeTimer 0
           @setvar! ForgeFound 0
             replay
        endif
        hotkey 'Organizer Agent-03'  
        wait 500
    endif
    endfor
endif
    
if EnableWeightWarningMessage = 1 and not cooldown "Weight Timer"
    if weight > GreenWarningWeight and weight < YellowWarningWeight
        overhead "[ WEIGHT WARNING! ]" 77
        cooldown "Weight Timer" 3500
    endif

    if weight > YellowWarningWeight and weight < RedWeightLimit
        overhead "[ TIME TO FORGE! ]" 149
        cooldown "Weight Timer" 3500
    endif 

    if weight > RedWeightLimit
        @setvar! Working 0
        overhead "[ WEIGHT LIMIT REACHED!!! ]" 337
        wait 2000
        overhead "Find a forge in order to continue..." 0
        wait 1000
        replay
    endif
endif 

if not findtype 'pickaxe' hand and findtype 'pickaxe' backpack
    dclicktype 'pickaxe' backpack
    wait 250
endif

    hotkey 'Use item in hand' 
    wft 500
    hotkey 'Target Self' 

                    if insysmsg "Now tracking" or insysmsg "Distance to destination"
                        @setvar! TimeToGo 1
                        replay 
        
                    elseif insysmsg 'world is saving'                     
                            for 40
                                wait 100
                                if insysmsg 'world save complete' 
                                    overhead '[ SAVE COMPLETE! ]' 253 
                                    clearsysmsg 
                                    replay
                                endif 
                            endfor 
                        clearsysmsg 
                        replay 
                    elseif insysmsg 'Harvesting is not allowed' 
                        overhead 'You need to leave town...' 84
                        clearsysmsg 
                        wait 5000 
                        replay 
                    elseif insysmsg 'You have worn out your tool' 
                        overhead "My pickaxe broke!" 2086
                        wait 1500 
                        clearsysmsg
                        replay
                    elseif insysmsg "You must wait"
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 59"
                        cooldown "Travel" 59000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 58"
                        cooldown "Travel" 58000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 57"
                        cooldown "Travel" 57000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 56"
                        cooldown "Travel" 56000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 55"
                        cooldown "Travel" 55000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 54"
                        cooldown "Travel" 54000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 53"
                        cooldown "Travel" 53000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 52"
                        cooldown "Travel" 52000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 51"
                        cooldown "Travel" 51000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 50"
                        cooldown "Travel" 50000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 49"
                        cooldown "Travel" 49000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 48"
                        cooldown "Travel" 48000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 47"
                        cooldown "Travel" 47000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 46"
                       cooldown "Travel" 46000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 45"
                        cooldown "Travel" 45000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 44"
                        cooldown "Travel" 44000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 43"
                        cooldown "Travel" 43000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 42"
                        cooldown "Travel" 42000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 41"
                        cooldown "Travel" 41000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 40"
                        cooldown "Travel" 40000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 39"
                        cooldown "Travel" 39000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 38"
                        cooldown "Travel" 38000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 37"
                        cooldown "Travel" 37000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 36"
                        cooldown "Travel" 36000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay                     
                    elseif insysmsg "must wait 35"
                        cooldown "Travel" 35000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 34"
                        cooldown "Travel" 34000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 33"
                        cooldown "Travel" 33000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 32"
                        cooldown "Travel" 32000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 31"
                        cooldown "Travel" 31000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 30"
                        cooldown "Travel" 30000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 29"
                        cooldown "Travel" 29000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 28"
                        cooldown "Travel" 28000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 27"
                        cooldown "Travel" 27000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 26"
                        cooldown "Travel" 26000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 25"
                        cooldown "Travel" 25000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 24"
                        cooldown "Travel" 24000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 23"
                        cooldown "Travel" 23000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 22"
                        cooldown "Travel" 22000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 21"
                        cooldown "Travel" 21000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 20"
                        cooldown "Travel" 20000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 19"
                        cooldown "Travel" 19000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 18"
                        cooldown "Travel" 18000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 17"
                        cooldown "Travel" 17000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a minute to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 16"
                        cooldown "Travel" 16000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 15"
                        cooldown "Travel" 15000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a little bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 14"
                        cooldown "Travel" 14000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a little bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 13"
                        cooldown "Travel" 13000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a little bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 12"
                        cooldown "Travel" 12000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a little bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 11"
                        cooldown "Travel" 11000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a little bit longer to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 10"
                        cooldown "Travel" 10000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a few more seconds to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 9"
                        cooldown "Travel" 9000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a few more seconds to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 8"
                        cooldown "Travel" 8000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a few more seconds to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 7"
                        cooldown "Travel" 7000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a few more seconds to recover!" 2086
                        clearsysmsg 
                        replay                     
                    elseif insysmsg "must wait 6"
                        cooldown "Travel" 6000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a few more seconds to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 5"
                        cooldown "Travel" 5000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a few more seconds to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 4"
                        cooldown "Travel" 4000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a few more seconds to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 3"
                        cooldown "Travel" 3000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a few more seconds to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 2"
                        cooldown "Travel" 2000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a couple more seconds to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg "must wait 1"
                        cooldown "Travel" 1000
                        overhead "I'm tired from travelling..." 2086
                        wait 1500 
                        overhead "Just give me a second to recover!" 2086
                        clearsysmsg 
                        replay 
                    elseif insysmsg 'You do not see any' or insysmsg 'You cannot produce any'
                        @setvar! Working 0
                    
                        if MOVE = 1
                            if not cooldown "Move Timer"
                                @setvar! MOVE 0
                                overhead "[ KEEP MOVING... ]" 153
                                cooldown "Move Timer" 2500
                            endif

                            if EnableSatchels = 1
                                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 MyWizardBag
                                    if not cooldown "Satchel Timer"
                                        menu MyWizardBag 0
                                        wait 250
                                        cooldown "Satchel Timer" 60000
                                    endif
                                endif
        
                                if findtype "Yellow Potion|Orange Potion|Red Potion|White Potion|Blue Potion|Black Potion|" backpack and findtype 31262 self as MyPotBag
                                    if not cooldown "Satchel Timer" 
                                        menu MyPotBag 0
                                        wait 250
                                        cooldown "Satchel Timer" 60000
                                    endif
                                endif 
                            endif
                
                            if insysmsg "Being perfectly rested" 
                                overhead "Outta my way!  I've got a pickaxe and know how to use it..." 2086
                                if EnableSummons = 1 and followers > 1
                                    wait 1500
                                    overhead "Shall we incinerate them, master?" 44 myMainTankPet
                                    menu myMainTankPet 3
                                endif
                            endif
                
                            if insysmsg "Now tracking" or insysmsg "Distance to destination" and EnableRedAlertRecall = 1
                                @setvar! TimeToGo 1
                                replay
                            endif

                            if paralyzed and EnableParalyzePouch = 1
                                overhead "[[[[ POP ]]]]" 2117
                                say "[pouch" 
                                @setvar! TimeToGo 1
                                replay
                            endif
             
                                if findtype 'iron ore|iron ingots' backpack 
                                    hotkey 'Organizer Agent-03'
                                endif
                                
                                hotkey 'Organizer Agent-04'
                                replay
                            endif
                    
                        if MOVE = 0
                            if not cooldown "Move Timer"
                                overhead "[ KEEP MOVING... ]" 44
                                cooldown "Move Timer" 2500
                                @setvar! MOVE 1
                            endif

                            if EnableSatchels = 1
                                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 MyWizardBag
                                    if not cooldown "Satchel Timer"
                                        menu MyWizardBag 0
                                        wait 250
                                        cooldown "Satchel Timer" 60000
                                    endif
                                endif
    
                                if findtype "Yellow Potion|Orange Potion|Red Potion|White Potion|Blue Potion|Black Potion|" backpack and findtype 31262 self as MyPotBag
                                    if not cooldown "Satchel Timer" 
                                        menu MyPotBag 0
                                        wait 250
                                        cooldown "Satchel Timer" 60000
                                    endif
                                endif 
                            endif
                    
                            if insysmsg "Being perfectly rested" 
                                overhead "Move it!  I've got work to do" 2086
                                if EnableSummons = 1 and followers > 1
                                    wait 1000
                                    overhead "* growls... *" 44 myMainTankPet
                                    menu myMainTankPet 3
                                endif 
                            endif
                
                            if insysmsg "Now tracking" or insysmsg "Distance to destination" and EnableRedAlertRecall = 1
                                @setvar! TimeToGo 1
                                replay
                            endif
    
                            if paralyzed and EnableParalyzePouch = 1
                                overhead "[[[[ POP ]]]]" 2117
                                say "[pouch" 
                                @setvar! TimeToGo 1
                                replay
                            endif                                     

                            if findtype 'iron ore|iron ingots' backpack 
                                hotkey 'Organizer Agent-03'
                            endif
                                hotkey 'Organizer Agent-04'
                                replay                      
                        endif
                            clearsysmsg 
                            @setvar! MOVE 1
                            wait 500
                            replay   
                    endif 
            
            @setvar! Working 1
            wait 250
                
        while Working = 1
            
            if warmode 
                replay
            endif
        
            if insysmsg "Mining skillgain" 
                if skill 'Mining' > 100.0 and skill 'Mining' < 119.9
                    sysmsg "Hmm... these stones are tricky to work with..." 84
         
                elseif skill 'Mining' = 119.9
                    overhead "THIS COULD BE IT......" 2086
                    sysmsg "Hmm... there is something special about these stones..." 84
            
                elseif skill 'Mining' = 120.0
                    overhead "FINALLY!!!" 2086
                    wait 2000
                    overhead "We made it!" 2086
                    wait 1500
                    clearsysmsg 
                    overhead "[ TIME FOR A WELL DESERVED BREAK! ]" 337
                    stop    
                endif  
            endif      
            
            if EnableWeightWarningMessage = 1 and not cooldown "Weight Timer"
                if weight > GreenWarningWeight and weight < YellowWarningWeight
                    overhead "[ WEIGHT WARNING! ]" 77
                    cooldown "Weight Timer" 3500
                endif

                if weight > YellowWarningWeight and weight < RedWeightLimit
                    overhead "[ TIME TO FORGE! ]" 149
                    cooldown "Weight Timer" 3500
                endif 

                if weight > RedWeightLimit
                    @setvar! Working 0
                    overhead "[ WEIGHT LIMIT REACHED!!! ]" 337
                    wait 2000
                    overhead "Find a forge in order to continue..." 0
                    wait 1000
                    replay
                endif
            endif 
            
            if EnablePlayerForgeRadar = 1
                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 not cooldown "Forge Radar"
                    overhead "[ FORGE HERE! ]" 44 forge
                    overhead "▼" 44 forge
                    cooldown "Forge Radar" 3500
                endif 
            endif
            
            if EnableSummons = 1 
                if dead myMainTankPet
                    if not dead earthOne
                        @setvar! myMainTankPet earthOne
                    elseif not dead earthTwo
                        @setvar! myMainTankPet earthTwo
                    elseif not dead waterOne
                        @setvar! myMainTankPet waterOne
                    elseif not dead waterTwo
                        @setvar! myMainTankPet waterTwo
                    elseif not dead demonOne
                        @setvar! myMainTankPet demonOne
                    elseif not dead demonTwo
                        @setvar! myMainTankPet demonTwo
                    elseif not dead fireOne
                        @setvar! myMainTankPet fireOne
                    elseif not dead fireTwo
                        @setvar! myMainTankPet fireTwo
                    elseif not dead airOne
                        @setvar! myMainTankPet airOne
                    elseif not dead airTwo
                        @setvar! myMainTankPet airTwo
                    endif
                    overhead "Hold on..." 2086
                    wait 500
                    replay
                else 
                    if not cooldown "Guard Timer"
                        if EnableSummons = 1 and GuardComment = 1 and followers > 1
                            overhead "I'll keep watch while you work, Master..." 44 myMainTankPet
                            menu myMainTankPet 3
                            @setvar! GuardComment 2
                            wait 500
                            cooldown "Guard Timer" 120000
                        elseif EnableSummons = 1 and GuardComment = 2 and followers > 1
                            overhead "* looks around menacingly... *" 2117 myMainTankPet
                            menu myMainTankPet 3
                            @setvar! GuardComment 3
                            wait 500
                            cooldown "Guard Timer" 120000
                        elseif EnableSummons = 1 and GuardComment = 3 and followers > 1
                            overhead "I see a red, Master!  Oh wait.. nevermind... " 44 myMainTankPet
                            menu myMainTankPet 3
                            @setvar! GuardComment 4
                            wait 500
                            cooldown "Guard Timer" 120000
                        elseif EnableSummons = 1 and GuardComment = 4 and followers > 1
                            overhead "I don't like the look of that bird over there..." 44 myMainTankPet
                            menu myMainTankPet 3
                            wait 500
                            overhead "* growls... *" 0 myMainTankPet
                            @setvar! GuardComment 5
                            cooldown "Guard Timer" 120000
                        elseif EnableSummons = 1 and GuardComment = 5 and followers > 1
                            overhead "What time is lunch break?" 44 myMainTankPet
                            menu myMainTankPet 3
                            @setvar! GuardComment 6
                            wait 500
                            cooldown "Guard Timer" 120000
                        elseif EnableSummons = 1 and GuardComment = 6 and followers > 1
                            overhead "We should go fight something soon!" 44 myMainTankPet
                            menu myMainTankPet 3
                            @setvar! GuardComment 1
                            wait 500
                            cooldown "Guard Timer" 120000
                        endif
                    endif 
                endif
            endif 

            if insysmsg "Now tracking" or insysmsg "Distance to destination"
                @setvar! TimeToGo 1
                clearsysmsg
                replay
        
            elseif insysmsg 'world is saving' 
                    for 40
                        wait 100
                        if insysmsg 'world save complete' 
                            wait 100
                            overhead '[ SAVE COMPLETE! ]' 253 
                            clearsysmsg 
                            break
                        endif 
                    endfor 
                clearsysmsg
                
            elseif insysmsg "You loosen some rocks"
                overhead '* fail! *' 337
                clearsysmsg 
                
            elseif insysmsg "You dig some iron ore" 
                overhead '* you harvest iron ore *' 1900
                clearsysmsg
            
            elseif insysmsg "You dig some dull copper ore" 
                overhead '* you harvest dull copper ore *' 2419
                clearsysmsg     
  
            elseif insysmsg "You dig some shadowiron ore" 
                overhead '* you harvest shadow iron ore *' 2406
                clearsysmsg     

            elseif insysmsg "You dig some copper ore" 
                overhead '* you harvest copper ore *' 2413
                clearsysmsg  

            elseif insysmsg "You dig some bronze ore" 
                overhead '* you harvest bronze ore *' 2418
                clearsysmsg
                
            elseif insysmsg "You dig some golden ore" 
                overhead '* you harvest golden ore! *' 2213
                clearsysmsg
                
            elseif insysmsg "You dig some agapite ore" 
                overhead '* you harvest agapite ore! *' 2425
                clearsysmsg
                
            elseif insysmsg "You dig some verite ore" 
                overhead '* you harvest verite ore!! *' 2207
                clearsysmsg
                
            elseif insysmsg "You dig some valorite ore" 
                overhead '* you harvest valorite ore!! *' 2219
                clearsysmsg
                
            elseif insysmsg "You dig some avarite ore" 
                overhead '* you harvest avarite ore!!! *' 1763
                clearsysmsg
                
            elseif insysmsg 'You have worn out your tool' 
                overhead "They don't make em like they used too..." 2086
                wait 500 
                clearsysmsg
                replay

            elseif insysmsg "travel"
                replay
                
            elseif insysmsg 'You do not see any' or insysmsg 'You cannot produce any'
                overhead "[ TIME T0 MOVE! ]" 69
                @setvar! Working 0
                clearsysmsg
                replay
            endif 
        
        if not findtype 'pickaxe' hand and findtype 'pickaxe' backpack
            dclicktype 'pickaxe' backpack
            wait 250
        endif
         
        hotkey 'Use item in hand' 
        wft 500
        hotkey 'Target Self' 
        wait 100
   
    endwhile
    replay    
endif


        ////////////////////////////////
        //   REST/SKILL/DEATH LOOP:   //
        ////////////////////////////////

if dead 
    wait 2500
    overhead "Well... shit..." 2086
    wait 1500
    overhead '[ STOPPING SCRIPT... ]' 337
    stop
endif

if not cooldown "Travel"  
    wait 500
    overhead "Train skill to 50.0 at NPC and then restart script!" 0
    wait 2500
    overhead '[ STOPPING SCRIPT... ]' 337
    stop    
else 
    if not cooldown "Move Timer" 
        overhead "* resting... *" 0
        cooldown "Move Timer" 6000
        if EnableSummons = 1 and not cooldown "Guard Timer" and followers > 1
            wait 2500
            overhead "* yawns... *" 2117 myMainTankPet
            menu myMainTankPet 3
            cooldown "Guard Timer" 30000
        endif 
    endif
    
    if EnableSatchels = 1
        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 MyWizardBag
            if not cooldown "Satchel Timer"
                menu MyWizardBag 0
                wait 250
                cooldown "Satchel Timer" 60000
            endif
        endif
    
        if findtype "Yellow Potion|Orange Potion|Red Potion|White Potion|Blue Potion|Black Potion|" backpack and findtype 31262 self as MyPotBag
            if not cooldown "Satchel Timer" 
                menu MyWizardBag 0
                wait 250
                cooldown "Satchel Timer" 60000
            endif
        endif 
    endif
                    
    if insysmsg "Being perfectly rested" 
        overhead "Leave me alone, I'm tryin to rest here..." 2086
        wait 500
        if EnableSummons = 1 and not cooldown "Guard Timer" and followers > 1
            wait 2500
            overhead "* growls... *" 2117 myMainTankPet
            menu myMainTankPet 3
            cooldown "Guard Timer" 60000
        endif 
        clearsysmsg 
    endif
                
    if insysmsg "Now tracking" or insysmsg "Distance to destination" and EnableRedAlertRecall = 1
        @setvar! TimeToGo 1
        replay
    endif

    if paralyzed and EnableParalyzePouch = 1
        overhead "[[[[ POP ]]]]" 2117
        say "[pouch" 
        @setvar! TimeToGo 1
        replay
    endif                
 
    if insysmsg "As the owner" or insysmsg "Your house and its contents"
        wait 1500
        if find MyDoor ground -1 -1 2
            overhead "* door slams! *" 0 MyDoor
            dclick MyDoor 
            wait 500
        endif
    endif                        
    
    if findtype 'iron ore|iron ingots' backpack 
       hotkey 'Organizer Agent-03'
    endif

            hotkey 'Organizer Agent-03'
            wait 250
            hotkey 'Organizer Agent-04'
    replay
endif 
replay


        //////////////
        // THE END! //
        //////////////
DanStock's ULTIMATE MINING AUTO PILOT (DEXXER, MAGE AND/OR SUMMONER w/ AUTO RECALL & MORE!) by danstock._98439

Warning: This is potentially a huge script, skipping formatting.

Quick Filters
