Ciao a tutti ho modificato lo script di Cove (che ringrazio perchè questo script è utilissimo) che conta il tempo dell'honor, dato i nuovi problemi con gli exmsg, ho creato una piccola menu window con i counter verdi in caso di honor, e il counter rosso in caso di attesa prima di potersi onorare. Purtroppo non sono molto bravo con euo, quindi dateci un occhio e testatelo pure voi:
codice:
initevents
menu clear
menu Window Title HONOR
menu Window Size 120 35
menu show
menu Font Transparent #false
menu Font BGColor None
menu Font Align Right
menu Font Name MS Sans Serif
menu Font Size 14
menu Font Style
menu Font Color Lime
menu Font Transparent #false
menu Window Transparent 80
menu Window Color None
menu Text EUOLabel1 90 8
set %CurseWeaponShow #SCNT
set %CurseWeapon #SCNT2
set %Honor #SCNT2
set %HonorActive #false
set %HonorShow #SCNT
set %JournalIndex #Jindex
KeyLooP:
onhotkey 1
gosub CurseWeapon
gosub JournalReader
gosub ShowMessaggi
goto KeyLooP
sub ShowMessaggi
if %CurseWeapon >= #SCNT2 && %CurseWeapon - #SCNT2 < 50
{
if %CurseWeaponShow <> #SCNT
{
set %timeout ( %CurseWeapon - #SCNT2 ) / 10
menu delete EUOLabel1
menu Font Color Lime
menu Text EUOLabel1 90 8 time: %timeout
set %CurseWeaponShow #SCNT
}
}
if ( %HonorActive = #false && %Honor >= #SCNT2 ) || %HonorActive = #true
{
if %HonorShow < #SCNT
{
if %HonorActive = #true
{
set %timeout ( #SCNT2 - %Honor ) / 10
menu delete EUOLabel1
menu Font Color Lime
menu Text EUOLabel1 90 8 time: %timeout
;event SysMessage Honor , #spc , %timeout
set %HonorShow #SCNT
}
else
{
set %timeout ( %Honor - #SCNT2 ) / 10
menu delete EUOLabel1
menu Font Color Red
menu Text EUOLabel1 90 8 time: - %timeout
;event SysMessage Honor , #spc , %timeout
set %HonorShow #SCNT ;+ 10
}
}
}
return
sub JournalReader
for %i %JournalIndex #jindex
{
scanjournal %i
if You_embrace_your_honor in #journal
{
event SysMessage Go!
set %Honor #SCNT2
set %HonorActive #true
}
if You_no_longer_embrace_your_honor in #journal
{
event SysMessage FINITO HONOR!
set %Honor #SCNT2 + 3000
set %HonorActive #false
}
}
set %JournalIndex %i - 1
return
sub CurseWeapon
event sysmessage Curse Weapon
event macro 15 104 ;Cast Spell [N] Curse Weapon
chooseskill spir r
set %CurseWeapon #skill * 10 / 34 + 10
set %CurseWeapon #SCNT2 + %CurseWeapon
return







Commenta