Statistique d'un channel en dialog

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 773 fois - Téléchargée 28 fois

Contenu du snippet

C'est un dialog qui vous montre le nombre d'op (le %) le nombre de voice et de regulier sur un channel , possibiliter de le dire sur le channel , dans les remotes

Source / Exemple :


dialog stats {
  title "Statistiques"
  size -1 -1 187 143
  option dbu
  list 1, 68 3 116 138, size
  button "Actualiser", 2, 9 58 50 10, flat
  button "Dire sur le chan", 3, 9 68 50 11, flat
  button "Ok", 4, 9 79 50 10, cancel, flat
  text "Cronic Script : Statistiques D'un Channel", 5, 4 5 50 23
  box "Action", 6, 3 36 62 72
}
on *:dialog:stats:init:*: {
  /set %statschan $active
  /did -a stats 1 Statistique de ---=-> Canal $active 
  /did -a stats 1 
  /did -a stats 1 Nombre de personne: $nick($active,0)
  /did -a stats 1   
  /did -a stats 1 Nombre d'Operateur: $nick($active,0,o)
  /did -a stats 1 - Pourcentage d'opereteur: ( $+ $calc( $nick($active,0,o) / $nick($active,0) * 100) $+ % $+ ) 
  /did -a stats 1 Nombre de Voice : $nick($active,0,v)
  /did -a stats 1 - Pourcentage De Voice( $+ $calc( $nick($active,0,v) / $nick($active,0) * 100) $+ % $+ )
  /did -a stats 1 Nombre de Regulier : $nick($active,0,r)
  /did -a stats 1 - Pourcentage de Regulier ( $+ $calc( $nick($active,0,r) / $nick($active,0) * 100) $+ % $+ )
  /did -a stats 1   
  /did -a stats 1 Stats des Operateurs :
  /did -a stats 1 ----------------------------------------------=->
  if ( $nick($active,0,o) == 0 ) { goto voice }
  else {
    /set %totalostats $nick($active,0,o)
    /set %ostats 0
    :odebut
    inc %ostats
    /did -a stats 1 - $nick($active,%ostats,o) Est Operateur sur $active
    if ( %ostats == %totalostats ) { goto voice }
    else { goto odebut }
  }
  :voice
  /did -a stats 1 
  /did -a stats 1 Stats des Voices :
  /did -a stats 1 ----------------------------------------------=->
  if ( $nick($active,0,v) == 0 ) { goto regul }
  else {
    /set %totalvstats $nick($active,0,v)
    /set %vstats 0
    :vdebut
    inc %vstats
    /did -a stats 1 - $nick($active,%vstats,v) Est Voice sur $active
    if ( %vstats == %totalvstats ) { goto regul }
    else { goto vdebut }
  }
  :regul
  /did -a stats 1 
  /did -a stats 1 Stats de Reguliers :
  /did -a stats 1  ----------------------------------------------=->
  if ( $nick($active,0,r) == 0 ) { goto fin }
  else {
    /set %totalrstats $nick($active,0,r)
    /set %rstats 0
    :rdebut
    inc %rstats
    /did -a stats 1 - $nick($active,%rstats,r) Est Regulier sur $active
    if ( %rstats == %totalrstats ) { goto fin }
    else { goto rdebut }
  }
  :fin
  halt
}
on *:dialog:stats:sclick:2: {
  /did -a stats 1 Statistique de ---=-> Canal $active 
  /did -a stats 1 
  /did -a stats 1 Nombre de personne: $nick($active,0)
  /did -a stats 1   
  /did -a stats 1 Nombre d'Operateur: $nick($active,0,o)
  /did -a stats 1 - Pourcentage d'opereteur: ( $+ $calc( $nick($active,0,o) / $nick($active,0) * 100) $+ % $+ ) 
  /did -a stats 1 Nombre de Voice : $nick($active,0,v)
  /did -a stats 1 - Pourcentage De Voice( $+ $calc( $nick($active,0,v) / $nick($active,0) * 100) $+ % $+ )
  /did -a stats 1 Nombre de Regulier : $nick($active,0,r)
  /did -a stats 1 - Pourcentage de Regulier ( $+ $calc( $nick($active,0,r) / $nick($active,0) * 100) $+ % $+ )
  /did -a stats 1   
  /did -a stats 1 Stats des Operateurs :
  /did -a stats 1 ----------------------------------------------=->
  if ( $nick($active,0,o) == 0 ) { goto voice }
  else {
    /set %totalostats $nick($active,0,o)
    /set %ostats 0
    :odebut
    inc %ostats
    /did -a stats 1 - $nick($active,%ostats,o) Est Operateur sur $active
    if ( %ostats == %totalostats ) { goto voice }
    else { goto odebut }
  }
  :voice
  /did -a stats 1 
  /did -a stats 1 Stats des Voices :
  /did -a stats 1 ----------------------------------------------=->
  if ( $nick($active,0,v) == 0 ) { goto regul }
  else {
    /set %totalvstats $nick($active,0,v)
    /set %vstats 0
    :vdebut
    inc %vstats
    /did -a stats 1 - $nick($active,%vstats,v) Est Voice sur $active
    if ( %vstats == %totalvstats ) { goto regul }
    else { goto vdebut }
  }
  :regul
  /did -a stats 1 
  /did -a stats 1 Stats de Reguliers :
  /did -a stats 1  ----------------------------------------------=->
  if ( $nick($active,0,r) == 0 ) { goto fin }
  else {
    /set %totalrstats $nick($active,0,r)
    /set %rstats 0
    :rdebut
    inc %rstats
    /did -a stats 1 - $nick($active,%rstats,r) Est Regulier sur $active
    if ( %rstats == %totalrstats ) { goto fin }
    else { goto rdebut }
  }
  :fin
  halt
}

on *:dialog:stats:sclick:3: {
  /msg  $active 7Statistique de -------=-> Canal $active |>
  /msg  $active 7Nombre d'utilisateur total:7 $nick(%statschan,0)
  /msg  $active 7Nombre d'OP(s):7 $nick(%statschan,0,o)
  /msg  $active 7Nombre de Voice(s) :7 $nick(%statschan,0,v)
  /msg  $active 7Nombre de Regulier :7 $nick(%statschan,0,r)
  /msg  $active 7Statistique de -------=-> Canal $active |>
}

Conclusion :


Il y a juste un tout petit bug au niveau de la touche actualiser , je trouver le moyen de le modifier et je vous file le code ;p ++

A voir également

Ajouter un commentaire Commentaires
Messages postés
21
Date d'inscription
dimanche 27 juin 2004
Statut
Membre
Dernière intervention
11 avril 2005

bof faut en rajouter plus que ca
Messages postés
13
Date d'inscription
lundi 31 mai 2004
Statut
Membre
Dernière intervention
22 août 2004

bien ... 6/10
Messages postés
875
Date d'inscription
samedi 17 mai 2003
Statut
Membre
Dernière intervention
22 juin 2012

ouai , bof
Messages postés
189
Date d'inscription
lundi 16 juin 2003
Statut
Membre
Dernière intervention
9 août 2005

pk ya pas els admis ?

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.