Ok this is not the best dialog ever but i gave it a try ^^
.Right Click Status Window : Alarm
.Press on to enter the time you want the alarm to go off (It will ask you to input two alarm notices,input in 24hr format)
The off button only works if the alarm runs for 2nd time.
You have to put in mirc directory a file named alarm1.mp3
menu status {
Alarm: { dialog -lvmd alarm alarm }
}
dialog alarm {
title "Alarm"
size -1 -1 88 78
option dbu
text "Current Time:", 1, 0 0 66 10
edit $time, 2, 35 0 30 10, read center
button "Set Alarm On", 3, 2 12 70 10
button "Set Alarm Off", 4, 2 24 70 10
text "Alarm Notice1:", 5, 2 36 36 10
text "Alarm Notice2:", 6, 2 47 36 10
edit %ntc1, 7, 40 36 27 10, read center
edit %ntc2, 8, 40 47 26 10, read center
button "Done", 9, 28 60 26 13, ok
}
on 1:DIALOG:alarm:sclick:*: {
if ( $did == 3 ) { alarmon }
if ( $did == 4 ) { alarmoff }
}
alias alarmon {
set -e %ntc1 $$?="Ti wra 8es na xtupisei to ksupnhtiri sou?"
set -e %ntc2 $$?="Ti wra 8es na xtupisei to deutero ksipnitiri sou?"
inc -e %alarm 1
.timer300 %ntc1 1 1 /alarm
.timer301 %ntc2 1 1 /alarm
echo -s 02The alarm has been set 00on02.
}
alias alarmoff {
if (%alarm == $null) { echo -s 02The alarm has not been set yet. | .splay stop | halt }
}
elseif (%alarm >=2) {
.timer300 off
.timer301 off
echo -s 02The alarm has been set 00off02.
/splay stop
unset %alarm
unset %ntc1
unset %ntc2
}
alias alarm {
inc -e %alarm 1
if (%alarm == 3) {
echo -s 02The time is 00(02 $+ $time $+ 00).Alarm notice 00(04 $+ 2 $+ 00).
/splay alarm1.mp3
unset %alarm
unset %ntc1
unset %ntc2
}
elseif (%alarm == 2) {
echo -s 02The time is 00(02 $+ $time $+ 00).Alarm notice 00(04 $+ 1 $+ 00).
/splay alarm1.mp3
}
}