sub lootmob2()
var b
dim mobloot[30]
mobloot[0]='0x0F78' #
mobloot[1]='0x0F3F' #
mobloot[2]='0x0EED' #
mobloot[3]='0x1F5F' #
mobloot[4]='0x1F52' #
mobloot[5]='0x14EB' #
mobloot[6]='0x0F2F' #
mobloot[7]='0x0F30' #
mobloot[8]='0x0F21' #
mobloot[9]='0x0F13' #
mobloot[10]='0x0F1A' #
mobloot[11]='0x0F28' #
mobloot[12]='0x0F1F' #
mobloot[13]='0x0F25' #
mobloot[14]='0x0F19' #
mobloot[15]='0x0F17' #
mobloot[16]='0x0F22' #
mobloot[17]='0x0F24' #
mobloot[18]='0x0F16' #
mobloot[19]='0x0F1B'
mobloot[20]='0x0F11'
mobloot[21]='0x0F20'
mobloot[22]='0x0F1E'
mobloot[23]='0x0F10'
mobloot[24]='0x0F15' #
mobloot[25]='0x0F1D'
mobloot[26]='0x0F26'
mobloot[27]='0x0F12'
mobloot[28]='0x0F2A'
mobloot[29]='0x0F1C'
wait (500)
UO.Set('finddistance', '3')
UO.UseObject('lastcorpse')
wait (500)
if UO.GetQuantity('lastcorpse') then
UO.SetArm('temp')
UO.WaitTargetObject('lastcorpse')
UO.UseType('0x0F51'); dagger
wait (1000)
UO.Arm('temp')
wait(1000)
for b=0 To 30
uo.findtype(mobloot[b],'-1','lastcontainer')
if uo.findcount() then
uo.grab(0,'finditem')
wait (900)
endif
next
endif
endsub