MaX_62
Messages postés879Date d'inscriptionvendredi 22 octobre 2004StatutMembreDernière intervention29 juin 2007
-
29 mars 2005 à 08:24
darkyojimbo2
Messages postés244Date d'inscriptionmercredi 11 juin 2003StatutMembreDernière intervention25 juin 2005
-
29 mars 2005 à 19:42
Voici un petit code que j'ai fait, je le poste pas dans les sources ça serait un peu abusé
dialog sondage {
title "Etes vous un bon scripteur ?"
size -1 -1 126 42
option dbu
button "Oui", 1, 19 13 35 15, ok
button "Non", 2, 71 13 35 15, ok
}
on *:dialog:sondage:*:*:{
if ($devent == init) {
mdx MarkDialog $dname
mdx.dll SetMircVersion $version
}
elseif ($devent == sclick) {
if ($did == 1) { echo -a Ah bon ! Il me semblait que non... }
elseif ($did == 2) { echo -a J'en étais sûr... }
}
elseif ($devent == mouse) {
tokenize 32 $gettok($dll(mdx.dll,MoveControl,$dname 1),2-,32)
if ($mouse.x >= $1 && $mouse.x <= $calc($1 + $3) && $mouse.y >= $2 && $mouse.y <= $calc($2 + $4)) {
mdx MoveControl $dname 1 $rand(1,$calc($dialog($dname).w - 30)) $rand(1,$calc($dialog($dname).h - 50))
did -f $dname 1
}
}
}
alias -l mdx { dll mdx.dll }
Vous devez avoir la dll MDX.DLL dans la racine de votre script !
Pour le lancer, /dialog -m sondage sondage
la ligne 26 correspond a : alias -l mdx { dll mdx.dll }
Sinon le dialog s'ouvre quand meme malgré qu'il sois laid ( pas tester
avec els dll :[ ) et je peux juste faire oui ou non .Je pense que la
dll proposait une autre option.
cs_wims
Messages postés2466Date d'inscriptionvendredi 23 juillet 2004StatutMembreDernière intervention 1 août 20101 29 mars 2005 à 13:29
Mouis j'ai reussi a faire fonctionner le truc sauf que g toujour une
erreur a l'init mais j'ai vu le principe, c'est une bonne idée, mais
pourquoi ne pas faire ceci : lorsque l'on clik sur la souris on efface
le text du bouton et on le change en non et on change l'autre en oui :)
et l'on met en echo la phrase qui va.
Vous n’avez pas trouvé la réponse que vous recherchez ?
cs_KiNdErMaXi
Messages postés1052Date d'inscriptionsamedi 10 juillet 2004StatutMembreDernière intervention30 novembre 20092 29 mars 2005 à 18:03
ouais c'est plutot marrant, ca me fais penser a un code que j'avais fait :
alias jeu {
var %a $$?"entrez un chiffre entre 10 et 20"
if %a < 10 || %a > 20 { var %z $input(On a dit entre 10 et 20 ...,260, TRICHEUR !) | halt }
var %b $calc(%a * 5)
while (%a < %b) {
var %y $input($read(bla.txt),260, On s'éclate par ici :o])
inc %a
}
}
pour ceci il faut une database j'en ai fais une petit ici : http://kinder-irc.site.voila.fr/bla.txt