Cambiando %nTiles cambi la distanza alla quale deve passare il pg per accorgertene
Cambiando %SoundFile cambi il suono che fa quando si accorge di un pg
Ho notato che funziona anche se stai su un'altra finestra (tipo navigando su internet)
Ecco:
codice:
set %nTiles 4
set %PgsType HS_IS
set %SoundFile c:\windows\media\chimes.wav
mainloop:
gosub CountPgsWithinTiles %nTiles
gosub CheckConditions #result
sleep 1
goto mainloop
sub CountPgsWithinTiles
set %Range %1
finditem %PgsType g_ , %Range
return #findcnt
sub CheckConditions
set %nPgs %1
if %LastnPgs = N/A
set %LastnPgs 0
if %LastnPgs < %nPgs
gosub PlaySound
set %LastnPgs %nPgs
return
sub PlaySound
if %SoundFile <> N/A
sound %SoundFile
else
sound
return
Commenta