sub loot()
DIM R[11] # amount of lines in the massive.
var a
R[1] = '0x1012' # key, Dastard
R[2] = '0x0EED' # gp
R[3] = '0x0F87' # eyes of newt
R[4] = '0x0F8E' # serpent, spider and scorp scales
R[5] = '0x0F80' #  deamon bones
R[6] = '0x0F78' # batwings
R[7] = '0x19B7' # 1 ore
R[8] = '0x100E' # despice keys
R[9] = '0x1078' #  hides
R[10] = '0x1010' # shame lvl 1 key
R[11] = '0x0F82' # dragon blood

UO.UseObject('lastcorpse')
uo.waittargetobject('lastcorpse')
uo.usetype('0x0EC4') #type of the skinning knife.
wait(500)
for a=1 to 11 # amount of item types set up earlier, if you have added some more, edit this line too
uo.findtype(R[a],"-1","lastcorpse")
if UO.FindCount()>0 and Uo.GetDistance("lastcorpse")<=2 then
UO.Grab("0","finditem")
wait(2000)
end if
wait(10)
next
wait(300)
if uo.count('0x1078') then
uo.waittargettype('0x1078') #corpse type, don't change anything.
uo.usetype('0x0EC4') #type of the skinning knife.
wait(100)
endif
wait(300)
end sub