Code: Select all
sub att()
#**********
#(C) Cooper
#***********
VAR monst=0x2006 #Тип монстра
VAR feathers=0x1bd1
VAR dagger=0x13B9
VAR backpack=0x401f3513
var baggg
var weapon='0x13B9' # Тип пушки
var i
DIM garp[4]
garp[0]='0x1BD1'
garp[1]='0x0eed'
garp[2]='0x1BFB'
garp[3]='0x1F3F'
UO.Set('finddistance','3')
while UO.GetHP('self') < 500
UO.FindType(monst, '-1', 'ground')
if UO.FindCount() > 0 then
UO.DeleteJournal()
UO.Attack('finditem')
for i = 0 to 3
uo.warmode(0)
baggg=uo.getserial('lastcorpse')
uo.useobject(baggg)
uo.Waittargetobject(baggg)
wait(700)
uo.usetype(dagger)
wait(700)
uo.findtype(garp[i],-1,baggg)
if uo.findcount()>0 then
uo.grab(-1,'finditem')
Wait(600)
endif
uo.ignore('lastcorpse')
next
uo.IgnoreReset()
uo.usetype(weapon)
uo.warmode(1)
wait(700)
else
wait(100)
endif
wend
end sub