Чого воно неработает? Переделывал на лумбер из майнинга куска... руки кривые вот напеределывал пАмАгЫтЕ!
Code:
sub chop_spot()
UO.DeleteJournal()
var maxChopTime=7000
var times=0
var timeout=0
var try=0
ToHide()
While (UO.InJournal("There are no"))==0
try=try+1
UO.Print("Try = "+str(try))
UO.Print("Lumber time!")
UO.DeleteJournal()
UO.WaitTargetTile("1339",STR(UO.GetX()),STR(UO.GetY()),"0")
UO.UseType("0x0f43") ; ???????? ??????
timeout=0
times = times +1
if times>20 then
wait(maxChopTime)
times = 0
endif
Repeat
timeout=timeout+1000
Wait(1000)
#UO.Print("Waiting...")
Until UO.InJournal("You put") OR UO.InJournal("You can't think") OR UO.InJournal("There are no") OR timeout>maxChopTime
Wend
return 0
end sub