# This script is a basic version of my Ultimate Harvest script! I know many people have been wanting one for a while.
# For those who just want a basic mining script with auto recall and a few QOL elements included
# This script does NOT include any offensive or defensive measures (beyond popping pouches when paralyzed and recalling)
# It also does NOT include any AFTER RECALL support (unloading, forging, resupplying, etc.) Please checkout my big Harvest Script if you need more features!
# Script includes:
// AUTO RED RECALL (w/ tracking skill and non-tracking skill triggers - uses either Casting or Charged Runebook/Runetome)
// AUTO POUCH POP (will pop trapped pouches if paralyzed and attempt to recall)
// INGOT RECALL (optional - set ingot amount below)
// WAR MODE RECALL (optional - War Mode will trigger recall w/ brief countdown)
// AUTOMATICALLY FORGE (optional - Locates and indicates PLAYER FORGES and always checks for NATURAL FORGES)
// AUTOMATICALLY TRANSFER ORE TO PACK ANIMAL (optional w/ support for up to two animals)
// INGOT PROTECTION (optional stacking, hiding or securing in locked box)
/////////
//////// Lord Glaciers Chill MINER AUTO PILOT UO OUTLANDS RAZOR SCRIPT - version 1.0.0 - Released July 8, 2025
///////
//////
///// Compiled by Lord Glacier (aka. DanStock.)
//// Inspired by & learned from various scripts found on: https://outlands.uorazorscripts.com/
///
# This script is a basic version of my Ultimate Harvest script! I know many people have been wanting one for a while.
# For those who just want a basic mining script with auto recall and a few QOL elements included
# This script does NOT include any offensive or defensive measures (beyond popping pouches when paralyzed and recalling)
# It also does NOT include any AFTER RECALL support (unloading, forging, resupplying, etc.) You can trigger your own DIY RECALL SCRIPT instead!
# Please checkout my big Harvest Script if you need more features! GOOD LUCK OUT THERE!
# Script includes:
// AUTO RED RECALL (w/ tracking skill and non-tracking skill triggers - uses either Casting or Charged Runebook/Runetome)
// AUTO POUCH POP (will pop trapped pouches if paralyzed and attempt to recall)
// INGOT RECALL (optional - set ingot amount below)
// WAR MODE RECALL (optional - War Mode will trigger recall w/ brief countdown)
// OVERHEAD MESSAGES (optional - colour coded overhead displays with multiple settings)
// TOOL DECAY NOTICE and/or RECYCLING (optional - recyling requires 'Tool Kit' in inventory)
// AUTOMATICALLY FORGE (optional - Locates and indicates PLAYER FORGES and always checks for NATURAL FORGES)
// AUTOMATICALLY TRANSFER ORE TO PACK ANIMAL (optional w/ support for up to two animals)
// INGOT PROTECTION (optional stacking, hiding or securing in locked box)
# Required (or suggested *) inventory items:
# Pickaxes
# A blessed escape runebook (charged w/ recall scrolls if no Magery skill)
# Trapped pouches *
# Wooden Box w/ copper key *
# Tool Kit (for tool recycle) *
//////////////////////////////
// RESET SCRIPT HERE: //
//////////////////////////////
////// SET THIS VALUE TO '1' AND RUN SCRIPT TO UNSET ALL PERMANENT SCRIPT VARIABLES: \\\\\\
@setvar! SCRIPTRESET 0
################### THEN RETURN 'SCRIPTRESET' TO '0' TO RESTART THE INITIAL SETUP ###################
#### (Or you can re-target script variables individually in the 'Options' tab above the script!) ####
#####################################################
### OPTIONAL COOLDOWNS TO ADD IN UO CLIENT: ###
#####################################################
# Travel
# * NOT required for script function
##########################################
// VARIABLES: //
##########################################
@setvar! EnableOverheadMessages 1
# Disable or Enable unnecessary overhead messages/texts
# Set to '1' for ALL messages on or '2' for only important messages (or '0' for none)
@setvar! EnableAutoParalyzePouch 1
# Will automatically pop trapped pouches if paralyzed
@setvar! EnableToolCountdown 1
# System message countdown when pickaxe is about to break
@setvar! EnableRecycleTool 0
# Will automatically recycle your pickaxe before final use
# Requires tinker 'tool kit' in inventory
@setvar! EnablePlayerForgeRadar 1
@setvar! EnableAutoSmeltPlayerForge 1
@setvar! EnableAutoSmeltNaturalForge 1
@setvar! EnableOreVacuum 0
@setvar! EnableOreStacker 0
@setvar! EnablePackAnimals 0
@setvar! PackAnimalCount 0
# Can be set to 1 or 2 (or 0)
# Ore can be transfered to packy based on Ore Amount:
@setvar! OreTransfertoPackyAmount 0
# or Diff Weight:
@setvar! TransfertoPackyWeightDiff 50
# You can choose to set a storage bag for your Ingots:
@setvar! EnableIngotBag 0
# It can be a trapped pouch for security but, if so, disable opening Ingot Bag:
@setvar! OpenIngotBag 0
# Otherwise, this will open your Ingot Bag when stacking ingots or unloading (at home/inn/bank/etc.)
@setvar! StackOreinIngotBag 0
# This will stack ore inside your Ingot Bag (instead of main backpack)
@setvar! StackIngotsinIngotBag 0
# This will stack all the ingots on the same pixel in your Ingot Bag for additional security
# Or you can put them in a locked box instead (recommended):
@setvar! PutIngotsinLockedChest 0
# Must have WOODEN BOX and matching COPPER KEY in backpack (can be crafted with 50 carpentry/50 tinkering)
@setvar! EnableWeightWarningMessage 1
@setvar! GreenWarningDiffWeight 50
@setvar! YellowWarningDiffWeight 25
@setvar! RedWeightLimitDiffWeight 5
# Overhead weight warning message settings
//////////////////////////
// AUTO-RECALL: //
//////////////////////////
################################
#### RECALL TRIGGERS: ####
################################
// RED RECALL (w/ TRACKING SKILL): //
if skill "Tracking" >= 50
@setvar! EnableTrackingAutoRecall 1
@setvar! PKTrackingRange 70
# Range can be 50, 60 or 70 tiles (or '0' will trigger Auto Recall regardless of range)
# Make sure 'Ignore Houses/Ships' is checked in the Tracking skill menu!
# I also highly recommend setting up a Razor overhead message for tracking REDS...
// Doing this will display PK name and tile distance overhead (when tracked):
// Add overhead message w/ a trigger of 'Now tracking' and message '[ RED ALERT: {3} ]' (hue 335)
// Then a second with a trigger of 'Distance to destination' and message '[ {4} TILES AWAY! ]' (hue 253
// RED RECALL (w/ NO TRACKING SKILL): //
elseif skill "Tracking" < 50
@setvar! EnablePKradar 1
@setvar! EnableAutoRedRecall 1
endif
# This will work in a pinch, but is not ideal (your harvester should have tracking skill IMO)
# PK Radar will only pikcup Reds within target distance (but it is better than nothing)
// INGOT RECALL: //
@setvar! EnableIngotAutoRecall 0
@setvar! IngotRecallAmount 2500
# Will trigger auto recall if ingot total exceeds target
// WAR MODE RECALL: //
@setvar! EnableWARmodeAutoRecall 0
@setvar! EnableWarModeRecallCountdown 0
# Will trigger auto recall if WAR MODE is activated (w/ optional brief overhead countdown)
#####################################################
#### YOU CAN USE YOUR OWN RAZOR RECALL SCRIPT: ####
#####################################################
# Enable use of your own Razor script for Auto Recall (otherwise script will prompt for a Runebook or Rune and use built-in auto recall):
@setvar! EnableDIYRecallScript 0
# Type the name of your own Recall Razor script here:
createlist DIYRecallScriptList
pushlist DIYRecallScriptList "YOUR DIY SCRIPT NAME HERE"
#####################################################
#### OR USE THE BUILT-IN AUTO RECALL SCRIPT: ####
#####################################################
// Script will use charged recall scrolls if casting is disabled
# Casting uses RUNE or RUNEBOOK/RUNETOME (default location)
# Scrolls uses FIRST RUNE in RUNEBOOK or FIRST RUNE in RUNETOME (set 'EnableCastRecall' to '0')
@setvar! EnableCastRecall 0
if EnableCastRecall = 0
# If using scroll charges, choose to use Runebook or Runetome:
@setvar! ChargedRunebook 1
# or
@setvar! ChargedRunetome 0
endif
if EnableCastRecall = 1
# If casting Recall, choose to target Runebook or Rune:
@setvar! CasttoRunebook 1
# or
@setvar! CasttoRunetome 0
# or
@setvar! CasttoRune 0
endif
///////////////////////////////////////////////
// SCRIPT ENDS UPON SUCCESSFUL AUTO RECALL //
///////////////////////////////////////////////
/////////////////////
// END OF SETUP! //
/////////////////////
############ 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! ############
if not timerexists "ForgeRadar"
createtimer "ForgeRadar"
settimer "ForgeRadar" 3500
endif
if not timerexists "OreRadar"
createtimer "OreRadar"
settimer "OreRadar" 3500
endif
if not timerexists "IngotRadar"
createtimer "IngotRadar"
settimer "IngotRadar" 3500
endif
if not timerexists "ForgeRadar"
createtimer "ForgeRadar"
settimer "ForgeRadar" 3500
endif
if not timerexists "ForgingTimer"
createtimer "ForgingTimer"
settimer "ForgingTimer" 3500
endif
if not timerexists "SmeltingTimer"
createtimer "SmeltingTimer"
settimer "SmeltingTimer" 3500
endif
if not timerexists "NaturalForgeTimer"
createtimer "NaturalForgeTimer"
settimer "NaturalForgeTimer" 2500
endif
if not timerexists "OreStackerTimer"
createtimer "OreStackerTimer"
settimer "OreStackerTimer" 60000
endif
if not timerexists "StackerTimer"
createtimer "StackerTimer"
settimer "StackerTimer" 3500
endif
if not timerexists "PackyFollowOne"
createtimer "PackyFollowOne"
settimer "PackyFollowOne" 30000
endif
if not timerexists "PackyFollowTwo"
createtimer "PackyFollowTwo"
settimer "PackyFollowTwo" 30000
endif
if not timerexists "PackyCheckTimer"
createtimer "PackyCheckTimer"
settimer "PackyCheckTimer" 15000
endif
if not timerexists "PackySmeltTimer"
createtimer "PackySmeltTimer"
settimer "PackySmeltTimer" 3500
endif
if not timerexists "PackyStorageTimer"
createtimer "PackyStorageTimer"
settimer "PackyStorageTimer" 3500
endif
if not timerexists "HarvestDelay"
createtimer "HarvestDelay"
settimer "HarvestDelay" 5000
endif
if not timerexists "MinerOrganizer"
createtimer "MinerOrganizer"
settimer "MinerOrganizer" 30000
endif
if not timerexists "IngotRecallTimer"
createtimer "IngotRecallTimer"
settimer "IngotRecallTimer" 30000
endif
if not timerexists "ManaTimer"
createtimer "ManaTimer"
settimer "ManaTimer" 0
endif
if not timerexists "MoveTimer"
createtimer "MoveTimer"
settimer "MoveTimer" 60000
endif
if not timerexists "WeightTimer"
createtimer "WeightTimer"
settimer "WeightTimer" 60000
endif
if not timerexists "TravelTimer"
createtimer "TravelTimer"
settimer "TravelTimer" 60000
endif
if not dead
if DEAD != 1
if SCRIPTRESET = 1
unsetvar DanStock.
unsetvar FIRSTRUN
unsetvar mining_runetome
unsetvar mining_runebook
unsetvar mining_rune
unsetvar IngotBag
unsetvar MyLootBag
unsetvar MyLootChest
unsetvar myMainPackAnimal
unsetvar mySecondPackAnimal
@setvar! TimeToGo 0
clearignore
overhead "All permanent script variables reset!" 84
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
sysmsg "Stopping script..." 0
stop
endif
if not varexist DanStock.
sysmsg "Starting script......" 0
wait 1500
overhead "Lord Glacier's Mining Auto Pilot Script v1.0 LITE" 2338
# '
wait 500
overhead "Released: July 8, 2025" 2234
wait 2500
overhead "Thank you for trying my Mining Auto Pilot script! It appears this may be your first time running it..." 0
wait 4000
overhead "IMPT: Please make sure to setup all of your required VARIABLES!" 153
wait 3000
overhead "If you require a more from the script (ie. summons, fighting MOBs, etc), please checkout my Ultimate Harvest script instead!" 0
wait 4500
setvar DanStock. 1
sysmsg "Beginning Mining Auto Pilot script setup...... " 0
wait 1500
sysmsg "This is best done from inside your HOME or INN ROOM!" 253
wait 1500
endif
if EnableDIYHomeRecallScript != 1
if EnableTrackingAutoRecall = 1 or EnableIngotAutoRecall = 1 or EnableRecallAfterRessurection = 1
if EnableCastRecall = 1 and CasttoRunebook = 1
if not varexist mining_runebook or not find mining_runebook self
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 now CAST recall to 'default' rune in RUNEBOOK upon AUTO RECALL trigger" 0
wait 2500
endif
elseif EnableCastRecall = 1 and CasttoRunetome = 1
if not varexist mining_runetome or not find mining_runetome self
wait 1000
overhead "First off, please select your Escape Runetome..." 88
wait 1500
overhead "[ SELECT RUNETOME... ]" 253
setvar mining_runetome
wft 500
while targetexists
wait 100
endwhile
overhead "[ RUNETOME SELECTED! ]" 93
wait 1500
overhead "Script will now CAST recall to 'default' rune in RUNETOME upon AUTO RECALL trigger" 0
wait 2500
endif
elseif EnableCastRecall = 1 and CasttoRune = 1
if not varexist mining_rune or not find mining_rune self
wait 1000
overhead "First off, please select your Escape Rune..." 88
wait 1500
overhead "[ SELECT RUNE... ]" 253
setvar mining_rune
wft 500
while targetexists
wait 100
endwhile
overhead "[ RUNE SELECTED! ]" 93
wait 1500
overhead "Script will now CAST recall to selected RUNE upon AUTO RECALL trigger" 0
wait 2500
endif
elseif EnableCastRecall = 0 and ChargedRunebook = 1
if not varexist mining_runebook or not find mining_runebook self
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 "[ RUNEBOOK SELECTED! ]" 93
wait 1500
overhead "Script will now use recall SCROLL (to FIRST RUNE in RUNEBOOK) upon AUTO RECALL trigger" 0
wait 2500
endif
elseif EnableCastRecall = 0 and ChargedRunetome = 1
if not varexist mining_runetome or not find mining_runetome self
wait 1000
overhead "First off, please select your Escape Runetome..." 88
wait 1500
overhead "[ SELECT RUNETOME... ]" 253
setvar mining_runetome
wft 500
while targetexists
wait 100
endwhile
overhead "[ RUNETOME SELECTED! ]" 93
wait 1500
overhead "Script will now use recall SCROLL (to FIRST RUNE in RUNETOME) upon AUTO RECALL trigger" 0
wait 2500
endif
endif
endif
endif
if EnableIngotBag = 1
if not varexist IngotBag
wait 1500
overhead "Next, choose your ingot storage bag..." 88
wait 1500
overhead "[ SELECT INGOT BAG... ]" 253
setvar IngotBag
wft 500
while targetexists
wait 100
endwhile
overhead "[ INGOT BAG SET! ]" 93
wait 3000
elseif not find IngotBag self
wait 1000
overhead "[ SELECT NEW INGOT BAG... ]" 253
setvar IngotBag
wft 500
while targetexists
wait 100
endwhile
overhead "[ INGOT BAG SET! ]" 93
wait 500
endif
endif
if not varexist FIRSTRUN
sysmsg "Verifying initial setup is complete.......... " 0
wait 3500
overhead "Ok, looks like you are good to go!" 0
wait 3000
overhead "Good luck out there and thanks again for trying my script!" 0
overhead " - Dan " 0
setvar FIRSTRUN 1
wait 3000
sysmsg "GLACIERS ULTIMATE MINER AUTO PILIOT SCRIPT SETUP COMPLETE!" 84
wait 1500
overhead "[ HAPPY MINING!! ]" 2086
wait 3000
endif
endif
endif
while not dead
while queued
wait 100
endwhile
if insysmsg "Captcha successful" and EnableOverheadMessages = 1
overhead "I guess you got the magic numbers correct??" 2086
wait 1500
overhead "Alright, let's hit some rocks..." 2086
# '
clearsysmsg
endif
if EnableAutoParalyzePouch = 1
if paralyzed
if EnableOverheadMessages = 1
overhead "[ [ [ [POP] ] ] ]" 2117
endif
say "[pouch"
if EnableRedAlertOverhead = 1 and EnableOverheadMessages != 0
overhead "[ !!RED ALERT!! ]" 37
endif
@setvar! RedTargetFound 1
@setvar! TimeToGo 1
endif
endif
if EnableTrackingAutoRecall = 1
if skill "Tracking" >= 50 and not findbuff "tracking"
while not gumpexists 4267467659
useskill "tracking"
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 500
clearsysmsg
endif
gumpclose 4267467659
if EnableOverheadMessages = 1
overhead "*tracking reds...*" 334
elseif EnableOverheadMessages = 2
overhead "[ AUTO RECALL ON! ]" 84
endif
endif
if PKTrackingRange = 70
if insysmsg ": 70 step" or insysmsg "70 space" or insysmsg ": 69 step" or insysmsg "69 space" or insysmsg ": 68 step" or insysmsg "68 space" or insysmsg ": 67 step" or insysmsg "67 space" or insysmsg ": 66 step" or insysmsg "66 space" or insysmsg ": 65 step" or insysmsg "65 space" or insysmsg ": 64 step" or insysmsg "64 space" or insysmsg ": 63 step" or insysmsg "63 space" or insysmsg ": 62 step" or insysmsg "62 space" or insysmsg ": 61 step" or insysmsg "61 space" or insysmsg ": 60 step" or insysmsg "60 space" or insysmsg ": 59 step" or insysmsg "59 space" or insysmsg ": 58 step" or insysmsg "58 space" or insysmsg ": 57 step" or insysmsg "57 space" or insysmsg ": 56 step" or insysmsg "56 space" or insysmsg ": 55 step" or insysmsg "55 space" or insysmsg ": 54 step" or insysmsg "54 space" or insysmsg ": 53 step" or insysmsg "53 space" or insysmsg ": 52 step" or insysmsg "52 space" or insysmsg ": 51 step" or insysmsg "51 space" or insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"
if EnableRedAlertOverhead = 1 and EnableOverheadMessages != 0
overhead "[ !! RED ALERT !! ]" 37
endif
@setvar! RedTargetFound 1
@setvar! TimeToGo 1
clearsysmsg
endif
elseif PKTrackingRange = 60
if insysmsg ": 60 step" or insysmsg "60 space" or insysmsg ": 59 step" or insysmsg "59 space" or insysmsg ": 58 step" or insysmsg "58 space" or insysmsg ": 57 step" or insysmsg "57 space" or insysmsg ": 56 step" or insysmsg "56 space" or insysmsg ": 55 step" or insysmsg "55 space" or insysmsg ": 54 step" or insysmsg "54 space" or insysmsg ": 53 step" or insysmsg "53 space" or insysmsg ": 52 step" or insysmsg "52 space" or insysmsg ": 51 step" or insysmsg "51 space" or insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"
if EnableRedAlertOverhead = 1 and EnableOverheadMessages != 0
overhead "[ !! RED ALERT !! ]" 37
endif
@setvar! RedTargetFound 1
@setvar! TimeToGo 1
clearsysmsg
endif
elseif PKTrackingRange = 50
if insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"
if EnableRedAlertOverhead = 1 and EnableOverheadMessages != 0
overhead "[ !! RED ALERT !! ]" 37
endif
@setvar! RedTargetFound 1
@setvar! TimeToGo 1
clearsysmsg
endif
elseif PKTrackingRange = 0
if insysmsg "Now tracking"
if EnableRedAlertOverhead = 1 and EnableOverheadMessages != 0
overhead "[ !! RED ALERT !! ]" 37
endif
@setvar! RedTargetFound 1
@setvar! TimeToGo 1
clearsysmsg
endif
endif
endif
if EnablePKradar = 1 and skill "Tracking" < 50
if timer "PKRadar" > 1000
hotkey "Next Murderer Player Target"
wait 350
if insysmsg "No one matching that was found"
settimer "PKRadar" 0
clearsysmsg
else
@setvar! RedTargetFound 1
@setvar! TimeToGo 1
@setvar! MurdererTarget lasttarget
clearsysmsg
endif
endif
endif
if TimeToGo = 1
if EnableAutoRedRecall = 1 and RedTargetFound = 1
@setvar! MurdererFound 1
while mana < 11
if timer "ManaTimer" > 3500 and EnableOverheadMessages != 0
overhead "[ MOVE!! ]" 12
settimer "ManaTimer" 0
endif
wait 500
endwhile
if EnableOverheadMessages = 1
overhead "[ RED ALERT!! ]" 37
endif
if EnableDIYRecallScript = 1
@setvar! RedTargetFound 0
@setvar! TimeToGo 0
foreach RecallScript in DIYRecallScriptList
script RecallScript
endfor
else
@setvar! RECALLTIME 1
getlabel backpack backpacklabel
endif
elseif EnableTrackingAutoRecall = 1 and RedTargetFound = 1
@setvar! MurdererFound 1
while mana < 11
if timer "ManaTimer" > 3500 and EnableOverheadMessages != 0
overhead "[ MOVE!! ]" 12
settimer "ManaTimer" 0
endif
wait 500
endwhile
if EnableOverheadMessages = 1
overhead "[ RED ALERT!! ]" 37
endif
if EnableDIYRecallScript = 1
@setvar! RedTargetFound 0
@setvar! TimeToGo 0
foreach RecallScript in DIYRecallScriptList
script RecallScript
endfor
else
@setvar! RECALLTIME 1
getlabel backpack backpacklabel
endif
elseif EnableWARmodeAutoRecall = 1 and AutoRecallTriggered = 1
while mana < 11
if timer "ManaTimer" > 3500 and EnableOverheadMessages != 0
overhead "*waiting for mana...*" 12
settimer "ManaTimer" 0
endif
wait 500
endwhile
if EnableOverheadMessages = 1
overhead "[ WAR AUTO RECALL! ]" 88
wait 500
endif
if EnableWarModeRecallCountdown = 1
sysmsg "Toggle PEACE MODE to cancel AUTO RECALL!" 88
overhead "3" 77
if not warmode
if EnableOverheadMessages = 1
overhead "[ AUTO RECALL STOPPED... ]" 337
endif
@setvar! AutoRecallTriggered 0
@setvar! TimeToGo 0
replay
endif
wait 750
overhead "2" 44
if not warmode
if EnableOverheadMessages = 1
overhead "[ AUTO RECALL STOPPED... ]" 337
endif
@setvar! AutoRecallTriggered 0
@setvar! TimeToGo 0
replay
endif
wait 750
overhead "1" 33
wait 250
endif
if not warmode
if EnableOverheadMessages = 1
overhead "[ AUTO RECALL STOPPED... ]" 337
endif
@setvar! AutoRecallTriggered 0
@setvar! TimeToGo 0
replay
endif
wait 500
if EnableDIYRecallScript = 1
@setvar! AutoRecallTriggered 0
@setvar! TimeToGo 0
foreach RecallScript in DIYRecallScriptList
script RecallScript
endfor
else
@setvar! AutoRecallTriggered 0
@setvar! TimeToGo 0
@setvar! RECALLTIME 1
hotkey 'Toggle Peace Only'
getlabel backpack backpacklabel
endif
elseif EnableIngotAutoRecall = 1 and AutoRecallTriggered = 1
while mana < 11
if timer "ManaTimer" > 3500 and EnableOverheadMessages != 0
overhead "*waiting for mana...*" 12
settimer "ManaTimer" 0
endif
wait 500
endwhile
if EnableOverheadMessages = 1
overhead "[ INGOT AUTO RECALL! ]" 88
wait 1000
endif
if EnableDIYRecallScript = 1
@setvar! AutoRecallTriggered 0
@setvar! TimeToGo 0
foreach RecallScript in DIYRecallScriptList
script RecallScript
endfor
else
@setvar! AutoRecallTriggered 0
@setvar! TimeToGo 0
@setvar! RECALLTIME 1
getlabel backpack backpacklabel
endif
endif
if RECALLTIME = 1
if skill 'Magery' >= 60 and EnableCastRecall = 1
cast "Recall"
while not targetexists
wait 100
endwhile
wait 500
if CasttoRunebook = 1
wft 500
target mining_runebook
wait 500
elseif CasttoRunetome = 1
wft 500
target mining_runetome
wait 500
elseif CasttoRune = 1
wft 500
target mining_rune
wait 500
endif
for 5
wait 500
if insysmsg "Your concentration is disturbed"
clearsysmsg
if EnableOverheadMessages != 0
overhead "[ INTERUPTED! ]" 153
wait 1500
endif
cast "Recall"
while not targetexists
wait 100
endwhile
if CasttoRunebook = 1
wft 500
target mining_runebook
wait 500
elseif CasttoRunetome = 1
wft 500
target mining_runetome
wait 500
elseif CasttoRune = 1
wft 500
target mining_rune
wait 500
endif
if insysmsg "Your concentration is disturbed"
wait 1000
else
break
endif
endif
endfor
elseif EnableCastRecall = 0 or skill 'Magery' < 60
if ChargedRunebook = 1
dclick mining_runebook
waitforgump 1551740969
gumpresponse 2
wait 1000
elseif ChargedRunetome = 1
dclick mining_runetome
waitforgump 167090027
gumpresponse 100
wait 1000
endif
for 5
wait 500
if insysmsg "Your concentration is disturbed"
clearsysmsg
if EnableOverheadMessages != 0
overhead "[ INTERUPTED! ]" 153
wait 2500
endif
if ChargedRunebook = 1
dclick mining_runebook
waitforgump 1551740969
gumpresponse 2
wait 1000
elseif ChargedRunetome = 1
dclick mining_runetome
waitforgump 167090027
gumpresponse 100
wait 1000
endif
endif
endfor
endif
overhead "[ SCRIPT COMPLETE! ]" 84
@setvar! RedTargetFound 0
@setvar! RECALLTIME 0
@setvar! TimeToGo 0
stop
endif
endif
if TravelCooldownActive = 1
clearsysmsg
hotkey "Use item in hand"
wft 1500
hotkey "Target Self"
wait 500
if insysmsg "must wait 59"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
clearsysmsg
cooldown "Travel" 59000
settimer "TravelTimer" 1000
@setvar! TravelCooldownActive 0
replay
elseif insysmsg "must wait 58"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 58000
settimer "TravelTimer" 2000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 57"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 57000
settimer "TravelTimer" 3000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 56"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 56000
settimer "TravelTimer" 4000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 55"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 55000
settimer "TravelTimer" 5000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 54"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 54000
settimer "TravelTimer" 6000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 53"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 53000
settimer "TravelTimer" 7000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 52"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 52000
settimer "TravelTimer" 8000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 51"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 51000
settimer "TravelTimer" 9000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 50"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 50000
settimer "TravelTimer" 10000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 49"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 49000
settimer "TravelTimer" 11000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 48"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 48000
settimer "TravelTimer" 12000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 47"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 47000
settimer "TravelTimer" 13000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 46"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 46000
settimer "TravelTimer" 14000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 45"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 45000
settimer "TravelTimer" 15000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 44"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 44000
settimer "TravelTimer" 16000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 43"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 43000
settimer "TravelTimer" 17000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 42"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 42000
settimer "TravelTimer" 18000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 41"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a minute to recover!" 2086
endif
cooldown "Travel" 41000
settimer "TravelTimer" 19000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 40"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 40000
settimer "TravelTimer" 20000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 39"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 39000
settimer "TravelTimer" 21000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 38"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 38000
settimer "TravelTimer" 22000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 37"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 37000
settimer "TravelTimer" 23000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 36"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 36000
settimer "TravelTimer" 24000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 35"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 35000
settimer "TravelTimer" 25000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 34"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 34000
settimer "TravelTimer" 26000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 33"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 33000
settimer "TravelTimer" 27000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 32"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 32000
settimer "TravelTimer" 28000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 31"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 31000
settimer "TravelTimer" 29000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 30"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 30000
settimer "TravelTimer" 30000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 29"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 29000
settimer "TravelTimer" 31000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 28"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit to recover!" 2086
endif
cooldown "Travel" 28000
settimer "TravelTimer" 32000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 27"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 27000
settimer "TravelTimer" 33000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 26"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 26000
settimer "TravelTimer" 34000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 25"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 25000
settimer "TravelTimer" 35000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 24"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 24000
settimer "TravelTimer" 36000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 23"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 23000
settimer "TravelTimer" 37000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 22"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 22000
settimer "TravelTimer" 38000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 21"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 21000
settimer "TravelTimer" 39000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 20"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 20000
settimer "TravelTimer" 40000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 19"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 19000
settimer "TravelTimer" 41000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 18"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 18000
settimer "TravelTimer" 42000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 17"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 17000
settimer "TravelTimer" 43000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 16"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 16000
settimer "TravelTimer" 44000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 15"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 15000
settimer "TravelTimer" 45000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 14"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a bit longer to recover!" 2086
endif
cooldown "Travel" 14000
settimer "TravelTimer" 46000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 13"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a little bit longer to recover!" 2086
endif
cooldown "Travel" 13000
settimer "TravelTimer" 47000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 12"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a little bit longer to recover!" 2086
endif
cooldown "Travel" 12000
settimer "TravelTimer" 48000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 11"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a little bit longer to recover!" 2086
endif
cooldown "Travel" 11000
settimer "TravelTimer" 49000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 10"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a little bit longer to recover!" 2086
endif
cooldown "Travel" 10000
settimer "TravelTimer" 50000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 9"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a few more seconds to recover!" 2086
endif
cooldown "Travel" 9000
settimer "TravelTimer" 51000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 8"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a few more seconds to recover!" 2086
endif
cooldown "Travel" 8000
settimer "TravelTimer" 82000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 7"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a few more seconds to recover!" 2086
endif
cooldown "Travel" 7000
settimer "TravelTimer" 53000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 6"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a few more seconds to recover!" 2086
endif
cooldown "Travel" 6000
settimer "TravelTimer" 54000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 5"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a few more seconds to recover!" 2086
endif
cooldown "Travel" 5000
settimer "TravelTimer" 55000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 4"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a few more seconds to recover!" 2086
endif
cooldown "Travel" 4000
settimer "TravelTimer" 56000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 3"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a few more seconds to recover!" 2086
endif
cooldown "Travel" 3000
settimer "TravelTimer" 57000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 2"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a couple more seconds to recover!" 2086
endif
cooldown "Travel" 2000
settimer "TravelTimer" 58000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
elseif insysmsg "must wait 1"
if EnableOverheadMessages = 1
overhead "I am tired from travelling..." 2086
wait 1500
overhead "Just give me a second to recover!" 2086
endif
cooldown "Travel" 1000
settimer "TravelTimer" 59000
@setvar! TravelCooldownActive 0
clearsysmsg
replay
else
@setvar! TravelCooldownActive 0
clearsysmsg
replay
endif
endif
if timer "TravelTimer" < 60000
if timer "RestingTimer" > 6000 and EnableOverheadMessages != 0
overhead "*resting...*" 0
settimer "RestingTimer" 0
endif
if insysmsg "Being perfectly rested" and EnableOverheadMessages = 1
overhead "Leave me alone, I am tryin to rest here..." 2086
wait 500
clearsysmsg
endif
replay
elseif timer "TravelTimer" > 60000 and skill "Mining" < 50
wait 500
overhead "Train your mining skill to 50.0 at NPC and then restart script!" 0
wait 2500
overhead "[ STOPPING SCRIPT... ]" 337
stop
endif
if timer "TravelTimer" > 60000
if hidden
if EnableOverheadMessages != 0
overhead "[ HIDDEN... ]" 6
endif
wait 1000
sysmsg "You cannot mine while hidden! Please unhide and try again..." 0
wait 3000
replay
endif
if PutIngotsinLockedChest = 1
if not findtype "wooden box" backpack or not findtype "copper key" backpack
if EnableOverheadMessages != 0
overhead "[ NO LOCKBOX FOUND! ]" 339
endif
wait 500
elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1
if EnableOverheadMessages != 0
overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 339
endif
wait 500
elseif findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key
getlabel lockbox lockboxLabel
if "items" in lockboxLabel
dclick key
wft 1000
target lockbox
wait 500
if EnableOverheadMessages != 0
overhead "[lockbox secured]" 84
endif
endif
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 timer "ForgeRadar" > 3500
if EnableOverheadMessages = 1
overhead "[ FORGE ]" 44 forge
overhead "▼" 44 forge
elseif EnableOverheadMessages = 2
overhead "▼" 44 forge
endif
settimer "ForgeRadar" 0
endif
endif
if EnableOreVacuum = 1
if findtype "iron ore" ground -1 -1 15 as droppedore and timer "OreRadar" > 3500
if EnableOverheadMessages = 1
overhead "[ ORE ]" 93 droppedore
overhead "▼" 93 droppedore
elseif EnableOverheadMessages = 2
overhead "▼" 93 droppedore
endif
settimer "OreRadar" 0
endif
if findtype "iron ingot%s" ground -1 -1 15 as droppedingots and timer "IngotRadar" > 3500
if EnableOverheadMessages = 1
overhead "[ INGOTS ]" 69 droppedingots
overhead "▼" 69 droppedingots
elseif EnableOverheadMessages = 2
overhead "▼" 69 droppedingots
endif
settimer "IngotRadar" 0
endif
while findtype "iron ore|iron ingot%s" ground -1 -1 2 as droppedmetal
clearsysmsg
if EnableOverheadMessages = 1
overhead "*picking up metal...*" 93
endif
hotkey "Grab Item"
wft 1500
target droppedmetal
wait 500
if insysmsg "Invalid or inaccessible item"
if EnableOverheadMessages = 1
overhead "I cannot get to that!" 2086
endif
@ignore droppedmetal
endif
if SetIngotBagtoOrganizer03 = 1
hotkey "Organizer Agent-03"
endif
endwhile
endif
if EnableIngotAutoRecall = 1
if timer "IngotRecallTimer" > 30000
settimer "IngotRecallTimer" 0
@clearignore
endif
if counttype "iron ingot%s" self > IngotRecallAmount
if EnableOverheadMessages = 1
overhead "I would hate to lose all this hard work..." 2086
wait 2500
overhead "I am going to go unload before its too late!" 2086
sysmsg "Disable 'EnableIngotAutoRecall' in script variables to turn off this feature!" 0
wait 2000
endif
@setvar! AutoRecallTriggered 1
@setvar! TimeToGo 1
replay
endif
endif
if EnablePackAnimals = 1
if not varexist idonthaveapacky
@setvar! idonthaveapacky 0
endif
if dead myMainPackAnimal or not varexist myMainPackAnimal and PackAnimalCount = 1
wait 1000
overhead "[ SELECT YOUR MAIN PACK ANIMAL... ]" 253
setvar myMainPackAnimal
wft 500
while targetexists
wait 100
endwhile
overhead "[ MAIN PACKY SET! ]" 93
wait 1500
endif
if dead mySecondPackAnimal or not varexist mySecondPackAnimal and PackAnimalCount = 2
wait 1000
overhead "[ SELECT YOUR 2ND PACK ANIMAL... ]" 253
setvar mySecondPackAnimal
wft 500
while targetexists
wait 100
endwhile
overhead "[ TWO PACKY SET! ]" 93
wait 1500
endif
if not find myMainPackAnimal ground -1 -1 12 or not find mySecondPackAnimal ground -1 -1 12 and PackAnimalCount = 2
if findtype "291|292" ground -1 -1 2 as PackAnimal
if noto PackAnimal = "friend"
if not find myMainPackAnimal
@setvar PackAnimal myMainPackAnimal
elseif not find mySecondPackAnimal
@setvar PackAnimal mySecondPackAnimal
endif
else
if EnableOverheadMessages = 1
overhead "Where did that damn animal go now..." 2086
wait 1500
endif
@setvar! idonthaveapacky 1
endif
endif
endif
if timer "PackyFollowOne" > 30000 and PackAnimalCount = 1
menu myMainPackAnimal 4
settimer "PackyFollowOne" 0
endif
if timer "PackyFollowTwo" > 30000 and PackAnimalCount = 2
menu mySecondPackAnimal 4
settimer "PackyFollowTwo" 0
endif
endif
if EnablePackAnimals = 1 and idonthaveapacky != 1
if find myMainPackAnimal ground -1 -1 12
if findtype "6585" backpack as oretostoreinpacky and StoreinMainPacky = 1
if counttype oretostoreinpacky > OreTransfertoPackyAmount and OreTransfertoPackyAmount != 0
while findtype "6585" as oretostoreinpacky backpack
lift oretostoreinpacky 60000
if timer "PackyStorageTimer" > 3500 and EnableOverheadMessages != 0
overhead "*moving ore to pack animal...*" 349
settimer "PackyStorageTimer" 0
endif
drop myMainPackAnimal
wait 650
endwhile
elseif diffweight < TransfertoPackyWeightDiff and TransfertoPackyWeightDiff != 0
while findtype "6585" as oretostoreinpacky backpack
lift oretostoreinpacky 60000
if timer "PackyStorageTimer" > 3500 and EnableOverheadMessages != 0
overhead "*moving ore to pack animal...*" 349
settimer "PackyStorageTimer" 0
endif
drop myMainPackAnimal
wait 650
endwhile
endif
elseif findtype "6585" backpack as oretostoreinpacky and StoreinSecondPacky = 1
if counttype oretostoreinpacky > OreTransfertoPackyAmount and OreTransfertoPackyAmount != 0
while findtype "6585" as oretostoreinpacky backpack
lift oretostoreinpacky 60000
if timer "PackyStorageTimer" > 3500 and EnableOverheadMessages != 0
overhead "*moving ore to pack animal...*" 349
settimer "PackyStorageTimer" 0
endif
drop mySecondPackAnimal
wait 650
endwhile
elseif diffweight < TransfertoPackyWeightDiff and TransfertoPackyWeightDiff != 0
while findtype "6585" as oretostoreinpacky backpack
lift oretostoreinpacky 60000
if timer "PackyStorageTimer" > 3500 and EnableOverheadMessages != 0
overhead "*moving ore to pack animal...*" 349
settimer "PackyStorageTimer" 0
endif
drop mySecondPackAnimal
wait 650
endwhile
endif
endif
if timer "PackyCheckTimer" > 15000
getlabel myMainPackAnimal MainPackyWeight
if "1975/2000|1976/2000|1977/2000|1978/2000|1979/2000|1980/2000|1981/2000|1982/2000|1983/2000|1984/2000|1985/2000|1986/2000|1987/2000|1988/2000|1989/2000|1990/2000|1991/2000|1992/2000|1993/2000|1994/2000|1995/2000|1996/2000|1997/2000|1998/2000|1999/2000|2000/2000|3975/4000|3976/4000|3977/4000|3978/4000|3979/4000|3980/4000|3981/4000|3982/4000|3983/4000|3984/4000|3985/4000|3986/4000|3987/4000|3988/4000|3989/4000|3990/4000|3991/4000|3992/4000|3993/4000|3994/4000|3995/4000|3996/4000|3997/4000|3998/4000|3999/4000|4000/4000" in MainPackyWeight
@setvar! StoreinMainPacky 0
if EnableOverheadMessages != 0
overhead "[ PACKY FULL! ]" 333 myMainPackAnimal
endif
else
@setvar! StoreinMainPacky 1
endif
getlabel mySecondPackAnimal SecondPackyWeight
if "1975/2000|1976/2000|1977/2000|1978/2000|1979/2000|1980/2000|1981/2000|1982/2000|1983/2000|1984/2000|1985/2000|1986/2000|1987/2000|1988/2000|1989/2000|1990/2000|1991/2000|1992/2000|1993/2000|1994/2000|1995/2000|1996/2000|1997/2000|1998/2000|1999/2000|2000/2000|3975/4000|3976/4000|3977/4000|3978/4000|3979/4000|3980/4000|3981/4000|3982/4000|3983/4000|3984/4000|3985/4000|3986/4000|3987/4000|3988/4000|3989/4000|3990/4000|3991/4000|3992/4000|3993/4000|3994/4000|3995/4000|3996/4000|3997/4000|3998/4000|3999/4000|4000/4000" in SecondPackyWeight
@setvar! StoreinSecondPacky 0
if EnableOverheadMessages != 0
overhead "[ PACKY FULL! ]" 333 mySecondPackAnimal
endif
else
@setvar! StoreinSecondPacky 1
endif
settimer "PackyCheckTimer" 0
endif
if StoreinMainPacky = 0 and PackAnimalCount = 1
if EnableOverheadMessages = 1
overhead "My packy is full! Time to find a forge..." 2086
elseif EnableOverheadMessages = 2
overhead "[ PACKY FULL!! ]" 333 myMainPackAnimal
endif
wait 1500
@setvar! TimeToGo 1
replay
elseif StoreinMainPacky = 0 and PackAnimalCount = 2
@setvar! StoreinSecondPacky 1
elseif StoreinMainPacky = 0 and StoreinSecondPacky = 0
if EnableOverheadMessages = 1
overhead "All my pack animals are full!" 2086
wait 500
overhead "Time to find a forge..." 2086
elseif EnableOverheadMessages = 2
overhead "[ PACKYS FULL! ]" 337 mySecondPackAnimal
endif
wait 1500
@setvar! TimeToGo 1
replay
endif
else
if EnableOverheadMessages = 1
overhead "Slow ass pack animal... come on!" 2086
wait 1000
overhead "*whistles!*" 2329
elseif EnableOverheadMessages = 2
overhead "*whistles!*" 2329
endif
@setvar! idonthaveapacky 1
endif
elseif idonthaveapacky = 1
if find myMainPackAnimal ground -1 -1 2
@setvar! idonthaveapacky 0
replay
endif
endif
if EnableAutoSmeltPlayerForge = 1
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
while findtype "iron ore" backpack as ore
if timer "SmeltingTimer" > 3500 and EnableOverheadMessages != 0
overhead "*smelting ore...*" 2114 forge
settimer "SmeltingTimer" 0
endif
dclick ore
if timer "ForgingTimer" > 3500 and EnableOverheadMessages != 0
overhead "*forging ingots...*" 2117
settimer "ForgingTimer" 0
endif
wait 1000
@setvar! NeedtoSecureIngots 1
if insysmsg "You do not see any nearby forges"
settimer "NaturalForgeTimer" 0
@setvar! ForgeFound 0
break
endif
if SetIngotBagtoOrganizer03 = 1
hotkey "Organizer Agent-03"
wait 500
endif
endwhile
if EnablePackAnimals = 1
if find myMainPackAnimal ground -1 -1 2
getlabel myMainPackAnimal PackyLabel
if "[0/2000" in PackyLabel
// Do nothing
elseif "[0/4000" in PackyLabel
// Do nothing
else
dclick myMainPackAnimal
wait 500
while findtype "iron ore" myMainPackAnimal as packyoretosmelt
dclick packyoretosmelt
if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages != 0
overhead "*smelting from pack animal...*" 2114 myMainPackAnimal
settimer "PackySmeltTimer" 0
endif
wait 650
endwhile
@setvar! NeedtoSecureIngots 1
endif
endif
if find mySecondPackAnimal ground -1 -1 2
getlabel mySecondPackAnimal TwoPackyLabel
if "[0/2000|[0/4000" in TwoPackyLabel
// Do nothing
elseif "[0/4000" in TwoPackyLabel
// Do nothing
else
dclick mySecondPackAnimal
wait 500
while findtype "iron ore" myMainPackAnimal as twopackyoretosmelt
dclick twopackyoretosmelt
if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages != 0
overhead "*smelting from pack animal...*" 2114 mySecondPackAnimal
settimer "PackySmeltTimer" 0
endif
wait 650
endwhile
@setvar! NeedtoSecureIngots 1
endif
endif
endif
endif
endif
if EnableAutoSmeltNaturalForge = 1
if findtype "iron ore" backpack as ore and MiningActive = 0
@setvar! ForgeFound 0
if timer "NaturalForgeTimer" >= 2500
dclick ore
wait 500
if insysmsg "You do not see any nearby forges"
settimer "NaturalForgeTimer" 0
clearsysmsg
else
@setvar! ForgeFound 1
clearsysmsg
if EnableOverheadMessages = 1
overhead "*found a forge!*" 2117
endif
endif
endif
endif
if ForgeFound = 1
while findtype "iron ore" backpack as ore
dclick ore
wait 500
@setvar! NeedtoSecureIngots 1
if insysmsg "You do not see any nearby forges"
settimer "NaturalForgeTimer" 0
@setvar! ForgeFound 0
clearsysmsg
break
endif
if SetIngotBagtoOrganizer03 = 1
hotkey "Organizer Agent-03"
wait 500
endif
endwhile
if EnablePackAnimals = 1
if find myMainPackAnimal ground -1 -1 2
getlabel myMainPackAnimal PackyLabel
if "[0/2000" in PackyLabel
// Do nothing
elseif "[0/4000" in PackyLabel
// Do nothing
else
dclick myMainPackAnimal
wait 500
while findtype "iron ore" myMainPackAnimal as packyoretosmelt
dclick packyoretosmelt
if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages != 0
overhead "*smelting from pack animal...*" 2114 myMainPackAnimal
settimer "PackySmeltTimer" 0
endif
wait 650
if insysmsg "You do not see any nearby forges"
@setvar! ForgeFound 0
break
endif
endwhile
@setvar! NeedtoSecureIngots 1
endif
endif
if find mySecondPackAnimal ground -1 -1 2
getlabel mySecondPackAnimal TwoPackyLabel
if "[0/2000" in TwoPackyLabel
// Do nothing
elseif "[0/4000" in TwoPackyLabel
// Do nothing
else
dclick mySecondPackAnimal
wait 500
while findtype "iron ore" myMainPackAnimal as twopackyoretosmelt
dclick twopackyoretosmelt
if timer "PackySmeltTimer" > 3500 and EnableOverheadMessages != 0
overhead "*smelting from pack animal...*" 2114 mySecondPackAnimal
settimer "PackySmeltTimer" 0
endif
wait 650
if insysmsg "You do not see any nearby forges"
@setvar! ForgeFound 0
break
endif
endwhile
@setvar! NeedtoSecureIngots 1
endif
endif
endif
endif
endif
if warmode and EnableWARmodeAutoRecall = 1
@setvar! AutoRecallTriggered 1
@setvar! TimeToGo 1
replay
endif
if not findtype "pickaxe" hand and findtype "pickaxe" backpack as myPickaxe
dclick myPickaxe
getlabel backpack backpacklabel
endif
if EnableWeightWarningMessage = 1 and diffweight < RedWeightLimitDiffWeight
replay
endif
if findtype "pickaxe" hand as myPickaxe
dclick myPickaxe
wft 500
target self
getlabel backpack backpacklabel
wait 150
if insysmsg "world is saving"
for 50
wait 100
if insysmsg "world save complete"
if EnableOverheadMessages = 1
overhead "[ SAVE COMPLETE! ]" 253
endif
clearsysmsg
endif
endfor
replay
elseif insysmsg "Harvesting is not allowed"
if EnableOverheadMessages = 1
overhead "We need to leave the safe zone..." 84
elseif EnableOverheadMessages = 2
overhead "[ LEAVE TOWN! ]" 84
endif
clearsysmsg
wait 5000
replay
elseif insysmsg "You have worn out your tool"
if EnableOverheadMessages = 1
overhead "Hang on, my pickaxe just broke!" 2086=
wait 1500
endif
if counttype "pickaxe" self > 0
wait 500
if EnableOverheadMessages = 1
overhead "But I think I have another.. one sec..." 2086
wait 1500
endif
else
if EnableOverheadMessages = 1
overhead "Dammit, that is my last pickaxe. Time to resupply!" 2086
wait 1500
endif
@setvar! TimeToGo 1
endif
clearsysmsg
replay
elseif insysmsg "You have recently traveled"
@setvar! TravelCooldownActive 1
replay
elseif insysmsg "You do not see any" or insysmsg "You cannot produce any"
@setvar! MiningActive 0
if EnableOverheadMessages != 0
if MOVE = 1
if timer "MoveTimer" > 3000
@setvar! MOVE 0
overhead "[ KEEP MOVING... ]" 88
settimer "MoveTimer" 0
@setvar! MOVE 0
endif
elseif MOVE = 0
if timer "MoveTimer" > 3000
overhead "[ KEEP MOVING... ]" 1590
settimer "MoveTimer" 0
@setvar! MOVE 1
endif
else
if timer "MoveTimer" > 3000
overhead "[ KEEP MOVING... ]" 1590
settimer "MoveTimer" 0
@setvar! MOVE 1
endif
endif
endif
if findtype "iron ore" backpack as oretostack and EnableOreStacker = 1 and timer "OreStackerTimer" > 60000
if findtype "iron ore" backpack as oretostack
while findtype "iron ore" backpack as oretostack
if find oretostack IngotBag
@ignore oretostack
else
if timer "StackerTimer" > 3500 and EnableOverheadMessages = 1
overhead "*stacking ore...*" 77
settimer "StackerTimer" 0
endif
lift oretostack 9999
if StackOreinIngotBag = 1
drop IngotBag
wait 500
else
drop backpack 100 100 0
@ignore oretostack
wait 500
endif
endif
endwhile
endif
clearignore
settimer "OreStackerTimer" 0
endif
if timer "HarvestDelay" > 8000
if timer "MinerOrganizer" > 30000
hotkey "Organizer Agent-04"
settimer "MinerOrganizer" 0
endif
endif
if PutIngotsinLockedChest = 1 and NeedtoSecureIngots = 1
if not findtype "wooden box" backpack or not findtype "copper key" backpack
if EnableOverheadMessages != 0
overhead "[ NO LOCKBOX FOUND! ]" 339
endif
wait 1500
elseif counttype 2474 backpack > 1 or counttype 4110 backpack > 1
if EnableOverheadMessages != 0
overhead "[ TOO MANY LOCKBOXES/KEYS! ]" 339
endif
wait 1500
else
if findtype "wooden box" backpack as lockbox and findtype "copper key" backpack as key
if findtype "iron ingot%s" backpack as ingotstostore
getlabel lockbox lockboxLabel
if "items" in lockboxLabel
wait 500
if EnableOverheadMessages = 1
overhead "*securing ingots...*" 149
endif
while findtype "iron ingot%s" backpack as ingotstostore
if find ingotstostore lockbox
@ignore ingotstostore
else
clearsysmsg
lift ingotstostore 9999
wait 150
drop lockbox -1 -1 -1
wait 250
endif
endwhile
dclick key
wft 1500
target lockbox
if EnableOverheadMessages != 0
overhead "[ingot box locked]" 69
endif
@setvar! NeedtoSecureIngots 0
else
if EnableOverheadMessages != 0
overhead "[ingot box unlocked]" 84
endif
dclick key
wft 1500
target lockbox
if EnableOverheadMessages = 1
overhead "*securing ingots...*" 149
endif
while findtype "iron ingot%s" backpack as ingotstostore
if find ingotstostore lockbox
@ignore ingotstostore
else
clearsysmsg
lift ingotstostore 9999
wait 150
drop lockbox -1 -1 -1
wait 250
endif
endwhile
dclick key
wft 1500
target lockbox
if EnableOverheadMessages != 0
overhead "[ingot box locked]" 69
endif
@setvar! NeedtoSecureIngots 0
endif
endif
wait 150
getlabel lockbox lockboxLabel
if "items" in lockboxLabel
dclick key
wft 1500
target lockbox
@setvar! NeedtoSecureIngots 0
endif
endif
endif
elseif StackIngotsinIngotBag = 1
while findtype "iron ingot%s" backpack as metaltomove
if find IngotBag self
if OpenIngotBag = 1
dclick IngotBag
wait 250
endif
wait 500
if EnableOverheadMessages = 1
overhead "*stacking ingots...*" 2086
endif
lift metaltomove 9999
drop IngotBag 1 1 0
wait 500
@ignore metaltomove
elseif EnableOverheadMessages != 0
overhead "[ NO INGOT BAG! ]" 337
endif
endwhile
endif
replay
else
@setvar! MiningActive 1
getlabel backpack backpacklabel
endif
endif
while MiningActive = 1
if targetexists
target self
endif
if diffweight < RedWeightLimitDiffWeight
replay
endif
if findtype "pickaxe" hand as myPickaxe
dclick myPickaxe
wft 500
target self
getlabel backpack backpacklabel
endif
if warmode and EnableWARmodeAutoRecall = 1
@setvar! AutoRecallTriggered 1
@setvar! TimeToGo 1
replay
endif
if diffhits > 25
replay
endif
if EnableTrackingAutoRecall = 1
if PKTrackingRange = 70
if insysmsg ": 70 step" or insysmsg "70 space" or insysmsg ": 69 step" or insysmsg "69 space" or insysmsg ": 68 step" or insysmsg "68 space" or insysmsg ": 67 step" or insysmsg "67 space" or insysmsg ": 66 step" or insysmsg "66 space" or insysmsg ": 65 step" or insysmsg "65 space" or insysmsg ": 64 step" or insysmsg "64 space" or insysmsg ": 63 step" or insysmsg "63 space" or insysmsg ": 62 step" or insysmsg "62 space" or insysmsg ": 61 step" or insysmsg "61 space" or insysmsg ": 60 step" or insysmsg "60 space" or insysmsg ": 59 step" or insysmsg "59 space" or insysmsg ": 58 step" or insysmsg "58 space" or insysmsg ": 57 step" or insysmsg "57 space" or insysmsg ": 56 step" or insysmsg "56 space" or insysmsg ": 55 step" or insysmsg "55 space" or insysmsg ": 54 step" or insysmsg "54 space" or insysmsg ": 53 step" or insysmsg "53 space" or insysmsg ": 52 step" or insysmsg "52 space" or insysmsg ": 51 step" or insysmsg "51 space" or insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"
@setvar! TimeToGo 1
@setvar! RedTargetFound 1
replay
endif
elseif PKTrackingRange = 60
if insysmsg ": 60 step" or insysmsg "60 space" or insysmsg ": 59 step" or insysmsg "59 space" or insysmsg ": 58 step" or insysmsg "58 space" or insysmsg ": 57 step" or insysmsg "57 space" or insysmsg ": 56 step" or insysmsg "56 space" or insysmsg ": 55 step" or insysmsg "55 space" or insysmsg ": 54 step" or insysmsg "54 space" or insysmsg ": 53 step" or insysmsg "53 space" or insysmsg ": 52 step" or insysmsg "52 space" or insysmsg ": 51 step" or insysmsg "51 space" or insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"
@setvar! TimeToGo 1
@setvar! RedTargetFound 1
replay
endif
elseif PKTrackingRange = 50
if insysmsg ": 50 step" or insysmsg "50 space" or insysmsg ": 49 step" or insysmsg "49 space" or insysmsg ": 48 step" or insysmsg "48 space" or insysmsg ": 47 step" or insysmsg "47 space" or insysmsg ": 46 step" or insysmsg "46 space" or insysmsg ": 45 step" or insysmsg "45 space" or insysmsg ": 44 step" or insysmsg "44 space" or insysmsg ": 43 step" or insysmsg "43 space" or insysmsg ": 42 step" or insysmsg "42 space" or insysmsg ": 41 step" or insysmsg "41 space" or insysmsg ": 40 step" or insysmsg "40 space" or insysmsg ": 39 step" or insysmsg "39 space" or insysmsg ": 38 step" or insysmsg "38 space" or insysmsg ": 37 step" or insysmsg "37 space" or insysmsg ": 36 step" or insysmsg "36 space" or insysmsg ": 35 step" or insysmsg "35 space" or insysmsg ": 34 step" or insysmsg "34 space" or insysmsg ": 33 step" or insysmsg "33 space" or insysmsg ": 32 step" or insysmsg "32 space" or insysmsg ": 31 step" or insysmsg "31 space" or insysmsg ": 30 step" or insysmsg "30 space" or insysmsg ": 29 step" or insysmsg "29 space" or insysmsg ": 28 step" or insysmsg "28 space" or insysmsg ": 27 step" or insysmsg "27 space" or insysmsg ": 26 step" or insysmsg "26 space" or insysmsg ": 25 step" or insysmsg "25 space" or insysmsg ": 24 step" or insysmsg "24 space" or insysmsg ": 23 step" or insysmsg "23 space" or insysmsg ": 22 step" or insysmsg "22 space" or insysmsg ": 21 step" or insysmsg "21 space" or insysmsg ": 20 step" or insysmsg "20 space" or insysmsg ": 19 step" or insysmsg "19 space" or insysmsg ": 18 step" or insysmsg "18 space" or insysmsg ": 17 step" or insysmsg "17 space" or insysmsg ": 16 step" or insysmsg "16 space" or insysmsg ": 15 step" or insysmsg "15 space" or insysmsg ": 14 step" or insysmsg "14 space" or insysmsg ": 13 step" or insysmsg "13 space" or insysmsg ": 12 step" or insysmsg "12 space" or insysmsg ": 11 step" or insysmsg "11 space" or insysmsg ": 10 step" or insysmsg "10 space" or insysmsg ": 9 step" or insysmsg "(9 space" or insysmsg ": 8 step" or insysmsg "(8 space" or insysmsg ": 7 step" or insysmsg "(7 space" or insysmsg ": 6 step" or insysmsg "(6 space" or insysmsg ": 5 step" or insysmsg "(5 space" or insysmsg ": 4 step" or insysmsg "(4 space" or insysmsg ": 3 step" or insysmsg "(3 space" or insysmsg ": 2 step" or insysmsg "(2 space" or insysmsg ": 1 step" or insysmsg "(1 space" or insysmsg ": 0 step" or insysmsg "(0 space"
@setvar! TimeToGo 1
@setvar! RedTargetFound 1
replay
endif
elseif PKTrackingRange = 0
if insysmsg "Now tracking"
@setvar! TimeToGo 1
@setvar! RedTargetFound 1
replay
endif
endif
endif
if EnablePKradar = 1 and skill "Tracking" < 50
if timer "PKRadar" > 1000
hotkey "Next Murderer Player Target"
wait 500
if insysmsg "No one matching that was found"
settimer "PKRadar" 0
else
@setvar! RedTargetFound 1
@setvar! TimeToGo 1
@setvar! MurdererTarget lasttarget
clearsysmsg
replay
endif
endif
endif
if EnableWeightWarningMessage = 1
if diffweight < GreenWarningDiffWeight and diffweight > YellowWarningDiffWeight and timer "WeightTimer" > 5000 and EnableOverheadMessages != 0
overhead "[ WEIGHT WARNING... ]" 77
settimer "WeightTimer" 0
elseif diffweight < YellowWarningDiffWeight and diffweight > RedWeightLimitDiffWeight and timer "WeightTimer" > 5000 and EnableOverheadMessages != 0
overhead "[ TIME TO FORGE! ]" 153
settimer "WeightTimer" 0
elseif diffweight < RedWeightLimitDiffWeight and timer "WeightTimer" > 5000
overhead "[ WEIGHT LIMIT REACHED! ]" 37
settimer "WeightTimer" 0
wait 1500
overhead "Find a forge in order to continue..." 0
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 timer "ForgeRadar" > 3500
overhead "▼" 44 forge
settimer "ForgeRadar" 0
endif
endif
if EnableOreVacuum = 1
if findtype "iron ore" ground -1 -1 15 as droppedore and timer "OreRadar" > 3500
overhead "▼" 93 droppedore
settimer "OreRadar" 0
endif
if findtype "iron ingot%s" ground -1 -1 15 as droppedingots and timer "IngotRadar" > 3500
overhead "▼" 69 droppedingots
settimer "IngotRadar" 0
endif
endif
if EnableToolCountdown = 1
if findtype "pickaxe" hand as MyAxe
getlabel MyAxe AxeLabel
if "(5 uses|(4 uses|(3 uses|2 uses|1 use" in AxeLabel
if EnableRecycleTool = 0
sysmsg "YOUR TOOL IS ABOUT TO BREAK....." 153
elseif 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" hand as MyAxe
getlabel MyAxe AxeLabel
if "(3 use|(2 use" in AxeLabel
replay
endif
endif
endif
endif
if EnableOverheadMessages != 0
if insysmsg "world is saving"
for 50
wait 100
if insysmsg "world save complete"
wait 100
if EnableOverheadMessages = 1
overhead "[ SAVE COMPLETE! ]" 253
endif
clearsysmsg
break
endif
endfor
clearsysmsg
elseif insysmsg "You loosen some rocks"
overhead "*you fail to harvest anything...*" 337
clearsysmsg
elseif insysmsg "You dig some iron ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest iron ore*" 1900
else
overhead "*you harvest iron ore*" 1900
endif
clearsysmsg
elseif insysmsg "You dig some dull copper ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest dullcopper ore*" 2419
else
overhead "*you harvest dullcopper ore*" 2419
endif
clearsysmsg
elseif insysmsg "You dig some shadow iron ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest shadowiron ore*" 2406
else
overhead "*you harvest shadowiron ore*" 2406
endif
clearsysmsg
elseif insysmsg "You dig some copper ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest copper ore*" 2413
else
overhead "*you harvest copper ore*" 2413
endif
clearsysmsg
elseif insysmsg "You dig some bronze ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest bronze ore*" 2418
else
overhead "*you harvest bronze ore*" 2418
endif
clearsysmsg
elseif insysmsg "You dig some golden ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest golden ore!*" 2213
else
overhead "*you harvest golden ore*" 2213
endif
clearsysmsg
elseif insysmsg "You dig some agapite ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest agapite ore!*" 2425
else
overhead "*you harvest agapite ore*" 2425
endif
clearsysmsg
elseif insysmsg "You dig some verite ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest verite ore!!*" 2207
else
overhead "*you harvest verite ore!*" 2207
endif
clearsysmsg
elseif insysmsg "You dig some valorite ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest valorite ore!!*" 2219
else
overhead "*you harvest valorite ore!*" 2219
endif
clearsysmsg
elseif insysmsg "You dig some avarite ore"
if insysmsg "Harvest double yield"
overhead "*you double harvest avarite ore!!!*" 1763
if EnableOverheadMessages = 1
overhead "Woot! Woot!!" 2086
endif
else
overhead "*you harvest avarite ore!!*" 1763
if EnableOverheadMessages = 1
overhead "Woot!" 2086
endif
endif
clearsysmsg
endif
endif
if insysmsg "You have recently traveled"
@setvar! TravelCooldownActive 1
replay
elseif insysmsg "You have worn out your tool"
if EnableOverheadMessages = 1
overhead "Hang on, my pickaxe just broke!" 2086
wait 1500
endif
clearsysmsg
if counttype "pickaxe" self > 0
wait 1000
if EnableOverheadMessages = 1
overhead "But I think I have another.. one sec..." 2086
wait 1500
endif
else
if EnableOverheadMessages = 1
overhead "Dammit, thats my last pickaxe. Time to resupply!" 2086
endif
@setvar! TimeToGo 1
wait 1500
endif
replay
elseif insysmsg "You do not see any" or insysmsg "You cannot produce any"
settimer "HarvestDelay" 0
if EnableOverheadMessages != 0
overhead "[ TIME TO MOVE ]" 69
endif
@setvar! MiningActive 0
replay
endif
if not findtype "pickaxe" hand and findtype "pickaxe" backpack as myPickaxe
dclick myPickaxe
getlabel backpack backpacklabel
endif
endwhile
endif
endwhile
replay
////////////////
// THE END! //
////////////////