Petit réveil que j'ai codé hier ,en dialog :)
Source / Exemple :
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 * ]
}
Conclusion :
Enjoy :)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.