Logs to boards
Posted: October 15th, 2016, 3:34 am
does any1 have a macro to cut logs into boards?
thx in advance
thx in advance
A Mondain's Legacy era Ultima Online freeshard.
https://www.uogdemise.com/community/
https://www.uogdemise.com/community/viewtopic.php?f=10&t=454
Code: Select all
Assistant.Macros.DoubleClickAction|1134592593|3907
Assistant.Macros.WaitForTargetAction|30
Assistant.Macros.AbsoluteTargetAction|0|0|1153617480|128|107|0|7133
Code: Select all
//Set this as your container with logs
@setalias 'LogRestock' xxxxxxx
//Sets log colors
if not listexists 'LogHue'
createlist 'LogHue'
endif
if list 'LogHue' == 0
//Normal
pushlist 'LogHue' 0
//Oak
pushlist 'LogHue' 2010
//Ash
pushlist 'LogHue' 1191
//Yew
pushlist 'LogHue' 1192
//Bloodwood
pushlist 'LogHue' 1194
//Heartwood
pushlist 'LogHue' 1193
//Frostwood
pushlist 'LogHue' 1151
endif
//Opens Restock
useobject 'LogRestock'
pause 500
for 0 to 'LogHue'
//Moves logs to backpack
while counttype 0x1bdd LogHue[] 'LogRestock' > 0
movetype 0x1bdd 'LogRestock' 'backpack' [(0 0 0)] LogHue[] 200//<<< Change this amount to whatever you want
pause 1000
//Chops logs
if @findtype 0x1bdd LogHue[] 'backpack'
useobject 'LeftHand'
waitfortarget 1000
target! 'found'
pause 1000
endif
//Moves boards back to restock
if @findtype 0x1bd7 LogHue[] 'backpack' 'any'
movetype 0x1bd7 'backpack' 'LogRestock' [(0 0 0)] LogHue[] 'any'
pause 1000
endif
endwhile
if counttype 0x1bdd LogHue[] 'LogRestock' == 0
poplist 'LogHue' 'front'
pause 500
replay
stop
endif
if counttype 0x1bdd 'any' 'LogRestock' == 0
stop
endif
endfor