Code:
sub bagball()
var bagball='0x0000' ;bagball's type
uo.FindType(bagball, -1)
if UO.GetQuantity('finditem')>0 then
uo.Drop('1', Str(uo.GetX('last')-1), Str(uo.GetY('lastattack')), Str(uo.GetZ('lastattack')), 'finditem')
wait(600)
else
UO.Print('No bagball')
end if
uo.FindType(bagball, -1)
if UO.GetQuantity('finditem')>0 then
uo.Drop('1', Str(uo.GetX('lastattack')+1), Str(uo.GetY('lastattack')), Str(uo.GetZ('lastatack')), 'finditem')
wait(600)
else
UO.Print('No bagball')
end if
uo.FindType(bagball, -1)
if UO.GetQuantity('finditem')>0 then
uo.Drop('1', Str(uo.GetX('lastattack')), Str(uo.GetY('lastattack')-1), Str(uo.GetZ('lastattack')), 'finditem')
wait(600)
else
UO.Print('No bagball')
end if
uo.FindType(bagball, -1)
if UO.GetQuantity('finditem')>0 then
uo.Drop('1', Str(uo.GetX('lastattack')), Str(uo.GetY('lastattack')+1), Str(uo.GetZ('lastattack')), 'finditem')
wait(600)
else
UO.Print('No bagball')
end if
end sub