Sondage a choix d'options multiples et variées.

Contenu du snippet

C'est un sondage dont le script est basé sur celui d'un sondage présent sur ce même site.
Vous pourrez avec ce script définir les options présentes dans le sondage ainsi que leur nombre (de 2 à 7). A placer dans la section "remote".

pour lancer un sondage, tapez /sond

Source / Exemple :


alias /s {
  /set %op1 0
  /set %op2 0
  /set %op3 0
  /set %op4 0
  /set %op5 0
  /set %op6 0
  /set %op7 0
  %nbr = $$?="Nombre de réponses possibles (de 2 à 7)"
  %vote = $$?="Quelle est la question du sondage?"
  if ( %nbr != 2 ) && ( %nbr != 3 ) && ( %nbr != 4 ) && ( %nbr != 5 ) && ( %nbr != 6 ) && ( %nbr != 7 ) { halt }
  if ( %nbr == 2 ) {
    %option1 = $$?="Premiere Option"
    %option2 = $$?="Deuxieme Option"
  }
  if ( %nbr == 3 ) {
    %option1 = $$?="Premiere Option"
    %option2 = $$?="Deuxieme Option"
    %option3 = $$?="Troisieme Option"
  }
  if ( %nbr == 4 ) {
    %option1 = $$?="Premiere Option"
    %option2 = $$?="Deuxieme Option"
    %option3 = $$?="Troisieme Option"
    %option4 = $$?="Quatrieme Option"
  }
  if ( %nbr == 5 ) {
    %option1 = $$?="Premiere Option"
    %option2 = $$?="Deuxieme Option"
    %option3 = $$?="Troisieme Option"
    %option4 = $$?="Quatrieme Option"
    %option5 = $$?="Cinquieme Option"
  }
  if ( %nbr == 6 ) {
    %option1 = $$?="Premiere Option"
    %option2 = $$?="Deuxieme Option"
    %option3 = $$?="Troisieme Option"
    %option4 = $$?="Quatrieme Option"
    %option5 = $$?="Cinquieme Option"
    %option6 = $$?="Sixieme Option"
  }
  if ( %nbr == 7 ) {
    %option1 = $$?="Premiere Option"
    %option2 = $$?="Deuxieme Option"
    %option3 = $$?="Troisieme Option"
    %option4 = $$?="Quatrieme Option"
    %option5 = $$?="Cinquieme Option"
    %option6 = $$?="Sixieme Option"
    %option7 = $$?="Derniere Option"
  }   

  %durée = $$?="Durée du vote?"
  /msg $chan < Sondage:  10 %vote  1>
  /msg $chan < durée :  4 %durée  1 secondes  1>
  if ( %nbr == 2 ) {
    /msg $chan  2< Les réponses possibles sont : >
    /msg $chan  2<  13 Option 1 :  4 %option1  2>
    /msg $chan  2<  13 Option 2 :  4 %option2  2>
  }
  if ( %nbr == 3 ) {
    /msg $chan  2<  13 Option 1 :  4 %option1  2>
    /msg $chan  2<  13 Option 2 :  4 %option2  2>
    /msg $chan  2<  13 Option 3 :  4 %option3  2>
  }
  if ( %nbr == 4 ) {
    /msg $chan  2<  13 Option 1 :  4 %option1  2>
    /msg $chan  2<  13 Option 2 :  4 %option2  2>
    /msg $chan  2<  13 Option 3 :  4 %option3  2>
    /msg $chan  2<  13 Option 4 :  4 %option4  2>
  }
  if ( %nbr == 5 ) {
    /msg $chan  2<  13 Option 1 :  4 %option1  2>
    /msg $chan  2<  13 Option 2 :  4 %option2  2>
    /msg $chan  2<  13 Option 3 :  4 %option3  2>
    /msg $chan  2<  13 Option 4 :  4 %option4  2>
    /msg $chan  2<  13 Option 5 :  4 %option5  2>
  }
  if ( %nbr == 6 ) {
    /msg $chan  2<  13 Option 1 :  4 %option1  2>
    /msg $chan  2<  13 Option 2 :  4 %option2  2>
    /msg $chan  2<  13 Option 3 :  4 %option3  2>
    /msg $chan  2<  13 Option 4 :  4 %option4  2>
    /msg $chan  2<  13 Option 5 :  4 %option5  2>
    /msg $chan  2<  13 Option 6 :  4 %option6  2>
  }
  if ( %nbr == 7 ) {
    /msg $chan  2<  13 Option 1 :  4 %option1  2>
    /msg $chan  2<  13 Option 2 :  4 %option2  2>
    /msg $chan  2<  13 Option 3 :  4 %option3  2>
    /msg $chan  2<  13 Option 4 :  4 %option4  2>
    /msg $chan  2<  13 Option 5 :  4 %option5  2>
    /msg $chan  2<  13 Option 6 :  4 %option6  2>
    /msg $chan  2<  13 Option 7 :  4 %option7  2>
  }
  /.timer1 1 %durée /sondagetimer
}
alias /sondagetimer {
  /msg $chan  2 < Voici les résultats:> 
  /msg $chan  2 <  4 %option1  2= 4 %op1  2
  /msg $chan  2 <  13 %option2  2= 13 %op2  2
  if ( %nbr == 3 ) {
    /msg $chan  2 <  12 %option3  2= 12 %op3  2
  }
  if ( %nbr == 4 ) {
    /msg $chan  2 <  12 %option3  2= 12 %op3  2
    /msg $chan  2 <  5 %option4  2= 5 %op4  2
  }
  if ( %nbr == 5 ) {
    /msg $chan  2 <  12 %option3  2= 12 %op3  2
    /msg $chan  2 <  5 %option4  2= 5 %op4  2
    /msg $chan  2 <  10 %option5  2= 10 %op5  2
  }
  if ( %nbr == 6 ) {
    /msg $chan  2 <  12 %option3  2= 12 %op3  2
    /msg $chan  2 <  5 %option4  2= 5 %op4  2
    /msg $chan  2 <  10 %option5  2= 10 %op5  2
    /msg $chan  2 <  6 %option6  2= 6 %op6  2
  }
  if ( %nbr == 7 ) {
    /msg $chan  2 <  12 %option3  2= 12 %op3  2
    /msg $chan  2 <  5 %option4  2= 5 %op4  2
    /msg $chan  2 <  10 %option5  2= 10 %op5  2
    /msg $chan  2 <  6 %option6  2= 6 %op6  2
    /msg $chan  2 <  7 %option7  2= 7 %op7  2
  }
  /if ( %op1 == 0 ) && ( %op2 == 0 ) && ( %op3 == 0 ) && ( %op4 == 0 ) && ( %op5 == 0 ) && ( %op6 == 0 ) && ( %op7 == 0 ) { /msg $chan < Personne n'a voté, c'est pas sympa > }
  /if ( %op1 == %op2 ) && ( %op2 == %op3 ) && ( %op3 == %op4 ) && ( %op4 == %op5 ) && ( %op5 == %op6 ) && ( %op6 == %op7 ) && ( %op7 != 0 ) { /msg $chan < Egalite des votes > }
  /if ( %op1 > %op2 ) && ( %op1 > %op3 ) && ( %op1 > %op4 ) && ( %op1 > %op5 ) && ( %op1 > %op6 ) && ( %op1 > %op7 ) { /msg $chan <  4 %Option1  2 a le plus de votes!  1> }
  /if ( %op2 > %op1 ) && ( %op2 > %op3 ) && ( %op2 > %op4 ) && ( %op2 > %op5 ) && ( %op2 > %op6 ) && ( %op2 > %op7 ) { /msg $chan <  13 %Option2  2 a le plus de votes!  1> }
  /if ( %op3 > %op1 ) && ( %op3 > %op2 ) && ( %op3 > %op4 ) && ( %op3 > %op5 ) && ( %op3 > %op6 ) && ( %op3 > %op7 ) { /msg $chan <  12 %Option3  2 a le plus de votes !  1> }
  /if ( %op4 > %op1 ) && ( %op4 > %op2 ) && ( %op4 > %op3 ) && ( %op4 > %op5 ) && ( %op4 > %op6 ) && ( %op4 > %op7 ) { /msg $chan <  5 %Option4  2 a le plus de votes !  1> }
  /if ( %op5 > %op1 ) && ( %op5 > %op2 ) && ( %op5 > %op3 ) && ( %op5 > %op4 ) && ( %op5 > %op6 ) && ( %op5 > %op7 ) { /msg $chan <  10 %Option5  2 a le plus de votes !  1> }
  /if ( %op6 > %op1 ) && ( %op6 > %op2 ) && ( %op6 > %op3 ) && ( %op6 > %op4 ) && ( %op6 > %op5 ) && ( %op6 > %op7 ) { /msg $chan <  6 %Option6  2 a le plus de votes !  1> }
  /if ( %op7 > %op1 ) && ( %op7 > %op2 ) && ( %op7 > %op3 ) && ( %op7 > %op4 ) && ( %op7 > %op5 ) && ( %op7 > %op6 ) { /msg $chan <  7 %Option7  2 a le plus de votes !  1> }
}
on 1:TEXT:%option1:#: { 
  /inc %op1 1
}
on 1:TEXT:%option2:#: { 
  /inc %op2 1
}
on 1:TEXT:%option3:#: { 
  /inc %op3 1
}
on 1:TEXT:%option4:#: { 
  /inc %op4 1
}
on 1:TEXT:%option5:#: { 
  /inc %op5 1
}
on 1:TEXT:%option6:#: { 
  /inc %op6 1
}
on 1:TEXT:%option7:#: { 
  /inc %op7 1
}

Conclusion :


Merci a oblivion qui a programmé ce script en trés grande partie.

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.