Asv systeme

Contenu du snippet

voila je croi que sa peu toujour servir a ceux qui veulent fair un script et qui ne savent pas coder...

Source / Exemple :


alias asv { dialog -m asv asv }

dialog asv {
  title "A S V systeme"
  size -1 -1 195 305
  box "A S V" ,1, 10 10 175 175
  button "Dire ton prenom" ,2, 20 30 155 22
  button "Dire ton age" ,3, 20 60 155 22
  button "Dire ton sexe" ,4, 20 90 155 22
  button "Dire ta ville" ,5, 20 120 155 22
  button "Tout dire" ,6, 20 150 155 22
  box "Config" ,7, 10 190 175 50
  button "Configurer ton ASV" ,8, 20 210 155 22
  box "Fermeture" ,9, 10 245 175 50
  button "Quitter" ,10, 20 265 155 22,cancel
}
on 1:dialog:asv:sclick:2:{ /msg $active 4M1es geniteurs mon nomé(e) %prenom }
on 1:dialog:asv:sclick:3:{ /msg $active 4J1'ai %age ans }
on 1:dialog:asv:sclick:4:{ /msg $active 4J1e suis un %sexe }
on 1:dialog:asv:sclick:5:{ /msg $active 4J1e suis de %ville }
on 1:dialog:asv:sclick:6:{ /msg $active 4J1e m'apelle %prenom , j'ai %age ans, je suis un(e) %sexe et je suis de %ville }
on 1:dialog:asv:sclick:8:{ /cASV | /dialog -x asv asv } 

alias casv { dialog -m casv casv }

dialog casv {
  title "Config ASV systeme"
  size -1 -1 195 305
  text "Ton prenom :" ,1,10 40 65 15
  edit "",2, 80 40 100 22,center
  box " Config ton A S V" ,3,5 5 185 190
  text "Ton age :" ,4,10 80 60 15
  edit "" ,5, 80 80 100 22,center
  text "Ta ville :" ,6, 10 120 60 15
  edit "" ,7, 80 120 100 22,center
  text "Ton sexe" ,8, 10 160 60 15
  edit "" ,9, 80 160 100 22,center
  button "Retour" ,10, 5 260 185 40
  box " Tes Infos" ,11, 5 195 185 60
  text "Prenom:" ,12, 10 210 65 15
  text %prenom ,13, 55 210 56 15
  text "age:" ,14, 10 230 50 15
  text %age ans ,15, 55 230 50 15
  text "sexe:" ,16, 100 210 50 15
  text %sexe ,17, 145 210 50 15
  text "ville:" ,18, 100 230 50 15
  text %ville ,19, 125 230 50 15

}

on 1:dialog:casv:edit:2:{ /set %prenom $did(casv,2) }
on 1:dialog:casv:edit:5:{ /set %age $did(casv,5) }
on 1:dialog:casv:edit:7:{ /set %ville $did(casv,7) }
on 1:dialog:casv:edit:9:{ /set %sexe $did(casv,9) }
on 1:dialog:casv:sclick:10:{ /asv | dialog -x casv casv }

menu channel,chat,query,menubar {
  -
  Asv systeme:/asv
  -
}

Conclusion :


A coller dans une remotes...
bye
Into}X{

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.