annuncio

Comprimi
Ancora nessun annuncio.

preblemi scripts dopo fix

Comprimi
X
 
  • Filtro
  • Ora
  • Visualizza
Elimina tutto
nuovi messaggi

  • preblemi scripts dopo fix

    Segnalo che dopo i fix danno problemi i seguenti script:

    1) ultimate healer
    2) leather farmer

    il problema è la bendata, quindi credo sempre la macro 58. Si deve sostituire con qualcos'altro?

    Grazie a tutti
    ICQ 640 395 420

  • #2
    ; .Ultimate Healer.
    ; TheGod

    set #lpc 100
    set %d #false
    set %aids ZLF
    set %limit 5
    menu window size 10 85
    menu window title
    menu window color black
    menu font bgcolor black
    menu font color white
    menu font size 18
    menu text time 15 15 0
    menu font size 22
    menu font color yellow
    menu text use_cure 15 40 .
    menu show

    main:
    if yes in #charghost || #targcurs = 1
    goto main
    finditem %aids C_ , #backpackid
    if #findstack = 0
    goto main
    if ( #hits < ( #maxhits - %limit ) ) || c in #charstatus
    gosub aids
    goto main

    sub aids
    again:
    event macro 8 7
    finditem %aids c_ , #backpackid
    if #findstack = 0
    return
    set %time ( ( 11 - ( #dex / 20 ) ) * 10 )
    if d in #charstatus
    {
    set %end_d #scnt2 + 62
    d_loop_1:
    if ( ( #scnt2 + %time ) > %end_d ) || d notin #charstatus
    goto apply
    goto d_loop_1
    }

    apply:
    event macro 58 0
    wait 1
    set %start #scnt2
    set %end %start + %time
    gosub check_msg
    if #result = 0
    return
    gosub check_time
    if #result = 1
    goto again
    return

    sub check_msg
    set %out #scnt2 + 5
    set %index 1
    msg_loop:
    scanjournal %index
    if applying in #journal
    return 1
    if being in #journal || #scnt2 > %out
    return 0
    set %index %index + 1
    goto msg_loop

    sub check_time
    set %left %end - #scnt2
    set %no_print #scnt2 + 5
    menu set time %left
    aids_loop:
    if #scnt2 >= %no_print
    {
    if %left <= 20 && c in #charstatus
    {
    finditem NUF C_ , #BACKPACKID && #findstack > 0 ;veleno
    set #lobjectid #findid
    event macro 17 0
    menu set use_cure CURE!
    }
    menu set time %left
    set %no_print #scnt2 + 5
    }
    if d in #charstatus && %d = #false
    {
    set %d #true
    set %end_d #scnt2 + 62
    d_loop_2:
    if ( ( #scnt2 + %time ) > %end_d ) || d notin #charstatus || c notin #charstatus
    {
    menu set use_cure MORTAL
    menu set time 0
    return 1
    }
    if #scnt2 >= %no_print
    {
    if %left <= 35 && c in #charstatus
    menu set use_cure NOW!
    menu set time %left
    set %no_print #scnt2 + 5
    }
    goto d_loop_2
    }
    if #scnt2 > %end
    {
    if %d
    set %d #false
    menu set use_cure .
    menu set time 0
    return
    }
    set %left %end - #scnt2
    goto aids_loop
    ICQ 640 395 420

    Commenta

    Sto operando...
    X