Code: Select all
sub checkmon()
uo.ignorereset()
uo.ignore('self')
uo.exec('set finddistance 0')
uo.findtype('-1', '-1', '1')
while uo.findcount() > 0
if uo.getnotoriety('finditem') > 0 then
uo.msg('Stop')
uo.msg('Iecaei noeo!') # АХТУНГ??!!
uo.usetype('0x13AF')
uo.usetype('0x1B76')
uo.attack('finditem')
while uo.gethp('finditem') > 0
if uo.life < 50 then
uo.usetype('0x0F0C')
endif
wait(1000)
wend
loot()
wait(1000)
else
uo.ignore('finditem')
endif
uo.findtype('-1', '-1', '1')
wend
uo.ignorereset()
end subCode: Select all
sub loot()
VAR Corpse = UO.GetSerial( 'lastcorpse' ) , s, exit
UO.waittargetobject('lastcorpse')
UO.Usetype ('0x13F6')
wait(500)
DIM loot[3]
loot[0] = 0x0EED
loot[1] = 0x14EB
loot[2] = 0x1078
UO.SetReceivingContainer('backpack')
for s = 0 to 2
repeat
exit = 0
UO.FindType(Loot[s],-1,'lastcorpse')
if UO.GetQuantity('finditem') > 0 then
UO.Grab('0', 'finditem')
wait(3000)
else
exit = 1
endif
until exit ==1
Next
UO.UnSetReceivingContainer()
uo.usetype ('0x13F6')
end sub