Yoko
http://forum.yoko.com.ua/

Drop Logs Problem
http://forum.yoko.com.ua/viewtopic.php?f=20&t=11448
Page 1 of 1

Author:  yxTbl [ 2007-02-14 10:46:54 ]
Post subject:  Drop Logs Problem

Code:
sub DropLogs()
if uo.Waiting() then
uo.CancelTarget()
end if
var a,Exit
dim Logs[1]
Logs[0]=0x1BDD
uo.Print('vikladivaju logi.')
uo.SetReceivingContainer(Chest)
wait(500)
for a=0 to 0
Exit=0
repeat
uo.FindType(Logs[a])
if uo.GetQuantity('finditem')>0 then
uo.Grab('0','finditem')
wait(1500)
GotoXY(ContX,ContY)
else
Exit=1
end if
until Exit==1
next
if EatingFood==1 then
EatingFood()
end if
uo.UnSetReceivingContainer(Chest)
uo.Print('logi skinuti.')
end sub

vot no on kada podbegaet k sunduku , 4tobi skinut' logi kidaet pervie brevna i ubegaet na 3\4 kvadratika nize ;( ili eto v hodilke problema ?

Author:  Fraerok [ 2007-02-16 11:17:40 ]
Post subject: 

Code:
sub DropLogs() 
var logs = '0x1BDD'                           # ID'шник логов

uo.findtype(logs)                           
uo.print(uo.FindCount())
while uo.FindCount() > 0
uo.MoveItem("finditem","-1","0x40091D49")     # ID'шник сундука
wait(2000)
uo.findtype(logs)
wend
end sub

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/