Re: Mining script that doesnt require fire beetle
Posted: January 4th, 2018, 11:47 pm
Your restock box or drop box where iron ingots for tinkering are.fluffhead321 wrote:what do I set ingot source too? Is that my char. inventory?
A Mondain's Legacy era Ultima Online freeshard.
https://www.uogdemise.com/community/
https://www.uogdemise.com/community/viewtopic.php?f=10&t=9730
Your restock box or drop box where iron ingots for tinkering are.fluffhead321 wrote:what do I set ingot source too? Is that my char. inventory?
Do you want it for every metal or just D.C.?one of millions wrote:is there a possibility for some one to add something like:
@setalias "prospector`s Tool"
if in journal "you put some dull copper" use prospector`s Tool
if in journal "you put some copper" use prospector`s Tool
if in journal "here is no metal to mine" clear journal
but correctly and so that it works in to the script?
Code: Select all
//1. need 2 full runebooks marked 1 tile south of the mineable locations
//2. macro assumes you have tinkering and spot at dropoff location to restock ingots
//3. Organizer agent 'Ore' needs to be configured from your backpack to dropoff container and have the 4 ore graphics and 6 mining gems
//4. pauses after recalls are set to 2000 for 0Faster Casting. Change to 1750 for 1FC and 1500 for 2FC
if not @findobject 'IngotsSource'
promptalias 'IngotsSource'
endif
if not @findobject 'OreBookOne'
promptalias 'OreBookOne'
endif
if not @findobject 'OreBookTwo'
promptalias 'OreBookTwo'
endif
if not @findobject 'OreBookThree'
promptalias 'OreBookThree'
endif
if not @findobject 'OreBookFour'
promptalias 'OreBookFour'
endif
if not @findobject 'HomeOre'
promptalias 'HomeOre'
endif
if not listexists 'OreBook'
createlist 'OreBook'
pushlist 'OreBook' 'OreBookOne'
pushlist 'OreBook' 'OreBookTwo'
pushlist 'OreBook' 'OreBookThree'
pushlist 'OreBook' 'OreBookFour'
endif
if not listexists 'Runes'
createlist 'Runes'
pushlist 'Runes' 5
pushlist 'Runes' 11
pushlist 'Runes' 17
pushlist 'Runes' 23
pushlist 'Runes' 29
pushlist 'Runes' 35
pushlist 'Runes' 41
pushlist 'Runes' 47
pushlist 'Runes' 53
pushlist 'Runes' 59
pushlist 'Runes' 65
pushlist 'Runes' 71
pushlist 'Runes' 77
pushlist 'Runes' 83
pushlist 'Runes' 89
pushlist 'Runes' 95
endif
For 0 to 'OreBook'
For 0 to 'Runes'
pause 500
clearjournal
pause 500
useobject OreBook[]
waitforgump 0x554b87f3 5000
replygump 0x554b87f3 Runes[]
//tells you which rune you are on, see runelist above
sysmsg 'Rune' 33
sysmsg Runes[] 33
pause 2000
while not @injournal 'no metal here' and not @injournal "can't mine that"
//use pickaxe to northern tile until specified weight is reached
pause 300
usetype 0xe86
waitfortarget 1000
targettileoffset 0 -1 0
// once weight is reached go home, if getting overweight, lower it
if weight > 420
useobject 'HomeOre'
waitforgump 0x554b87f3 5000
replygump 0x554b87f3 5
pause 2000
// organizer to put up ore
organizer 'Ore'
while organizing
endwhile
// get ingots if low
if counttype 0x1bf2 0 'backpack' < 20
useobject 'IngotsSource'
pause 1000
movetype 0x1bf2 'IngotsSource' 'backpack' (0 0 0) 0 40
pause 1000
endif
// kits
while @counttype 0x1eb8 0 'backpack' < 2
usetype! 0x1eb8
waitforgump 0x38920abd 15000
replygump 0x38920abd 8
waitforgump 0x38920abd 15000
replygump 0x38920abd 23
endwhile
//pickaxes
while @counttype 0xe86 0 'backpack' < 3
usetype! 0x1eb8
waitforgump 0x38920abd 15000
replygump 0x38920abd 8
waitforgump 0x38920abd 15000
replygump 0x38920abd 114
endwhile
//recall back to where you were
useobject OreBook[]
waitforgump 0x554b87f3 5000
replygump 0x554b87f3 Runes[]
pause 2000
endif
endwhile
endfor
//recall home so ingot container is found
pause 1000
useobject 'HomeOre'
waitforgump 0x554b87f3 5000
replygump 0x554b87f3 5
pause 2000
endfor
Code: Select all
usetype 0xe86
waitfortarget 1000
targettileoffset 0 -1 0