Visto che avevo un po' di tempo, ecco uno script per allenare stealing con un pack animal! Potete usare tutti gli oggetti che volete! Ditemi come vi sembra!
Azioni:
Lo script rimetterà tutti gli oggetti rubati nel pack solo quando saranno finiti, quindi non mettetene troppi o rischiate che per il peso lo script si blocchi. (Calcolate che il massimo che si può ragigungere da fermi sono 200 punti in più rispetto al massimo, quindi se si ha una massima portata di 300 il massimo sarà 500)
Requisiti:
Pack Animal
Change Log:
Modifica dell'attesa per il target by Noricum
Azioni:
Lo script rimetterà tutti gli oggetti rubati nel pack solo quando saranno finiti, quindi non mettetene troppi o rischiate che per il peso lo script si blocchi. (Calcolate che il massimo che si può ragigungere da fermi sono 200 punti in più rispetto al massimo, quindi se si ha una massima portata di 300 il massimo sarà 500)
Requisiti:
Pack Animal
Change Log:
Modifica dell'attesa per il target by Noricum
codice:
;------------------------------
;-- Drael's Stealing Trainer --
;------------------------------
;-- Autore: Drael -------------
;-- Versione: 1.0 -------------
;------------------------------
Event SysMEssage Seleziona il tuo pack animal!
Set #TargCurs 1
While #TargCurs = 1
Wait 10
msg All Stay$
Set %PetID #lTargetID
FindITem %PetID G_25
If #FindDist > 1
Move #FindX #FindY 1
Event SysMessage Seleziona il tipo di oggetto da rubare!
Set %numero 1
Set #lObjectID %PetId
Event Macro 17
Wait 1s
While #ContSize <> 230_204
Wait 10
Set %ContID #ContID
While %Add <> Stop
{
Display OkCancel Seleziona l'oggetto n° %numero
If #DispRes = Cancel
Set %Add Stop
Else
{
Set #TargCurs 1
While #TargCurs = 1
Wait 10
Set %ID #lTargetID
FindItem %ID C
If %Type = N/A
Set %Type #FindType
Else
Set %Type %Type , _ , #FindType
Set %numero %numero + 1
}
}
Event SysMEssage %Type
While %loop <> Stop
{
Set #lObjectID %PetID
Event MAcro 17
FindITem %Type C_ . %ContID
If #FindKind <> -1
{
Event Macro 13 33
Target 3s
Set #lTargetID #FindID
Event MAcro 22
}
Else
{
FindITem %Type C_ . #BackPackID
Set %for #FindCNT
For %i 1 %for
{
findItem %Type C_ . #BackPackID
ExEvent Drag #FindID
Wait 10
ExEvent DropC %ContID
}
}
Wait 10s
}




lo provo subito

o almeno da quel che ne so si guadagna un massimo di 0.3 ad oggetto rubato e non a tile
Commenta