Soyez le premier à donner votre avis sur cette source.
Snippet vu 5 156 fois - Téléchargée 27 fois
on *:text:!sondage:#: { if (%sond.start) { notice $nick Impossible de préparer un sondage, un est déjà en cours. } else { msg $nick Bien, $nick $+ , nous allons commencer le sondage. Si ca prend du temps, ne perds pas patience, nous enregistrons les données. set %sond.nick $nick set %sond.nick.host $address($nick, 5) set %sond.start off timer1 1 5 /question } } alias question { msg %sond.nick Pour commencer, tape la question à laquelle les personnes présentes dans le channel répondront. set %sond.text question } on %sond.nick:text:*:?: { if (%sond.text == question) validQuestion $1- if (%sond.text == timer) validTimer $1 if (%sond.text == nbrep) validNbrep $1 if (%sond.text == reponse) validReponse $1- if (%sond.text == titre) validTitre $1- } alias validQuestion { set %sond.param.question $1- msg %sond.nick Bien, la question est: $1- msg %sond.nick Tape maintenant le temps en secondes au cours duquel les chatteurs devront répondre set %sond.text timer } alias validTimer { set %sond.param.timer $1 msg %sond.nick Parfait, le temps imparti est donc: $1 msg %sond.nick nous allons passer maintenant au nombre de réponses. Combien en veux-tu? set %sond.text nbrep } alias validNbrep { set %sond.param.nbquest $1 if ($1 == 1) msg %sond.nick Tu veux donc 1 réponse. else msg %sond.nick Tu veux donc $1 réponses. msg %sond.nick Tape donc ta première réponse. set %sond.text reponse } alias validReponse { inc %sond.numrep set %sond.param.reponse. $+ %sond.numrep $1- if (%sond.numrep == %sond.param.nbquest) { msg %sond.nick C'était la dernière réponse à donner. Donne un titre à ton sondage. set %sond.text titre } else { msg %sond.nick Bien. Tape maintenant la réponse suivante. Il en reste $calc(%sond.param.nbquest-%sond.numrep) $+ . } } alias validTitre { set %sond.param.titre $1- msg %sond.nick Tadaaaaaaaaaaaa!!!! Le questionnaire est maintenant fini, je n'attend plus que ton commandement pour lancer le sondage. Pour ce faire, tape !go sur le channel. Mais ne tarde pas, au bout de deux minutes, j'efface toutes les données si le sondage n'est pas commencé. 120... 119... 118... set %sond.go ok timer2 1 120 timeEnd } alias timeEnd { notice %sond.nick Je t'avais prévenu, les deux minutes se sont écoulées. A pu les jolies données de %sond.nick !!! unset %sond* } on %sond.nick:text:!go:#: { set %sond.chan $chan timer2 off notice $nick Le sondage va commencer. Surtout, soit patient, le temps d'initialiser les données. msg $chan Un sondage va bientôt commencer. Patientez un petit instant. timer3 1 10 sondStart } alias sondStart { msg %sond.chan %sond.nick $+ ( $+ %sond.nick.host $+ ) vous propose un petit sondage comportant 1 question et %sond.param.nbrep réponse(s). msg %sond.chan Le sondage s'intitule: %sond.param.titre msg %sond.chan La question est: %sond.param.question msg %sond.chan Les réponses sont (veuillez patienter si chargement il y a): questionListe } alias questionListe { inc %i msg %sond.chan %1 $+ ) %sond.param.reponse. $+ %i (tapez !sond %i $+ ) if (%i == sond.param.nbrep) { msg %sond.chan Vous avez %sond.param.timer secondes pour répondre. timer00 1 %sond.param.timer FinDuSondage } else { questionListe } } on *:text:!sond*:%sond.chan: { if ($nick != %sond.nick) && (!%sond.avote. $+ $address($nick, 2)) { set %sond.avote. $+ $address($nick, 4) a voté notice $nick Merci d'avoir voté (ne pas recommencer, de toutes facons, c'est impossible). inc %sond.param.reponse. $+ $2 $+ .vote inc %sond.total pourcentages } } alias FinDuSondage { msg %sond.chan Le sondage: %sond.param.titre est terminé! msg %sond.chan Il était proposé par %sond.nick $+ ( $+ %sond.nick.host $+ ) msg %sond.chan La question était: %sond.param.question msg %sond.chan Vous aviez %sond.param.timer secondes pour y répondre. msg %sond.chan Voici les résultats (merci de patienter si chargement il y a) resultats } alias resultats { inc %a msg %sond.chan %sond.param.reponse. $+ %a $+ .vote votes pour: %sond.param.reponse. $+ %a ( %sond.param.reponse. $+ %a $+ .pourcent if (%sond.param.reponse. $+ %a $+ .vote > %sond.derniere.vote) { set %sond.gagnante %a } set %sond.derniere.vote %sond.param.reponse. $+ %a $+ .vote if (%a == %sond.param.nbrep) { msg %sond.chan Avec %sond.param.reponse. $+ %sond.gagnante $+ .vote votes sur un total de %sond.total $+ ( $+ %sond.param.reponse. $+ %sond.gagnante $+ .pourcent $+ ) , la réponse: %sond.param.reponse. $+ %sond.derniere.vote l'emporte! unset %sond.* unset %a unset %i unset %b } else { resultats } } alias pourcentages { inc %b set %sond.param.reponse. $+ %b $+ .pourcent $calc($calc(%sond.param.reponse. $+ %b $+ .vote*100)/%sond.total) if (%b != %sond.param.nbrep) { pourcentages } }
17 avril 2007 à 14:02
16 mars 2006 à 19:41
16 mars 2006 à 10:49
16 févr. 2006 à 23:00
Ou je dois le mettre dans Remote ?? tous ou que les truc sans alias devant que je doit mettre dans alises ??
Parce que j'ai un probleme sa lance une fenetre a pars apres sa me mes ce message : <Test_sondage> Bien, Toto, nous allons commencer le sondage. Si ca prend du temps, ne perds pas patience, nous enregistrons les données.
<Test_sondage> Pour commencer, tape la question à laquelle les personnes présentes dans le channel répondront.
Puis je m'ai ma question : Que pensez vous de la vie ?
Et apres sa reste comme sa plus rien peut etre il faut mettre un mot devant ??
Merci de votre aide
16 févr. 2006 à 21:03
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.