[GUIDA] Scripting EasyUO

[Vash1986]

Pari opportunità per tutti in pvp!

;===================================
;PVP UTILITIES by Vash ver. 1.0
;===================================
;Qual è il vantaggio di questo script? Un solo tasto per il scendere e salire su qualsiasi tuo pet!!
;Aggiunte inoltre tante utility per i target, specialmente per i maghi.
;Puoi salvare un target, targettare tranquillamente un'altra persona e poi ricaricare il vecchio target!
;Puoi targettare con un semplice tasto i pet di fazione nemici!
;Puoi targettare facilmente il tuo stesso lallo senza affaticarti a farlo a mano!
;Setta qui i seriali dei tuoi pet e delle petball:
;(per ottenere il seriale, casta una magia a caso e targetta l'oggetto e il pet e guarda la variabile #ltargetid)
set %pet1 HYEJ
set %pet2 BPJB
set %pet3 VTXD
set %ball1 BCEBKMD
set %ball2 EZRTNMD
set %ball3 BCLIOMD
set %curpet %pet1 ; current pet
set %lallo FC_QC_GC_PC_ZGB_MHB_BK_JG_MG_SG_OF_SF_YJ_EC_TJ_UJ_ SC

;Ricorda che il current pet è il primo quando avvii lo script.
;Se cambi pet manualmente, per settare il nuovo current pet, usa la petball mentre sei sopra di esso.
;Ovviamente ogni volta che usi una petball, viene settato il relativo pet come current pet.
;Qundi se appena apri lo script ad esempio premendo il tasto per il remount sali sul
_mainloop:
onhotkey Q ALT ; Con questo tasto chiami con petball 1
GoSub PetBall 1
onhotkey W ALT ; Con questo tasto chiami con petball 2
GoSub PetBall 2
onhotkey E ALT ; Con questo tasto chiami con petball 3
GoSub PetBall 3
onhotkey SPACE CTRL ; Con questo tasto sali o scendi sul pet
GoSub Remount
onhotkey F5
GoSub SaveTarget ; Con questo memorizzi l'ultimo target
onhotkey F6
GoSub GetTarget ; Con questo riprendi l'ultimo target memorizzato
onhotkey F7
GoSub TargetPet ; Con questo targetti il tuo pet, e prima di targettarlo ti verrà automaticamente salvato l'ultimo target
onhotkey 5 ALT
GoSub InNoxPet ; Con questo avveleni qualsiasi pet nemico
goto _mainloop

;Inutile specificare che i tasti son modificabili

Sub PetBall
set %i %1
set %var %ball . %i
set #lobjectid %var
event macro 17 0
wait 8
event macro 1 0 All Come
wait 1
set %var %pet . %i
set #lobjectid %var
event macro 17 0
set %curpet %var
return

Sub Remount
ignoreitem reset
finditem %curpet G
if #findkind = -1 ; sei a cavallo
{
set #lobjectid #charid
event macro 17 0
return
}
event macro 1 0 All Come
wait 1
set #lobjectid %curpet
event macro 17 0
return

Sub SaveTarget
wait 1
event sysmessage Last Target Salvato
set %savedtarget #ltargetid
return

Sub GetTarget
wait 1
event sysmessage Last Target Ripristinato
set #ltargetid %savedtarget
target 3s
event macro 22 0
return

Sub TargetPet
GoSub SaveTarget
set #ltargetid %curpet
target 3s
event macro 22 0
return

Sub InNoxPet
_findloop:
finditem %lallo G_12
if #findkind = -1
{
event sysmessage Nessun Pet Nemico Trovato
ignoreitem reset
return
}
if #findrep <> 5
{
ignoreitem #findid
goto _findloop
}
event sysmessage Pet Nemico Trovato! Attendo target...
set #ltargetid #findid
target 2s
event macro 22 0
return

la sub per in nox sul pet nemico non casta automaticamente: voi dovete castare e poi premete il tasto per targettare

[PlunderStorm]

vedremo in quanti si fazioneranno e verranno a fare pvp...

[Vash1986]

Originally posted by PlunderStorm
vedremo in quanti si fazioneranno e verranno a fare pvp...

nessuno... ma almeno quelli che già lo fanno riduranno lo svantaggio in termini di script con quelli che stanno messi bene

[Davide.Mantovani]

Sei fantastico!
lunedì do l'ultimo esame e poi mi leggo le tue guide...

[Davide.Mantovani]

Originally posted by PlunderStorm
vedremo in quanti si fazioneranno e verranno a fare pvp...

entro fine estate spero di aver pronti equip e sop/sos,pensavo di dover aspettare altri mesi per capire come funzionano gli script, ma con ste guide spero di farcela in agosto
a settembre vi sego tutti...

[Hyjk]

Originally posted by Vash


nessuno... ma almeno quelli che già lo fanno riduranno lo svantaggio in termini di script con quelli che stanno messi bene

infatti! mi serviva proprio una cosa del genere thnx ancora, per la guida sto leggendo sperando che un giorno saro' capace di scriptare da solo :P

[Ospite]

vash amico mio xke nn mi lasci tutti i tuoi artefatti ....skrzo (nn e vero) cmq torna presto...

sugli script... il primo stra utile il secondo salvato anche se nn so a che serva...le guide se le hai fatte te penso vadano bene...ma tanto nn scriptero mai...anzi a ufo...che nn mi stufo..

[Blackhawk19]

molto utile grazie vash

[mondocane]

senza di te la mia vita a doom non ha piu senso ;_;

[Luxifer]

n'do vai
torna su quake va :P

[Utamatumaki]

Grazie Vash

[Vash1986]

Originally posted by Luxifer
n'do vai
torna su quake va :P

senz'altro qualche partitella torno a farmela ^_^

cmq, volevo avvertirvi ke domani parto per la germania e sarò assente 10 giorni. siccome starò a casa dei miei parenti tedeschi e ci saranno molte ore al giorno in cui non ci sarà un bel niente da fare, è lontanamente possibile che mi venga voglia di continuare la guida ^^ (dal momento che a casa di mio nonno c'è solo un 800mhz con linea isdn e non saprei che farci....).
però non voglio illudervi, si vedrà :P

ci vediamo, buone vacanze a tutti

[Luxifer]

Originally posted by Vash


senz'altro qualche partitella torno a farmela ^_^

cmq, volevo avvertirvi ke domani parto per la germania e sarò assente 10 giorni. siccome starò a casa dei miei parenti tedeschi e ci saranno molte ore al giorno in cui non ci sarà un bel niente da fare, è lontanamente possibile che mi venga voglia di continuare la guida ^^ (dal momento che a casa di mio nonno c'è solo un 800mhz con linea isdn e non saprei che farci....).
però non voglio illudervi, si vedrà :P

ci vediamo, buone vacanze a tutti

buone vacanze :P

vediamo di farci qualche partitella (magari chiamo anche tom joad e organizziamo le sfide di uod lol )

[Vash1986]

Originally posted by Luxifer



buone vacanze :P

vediamo di farci qualche partitella (magari chiamo anche tom joad e organizziamo le sfide di uod lol )

lol, torneo ufficiale di quake3 di uodreams XD
suona bene

se si organizza qualcosa chiamatemi quando torno! (stasera no xkè voglio provare wow con un 1gb di ram che mi è appena arrivato ^^)

[Ospite]

Originally posted by Falcor
visto ke vash ha postato il suo allora aggiungo anke il mio LOL

il mio disarma e beve le pozze gh e gr

provatelo
--------------------------------------------
initevents

set %Tstart #scnt

Set %Shields FIK_GIK_CIK_NIK_AIK_MIK_HLK_CLK_OIK_
Set %Archi QPO_WOH_USF_
Set %Balestra LMH_

Set %Scelte %Archi , %Shields , %Balestra

gosub OpenPaperdoll
;wait 2s
gosub OpenBackPack
;wait 2s


Loop:
if #hits < #maxhits
{
if %Tstart < #scnt
{
set %Tstart #scnt + ( ( 11 ) - ( ( #dex ) / 20 ) +3 )
finditem ZLF C
set #lobjectid #findid
event macro 17 0
target
wait 10
; wait 1s
event macro 23 0
gosub WaitFineBendata
}
}
if #STAMINA < ( #MAXSTAM - 35 )
{
finditem ZUF_NUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
finditem %Scelte C_ , %PaperDollid
if #findkind <> -1
{
event macro 24 1
wait 20
finditem ZUF_NUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
SET #LOBJECTID #FINDID
EVENT MACRO 17 0
}
wait 20
; wait 2s
event macro 24 1
}
else
{
finditem ZUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
SET #LOBJECTID #FINDID
EVENT MACRO 17 0
}
}
}
}
goto Loop

sub OpenPaperdoll
event macro 8 1
set %PaperDollid #CONTID
return

sub OpenBackPack
event Macro 8 7
set %BackPackid #BACKPACKID
return


sub WaitFineBendata

LoopWaitFineBendata:

if #STAMINA < ( #MAXSTAM - 35 )
{
finditem ZUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
finditem %Scelte C_ , %PaperDollid
if #findkind <> -1
{
event macro 24 1
wait 20
finditem ZUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
SET #LOBJECTID #FINDID
EVENT MACRO 17 0
}
wait 20
event macro 24 1
}
else
{
finditem ZUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
SET #LOBJECTID #FINDID
EVENT MACRO 17 0
}
}
}
}

if ( #MAXHITS - #HITS ) > 50 && C notIn #charstatus
{
finditem UUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
finditem %Scelte C_ , %PaperDollid
if #findkind <> -1
{
event macro 24 1
wait 20
finditem UUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
SET #LOBJECTID #FINDID
EVENT MACRO 17 0
}
wait 20
; wait 2s
event macro 24 1
}
else
{
finditem UUF C_ , %BackPackid ;get pozioni
if #findkind <> -1
{
SET #LOBJECTID #FINDID
EVENT MACRO 17 0
}
}
}
}

if %Tstart > #scnt
{
set %Compare %Timer
set %Timer %Tstart - #scnt

if %Compare <> %Timer
event ExMsg #charID 3 0 %Timer
if %Timer = 2
{
if C in #charstatus
{
finditem %Scelte C_ , %PaperDollid
if #findkind <> -1
{
event macro 24 1
wait 20
finditem NUF C_ , %BackPackid
if #findkind <> -1
{
SET #LOBJECTID #FINDID
EVENT MACRO 17 0
}
wait 20
; wait 2s
event macro 24 1
}
else
{
finditem NUF C_ , %BackPackid
if #findkind <> -1
{
SET #LOBJECTID #FINDID
EVENT MACRO 17 0
}
}
}
}
goto LoopWaitFineBendata
}
return

mi ricorda bei vecchi tempi lontani...
mai usato ma mi dicevano che era molto comodo ^_^