Se vi può essere utile....

[andrea82]

....ho messo il pg a Luna per ressare i vostri pet (grazie Danilovic per lo script).

[sanderer]

bella idea! bravissimo

[Jekko]

un link per scaricare lo script?

[maxel]

grande come sempre, bella.

[Blackhawk19]

gj

[Nitro]

....ho messo il pg a Luna per ressare i vostri pet (grazie Danilovic per lo script).

Come sempre ogni tua cosa è di una utilità immensa grazie di cuore a te e a Danilovic

[delpietro]

tvb :*

[Batista]

Grande Larhalt, come sempre del resto!!!!

Cmq ecco lo script postato QUA da Danilovic:

;By Danilovic
set %timer #scnt + 60

Loop:

set %resjournal #jindex

finditem HHB_UJ_MHB_EG_ZGB_WJ_QC_YJ_OJ_TJ_BO_JG_WN_SF_SG_OF_MG_JB_CG_TE
+_DF_CD_YE_XE_GN_OF_HH_FN_CH_JJ_KG_SH_SC G_1                                ;cerca se ci sono pet da ressare

set %numeropettrovati #findCnt
while #findIndex <= %numeropettrovati                                       ;ripeti fino a controllo tutti pet trovati
    {
     set #LTARGETID #FINDID                                                 ;assegna il pet trovato al lasttarget
     event macro  13 2                                                      ;animal lore
     target
     event macro 22 0                                                       ;last target
     wait 10
     
     while #jindex >= %resjournal                                           ;controlla sul journal se il pet è morto
           {
            scanjournal %resjournal
            set %resjournal %resjournal + 1
            
            if The_spirits_of_the_dead in #journal                          ;se è morto vai alla sub per il res
                gosub resurrect
           }
           
     if #CONTSIZE = 400_381                                                  ;se gump animal lore si apre
            {
             set %x #CONTPOSX + 190
             set %y #CONTPOSY + 200
             click %x %y r                                                   ;chiudi gump animal lore
            }
     ignoreitem #LTARGETID                                                   ;ignora pet non morto o ressato
     set #findIndex #findIndex + 1                                           ;aumenta index per passare pet successivo
     wait 5
    }
    
if %timer < #scnt
    {
          ignoreitem reset                                                   ;resetta dopo 1 minuto i pet ignorati
          set %timer #scnt + 60
    }
    
goto loop                                                                    ;torno al loop




sub resurrect
{
    FINDITEM ZLF C_ , #backpackid                                            ;cerca bende nel backpack
    if #FINDKIND = -1
       {
        For %n 1 5
           {                                                                 ;Chiedi 5 volte di apssarti una benda
            Event Macro 4 0 Passami delle bende e ti resso il pet
            wait 5s
            If #CONTNAME = trade_gump                                        ;se si apre il gump
                    {
                        set %x #CONTPOSX + 65
                        set %y #CONTPOSY + 42
                        click %x %y                                          ;accetta bende in trade
                        gosub resurrect                                      ;vai alla sub res
                    }
           }
        return                                                               ;se per 5 volte non ti passano benda return e ignorapet
       }
    set #LOBJECTID #FINDID                                                   ;assegna id bende al lastobject
    event macro 17 0                                                         ;last object
    target
    event macro 22 0                                                         ;last target
    wait 45
    while #jindex >= %resjournal                                             ;controlla sul journal i risultati della bendata
          {
          scanjournal %resjournal
          set %resjournal %resjournal + 1
          if You_fail_to_resurrect in #journal                               ;se è fallita ritorna alla sub di res
             gosub resurrect
          }

[Kraag]

bel lavoro! Complimenti

[Raul90]

ottimo

[bubbaverde]

Bella grazie!!!

[dio_brando89]

sei un mito

[Ildioscuro]

thx

[emanuele888]

bell idea

[casasanta]

thx mille