Bon, alors voilà, c'est un asv système + quelques informations en plus
Source / Exemple :
dialog r-asv {
title "R-ASV by Re[M]i_34"
size -1 -1 155 143
option dbu
tab "Standard", 1, 5 2 145 123
text "Age :", 3, 32 23 25 8, tab 1 center
text "Sexe :", 4, 32 37 25 8, tab 1 center
text "Ville :", 5, 31 53 25 8, tab 1 center
edit %age , 6, 70 23 57 10, tab 1, autohs
edit %sexe , 7, 70 37 57 10, tab 1
edit %ville , 8, 70 53 57 10, tab 1, autohs
box "Le dire ...", 9, 13 64 129 25, tab 1
button "En PV", 10, 18 73 33 10, tab 1
button "En Notice", 11, 55 73 35 10, tab 1
button "Sur le salon", 12, 93 73 41 10, tab 1
;icon 13, 10 92 130 25, $scriptdirr-asv.bmp ,tab 1
tab "Optionnel", 2
text "Couleur des cheveux :", 14, 11 27 57 8, tab 2 center
edit %couleur_cheveux , 15, 72 26 50 10, tab 2, autohs
text "Couleur des yeux :", 16, 11 39 57 8, tab 2 center
edit %couleur_yeux , 17, 72 38 50 10, tab 2, autohs
text "Poids :", 18, 11 51 57 8, tab 2 center
edit %poids , 19, 72 50 50 10, tab 2, autohs
text "Taille :", 20, 10 63 58 8, tab 2 center
edit %taille , 21, 72 62 50 10, tab 2, autohs
box "Physique", 22, 7 17 124 61, tab 2
text "Portable :", 23, 20 85 34 8, tab 2 center
edit %num_port , 24, 72 83 50 10, tab 2, autohs
text "Adresse :", 25, 20 95 34 8, tab 2 center
edit %adresse , 26, 72 94 50 10, tab 2, autohs
text "Code Postal :", 27, 20 106 34 8, tab 2 center
edit %code_postal , 28, 72 105 50 10, tab 2, autohs
box "Personnel", 29, 7 77 125 43, tab 2
button "Dire ça en PV", 30, 133 22 15 97, tab 2 multi
button "Fermer", 31, 13 128 131 12, ok
}
on *:dialog:r-asv:edit:6:{ set %age $did(6).text }
on *:dialog:r-asv:edit:7:{ set %sexe $did(7).text }
on *:dialog:r-asv:edit:8:{ set %ville $did(8).text }
on *:dialog:r-asv:edit:15:{ set %couleur_cheveux $did(15).text }
on *:dialog:r-asv:edit:17:{ set %couleur_yeux $did(17).text }
on *:dialog:r-asv:edit:19:{ set %poids $did(19).text }
on *:dialog:r-asv:edit:21:{ set %taille $did(21).text }
on *:dialog:r-asv:edit:24:{ set %num_port $did(24).text }
on *:dialog:r-asv:edit:26:{ set %adresse $did(26).text }
on *:dialog:r-asv:edit:28:{ set %code_postal $did(28).text }
on *:dialog:r-asv:sclick:10:{ .set %pseudo $$?="Pseudo ?" | msg %pseudo 12J'ai4 %age 12ans, je suis un/une4 %sexe 12et je viens de4 %ville }
on *:dialog:r-asv:sclick:11:{ .set %notice $$?="Pseudo ou Salon ?" | notice %notice 12J'ai4 %age 12ans, je suis un/une4 %sexe 12et je viens de4 %ville }
on *:dialog:r-asv:sclick:12:{ .set %salon $$?="Salon ?" | msg %salon 12J'ai4 %age 12ans, je suis un/une4 %sexe 12et je viens de4 %ville }
on *:dialog:r-asv:sclick:30:{ .set %pseudo2 $$?="Pseudo ?" | msg %pseudo2 12Je mesure4 %taille $+ 12, je pèse4 %poids $+ 12kilos, mes cheveux sont4 %couleur_cheveux $+ 12, mes yeux sont4 %couleur_yeux $+ 12. | .timer 1 1 msg %pseudo2 12Mon numéro de portable est le4 %num_port $+ 12, mon adresse est4 %adresse %code_postal %ville }
}
menu * {
R-ASV:dialog -m r-asv r-asv
}
Conclusion :
Voilà, dites moi ce que vous en pensez :)
PS: si vous voulez l'image, téléchargez le zip et enlevez le ; qui se situe devant :
icon 13, 10 92 130 25, $scriptdirr-asv.bmp ,tab 1 .
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.