I wrote this one for UOS. Works pretty well for me
clearjournal
if not @findalias "Buggie" //set your storage animal
promptalias 'Buggie'
endif
while not @injournal 'no metal here' 'system' and not @injournal "can't mine" 'system' and not @injournal "There's no ore left there." 'system'
if @findtype 0xf39 'any' 'backpack' //set shovels
useobject 'found'
else
sysmsg "You do not have any digging tools!"
for 1 to 300 //do arms lore if you cannot mine for any reason
useskill 'Arms Lore'
waitfortarget 15000
target! 0x4021629b //set to a dagger in my backpack
pause 10000
endfor
usetype 0x97b 'backpack' //eat fish steaks
pause 1000
endif
waitfortarget 15000
if direction == 0
turn northeast
targettileoffset 0 -1 0
elseif direction == 1
turn east
targettileoffset 1 -1 0
elseif direction == 2
turn southeast
targettileoffset 1 0 0
elseif direction == 3
turn south
targettileoffset 1 1 0
elseif direction == 4
turn southwest
targettileoffset 0 1 0
elseif direction == 5
turn west
targettileoffset -1 1 0
elseif direction == 6
turn northwest
targettileoffset -1 0 0
elseif direction == 7
turn north
targettileoffset -1 -1 0
endif
pause 7500
endwhile
while @findtype 0x19b9 'any' 'backpack' //looking for ore to move to Buggie
movetype 0x19b9 'backpack' 'Buggie'
pause 1000
endwhile
//walk north
for 1 to 300 //do arms lore if you cannot mine for any reason
useskill 'Arms Lore'
waitfortarget 15000
target! 0x4021629b //set to a dagger in my backpack
pause 10000
endfor
usetype 0x97b 'backpack' //eat fish steaks
pause 1000
clearjournal
krynn
stahlfuchs
