raccogliere oro dai cadaveri

[m_Skeletor]

Il mio script...

sub remove()
var i,n
Dim A[24]
A[1] = 0x0eed ;Gold
A[2] = 0x0f10 ;Emerald
A[3] = 0x0f13 ;Ruby
A[4] = 0x0f15 ;Citrine
A[5] = 0x0f16 ;Amethyst
A[6] = 0x0f19 ;Sapphire
A[7] = 0x0f21 ;Star Sapphire
A[8] = 0x0f25 ;Piece of Amber
A[9] = 0x0f26 ;Diamond
A[10] = 0x0f2d ;Tourmaline
A[11] = 0x0f7a ;Black Pearl
A[12] = 0x0f7b ;Blood Moss
A[13] = 0x0f84 ;Garlic
A[14] = 0x0f85 ;Ginseng
A[15] = 0x0f86 ;Mandrake Root
A[16] = 0x0f88 ;Nightshade
A[17] = 0x0f8c ;Sulphurus Ash
A[18] = 0x0f8d ;Spider's Silk
A[19] = 0x0f78 ;Batwing
A[20] = 0x0f7d ;Daemon Blood
A[21] = 0x0f7e ;Bone
A[22] = 0x0f8a ;Pig Iron
A[23] = 0x0f8e ;Nox Crystal
A[24] = 0x0f8f ;Grave Dust
i = 100

FOR n=1 TO 24
uo.findtype(A[n],"-1","lastcontainer")
if uo.findcount() > 0 then
UO.grab(0,"finditem")
; uo.print("Found "+str(uo.findcount()))
Wait(i)
end if
NEXT
end sub