Code:
sub Stealing()
while not UO.Dead()
UO.FindType('0x0EED',-1,'backpack')
while UO.FindCount() > 0
UO.MoveItem('finditem','1','x55533049')
wait(1000)
UO.FindType('0x0EED',-1,'backpack')
wend
UO.FindType('0x0EED',-1,'0x558CAA37')
while UO.FindCount() > 0
UO.WaitTargetObject('finditem')
UO.UseSkill('Stealing')
wait(5000)
UO.FindType('0x0EED',-1,'0x558CAA37')
wend
wend
end sub
Там где wait(1000) Это твои wait(3000) - Поправь просто мне 1000 хватило милисекунд
И второе я потестировал просто с сумочкой, получается, что он складиывает все золото в кучку, а хотелось наверно чтоб по одной монетке?