Script Looter

[colon]

Cerco un anima buona che mi dia uno script per lootare (Injection) decente perkè io ci provo a farlo ma si inceppa forse doso male le pause, se perpiacere qualkuno me ne può passare uno che và bene gli sarò grato per sempre!

[Malakai]

Putroppo nessuno ti risponderà mai! Tutti troppo egoisti e ... va beh lasciamo stare!

[MiKeLezZ]

verissimo

neppure gli amici te li passano ..

spero vengano uppate presto le modifiche al looting

[d_maeglin]

mmmm forse mi son perso qualcosa ... che modifiche devono fare?

[Al-card]

sub loot()
Uo.DeleteJournal()
#Qui va inserito il numero di oggetti
#da lootare nei corpi
var Obj2Search=14
#Qui van inseriti i type degli oggetti
#da lootare
dim objects[14]
objects[0]="0x1f09"
objects[1]="0x1086"
objects[2]="0x108a"
objects[3]="0x0eed"
objects[4]="0x1ae1"
objects[5]="0x26c3"
objects[6]="0x0ec3"
objects[7]="0x13ff"
objects[8]="0x1405"
objects[9]="0x26c1"
objects[10]="0x1b79"
objects[11]="0x1b7a"
objects[12]="0x1b74"
objects[13]="0x1b7b"
objects[14]="0x1b76"

var tmpI
Repeat
for tmpI=0 to Obj2Search
Uo.FindType(objects[tmpI],"-1","lastcorpse")
If ((Uo.FindCount() > 0) AND (Uo.GetDistance("lastcorpse")<=2)) then
Uo.Grab(0,"finditem")
Uo.Print("Found " + str(uo.findcount()))
End if
Next
Wait(250)
Until (Uo.InJournal("stop loot now") OR (Uo.Weight>390))
Uo.Print("Terminating...")
end sub

[colon]

Alucard sei un grande!
Un enorme thx da me e da tutti i nubboni che come me subiscono le prepotenze degli scripter thx!

[Enigma]

x ste banalità mica c'è bisogno di essere scripter....ma a voi piace rimanere niubbi :/ chiedete e volete sempre tutto ... qua non siamo al pease dei balocchi.

[Anarkopunk]

Originally posted by Enigma
x ste banalità mica c'è bisogno di essere scripter....ma a voi piace rimanere niubbi :/ chiedete e volete sempre tutto ... qua non siamo al pease dei balocchi.

Già, "pesante" ma c'ha ragione.. e cmq io avrei detto o impari o t'enculi.

Bella

[Infrasciamato]

Capisco gli script per pvp...anche se io personalmente uso solo macro babbe di razor...
ma non penso sia proprio necessario anche lo script per lootare...
a sto punto fatevi lo script che vi arriva automaticamente dallo skeletal e ve lo pacia/killa/loota....
poi naturalmente ognuno fa quello che vuole...

[P.oP]

Complimenti per aver postato uno script frutto del TUO lavoro vero?

[Luxifer]

Originally posted by Alucard
sub loot()
Uo.DeleteJournal()
#Qui va inserito il numero di oggetti
#da lootare nei corpi
var Obj2Search=14
#Qui van inseriti i type degli oggetti
#da lootare
dim objects[14]
objects[0]="0x1f09"
objects[1]="0x1086"
objects[2]="0x108a"
objects[3]="0x0eed"
objects[4]="0x1ae1"
objects[5]="0x26c3"
objects[6]="0x0ec3"
objects[7]="0x13ff"
objects[8]="0x1405"
objects[9]="0x26c1"
objects[10]="0x1b79"
objects[11]="0x1b7a"
objects[12]="0x1b74"
objects[13]="0x1b7b"
objects[14]="0x1b76"

var tmpI
Repeat
for tmpI=0 to Obj2Search
Uo.FindType(objects[tmpI],"-1","lastcorpse")
If ((Uo.FindCount() > 0) AND (Uo.GetDistance("lastcorpse")<=2)) then
Uo.Grab(0,"finditem")
Uo.Print("Found " + str(uo.findcount()))
End if
Next
Wait(250)
Until (Uo.InJournal("stop loot now") OR (Uo.Weight>390))
Uo.Print("Terminating...")
end sub

crafted by Alucard
-_____-

[Barbo]

Originally posted by Incognito
Complimenti per aver postato uno script frutto del TUO lavoro vero?

Infatti mi sembrava strano.

[Badoglio]

Originally posted by Incognito
Complimenti per aver postato uno script frutto del TUO lavoro vero?

Qualcuno glielo avrà passato, non so se sei stato te ma lo ha....



Edit: mi sembrava un po' troppo uguale al mio

[MarcomeX]

raga quello script lo hanno praticamente tutti

[entar]

sub loota()

var i,n
Dim A[30]
A[1] = 0x0E75 ;backpack
A[2] = 0x0E76 ;sacchetto
A[3] = 0x0E79 ;pouch
A[4] = 0x0eed ;gold
A[5] = 0x0F7B ;BM
A[6] = 0x0F7A ;Bp
A[7] = 0x0e21 ;bandage
A[8] = 0x0F84 ;Ga
A[9] = 0x0F85 ;Gs
A[10] = 0x0F8C ;Sa
A[11] = 0x0F86 ;Mr
A[12] = 0x0F88 ;Ns
A[13] = 0x0F8D ;ss
A[14] = 0x0F0C ;heal
A[15] = 0x0F0B ;stamina
A[16] = 0x1DB9 ;cap
A[17] = 0x13D6 ;gorget
A[18] = 0x13DB ;tunic
A[19] = 0x13D4 ;braccia
A[20] = 0x13DA ;gambe
A[21] = 0x13D5 ;guanti
A[22] = 0x0F7D ;Daemon Bloods
A[23] = 0x0F8F ;Grave Dusts
A[24] = 0x0F8E ;Nox Crystals
A[25] = 0x0F7E ;Bones


i = 1000

FOR n=1 TO 25
uo.findtype(A[n],"-1","lastcontainer")
if uo.findcount() > 0 then
uo.exec("moveitem finditem 0 backpack")
uo.print("Found "+str(uo.findcount()))
Wait(i)
endif
NEXT
end sub