grazie sei un geniooooooo
DDDDDDDDDDDDDDDDD
DDDDDDDDDDDDDDDDD





.. mi hanno anke bannato per quel qualcosina in piu xkè mentre lo faceva io ero lievemente away
.. vabbè dopo ho risolto diversificando dal colore (nero=lurg .. resto=troglodita) ma come ho detto il property mi faceva casino .. poi magari sarà stata la versione di easyuo buggata o il mio client ke aveva casini o il pc .. magari a qlcn altro gli va sempre perfettamente .. io ti dico qll ke mi è capitato a me

initEvents
set #lpc 100
set %bendata 7000 ;7000=7secondi di intervallo bendata, 8000=8secondi ecc ecc
set %wait_bendata 0
main:
if ( %wait_bendata < ( #systime - %bendata ) )
{
gosub greater
wait 10
gosub heal
}
onhotkey F11
gosub lesser
onhotkey F12
gosub greater
goto main
sub lesser
finditem NUF C_
while #findindex <= #findcnt
{
event property #findid
if lesser in #property
{
gosub bevi
return
}
else
set #findindex #findindex + 1
}
set #findindex 1
gosub bevi
return
sub greater
finditem NUF C_
while #findindex <= #findcnt
{
event property #findid
if greater in #property
{
gosub bevi
return
}
else
set #findindex #findindex + 1
}
set #findindex 1
gosub bevi
return
sub bevi
set #LOBJECTid #FINDid
event macro 17
return
sub heal
finditem ZLF C
if #findkind = -1
{
msg Non , #spc , hai , #spc , bende$
halt
}
set #lobjectid #findid
event macro 17 0
target 10
event macro 23 0
set %wait_bendata #systime
return

Commenta