Bapeth's Map-Trap Script by barryroser
Description from the author:
# Trapper Mapper Script by Bapeth
#
# Date updated : April 1st - loot list update - added chain links in top priority spot
#
# This script uses both Harvest and Gadget aspect, both aspects are required.
# This script also uses two Mastery Chains, one for Trap Damage and the other for Loot Chance.
# If you only have one chain then set it for both chain settings when prompted.
#
# "REQUIRED": User must create three cooldowns named "Aspect" "Chain Swap" "Aspect Proc"
# "Aspect Proc" cooldown requires an OVERHEAD Trigger Text: *innovation* Cooldown: 30
# Cooldowns can be found in the in game options.
#
# HOW TO USE:
#
# Items needed in backpack - Shovel, T-map, Adv Pack, Ground Trap, Lockpicks, Trap Kit, Mastery Chain.
#
# In "PEACEMODE" - Play the script when you are nearby the map location to being digging for the chest.
# When the script begins digging the chest it will use the adv pack, summon an earth ele, and place a ground trap.
# The script will stop when chest is fully dug up.
#
# At this time the user should kill all the monsters.
# It is best to Stay the elemental in the direct center of the trap and wait for the mobs to move in to range.
# Detonate the trap and ready another trap if needed, repeat as needed.
# A good trapper template with high gadget and a good chain will only need 2 traps maximum to clear any T-map under level 8.
#
# In "WARMODE" - Play the script once again when all monsters are dead and it will switch to Harvest aspect and equip your loot chain.
# Approach the chest and the script will automatically invis the user and begin picking and looting.
# Low level tmaps will often open faster then the chain swap cooldown of 30 seconds, so, the user should wait 10 seconds after swapping to begin picking.
# When the script is done looting it will switch back to gadget aspect and equip the Trap damage chain and stop.
# You are now ready to go do another T-map!
#
# Please remember to "destroy your empty treasure chest" before leaving the site.
#
# If at any time you would like to change your chains or reset the script into One or Two Chain mode then delete the varibles from script options.
# Varibles are as follows: LootChain, TrapChain, OneChain, TwoChain
#
#~~"Recommended Build"~~
#
# "Trapper Mapper"
# Alchemy -------120
# Detect Hidden -120
# Tinkering -----120
# Magery --------100
# Cartography ---90
# Lockpicking ---90
# Spirit Speak --80
#
# Script Starts Here
if not varexist "OneChain" and not varexist "TwoChain"
overhead "The script needs to know if you are using ONE or TWO Mastery Chains" 68
pause 5000
overhead "Select trap kit if you have 2 chains" 88
overhead "Select backpack if you have 1 chain" 78
setlasttarget
wft 500
while targetexists
//donothing
endwhile
getlabel lasttarget desc
if "trap kit" in desc
@setvar "TwoChain" lasttarget
overhead "I have selected for Two Chains" 88
elseif "backpack" in desc
@setvar "OneChain" lasttarget
overhead "I have selected for One Chain" 78
endif
pause 2000
endif
if varexist "TwoChain"
if not varexist "TrapChain"
overhead "Set Trap Chain..." 88
setlasttarget
wft 500
while targetexists
//do nothing
endwhile
@setvar "TrapChain" lasttarget
overhead "Trap Chain Set..." 88
pause 1500
endif
if not varexist "LootChain"
overhead "Set Loot Chain..." 58
setlasttarget
wft 500
while targetexists
//do nothing
endwhile
@setvar "LootChain" lasttarget
overhead "Loot Chain Set..." 58
endif
endif
if skill "Cartography" >= 10 and findtype "adventure pack" backpack as advpack
@setvar "bappack" advpack
endif
if skill "Tinkering" >= 80 and findtype "metal trap" backpack as btrap
@setvar "baptrap" btrap
endif
if timerexists bchestopen
removetimer bchestopen
endif
if not warmode
if varexist "TwoChain" and findlayer self talisman as bchain
getlabel bchain desc
if not find "TrapChain" backpack
//donothing
else
lift bchain
drop backpack -1 -1 0
pause 500
getlabel backpack ping
lift "TrapChain"
drop self Talisman
overhead "Trap Chain Equipped..." 44
cooldown "Chain Swap" 30000
pause 500
getlabel backpack ping
endif
elseif varexist "TwoChain"
lift "TrapChain"
drop self Talisman
getlabel backpack ping
overhead "Trap Chain Equipped..." 44
cooldown "Chain Swap" 30000
endif
if not timerexists checkforgadget
clearsysmsg
say "[AspectArmor Gadget"
getlabel backpack ping
if insysmsg "You must wait a moment before activating another armor aspect"
overhead "Aspect swap cooling..." 44
pause 1500
replay
elseif insysmsg "Your armor is already of that aspect"
createtimer checkforgadget
else
createtimer checkforgadget
cooldown "Aspect" 30000
endif
stop
endif
removetimer checkforharvest
if findtype "map" backpack
//donothing
else
overhead "I will need a treasure map..." 38
stop
endif
if findtype "shovel" backpack as bshovel
dclick bshovel
pause 1200
if insysmsg "Perhaps you should step outdoors."
overhead "I should hunt outside..." 45
pause 2000
replay
elseif findbuff "Entangle"
if mana >= 50 and followers < 4
cast "Earth Elemental"
endif
dclick "bappack"
getlabel backpack ping
pause 500
dclick "baptrap"
while findbuff "Entangle"
if not find "bsummon1" ground and findtype "an earth elemental|a fire elemental|a water elemental|an air elemental|a daemon" ground -1 -1 1 as sum1
if noto sum1 = "friend"
# Name your summon if you like (no spaces must be unique)
rename sum1 "Bapith"
endif
elseif not find "bsummon1" ground and findtype "Bapith" ground as sum1
@setvar "bsummon1" sum1
endif
if not find "bsummon2" ground and findtype "an earth elemental|a fire elemental|a water elemental|an air elemental|a daemon" ground -1 -1 1 as sum2
if noto sum2 = "friend"
# Name your summon if you like (no spaces must be unique)
rename sum2 "Bapath"
endif
elseif not find "bsummon2" gorund and findtype "Bapath" ground as sum2
@setvar "bsummon2" sum2
endif
endwhile
pause 1100
overhead "Time to slay monsters!!!" 88
stop
endif
else
overhead "I will need a shovel..." 38
stop
endif
elseif warmode
if varexist "TwoChain" and findlayer self talisman as bchain
getlabel bchain desc
if not find "LootChain" backpack
//donothing
else
lift bchain
drop backpack -1 -1 0
pause 500
getlabel backpack ping
lift "LootChain"
drop self Talisman
overhead "Loot Chain Equipped..." 74
cooldown "Chain Swap" 30000
pause 500
getlabel backpack ping
endif
elseif varexist "TwoChain"
lift "LootChain"
drop self Talisman
getlabel backpack ping
overhead "Loot Chain Equipped..." 74
cooldown "Chain Swap" 30000
endif
if not timerexists checkforharvest and not cooldown "Aspect Proc" and not cooldown "Aspect"
clearsysmsg
say "[AspectArmor Harvest"
getlabel backpack ping
if insysmsg "Your armor is already of that aspect"
createtimer checkforharvest
else
createtimer checkforharvest
cooldown "Aspect" 30000
endif
endif
removetimer checkforgadget
if findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 1 as bchest
clearsysmsg
dclick bchest
getlabel backpack ping
if gumpexists 736038070 and ingump "Cleared Of Traps"
while gumpexists 736038070
gumpresponse 4
waitforgump 736038070 500
if insysmsg "You attempt to pick the lock"
clearsysmsg
break
elseif insysmsg "You must rid the area"
overhead "I must kill these monsters first..." 88
stop
endif
endwhile
while not dead
if not hidden and mana >= 20
cast "Invisibility"
wft 5000
target self
getlabel backpack ping
hotkey "Cancel Current Target"
endif
if insysmsg "You successfully pick the lock"
break
endif
if not findtype 3651|3649|3648|3650|3708|2475 ground -1 -1 2
break
endif
if cooldown "Aspect Proc"
createtimer harvestspam
endif
if timerexists harvestspam
clearsysmsg
say "[AspectArmor Harvest"
getlabel backpack ping
if insysmsg "resolved an aspect special"
//do nothing
elseif insysmsg "Your armor is already of that aspect"
cooldown "Aspect Proc" 0
removetimer harvestspam
else
removetimer harvestspam
cooldown "Aspect" 30000
endif
endif
endwhile
endif
while findtype "43206|54230|44985|glass display|20049|Pig Iron|blackrock fragment|18705|55247|49482|53694|54570|53696|53876|50612|55420|53280|53473|54831|50278|49528|bottle set|entrail bucket|mounted stalaghorn|sea glass bulb|juggling daggers|st patricks cross|divination orb|mirror display|murder of crows|charmed cobra|prodigy fiddle|wilting rose belljar|scale of balance|screaming mandrake|statue of the siren|the final hour|55204|specimen jars|shattered weapon|bird cage|widows grief|54684|27612|49223|54591|54601|54718|7408|19948|58325|19959|19822|49730|49729|19944|19949|47613|47612|47611|47610|47611|4112|3986|3966|cathedral tapestry|Darkscale tapestry|large painting|landscape painting|portrait painting|figurine|statue|20291|44987|49730|47107|18653|45127|20103|47103|29363|47105|29361|43453|5899|47109|45250|41509|43447|18657|4025|51308|45156|51304|45214|28769|28799|28803|28765|45211|45248|51259|45220|51328|45218|3842|51327|45222|45241|51336|11858|51375|45282|54722|45255|45246|28795|44983|45235|45251|45238|51258|51314|28761|45236|51260|54718|18400|58325|45252|18656|47111|3839|45239|45242|45254|45281|45247|42241|45216|28775|2594|51321|3838|51318|5901|5905|45259|5903|48407|51302|4248|27611|15296|43166|5359|5981|4026|3985|25359|17686|3836|17087|5356|29030|24434|22336|29036|3843|29025|51098|29034|8826|51094|576|3827|22326|45315|3891|2539|39898|39896|39892|39918|39911|39916|39897|39905|39891|39917|39912|39909|39889|31047|31017|31049|31019|31055|31051|31053|31025|31027|31031|31041|54717|31021|31011|31023|31029|31043|31003|31035|31033|31045|31037|31002|20006|31169|31006|30999|31012|31009|30996|7109|7107|31128|31188|20014|31014|31004|31142|31001|31000|37181|31010|30998|31172|30988|30997|31038|31141|7947|20008|31005|31191|31008|31007|30994|30993|31182|30989|20012|31186|31178|31015|30991|20010|20016|31184|31190|30990|30995|31176|31180|30992|31130|5207|7031|7026|7034|7033|7027|7035|7029|5078|5063|5059|5105|5060|5138|5129|5201|5142|5143|5076|5106|7610|5139|5090|5103|5132|7177|5061|7181|7179|3920|5042|5127|5117|5185|5125|3938|5177|3937|5044|5121|3915|3909|3568|3932|5123|5144|5119|5056|5135|5187|5074|5089|3934|3913|3917|3721|5075|5046|5049|7170|5146|5205|5203|5115|5204|5040|5179|5070|5182|5085|5181|3719|7173|5131|3911|5101|7175|7169|3713|5112|22187|9917|3859|3862|3878|3865|3856|3873|3877|3834|3742|3762|3740|3763|10245|3572|3573|3571|3885|7127|4225|12686|19985|19981|19984|19982|19983|19991|19989|19986|19987|19988|19994|19995|19992|19993|19990|19980|19977|19976|19978|7154|19979|43423|3861|3821" bchest as bitem
warmode off
if not timerexists bchestopen
createtimer bchestopen
overhead "The treasure is mine!" 2091
endif
hotkey 'Grab Item'
target bitem
while queued
//donothing
endwhile
while diffweight <= 0 and findtype "gold coin" backpack as dropgold
if not hidden and stam <= 4 and findtype "Red Potion" backpack as redpot
while queued
//donothing
endwhile
dclick redpot
endif
overhead "My cup runneth over..." 1779
lift dropgold 444
drop 0
while queued
//donothing
endwhile
endwhile
endwhile
endif
endif
loopThis script will auto handle digging and looting of treasure maps. Please read the description at the top of the script.