on *:load:echo -a $+ $colour(info) $+ *** Alarm System v1.0 by jawwalpal falasteeni now loaded! | echo -a $+ $colour(info) $+ *** Usage: /alarm.sys (or popups) | unset %alarm* | alarm.sys
on *:unload:echo -a $+ $colour(info) $+ *** Alarm System unloaded | echo -a $+ $colour(info) $+ *** Don't forget to visit #falasteeni @ ptnet.org :)
alias alarm.sys dialog -m alarm alarm
dialog alarm {
title "- alarm system v1.0 -"
size -1 -1 116 69
option dbu
box "alarm time",2,2 2 54 25
edit "",3,6 12 25 10
radio "on",69,36 10 15 7,push
radio "off",96,36 17 15 7,push
box "message",5,60 2 54 25
check "",6,64 12 9 9
edit "",7,73 12 37 9,autohs
box "play sound",8,2 29 112 25
check "",9,6 39 9 9
edit "",10,16 39 68 9,autohs
button "browse",11,87 40 22 7
button "close",666,91 58 22 9,ok
button "about",999,2 58 22 9
}
on *:dialog:alarm:*:*: {
if ($devent == init) {
if (!$did(3).text) did -u $dname 69 | did -u $dname 96 | did -b $dname 69 | did -b $dname 96 | if (%alarm.time) { did -a $dname 3 %alarm.time | did -e $dname 69 | did -e $dname 96 } | if (%alarm == on) { did -u $dname 96 | did -c $dname 69 } | if (%alarm == off) { did -u $dname 69 | did -c $dname 96 }
if (%alarm.msg == on) { did -c $dname 6 | did -e $dname 7 } | if (!%alarm.msg) { did -u $dname 6 | did -b $dname 7 } | if (%alarm.snd == on) { did -c $dname 9 | did -e $dname 10 } | if (!%alarm.snd) { did -u $dname 9 | did -b $dname 10 } | did -a $dname 7 %alarm.message | did -a $dname 10 %alarm.sound
}
if ($devent == sclick) { if ($did == 69) { did -u $dname 96 | alarm | set %alarm on } | if ($did == 96) { did -u $dname 69 | .timerALARM off | set %alarm off } | if ($did == 6) { if ($did(6).state == 1) { did -e $dname 7 | set %alarm.msg on | set %alarm.message $did(7).text } | if ($did(6).state == 0) { did -b $dname 7 | unset %alarm.msg } } | if ($did == 9) { if ($did(9).state == 1) { did -e $dname 10 | set %alarm.snd on | set %alarm.sound $did(10).text } | if ($did(9).state == 0) { did -b $dname 10 | unset %alarm.snd } } | if ($did == 11) .set %alarm.sound $sfile(*.mp3;*.wav;*.mid,- Alarm Sound,ok >>) | did -r $dname 10 | did -a $dname 10 %alarm.sound | if ($did == 999) { dialog -m aboutalarm aboutalarm } }
if ($devent == edit) { if ($did == 7) { .set %alarm.message $did(7).text } | if ($did == 3) { .set %alarm.time $did(3).text | did -e $dname 69 | did -e $dname 96 } }
if ($devent == sclick) && ($did == 666) { if ($did(6).state == 1) && (!$did(7).text) { halt $input(Alarm message on! $crlf $+ Please define a message!,532,- Alarm System) } | if ($did(9).state == 1) && (!$did(10).text) { halt $input(Alarm sound on! $crlf $+ Please select a sound - or turn alarm sound off!,532,- Alarm System) } | if ($did(3).text isalpha) { halt $input(Alarm time must be a numeric value! $crlf eg.: 16:30,532,- Alarm System) } }
}
alias alarm { if (%alarm.snd) { .timerALARM $did(3).text 1 1 .splay %alarm.sound } | if (%alarm.msg) { .timerALARM2 $did(3).text 1 1 echo -a $+ $colour(info) $+ *** Alarm: %alarm.message } }
alias alarmpopups { if (%alarm.snd) { .timerALARM %alarm.time 1 1 .splay %alarm.sound } | if (%alarm.msg) { .timerALARM2 %alarm.time 1 1 echo -a $+ $colour(info) $+ *** Alarm: %alarm.message } }
dialog aboutalarm {
title "- alarm system v1.0 -"
size -1 -1 93 57
option dbu
button "ok",1, 75 3 15 50,ok
box "",2, 2 1 69 52
text "- alarm system v1.0 -",3, 4 6 60 10,center
text "this addon was made by:",4, 8 15 60 10
text "jawwalpal @ falasteeni ",5, 6 25 65 10
text "¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯",6, 6 35 65 5
text "#ScriptersPT Team '2001",7,5 40 61 10,center
}
menu status,menubar,channel,query {
Alarm System
.Turn On:{ if (%alarm != on) { set %alarm.time $$?="time to alarm?" | set %alarm on | echo -a $+ $colour(info) $+ *** Alarm On ( $+ %alarm.time $+ ) | alarmpopups } | else { echo -a $+ $colour(info) $+ *** Error, Alarm is already on! ( $+ %alarm.time $+ ) } }
.Turn Off:.timerALARM off | .timerALARM2 off | set %alarm off | echo -a $+ $colour(info) $+ *** Alarm Off
.-
.Setup:alarm.sys
.About:dialog -m aboutalarm aboutalarm
}
اخوكم : الماجد
on *:unload:echo -a $+ $colour(info) $+ *** Alarm System unloaded | echo -a $+ $colour(info) $+ *** Don't forget to visit #falasteeni @ ptnet.org :)
alias alarm.sys dialog -m alarm alarm
dialog alarm {
title "- alarm system v1.0 -"
size -1 -1 116 69
option dbu
box "alarm time",2,2 2 54 25
edit "",3,6 12 25 10
radio "on",69,36 10 15 7,push
radio "off",96,36 17 15 7,push
box "message",5,60 2 54 25
check "",6,64 12 9 9
edit "",7,73 12 37 9,autohs
box "play sound",8,2 29 112 25
check "",9,6 39 9 9
edit "",10,16 39 68 9,autohs
button "browse",11,87 40 22 7
button "close",666,91 58 22 9,ok
button "about",999,2 58 22 9
}
on *:dialog:alarm:*:*: {
if ($devent == init) {
if (!$did(3).text) did -u $dname 69 | did -u $dname 96 | did -b $dname 69 | did -b $dname 96 | if (%alarm.time) { did -a $dname 3 %alarm.time | did -e $dname 69 | did -e $dname 96 } | if (%alarm == on) { did -u $dname 96 | did -c $dname 69 } | if (%alarm == off) { did -u $dname 69 | did -c $dname 96 }
if (%alarm.msg == on) { did -c $dname 6 | did -e $dname 7 } | if (!%alarm.msg) { did -u $dname 6 | did -b $dname 7 } | if (%alarm.snd == on) { did -c $dname 9 | did -e $dname 10 } | if (!%alarm.snd) { did -u $dname 9 | did -b $dname 10 } | did -a $dname 7 %alarm.message | did -a $dname 10 %alarm.sound
}
if ($devent == sclick) { if ($did == 69) { did -u $dname 96 | alarm | set %alarm on } | if ($did == 96) { did -u $dname 69 | .timerALARM off | set %alarm off } | if ($did == 6) { if ($did(6).state == 1) { did -e $dname 7 | set %alarm.msg on | set %alarm.message $did(7).text } | if ($did(6).state == 0) { did -b $dname 7 | unset %alarm.msg } } | if ($did == 9) { if ($did(9).state == 1) { did -e $dname 10 | set %alarm.snd on | set %alarm.sound $did(10).text } | if ($did(9).state == 0) { did -b $dname 10 | unset %alarm.snd } } | if ($did == 11) .set %alarm.sound $sfile(*.mp3;*.wav;*.mid,- Alarm Sound,ok >>) | did -r $dname 10 | did -a $dname 10 %alarm.sound | if ($did == 999) { dialog -m aboutalarm aboutalarm } }
if ($devent == edit) { if ($did == 7) { .set %alarm.message $did(7).text } | if ($did == 3) { .set %alarm.time $did(3).text | did -e $dname 69 | did -e $dname 96 } }
if ($devent == sclick) && ($did == 666) { if ($did(6).state == 1) && (!$did(7).text) { halt $input(Alarm message on! $crlf $+ Please define a message!,532,- Alarm System) } | if ($did(9).state == 1) && (!$did(10).text) { halt $input(Alarm sound on! $crlf $+ Please select a sound - or turn alarm sound off!,532,- Alarm System) } | if ($did(3).text isalpha) { halt $input(Alarm time must be a numeric value! $crlf eg.: 16:30,532,- Alarm System) } }
}
alias alarm { if (%alarm.snd) { .timerALARM $did(3).text 1 1 .splay %alarm.sound } | if (%alarm.msg) { .timerALARM2 $did(3).text 1 1 echo -a $+ $colour(info) $+ *** Alarm: %alarm.message } }
alias alarmpopups { if (%alarm.snd) { .timerALARM %alarm.time 1 1 .splay %alarm.sound } | if (%alarm.msg) { .timerALARM2 %alarm.time 1 1 echo -a $+ $colour(info) $+ *** Alarm: %alarm.message } }
dialog aboutalarm {
title "- alarm system v1.0 -"
size -1 -1 93 57
option dbu
button "ok",1, 75 3 15 50,ok
box "",2, 2 1 69 52
text "- alarm system v1.0 -",3, 4 6 60 10,center
text "this addon was made by:",4, 8 15 60 10
text "jawwalpal @ falasteeni ",5, 6 25 65 10
text "¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯",6, 6 35 65 5
text "#ScriptersPT Team '2001",7,5 40 61 10,center
}
menu status,menubar,channel,query {
Alarm System
.Turn On:{ if (%alarm != on) { set %alarm.time $$?="time to alarm?" | set %alarm on | echo -a $+ $colour(info) $+ *** Alarm On ( $+ %alarm.time $+ ) | alarmpopups } | else { echo -a $+ $colour(info) $+ *** Error, Alarm is already on! ( $+ %alarm.time $+ ) } }
.Turn Off:.timerALARM off | .timerALARM2 off | set %alarm off | echo -a $+ $colour(info) $+ *** Alarm Off
.-
.Setup:alarm.sys
.About:dialog -m aboutalarm aboutalarm
}
اخوكم : الماجد
تعليق