Your Ad Here 
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
 
;Autore : Red Skull 92
;Web : Www.redSkull92.Wordpress.Com
;Mail : RedSkull92@gmail.com

$ora_utente=InputBox(".:Allarme:.(Sono le: "&@HOUR&":"&@MIN&")","Imposta il timer...","HH:MM")
$s=StringSplit($ora_utente,":")
While 1
	Sleep(1050)
		if @hour = $s[1] and @MIN = $s[2] Then
			MsgBox (48, "Allarme", 'Sono le ore:'&$s[1]&':'&$s[2]&"!!!")
			Beep()
			Beep()
			Beep(Default,5000)
			ExitLoop
		endIf
WEnd

Piccolo script per impostare un allarme