Trouver une ressource (Nouvelle version du moteur, plus rapide & pertinent, essayez le !)
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
ASV SIMPLE ET CLAIRE
Description
voila jai créer un asv hiere soire je vien de la finir aujoudhui c'est ma premier source soyè simpa svp a+ =))
Source
- menu menubar {
- Asv:dialog -m Lasv Lasv
- }
-
- dialog Lasv {
- title "°-=~ Asv ~=-°"
- size -1 -1 185 216
- option dbu
- box "Asv Information Personnel", 1, 2 1 181 196
- text " Age ", 2, 7 29 31 9
- text " Sexe ", 3, 7 43 31 9
- text " Ville ", 4, 7 57 31 9
- text " Poids", 5, 7 75 31 9
- text " Couleur de t'es cheveux", 6, 7 87 69 9
- text " Couleur de t'es yeux", 7, 7 96 61 9
- text " Taille", 8, 7 109 31 9
- text " E-mail", 9, 7 118 31 9
- text " Portable", 10, 7 127 31 9
- text " Prénom", 11, 7 20 31 9
- text " Nom", 12, 7 11 31 9
- edit %nom, 13, 50 11 57 10, autohs
- edit %prenom, 14, 50 20 57 10, autohs
- edit %age, 15, 50 29 57 10, autohs
- edit %ville, 17, 50 57 57 10, autohs
- edit %poids, 18, 50 75 57 10, autohs
- edit %cheveux, 19, 80 87 57 10, autohs
- edit %yeux, 20, 80 96 57 10, autohs
- edit %taille, 21, 50 108 57 10, autohs
- edit %mail, 22, 50 117 57 10, autohs
- edit %portable, 23, 50 126 57 10, autohs
- text " Asv normal ex: 20 h 94", 24, 7 139 66 9
- edit %asv, 25, 82 138 57 10, autohs
- button "Dire tout", 26, 6 150 47 9
- button "Dire seulement le sexe", 27, 5 160 74 9
- button "Dire seulement son asv normal", 28, 5 170 86 9
- button "Dire seulement son prénom et son nom", 29, 55 150 105 9
- button "Enregistrer", 30, 5 200 46 12, ok
- button "Annuler", 31, 55 200 39 12, cancel
- radio "Homme", 16, 50 43 28 10
- radio "Femme", 32, 80 43 29 10
- button "Dire seulement son e-mail", 33, 80 160 78 9
- button "Dire en notice sur le salon ou priver choisie", 34, 5 180 107 9
- text " Caractère ", 35, 7 66 32 9
- edit %caractere, 36, 50 66 57 10, autohs
- button "Dire en priver choisie", 38, 93 170 61 9
- button "Dire sur un salon choisie", 39, 114 180 66 9
- }
-
- on *:dialog:Lasv:*:*:{
- if ($devent == edit) {
- if ($did == 13) set %nom $did(13)
- if ($did == 14) set %prenom $did(14)
- if ($did == 15) set %age $did(15)
- if ($did == 17) set %ville $did(17)
- if ($did == 18) set %poids $did(18)
- if ($did == 19) set %cheveux $did(19)
- if ($did == 20) set %yeux $did(20)
- if ($did == 23) set %portable $did(23)
- if ($did == 22) set %mail $did(22)
- if ($did == 25) set %asv $did(25)
- if ($did == 21) set %taille $did(21)
- if ($did == 36) set %caractere $did(36)
- }
- if ($devent == sclick) {
- if ($did == 16) set %sexe homme
- if ($did == 27) {
- if (%sexe == homme) msg $active Je suis Un Homme
- if (%sexe == femme) msg $active Je suis Une Femme
- }
- elseif ($did == 26) msg $active Je m'appelle %nom %prenom jai %age ans je suis un/une %sexe j'abite a %ville je pèse %poids kg la couleur de mes yeux %yeux la couleur de mes cheveux %cheveux je mesure %taille je suis %caractere mon e-mail %mail mon numero de portable %portable
- elseif ($did == 28) msg $active Mon asv est %asv
- elseif ($did == 29) msg $active Je m'appelle %nom %prenom
- elseif ($did == 32) set %sexe femme
- elseif ($did == 33) msg $active Mon adresse e-mail est %mail
- elseif ($did == 34) {
- set %notice $$?="Pseudo ou Salon ?"
- notice %notice $me Je m'appelle %nom %prenom jai %age ans je suis un/une %sexe j'abite a %ville je pèse %poids kg la couleur de mes yeux %yeux a couleur de mes cheveux %cheveux je mesure %taille je suis %caractere mon e-mail %mail mon numero de portable %portable
- }
- if ($did == 38) {
- set %pseudo $$?="Pseudo ?"
- msg %pseudo Je m'appelle %nom %prenom jai %age ans je suis un/une %sexe j'abite a %ville je pèse %poids kg la couleur de mes yeux %yeux la couleur de mes cheveux %cheveux je mesure %taille je suis %caractere mon e-mail %mail mon numero de portable %portable
- }
- if ($did == 39) {
- set %salon $$?="Salon ?"
- msg %salon Je m'appelle %nom %prenom jai %age ans je suis un/une %sexe j'abite a %ville je pèse %poids kg la couleur de mes yeux %yeux la couleur de mes cheveux %cheveux je mesure %taille je suis %caractere mon e-mail %mail mon numero de portable %portable
- }
- }
- if ($devent == init) {
- if (%sexe == homme) did -c Lasv 16
- if (%sexe == femme) did -c Lasv 32
- }
- }
menu menubar {
Asv:dialog -m Lasv Lasv
}
dialog Lasv {
title "°-=~ Asv ~=-°"
size -1 -1 185 216
option dbu
box "Asv Information Personnel", 1, 2 1 181 196
text " Age ", 2, 7 29 31 9
text " Sexe ", 3, 7 43 31 9
text " Ville ", 4, 7 57 31 9
text " Poids", 5, 7 75 31 9
text " Couleur de t'es cheveux", 6, 7 87 69 9
text " Couleur de t'es yeux", 7, 7 96 61 9
text " Taille", 8, 7 109 31 9
text " E-mail", 9, 7 118 31 9
text " Portable", 10, 7 127 31 9
text " Prénom", 11, 7 20 31 9
text " Nom", 12, 7 11 31 9
edit %nom, 13, 50 11 57 10, autohs
edit %prenom, 14, 50 20 57 10, autohs
edit %age, 15, 50 29 57 10, autohs
edit %ville, 17, 50 57 57 10, autohs
edit %poids, 18, 50 75 57 10, autohs
edit %cheveux, 19, 80 87 57 10, autohs
edit %yeux, 20, 80 96 57 10, autohs
edit %taille, 21, 50 108 57 10, autohs
edit %mail, 22, 50 117 57 10, autohs
edit %portable, 23, 50 126 57 10, autohs
text " Asv normal ex: 20 h 94", 24, 7 139 66 9
edit %asv, 25, 82 138 57 10, autohs
button "Dire tout", 26, 6 150 47 9
button "Dire seulement le sexe", 27, 5 160 74 9
button "Dire seulement son asv normal", 28, 5 170 86 9
button "Dire seulement son prénom et son nom", 29, 55 150 105 9
button "Enregistrer", 30, 5 200 46 12, ok
button "Annuler", 31, 55 200 39 12, cancel
radio "Homme", 16, 50 43 28 10
radio "Femme", 32, 80 43 29 10
button "Dire seulement son e-mail", 33, 80 160 78 9
button "Dire en notice sur le salon ou priver choisie", 34, 5 180 107 9
text " Caractère ", 35, 7 66 32 9
edit %caractere, 36, 50 66 57 10, autohs
button "Dire en priver choisie", 38, 93 170 61 9
button "Dire sur un salon choisie", 39, 114 180 66 9
}
on *:dialog:Lasv:*:*:{
if ($devent == edit) {
if ($did == 13) set %nom $did(13)
if ($did == 14) set %prenom $did(14)
if ($did == 15) set %age $did(15)
if ($did == 17) set %ville $did(17)
if ($did == 18) set %poids $did(18)
if ($did == 19) set %cheveux $did(19)
if ($did == 20) set %yeux $did(20)
if ($did == 23) set %portable $did(23)
if ($did == 22) set %mail $did(22)
if ($did == 25) set %asv $did(25)
if ($did == 21) set %taille $did(21)
if ($did == 36) set %caractere $did(36)
}
if ($devent == sclick) {
if ($did == 16) set %sexe homme
if ($did == 27) {
if (%sexe == homme) msg $active Je suis Un Homme
if (%sexe == femme) msg $active Je suis Une Femme
}
elseif ($did == 26) msg $active Je m'appelle %nom %prenom jai %age ans je suis un/une %sexe j'abite a %ville je pèse %poids kg la couleur de mes yeux %yeux la couleur de mes cheveux %cheveux je mesure %taille je suis %caractere mon e-mail %mail mon numero de portable %portable
elseif ($did == 28) msg $active Mon asv est %asv
elseif ($did == 29) msg $active Je m'appelle %nom %prenom
elseif ($did == 32) set %sexe femme
elseif ($did == 33) msg $active Mon adresse e-mail est %mail
elseif ($did == 34) {
set %notice $$?="Pseudo ou Salon ?"
notice %notice $me Je m'appelle %nom %prenom jai %age ans je suis un/une %sexe j'abite a %ville je pèse %poids kg la couleur de mes yeux %yeux a couleur de mes cheveux %cheveux je mesure %taille je suis %caractere mon e-mail %mail mon numero de portable %portable
}
if ($did == 38) {
set %pseudo $$?="Pseudo ?"
msg %pseudo Je m'appelle %nom %prenom jai %age ans je suis un/une %sexe j'abite a %ville je pèse %poids kg la couleur de mes yeux %yeux la couleur de mes cheveux %cheveux je mesure %taille je suis %caractere mon e-mail %mail mon numero de portable %portable
}
if ($did == 39) {
set %salon $$?="Salon ?"
msg %salon Je m'appelle %nom %prenom jai %age ans je suis un/une %sexe j'abite a %ville je pèse %poids kg la couleur de mes yeux %yeux la couleur de mes cheveux %cheveux je mesure %taille je suis %caractere mon e-mail %mail mon numero de portable %portable
}
}
if ($devent == init) {
if (%sexe == homme) did -c Lasv 16
if (%sexe == femme) did -c Lasv 32
}
}
Fichier Zip
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
Télécharger le zip
Historique
- 08 septembre 2006 18:22:19 :
- changement de la source. merci pour ton aide atlentisfr =)
- 08 septembre 2006 20:38:37 :
- enlevement des couleurs je voie que des couleurs de ma source se sen volatilisé je voi pas pourquoi.. je mé la source en telechargement pour les couleurs voila a+ =))
- 08 septembre 2006 22:13:38 :
- changement de la source remerciment a atlantisfr pour ton aide merci =)))
- 10 septembre 2006 00:56:36 :
- bon le dialog veu pas marché avec les elseif erf alors g mis if pour les $devent == edit pareil pour le sexe g toute eseiller pour le faire marchéba vue ki fonctionne la voila allé a plus je métrai en telechargement pour les couleurs a++ =)
- 10 septembre 2006 09:17:45 :
- sayè enfin terminé =)
Sources de la même categorie
Commentaires
|
CalendriCode
| | | L | M | M | J | V | S | D |
| | 1 | 2 | 3 | 4 | 5 | 6 |
| 7 | 8 | 9 | 10 | 11 | 12 | 13 |
| 14 | 15 | 16 | 17 | 18 | 19 | 20 |
| 21 | 22 | 23 | 24 | 25 | 26 | 27 |
| 28 | 29 | 30 | 31 | | | |
|
|