- menu menubar,channel {
- [RéveiL]:/dialog -m reveil reveil
- }
-
- Dialog reveil {
- Title "Réveil By _NicX_"
- size 250 160 260 140
- text "Heure", 1, 5 10 30 30
- edit "" , 2,40 10 85 20,autohs
- text "Raison", 3,5 40 110 15
- edit "" , 4,40 40 200 22,autohs
- text "Son", 5,5 70 190 15
- button "Choix", 6,40 70 50 20
- button "On", 7,5 105 75 25,ok
- button "Fermer", 8,180 105 75 25,ok
- button "Off", 9,95 105 75 25,cancel
- }
-
- on *:dialog:reveil:sclick:7:{
- /set %reveil $did(reveil,2) | /set %rev.raison $did(reveil,4) | /timer1 %reveil 1 1 //run %choixRev | timer2 %reveil 1 1 echo -a 9,1[ * Réveil * ] [ * Raison * ]7,1 %Rev.raison 9,1[ * Heure * ]7,1 %reveil | echo -a 9,1[ * Réveil 7,1 Activé 9,1 * ] [ * Raison * ]7,1 %Rev.raison 9,1[ * Heure * ]7,1 %reveil
- if ($did(reveil,2) == $null) { echo -a 9,1[ * Heure non spécifiée * ] | halt }
- if ($did(reveil,4) == $null) { set %reveil $did(reveil,2) | /set %Rev.raison Non spécifiée | timer3 %reveil 1 1 //run %choixRev | timer4 %reveil 1 1 echo -a 9,1[ * Réveil * ] [ * Raison * ]7,1 %Rev.raison 9,1[ * Heure * ]7,1 %reveil | echo -a 9,1[ * Réveil 7,1 Activé 9,1 * ] [ * Raison * ]7,1 %Rev.raison 9,1[ * Heure * ]7,1 %reveil | halt }
- halt
- }
-
- on *:dialog:reveil:sclick:6:{
- set %choixRev $sfile(C:,Choisissez le son à jouer,oktext)
- }
-
- on *:dialog:reveil:sclick:9:{
- /timer1 off | /timer2 off | /timer3 off | /timer4 off
- echo -a 9,1[ * Réveil 7,1Désactivé9,1 * ]
- }
menu menubar,channel {
[RéveiL]:/dialog -m reveil reveil
}
Dialog reveil {
Title "Réveil By _NicX_"
size 250 160 260 140
text "Heure", 1, 5 10 30 30
edit "" , 2,40 10 85 20,autohs
text "Raison", 3,5 40 110 15
edit "" , 4,40 40 200 22,autohs
text "Son", 5,5 70 190 15
button "Choix", 6,40 70 50 20
button "On", 7,5 105 75 25,ok
button "Fermer", 8,180 105 75 25,ok
button "Off", 9,95 105 75 25,cancel
}
on *:dialog:reveil:sclick:7:{
/set %reveil $did(reveil,2) | /set %rev.raison $did(reveil,4) | /timer1 %reveil 1 1 //run %choixRev | timer2 %reveil 1 1 echo -a 9,1[ * Réveil * ] [ * Raison * ]7,1 %Rev.raison 9,1[ * Heure * ]7,1 %reveil | echo -a 9,1[ * Réveil 7,1 Activé 9,1 * ] [ * Raison * ]7,1 %Rev.raison 9,1[ * Heure * ]7,1 %reveil
if ($did(reveil,2) == $null) { echo -a 9,1[ * Heure non spécifiée * ] | halt }
if ($did(reveil,4) == $null) { set %reveil $did(reveil,2) | /set %Rev.raison Non spécifiée | timer3 %reveil 1 1 //run %choixRev | timer4 %reveil 1 1 echo -a 9,1[ * Réveil * ] [ * Raison * ]7,1 %Rev.raison 9,1[ * Heure * ]7,1 %reveil | echo -a 9,1[ * Réveil 7,1 Activé 9,1 * ] [ * Raison * ]7,1 %Rev.raison 9,1[ * Heure * ]7,1 %reveil | halt }
halt
}
on *:dialog:reveil:sclick:6:{
set %choixRev $sfile(C:,Choisissez le son à jouer,oktext)
}
on *:dialog:reveil:sclick:9:{
/timer1 off | /timer2 off | /timer3 off | /timer4 off
echo -a 9,1[ * Réveil 7,1Désactivé9,1 * ]
}