Allora, io uso da parecchio la script per curarsi quella di Vash, senza che mi desse problemi, ma da quando hjo messo la nuova versione di easyuo (non so se sia questa la causa) , attivo la skript e quando ricevo danno comincia a bendare di seguito. Ma non e' solo questo quando succede questo appaiono numero ke non capisko tipo:
" 53 53 60 60 60 50". Lo fa fino a quando non sono curato del tutto. La skript e la seguente: ;=============================
;Vash Healer v. 2.1
;=============================
;>>>>TENETE SEMPRE APERTI ZAINO E STATUS BAR!!!<<<<
;Testato su emulatore di Ultima Online RunUO 1.0.1 (con settaggi bendata OSI) col client 5.0.0b
;Dovrebbe funzionare senz'altro anche coi client vecchi.
;Se le bende finiscono o sono poche ti avverte.
;Ma basta rifornirsi senza dover riavviare lo script.
;Controlla il journal per verificare che le bende siano state correttamente applicate, altrimenti riprova.
;Ottimo calcolo della bendata in base alla dex, secondo le ultime modifiche OSI.
;Mostra una sorta di countdown sulla testa del pg, rappresentante i decimi di secondo mancanti alla fine della bendata.
;SETUP
;===========
;set %counter 1 per usare il contatore in decimi di secondo, set %counter 0 per non usarlo
set %counter 1
;SPECIAL CURE
;=============
;E' anche possibile far funzionare lo script in modo che beva una pozione contro il veleno poco prima che finisca la bendata,
;in modo che sia impossibile farla fallire.
;Basta impostare su F11 una macro di Razor che beve la pozione cure (togliendo scudo ovviamente), e settare %cure a 1 anzichè 0.
set %cure 1
;Se invece non volete usare automaticamente pozze cure, lasciate %cure a 0.
;Se non vi piace il tasto F11 potete cambiarlo in fondo allo script.
;Ma non mettete combinazioni di tasti come CTRL F11 perchè razor non li intercetta.
;Finisce qui il setup, modificate lo script sottostante solo se sapete scriptare o volete cambiare il tasto per razor.
;MAIN LOOP
;=========
linespercycle 20
mainloop:
if #hits < #maxhits || C in #charstatus
{
GoSub CheckAids
if #result = #true
{
GoSub CheckDex
GoSub Apply
if #result = #false
goto mainloop
GoSub Waitnew
wait 2
}
}
wait 1
goto mainloop
;SUB CHECK AIDS
;==============
Sub CheckAids
finditem ZLF C_ , #BACKPACKID
if #findstack = 0
{
event ExMsg #charID 3 0 No bandages found!
wait 5s
return #false
}
if #findstack < 10 && #findcnt < 2
event sysmessage Attention, only #finstack aids remaining
return #true
;SUB CHECK DEX
;==============
Sub CheckDex
set %delay 11 - ( #dex / 20 )
set %euowait %delay * 10
return
;SUB APPLY
;=========
Sub Apply
aidloop:
finditem ZLF C_ , #BACKPACKID
set #lobjectid #findid
set %startscan #jindex
event macro 17 0
target 15
if #targcurs = 0
goto aidloop
event macro 23 0
GoSub WaitStartMsg 15
if #result = #false
goto aidloop
if #result = 1
return #false
return
;SUB WAITSTARTMSG
;===============
Sub WaitStartMsg
set %start #scnt2
set %start %start + %1
_waitsysmsgloop:
for %i %startscan #jindex
{
scanjournal %i
if you_begin in #journal
{
set %applystart #scnt2
return #true
}
if that_being in #journal
return 1
}
if #scnt2 >= %start
return #false
wait 1
goto _waitsysmsgloop
;SUB WAITNEW
;============
Sub WaitNew
set %keypressed 0
set %end %euowait + %applystart
set %limitcure %end - 16
waitloop:
if %counter = 1
{
set %remaining ( %end - #scnt2 )
event ExMsg #charID 3 0 %remaining
}
wait 2
if C in #charstatus && %cure = 1
{
if #scnt2 > %limitcure && %keypressed = 0
{
key F11 ; cambiatelo se necessario
set %keypressed 1
}
}
if #SCNT2 >= %end || you_finish_applying in #sysmsg
return
goto waitloop__________________
Spero mi possiate aiutare.
" 53 53 60 60 60 50". Lo fa fino a quando non sono curato del tutto. La skript e la seguente: ;=============================
;Vash Healer v. 2.1
;=============================
;>>>>TENETE SEMPRE APERTI ZAINO E STATUS BAR!!!<<<<
;Testato su emulatore di Ultima Online RunUO 1.0.1 (con settaggi bendata OSI) col client 5.0.0b
;Dovrebbe funzionare senz'altro anche coi client vecchi.
;Se le bende finiscono o sono poche ti avverte.
;Ma basta rifornirsi senza dover riavviare lo script.
;Controlla il journal per verificare che le bende siano state correttamente applicate, altrimenti riprova.
;Ottimo calcolo della bendata in base alla dex, secondo le ultime modifiche OSI.
;Mostra una sorta di countdown sulla testa del pg, rappresentante i decimi di secondo mancanti alla fine della bendata.
;SETUP
;===========
;set %counter 1 per usare il contatore in decimi di secondo, set %counter 0 per non usarlo
set %counter 1
;SPECIAL CURE
;=============
;E' anche possibile far funzionare lo script in modo che beva una pozione contro il veleno poco prima che finisca la bendata,
;in modo che sia impossibile farla fallire.
;Basta impostare su F11 una macro di Razor che beve la pozione cure (togliendo scudo ovviamente), e settare %cure a 1 anzichè 0.
set %cure 1
;Se invece non volete usare automaticamente pozze cure, lasciate %cure a 0.
;Se non vi piace il tasto F11 potete cambiarlo in fondo allo script.
;Ma non mettete combinazioni di tasti come CTRL F11 perchè razor non li intercetta.
;Finisce qui il setup, modificate lo script sottostante solo se sapete scriptare o volete cambiare il tasto per razor.
;MAIN LOOP
;=========
linespercycle 20
mainloop:
if #hits < #maxhits || C in #charstatus
{
GoSub CheckAids
if #result = #true
{
GoSub CheckDex
GoSub Apply
if #result = #false
goto mainloop
GoSub Waitnew
wait 2
}
}
wait 1
goto mainloop
;SUB CHECK AIDS
;==============
Sub CheckAids
finditem ZLF C_ , #BACKPACKID
if #findstack = 0
{
event ExMsg #charID 3 0 No bandages found!
wait 5s
return #false
}
if #findstack < 10 && #findcnt < 2
event sysmessage Attention, only #finstack aids remaining
return #true
;SUB CHECK DEX
;==============
Sub CheckDex
set %delay 11 - ( #dex / 20 )
set %euowait %delay * 10
return
;SUB APPLY
;=========
Sub Apply
aidloop:
finditem ZLF C_ , #BACKPACKID
set #lobjectid #findid
set %startscan #jindex
event macro 17 0
target 15
if #targcurs = 0
goto aidloop
event macro 23 0
GoSub WaitStartMsg 15
if #result = #false
goto aidloop
if #result = 1
return #false
return
;SUB WAITSTARTMSG
;===============
Sub WaitStartMsg
set %start #scnt2
set %start %start + %1
_waitsysmsgloop:
for %i %startscan #jindex
{
scanjournal %i
if you_begin in #journal
{
set %applystart #scnt2
return #true
}
if that_being in #journal
return 1
}
if #scnt2 >= %start
return #false
wait 1
goto _waitsysmsgloop
;SUB WAITNEW
;============
Sub WaitNew
set %keypressed 0
set %end %euowait + %applystart
set %limitcure %end - 16
waitloop:
if %counter = 1
{
set %remaining ( %end - #scnt2 )
event ExMsg #charID 3 0 %remaining
}
wait 2
if C in #charstatus && %cure = 1
{
if #scnt2 > %limitcure && %keypressed = 0
{
key F11 ; cambiatelo se necessario
set %keypressed 1
}
}
if #SCNT2 >= %end || you_finish_applying in #sysmsg
return
goto waitloop__________________
Spero mi possiate aiutare.
Commenta