[EasyUO] Drael's Death Strike Trainer

[Drael]

Vista la richiesta di questo script ne ho realizzato uno io.
Leggendo il post dello script che è stato postato per DS e notandone i vari BUG ho deciso di scrivere questo script, che non ha (per ora non ne ho trovati) errori. Lo script non ha una rail e dovrete muovervi voi, meglio se in rotta infinita. Attaccherà solo il mirror e nessun'altra persona/oggetto/animale come succedeva con quello postato in precedenza sul forum. Ditemi come vi sembra e se notate qualcosa da migliorare.

Changelog:
- Aggiunta apertura dello status all'avvio dello script

Buon Macraggio

; --------------------------------
; - Drael's Death Strike Trainer -
; --------------------------------
; - Autore: Drael    -------------
; - Versione: 1.0    -------------
; --------------------------------
Event Macro 8 2
ChooseSkill Ninjitsu
Set %SkillStart #Skill
GoSub MenuShow
Finditem #CHARID
set %Chartype #FindType
Loop:
GoSub Menu Mirror Image
Event Macro 15 252
Wait 3s
TrovaMirror:
FindItem %Chartype G_2
If #FindKind <> -1
{
   Event Property #FindID
   Wait 10
   If #CharID = #FindID
   {
      IgnoreItem #FindID
      GoTo TrovaMirror
   }
   If #CharName in #Property
   {
      Set %Char #FindID
      Event SysMessage Mirror Trovato!
      GoTo DeathStrike
   }
   IgnoreItem #findID
   goTo TrovaMirror
}
If #FindKind = -1
   GoTo TrovaMirror
DeathStrike:
Wait 10
GoSub Menu Death Strike
Event Macro 15 246
Wait 10
If You_need_30_mana_to_perform_that_attack in #SysMsg
   GoTo WaitForMana
UccidiNemico:
Wait 10
GoSub Menu Attacca Mirror
Set #lTargetID %Char
event macro 27
FindItem %Char G_2
If #FindKind <> -1
{
   Wait 1s
   GoTo UccidiNemico
}

ManaLoop:
Wait 1s
if #Mana < 39
{
   GoSub Menu Meditazione .
   GoTo ManaLoop
}
GoTo Loop

WaitForMana:
if #Mana < 39
{
   GoSub Menu Meditazione .
   Event Macro 13 46
   GoTo ManaLoop
}
GoTo DeathStrike

Sub MenuShow
ChooseSkill Ninjitsu
Set %SkillCorrente #Skill
Set %Azione Preparazione , #spc , Script...
   Menu Show
   Menu Clear
   Menu Window Title Drael's  Death Strike Trainer
   Menu Window Color Black
   Menu Window Size 180 100
   Menu Font Color Red
   Menu Font BGColor Black
   Menu Text Titolo 5 10 Drael's Death Strike Trainer
   Menu Font Color White
   Menu Text Azione 5 30 Azione:
   Menu Text Skill  5 50 Skill:
   Menu Text Gain   5 70 Gain:
   Menu Font Color Lime
   Menu Text AzioneCorrente 50 30 %Azione
   str len %SkillCorrente
   str ins %SkillCorrente #dot #strRes
   Menu Text SkillCorrente 140 50 #strRes
   set %GainTotali %SkillCorrente - %SkillStart
   str len %GainTotali
   str ins %GainTotali #dot #strRes
   Menu Text GainCorrente 140 70 #strRes
Return

Sub Menu
Set %Azione1 %1
Set %Azione2 %2
ChooseSkill Ninjitsu
Set %SkillCorrente #Skill
Set %Azione %Azione1 , #spc , %Azione2
Menu Delete AzioneCorrente
Menu Delete SkillCorrente
Menu Delete GainCorrente
   Menu Text AzioneCorrente 50 30 %Azione
   str len %SkillCorrente
   str ins %SkillCorrente #dot #strRes
   Menu Text SkillCorrente 140 50 #strRes
   set %GainTotali %SkillCorrente - %SkillStart
   str len %GainTotali
   str ins %GainTotali #dot #strRes
   Menu Text GainCorrente 140 70 #strRes
Return

[danyeleid]

Ti do solo un consiglio al volo, dunque, tu usi una struttura per i cicli di questo tipo:

Etichetta:
*azioni varie*
if (condizione)
goto Etichetta

Meglio se usi il while, perchè eviti di far passare tutte le righe prima di ritornare all'etichetta, il che appesantisce lo script,la sintassi è molto semplice:

while (condizione)
{
*azioni varie*
}

Se c'è solo un'azione nn servono neanche le parentesi graffe =)

[Drael]

del fatto che se c'è una sola azione non si usano le parentesi lo so =) cmq si in effetti uso quel sistema ad etichette per controllare perchè diciamo che se ci sono errori riesco a rileggerlo meglio e mi sembra una cosa più "logica"...mi trovo male con gli while =P

[danyeleid]

del fatto che se c'è una sola azione non si usano le parentesi lo so =) cmq si in effetti uso quel sistema ad etichette per controllare perchè diciamo che se ci sono errori riesco a rileggerlo meglio e mi sembra una cosa più "logica"...mi trovo male con gli while =P

Si ma la differenza sostanziale è che il GOTO passa tutto il codice fino alla fine e poi dall'inizio fino all'etichetta, il while resta solo sul codice da eseguire, se devi mettere qualcosa usa i commenti:

;"commento"

[Drael]

va beh vorrà dire che userò il while.

cmq cosa c'entra il ; "commento" nel code? =\ mi sembra di saperlo usare ....

[danyeleid]

va beh vorrà dire che userò il while.

cmq cosa c'entra il ; "commento" nel code? =\ mi sembra di saperlo usare ....

Beh si in effetti si,mi ero dimenticato che l'avevi usato xD

[Rusiel206]

a me sto script fa solo mirror image e si ferma ^^'

[Drael]

dopo che summoni in basso a sinistra nei messaggi di gioco ti compare il messaggio Mirror Trovato?

[Rusiel206]

dopo che summoni in basso a sinistra nei messaggi di gioco ti compare il messaggio Mirror Trovato?

no , nella finestrella dello script appare: azione:mirror image, evoca la mirro e rimane fermo


cmq la skill l'ho macrata con 1 altro script oramai :-S volevo solo segnalare il bug.

[Drael]

mi sembra strano, alle altre persone a cui lo ho fatto provare non dava problemi =|

[Feynor]

no , nella finestrella dello script appare: azione:mirror image, evoca la mirro e rimane fermo

Domanda stupida:

Provi su Felucca vero?

[markangel]

anche a me questo script da lo stesso preblema:lo attivo fa mirror immage e poi non fa più niente, mi sapresti dire in cosa sbaglio?

[Drael]

siete in una gilda vero? (se non sbaglio per attaccare anche un proprio summon bisogna essere in una gilda o a felucca) cmq a me ed ai mei amici non da problemi, mi sembra strano. =|

[danyeleid]

TrovaMirror:
FindItem XU G_2

Credo il problema sia che XU è solo un type, i PG possono avere 4 type (elfo maschio,elfo femmina,umano maschio, umano femmina),mettici:

Finditem #CHARID
set %Chartype #FindType
Finditem %Chartype G_2

Così eviti pure che trovi gli altri 3 types ed eviti rotture eventuali
PS: Se state a Trammel anche in una gilda NON vi permette di attaccare le mirror quindi ASSICURATEVI DI STARE A FELUCCA

[Drael]

TrovaMirror:
FindItem XU G_2

Credo il problema sia che XU è solo un type, i PG possono avere 4 type (elfo maschio,elfo femmina,umano maschio, umano femmina),mettici:

Finditem #CHARID
set %Chartype #FindType
Finditem %Chartype G_2

Così eviti pure che trovi gli altri 3 types ed eviti rotture eventuali
PS: Se state a Trammel anche in una gilda NON vi permette di attaccare le mirror quindi ASSICURATEVI DI STARE A FELUCCA

Ok faccio subito la modifica, non ci avevo pensato , ti ringrazio. Cmq sei sicuro che anche in una gilda non si può? Ho chiesto ad un mio amico e lui a casa sua (Malas) è in una gilda e le killa le mirror =|