Ultima Online Antares

sub Bowcr() UO.useobject(box)

var box='0x40629213'# Ящик с нитками,дровами и стейками
var box2='0x40628EB4'# Ящик для готовой продукции
##################################################
#Версия injecton.dll Yokoinjection 505.18 VeNdOr #
##################################################
##########################################
##################################
var meshok='0x0E76'
var drova='0x1BDD'
var nitki='0x0FA0'
var bow='0x13B1'
var noz='0x0F51'
var food='0x097B'
var n=0
var stop,mesh
##################################
sub Bowcr()
repeat
UO.cancelmenu()
UO.autoMenu('What do you want to carve the wood','Bow')
UO.useobject(box)
checklag()
UO.findtype(drova,'0x0000',box)
if UO.GetQuantity('finditem')<300 then
terminate()
endif
UO.grab(str(350-n),'finditem',box)
checklag()
wait(1000)
UO.findtype(nitki,'0x0000',box)
if UO.GetQuantity('finditem')<50 then
terminate()
endif
UO.grab(str(50-n),'finditem',box)
checklag()
UO.findtype(meshok,'-1',box)
if UO.FindCount('finditem')==0 then
terminate()
endif
UO.grab('1','finditem',box)
checklag()
wait(1000)
UO.SetCatchBag('finditem')
mesh=UO.getserial('finditem')
checklag()
repeat
if UO.count(noz)==0 then
UO.findtype(noz,'0x0000',box)
UO.grab('1','finditem')
checklag()
endif
UO.waittargettype(drova)
wait(100)
UO.usetype(noz)
UO.deletejournal()
repeat
wait(1000)
until UO.InJournal('You put|fail') || UO.count(noz)==0
until UO.count(bow) == 50
UO.unSetCatchBag()
checklag()
UO.moveitem(mesh,'-1',box2)
checklag()
n=UO.count(drova)
eat()
UO.findtype(meshok,'-1',box2)
wait(100)
until UO.findcount()==200
end sub
sub checklag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('ackpack')
end sub
sub terminate()
uo.Print('terminate all')
uo.DeleteJournal()
uo.Exec('terminate all')
wait(100)
uo.Exec('terminate all')
wait(100)
uo.Exec('terminate all')
wait(100)
end sub
sub eat()
UO.findtype(food,'0x0000',box)
checklag()
if UO.getQuantity('finditem')>0 then
UO.grab('25','finditem')
UO.deletejournal()
repeat
UO.useobject('finditem')
wait(500)
until UO.InJournal('You are simply too full to eat any more!') or UO.count(food)==0
if UO.count(food)>0 then
UO.findtype(food,'0x0000','backpack')
UO.moveitem('finditem','-1',box)
checklag()
endif
else
UO.print('Пусто')
endif
end sub