Réveil

Contenu du snippet

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 :)

A voir également

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.