Пагамите с лутом трупов

[fanatok]

нужен скрипт на лут денег и камней, самый обычный чтоб открыл труп нажал кнопку и все деньги и камешки перекочевали из трупа в бек.
Па форуму лазил но ненашел ничево прастова а боле сложными не умею пользоватся . Памагите пажалуста

[fanatok]

ребят ну падскажите чтота, пробовал многа уже гатовых с форума например вот
sub Loot()
VAR i,Exit
DIM Loot[23]
Loot[0]=0x1B76 ;shit
Loot[1]=0x1415 ;pyzo
Loot[2]=0x1411 ;nogi
Loot[3]=0x1410 ;ple4u
Loot[4]=0x1414 ;pyku
Loot[5]=0x1413 ;gorget
Loot[6]=0x1412 ;shlem
Loot[7]=0x13B9 ;viking
Loot[8]=0x13FA ;topor1
Loot[9]=0x143E ;helbeard
Loot[10]=0x0E87 ;pithfork
Loot[11]=0x1086 ;bracelet
Loot[12]=0x13B1 ;lyk
Loot[13]=0x0F0E ;helki
Loot[14]=0x0F0E ;mana
Loot[15]=0x0F0E ;stamina
Loot[16]=0x0F0E ;inviz
Loot[17]=0x1F5F ;FS
Loot[18]=0x1F52 ;paral
Loot[19]=0x0EED ;GP
Loot[20]=0x1416 ;pyzo
Loot[21]=0x1418 ;pyku
Loot[22]=0x1B77 ;shit
UO.SetReceivingContainer('0x401B5E11') ;ID backpacka
For i=0 to 22
Exit=0
repeat
UO.FindType(Loot[i],-1,'lastcontainer')
if UO.GetQuantity('finditem') then
UO.Grab('0','finditem')
wait(100)
Else
Exit=1
endif
until Exit==1 OR uo.injournal("loot")
Next
UO.UnSetReceivingContainer()
end sub

но ничево не лутится, пытается чтота делать деньги паднимает и ложит на место вроде и все. также и с остальными. Памагите пажалуста, после dwara мозг савсем атрафировался, хочица в радное уо паиграть пачеловечески