Sujet Précédent Sujet Suivant

Question peut etre bete

Soprano71 Messages postés 107 Date d'inscription vendredi 15 avril 2005 Statut Membre Dernière intervention 6 janvier 2009 - 30 mai 2007 à 10:15
cs_wims Messages postés 2466 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 1 août 2010 - 31 mai 2007 à 12:16
Bonjour tlm ! Quelqu'un serai t'il comment mettre une couleur sur un pseudo qui es away ?? por certain pseudo j'ai fait un truc ds ce genre   if ($3 == Pooshy-A) return $rgb(179,179,179)
 mais je voi pas comment faire pour mettre une couleur sur les pseudo away

9 réponses

Réponse 1 / 9
cs_TropNul Messages postés 340 Date d'inscription dimanche 18 septembre 2005 Statut Membre Dernière intervention 22 octobre 2009
30 mai 2007 à 11:56
Il te faut faire un
/who #salon
Cette commande te renverra les infos importantes sur les users présents dans #salon par la RAW 352
Ceux dont le premier caractère du 9ieme paramètre est un G sont away ^^



exemple de ce que tu recevrais en "brute" après avoir fait la commande /who #salon



11:32:36 -> chat1.x-echo.com WHO #coding
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding 000Anowhere 1759478956.fr chat1.x-echo.com pseudo1 H@ :0 At.your.service
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding 000Anowhere 1759478956.fr chat1.x-echo.com pseudo2 H@ :0 whatever
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding 000Znowhere 1245805249.net chat9.x-echo.com pseudo3 G+ :2 La Curiosité Est Un Vilain Defaut
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding 025AQuimper 1887267547.net irc.voila.fr pseudo4 H+ :2 scriptdelamort
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding guest 3328801586.fr chat9.x-echo.com pseudo5 H+ :2 Good Style
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding guest 647.711.718.578 chat7.x-echo.com pseudo6 G+ :2 wakatépé
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding 000Znowhere 2599686132.OrG chat9.x-echo.com pseudo7 H+ :2 BOUH
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding 018Anowhere 2943399553.net irc.voila.fr pseudo8 H+ :2 Undisclosed recipient
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding 020AOrleans 685.599.747.661 chat9.x-echo.com pseudo9 G+ :2 nemewhoispas
11:32:36 <- :chat1.x-echo.com 352 TropNul #coding 000Tnowhere 596.679.684.544 irc.voila.fr pseudo10 H+ :2 lol tu me whois
11:32:36 <- :chat1.x-echo.com 315 TropNul #coding :End of /WHO list.



> Maintenant il faut parser ces résultats
> les users: pseudo3, pseudo6 et pseudo9 sont away



> Comment faire ?



Il y a plusieurs possibilités:
>> tu peux parser via un /debug
>> ou tout simplement via l'évènement RAW 352:*:{ }



Je ne sais pas comment tu colores tes pseudos, mais je vais
éssayer d'expliquer le procéssus de parsing :)




; On crée un petit alias pour déclencher l'ouverture de ces raws

Alias ColorAwayUsers {
  If $1 { .Enable #awayusers | WHO $1 }
  Else { Echo -st * /ColorAwayUsers: Impossible! Aucun salon spécifié }
}



#awayusers off

Raw 352:*:{
  ; $7 est le paramètre contenant l'état du user.
  ;
  ;



ah oui, j'avais dit plus haut, 9ième paramètre. Ce n'est pas faux
  ; Il faut savoir que quand on utilise l'event RAW, en mIRC, il considère comme le premier
  ;




paramètre celui qui vient juste après le mot '352' , donc ici 'TropNul', qui est le pseudo
  ;




de celui qui fait le /who
  ;




Si nous avions parser par un /debug, $1 == chat1.x-echo.com
  ;

  If ($left($7,1) == G) {
    ; j'applique donc maintenant ce que je veux sur ce user, ici le paramètre $6
    Commande pour appliquer la couleur sur $6
  }
}




;


La raw suivante va désactiver cette partie du script arrivé à la fin de la réception du who


Raw 315:*:{ .Disable #awayusers }

#awayusers end










Cordialement,

TropNul
0
Réponse 2 / 9
Soprano71 Messages postés 107 Date d'inscription vendredi 15 avril 2005 Statut Membre Dernière intervention 6 janvier 2009
30 mai 2007 à 13:09
merci bcp trop nul mais j'ai un souci lol qd je fait /who #salon j'ai rien qui ce passe -__-" ou puis je trouver cet alias ?
0
Réponse 3 / 9
cs_TropNul Messages postés 340 Date d'inscription dimanche 18 septembre 2005 Statut Membre Dernière intervention 22 octobre 2009
30 mai 2007 à 14:39
C'est une fonction interne à un serveur IRC.
Comme la raw 352, WHO est aussi une raw !

pour preuve, dans les status tapes /who ?
ça te montrera la plupart de ses fonctionnalités.

donc, il est fort possible que ton script bloque
quelque part la réception de la raw 352 dans le but


d'en empêcher son affichage.

TropNul
0
Réponse 4 / 9
cs_wims Messages postés 2466 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 1 août 2010 1
30 mai 2007 à 18:54
Tu ne peux rien parsé du tout avec /debug :]
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 9
Soprano71 Messages postés 107 Date d'inscription vendredi 15 avril 2005 Statut Membre Dernière intervention 6 janvier 2009
30 mai 2007 à 19:09
qd j'ai taper /who ds le statut voici ce que ça ma mit :
/WHO [[+|-][acghmnsu] [args]
Flags are specified like channel modes, the flags cgmnsu all have arguments
Flags are set to a positive check by +, a negative check by -
The flags work as follows:
Flag a: user is away
Flag c <channel>: user is on <channel>,
                  no wildcards accepted
Flag g <gcos/realname>: user has string <gcos> in their GCOS,
                        wildcards accepted, oper only
Flag h <host>: user has string <host> in their hostname,
               wildcards accepted
Flag m : user has set on them,
                    only o/A/a for nonopers
Flag n <nick>: user has string <nick> in their nickname,
               wildcards accepted
Flag s <server>: user is on server <server>,
                 wildcards not accepted
Flag u : user has string in their username,
               wildcards accepted
Behavior flags:
Flag C: show first visible channel user is in
Flag M: check for user in channels I am a member of
0
Réponse 6 / 9
cs_TropNul Messages postés 340 Date d'inscription dimanche 18 septembre 2005 Statut Membre Dernière intervention 22 octobre 2009
31 mai 2007 à 09:31
pour wims :

/debug -i @nom NomDunAlias

grâce au switch -i, j'ai fait ce qui suit pour voir :)

Alias XParser {
  Tokenize 32 $1
  If $regex($3,/^(USERHOST|ISON|30[23]|P[IO]NG)$/) {
    Echo -ti9 @RawFil $1-2 $+($chr(3),12,$regml(1),$chr(3)) $4-
  }
  ElseIf ($1 == ->) {
    Return $+($chr(3),04,$1-2,$chr(3)) $+($chr(3),12,$3,$chr(3)) $+($chr(3),04,$4,$chr(3)) $5-
  }
  ElseIf $regex($5,/(:\001(FINGER|TIME)\001)/i) {
    Echo -easti9 $+($chr(3),04,$chr(91),$remove($2,:),$chr(32),$regml(2),$chr(93),$chr(3)) -> $4
    Return $1-2 $+($chr(3),12,$3,$chr(3)) $4-
  }
  ElseIf $regex($5-6,/(:\001(PING.\d+)\001)/i) {
    Echo -easti9 $+($chr(3),04,$chr(91),$remove($2,:),$chr(32),$regml(2),$chr(93),$chr(3)) -> $4
    Return $1-2 $+($chr(3),12,$3,$chr(3)) $4-
  }
  Else {
    Return $1-2 $+($chr(3),12,$3,$chr(3)) $4-
  }
}



On 1:Start:Debug -ipt @Raw XParser

En résumé, ça parse les messages ISON, 303, 302, USERHOST, PING, PONG



On peut maintenant facilement s'imaginer parser ' TOUT ' comme on veut :)



pour soprano :

oui, tu as là l'aide de la commande /WHO
mais tu peux aussi faire /who #salon
si cela ne marche toujours pas, faut voir avec l'auteur de ton script.
au cas contraire, essayes de nous montrer quelque chose de ton script gérant les raws 352, 315.

Cordialement,
TropNul
0
Réponse 7 / 9
Soprano71 Messages postés 107 Date d'inscription vendredi 15 avril 2005 Statut Membre Dernière intervention 6 janvier 2009
31 mai 2007 à 11:54
pour tropnul voila c que j'ai en raw je join la remote complete dsl :/  :
on ^1:SNOTICE:*motd*:halt
raw 1:*:halt
raw 2:*:halt
raw 3:*:halt
raw 4:*:halt
raw 5:*:halt
raw 219:*:halt
raw 250:*:halt
raw 251:*:{ echo -a �3; $+ $colour(whois text) $+ %signe.whois | echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ $4- | halt }
raw 252:*:{ echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ $2- | halt }
raw 253:*:halt
raw 254:*:{ echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ $2- | halt }
raw 255:*:{ echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ $4- | halt }
raw 256:*:halt
raw 257:*:halt
raw 258:*:halt
raw 259:*:halt
raw 265:*:{  echo -a �3; $+ $colour(whois text) $+ %signe.whois  | echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ $2- | halt }
raw 266:*:{ echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ $2- | echo -a �3; $+ $colour(whois text) $+ %signe.whois | halt }
raw 269:*:halt
;### WHOIS #
#whois on
alias whois whois $1 $1
#whois end
raw 301:*:echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Away %signe.info �F;�3; $+ $colour(info2 text) $+ $3- | halt
raw 311:*:echo -a �3; $+ $colour(whois text) $+ %signe.whois  $+ �F;�3; $+ $colour(whois text) $+ Whois sur %signe.info �F;�3; $+ $colour(info2 text) $+ $2 $chr(40) $+ $3 $+ @ $+ $4 $+ $chr(41) | echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Nom %signe.info $+ �F;�3; $+ $colour(info2 text) $6- | halt
raw 312:*:echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Serveur %signe.info �F;�3; $+ $colour(info2 text) $+ $3 | halt
raw 313:*:{
  If (Services isin $1-) { echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ IRCop %signe.info �F;�3; $+ $colour(info2 text) L2 �1F;(�1F;�3; $+ $colour(whois text) $+ ·Services Admin·�3; $+ $colour(info2 text) $+ �1F;)�1F; |  halt }
  If (Server isin $1-) { echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ IRCop %signe.info �F;�3; $+ $colour(info2 text) L3 �1F;(�1F;�3; $+ $colour(whois text) $+ ·Server Admin·�3; $+ $colour(info2 text) $+ �1F;)�1F; | halt }
  Else { echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ IRCop %signe.info �F;�3; $+ $colour(info2 text) L1 | halt }
}
raw 314:*:{
  echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Pseudo %signe.info �F;�3; $+ $colour(info2 text) $+ $2
  echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Nom %signe.info �F;�3; $+ $colour(info2 text) $+ $6-
  echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ ID Ban %signe.info $+ �F;�3; $+ $colour(info2 text) $3 $+ @ $+ $4
  halt
}
raw 317:*: {
  echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Inactivité %signe.info $+ �F;�3; $+ $colour(info2 text) $duration($3)
  var %t = $replacecs($asctime($4) ,Mon,Lundi,Tue,Mardi,Wed,Mercredi,Thu,Jeudi,Fri,Vendredi,Sat,Samedi,Sun,Dimanche)
  var %date = $gettok(%t ,1,32) $gettok(%t,3,32) $mois $asctime(yyyy) à $gettok(%t,4,32)
  echo -a �3; $+ $colour(whois text) $+ %signe.whois $+ �F;�3; $+ $colour(whois text) $+ Online Depuis %signe.info $+ �F;�3; $+ $colour(info2 text) %date
  halt
}
raw 318:*:halt
raw 319:*: {
  If ($numtok($3-,32) == 1) { echo -a $str($chr(160),2) $+ �3; $+ $colour(whois text) $numtok($3-,32) Salon $nbrchan($2) %signe.info �F;�3; $+ $colour(info2 text) $+ $replace($replace($3-,@,�3; $+ $colour(kick text) $+ @ $+ �3; $+ $colour(info2 text) $+ �2;�2; $+ ),+,�3; $+ $colour(notice text) $+ + $+ �3; $+ $colour(info2 text) $+ �2;�2; $+ ) }
  If ($numtok($3-,32) > 1) { echo -a $str($chr(160),2) $+ �3; $+ $colour(whois text) $numtok($3-,32) Salons $nbrchan($2) %signe.info �F;�3; $+ $colour(info2 text) $+ $replace($replace($3-,@,�3; $+ $colour(kick text) $+ @ $+ �3; $+ $colour(info2 text) $+ �2;�2; $+ ),+,�3; $+ $colour(notice text) $+ + $+ �3; $+ $colour(info2 text) $+ �2;�2; $+ ) }
  haltdef
}
alias nbrchan {
  If ($comchan($1,0) == 1) { return �3; $+ $colour(whois text) $+ �1F;[�1F; $+ $comchan($1,0) commun�1F;]�1F; }
  If ($comchan($1,0) > 1) { return �3; $+ $colour(whois text) $+ �1F;[�1F; $+ $comchan($1,0) communs�1F;]�1F; }
}
raw 320:*:echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Infos %signe.info �F;�3; $+ $colour(info2 text) $+ $2- | halt
raw 401:*:{ echo -a �3; $+ $colour(info2 text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�2; $+ $2 $+  �2;�1F;]�1F; Ce pseudonyme est introuvable sur le serveur. | echo -a �3; $+ $colour(info2 text) $+ �2;• | haltdef }
;### END WHOIS #
raw 305:*:echo -a $str($chr(160),2) �3; $+ $colour(info2 text) $+ �1F; $+ $chr(91) $+ �1F;�3; $+ $colour(notice text) $+ ·INFos·�3; $+ $colour(info2 text) $+ �1F;]�1F;�2;�3; $+ $colour(notice text) •�2;�3; $+ $colour(info2 text) Vous n'êtes plus en mode :�2;�3; $+ $colour(notice text) Away | halt
raw 306:*:echo -a $str($chr(160),2) �3; $+ $colour(info2 text) $+ �1F; $+ $chr(91) $+ �1F;�3; $+ $colour(notice text) $+ ·INFos·�3; $+ $colour(info2 text) $+ �1F;]�1F;�2;�3; $+ $colour(notice text) •�2;�3; $+ $colour(info2 text) Vous êtes maintenant en mode :�2;�3; $+ $colour(notice text) Away | halt
raw 307:*:echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ NickServ %signe.info �F;�3; $+ $colour(notice text) $+ OUI | halt
raw 308:*:echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ IRCAdmin %signe.info �F;�3; $+ $colour(kick text) $+ OUI | halt
raw 310:*:echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Helper %signe.info �F;�3; $+ $colour(kick text) $+ OUI | halt
#who off
raw 352:*:{
  echo -s $str($chr(160),2) �3; $+ $colour(info2 text) •
  echo -s $str($chr(160),2) �3; $+ $colour(info text) Pseudo :�3; $+ $colour(info2 text) $6
  echo -s $str($chr(160),2) �3; $+ $colour(info text) Host :�3; $+ $colour(info2 text) $3 $+ @ $+ $4
  echo -s $str($chr(160),2) �3; $+ $colour(info text) Serveur :�3; $+ $colour(info2 text) $5
  echo -s $str($chr(160),2) �3; $+ $colour(info text) RealName :�3; $+ $colour(info2 text) $9- 
  echo -s $str($chr(160),2) �3; $+ $colour(info2 text) •
  halt
}
#who end
raw 315:*:halt
raw 324:*:{
  If ($3 == +) && ($me isop $2) {
    If %check.modes == ON { mode $2 %modes.def }
    If %check.topic == ON { topic $2 %topic.def }
    If %check.auto.voice == ON { mode $2 +v $me }
  }
  echo $2 �3; $+ $colour(info text) $+ %signe.debut $+ �F;�3; $+ $colour(info text) $+ INFos $+ %signe.fin $+ �F; Mode:�3; $+ $colour(highlight text) $3- $iif($nick($2,0,o) != 0,• �3; $+ $colour(info2 text) $+ $iif($nick($2,0,o) <= 1,Opérateur,Opérateurs) $+ :�3; $+ $colour(highlight text) $nick($2,0,o)) $iif($nick($2,0,v,o) != 0,• �3; $+ $colour(info2 text) $+ $iif($nick($2,0,v,o) <= 1,Voice,Voices) $+ :�3; $+ $colour(highlight text) $nick($2,0,v,o)) $iif($nick($2,0,r) != 0,• �3; $+ $colour(info2 text) $+ $iif($nick($2,0,r) <= 1,Régulier,Réguliers) $+ :�3; $+ $colour(highlight text) $nick($2,0,r)) �2;•�2;�3; $+ $colour(info2 text) Total:�3; $+ $colour(highlight text) $nick($2,0)
  halt
}
raw 328:*:echo -a $str($chr(160),3) $+ �3; $+ $colour(whois text) $+ Host Caché %signe.info $+ �F;�3; $+ $colour(info2 text) $8 | halt
raw 331:*:echo $2 �3; $+ $colour(info text) $+ %signe.debut $+ �3; $+ $colour(info text) $+ Topic $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Topic sur�2; $2 �2;: �3; $+ $colour(info text) $+ Aucun topic. | halt
raw 332:*:echo $2 �3; $+ $colour(info text) $+ %signe.debut $+ �F;�3; $+ $colour(info text) $+ Topic $+ %signe.fin �F;�3; $+ $colour(topic text) $+ $3- | halt
raw 333:*:echo $2 �3; $+ $colour(info text) $+ %signe.debut $+ �F;�3; $+ $colour(info text) $+ Info $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Topic mis par�2;�3; $+ $colour(info text) $3 �2;�3; $+ $colour(info2 text) $+ le $date($4) à $time($4) | echo $2 �3; | halt
raw 341:*:halt
raw 352:*:halt
raw 353:*:halt
raw 366:*:halt
raw 369:*:halt
raw 375:*:{
  If %info.server == ON { dialog -amd Motd Motd | did -a Motd 1 $2- | did -z motd 1 | halt }
  Else halt
}
raw 372:*:{  
  If %info.server == ON { did -a Motd 1 $2- | did -z motd 1 | halt }
  Else halt
}
raw 376:*:halt
raw 381:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Tu es maintenant IRC Opérateur. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 402:*: { echo -a �3; $+ $colour(info2 text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�2; $+ $2 $+  �2;�1F;]�1F; Ce pseudonyme n'existe pas. | echo -a �3; $+ $colour(info2 text) $+ �2;• }
raw 403:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Canal non valide. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 404:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Tu ne peux rien envoyer Sur :�3; $+ $colour(info2 text) $2  | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 405:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Impossible d'entrer dans :�3; $+ $colour(info2 text) $2 �3; $+ $colour(info text) $+ �1F;(�1F;�3; $+ $colour(info2 text) Tu es dans trop de Salons�3; $+ $colour(info text) �1F;)�1F;  | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 406:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Ce pseudo n'est plus enregistré..  | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 408:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Le salon est en mode +c�3; $+ $colour(info text) �1F;(�1F;�3; $+ $colour(info2 text) Tu dois désactiver tes couleurs�3; $+ $colour(info text) �1F;)�1F; | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 421:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ $2 $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Cette commande n'existe pas.  | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 422:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Message du jour introuvable.  | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 431:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Pas de nickname donné.  | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 432:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Ton nickname n'est pas correct. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 433:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Ce nickname est déjà utilisé. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 436:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Collision de nickname.  | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 437:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Impossible de changer de pseudo. �1F;�2;(�2;�1F;�3; $+ $colour(info2 text) Tu es banni sur un Salon ou celui-ci est en (+m)�3; $+ $colour(notice text) �1F;�2;)�1F; | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 441:*:halt
raw 442:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Tu n'es pas dans le Salon :�3; $+ $colour(info2 text) $2  | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 443:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Cette personne est déjà dans ce Salon. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 461:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Il manque des paramètres. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 463:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Ce serveur n'accepte pas les connexions depuis ton Host. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 464:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Password incorrect�3; $+ $colour(info text) �1F;(�1F;�3; $+ $colour(info2 text) Il faut un Pass pour entrer sur ce Serveur�3; $+ $colour(info text) �1F;)�1F; | echo -a �3; $+ $colour(notice text) $+ �2;• | halt  }
raw 465:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ K-lined $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text)  Tu es K-Lined de ce Serveur �1F;(�1F;�2;�3; $+ $colour(info2 text) Banni�3; $+ $colour(notice text) �1F;�2;)�1F; | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 466:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Vous êtes Banni(e). | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 467:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text)  Il y a déjà un Pass pour entrer dans :�3; $+ $colour(info2 text) $2 | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 471:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) �2;�1F;T�1F;�2;u ne Peux pas ReNtRer �1F;�2;D�2;�1F;aN�1F;�2;s�F;�3; $+ $colour(info text) : $2 �1F;�2;(�2;�1F;�3; $+ $colour(info2 text) IL Est Plein (+L)�3; $+ $colour(info text) �1F;�2;)�1F; | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 473:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) �2;�1F;T�1F;�2;u ne Peux pas ReNtRer �1F;�2;D�2;�1F;aN�1F;�2;s�F;�3; $+ $colour(info text) : $2 �1F;�2;(�2;�1F;�3; $+ $colour(info2 text) IL Est En MoDe INVité (+i)�3; $+ $colour(info text) �1F;�2;)�1F; | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 474:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) �2;�1F;T�1F;�2;u ne Peux pas ReNtRer �1F;�2;D�2;�1F;aN�1F;�2;s�F;�3; $+ $colour(info text) : $2 �1F;�2;(�2;�1F;�3; $+ $colour(info2 text) Tu es BaNni(e) (+b)�3; $+ $colour(info text) �1F;�2;)�1F; | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 475:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) �2;�1F;T�1F;�2;u ne Peux pas ReNtRer �1F;�2;D�2;�1F;aN�1F;�2;s�F;�3; $+ $colour(info text) : $2 �1F;�2;(�2;�1F;�3; $+ $colour(info2 text) IL Te Faut le Mot De Pass Correct (+k)�3; $+ $colour(info text) �1F;�2;)�1F; | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 482:*:halt
raw 483:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Tu ne peux pas "Kill" un Serveur. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 484:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Tu ne peux pas Kick Ou Deop un Service de réseau. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 501:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Mode inconnu. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 502:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ Erreur $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) Tu ne peux pas changer le mode pour un autre utilisateur. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }
raw 617:*: { echo -a �3; $+ $colour(notice text) $+ �2;• | echo -a �3; $+ $colour(info2 text) �1F;[�1F;�3; $+ $colour(notice text) $+ DCC $+ �3; $+ $colour(info2 text) $+ �1F;]�1F;�3; $+ $colour(notice text) $2 a été ajouté à ta liste de dcc. | echo -a �3; $+ $colour(notice text) $+ �2;• | halt }

ON 1:TEXT:*:#:{
  If $lines(detect-channel.txt) != 0 {
    If ($gettok($read(configurations.txt,44),2,174) == Activé) && ($nick != %sc.csbot) {      var %c 1, %n $lines(detect-channel.txt), %c2 = $chan
      while %c <= %n {
        If %c2 == $read(detect-channel.txt,%c) {          var %i 1, %t $lines(detect-langage.txt)
          while %i <= %t {
            var %txt = $read(detect-langage.txt,%i)
            If %txt isin $strip($1-,burc) {
              If $gettok($read(configurations.txt,54),2,32) == 1 { set %detect.averto $kick.phrase($read(menu\avertir\notice-langage.txt)) }
              ElseIf $gettok($read(configurations.txt,54),2,32) != 1 { set %detect.averto $kick.phrase($nick : $read(menu\avertir\notice-langage.txt)) }
              If $gettok($read(configurations.txt,49),2,32) == 3 {
                echo $chan �3; | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Langage �1F;[�1F;�3; $+ $colour(highlight text) $+ %txt $+ �3; $+ $colour(info2 text) $+ �1F;]�1F; | echo $chan $timestamp �3; $+ $colour(info2 text) Pseudo :�3; $+ $colour(highlight text) $nick | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo $chan �3;
              If $active != $chan { echo -a �3; | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Langage �1F;[�1F;�3; $+ $colour(highlight text) $+ %txt $+ �3; $+ $colour(info2 text) $+ �1F;]�1F; | echo -a $timestamp �3; $+ $colour(info2 text) Salon : $chan - Pseudo :�3; $+ $colour(highlight text) $nick | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo -a �3; } | set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\langage.txt)) | goto suite }
              ElseIf $gettok($read(configurations.txt,49),2,32) == 1 {
                If $gettok($read(configurations.txt,55),2,32) == 3 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\langage.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\langage.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\langage.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
              }
              ElseIf $gettok($read(configurations.txt,49),2,32) == 2 {
                If $gettok($read(configurations.txt,55),2,32) == 3 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\langage.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\langage.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\langage.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
              }
            }
            inc %i 
          }
        }
        inc %c
      }
    }
    If ($gettok($read(configurations.txt,45),2,174) == Activé) && ($nick != %sc.csbot) {      var %c 1, %n $lines(detect-channel.txt), %c2 = $chan
      while (%c <= %n) {
        If %c2 == $read(detect-channel.txt,%c) {          var %i 1, %t $lines(detect-pub.txt)
          while %i <= %t {
            var %txt = $read(detect-pub.txt,%i)
            If %txt isin $strip($1-) {
              If $gettok($read(configurations.txt,54),2,32) == 1 { set %detect.averto $kick.phrase($read(menu\avertir\notice-pub.txt)) }
              ElseIf $gettok($read(configurations.txt,54),2,32) != 1 { set %detect.averto $kick.phrase($nick : $read(menu\avertir\notice-pub.txt)) }
              If $gettok($read(configurations.txt,50),2,32) == 3 {
                echo $chan �3; | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Publicité �1F;[�1F;�3; $+ $colour(highlight text) $+ %txt $+ �3; $+ $colour(info2 text) $+ �1F;]�1F; | echo $chan $timestamp �3; $+ $colour(info2 text) Pseudo :�3; $+ $colour(highlight text) $nick | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo $chan �3;
              If $active != $chan { echo -a �3; | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Publicité �1F;[�1F;�3; $+ $colour(highlight text) $+ %txt $+ �3; $+ $colour(info2 text) $+ �1F;]�1F; | echo -a $timestamp �3; $+ $colour(info2 text) $+ Salon : $chan - Pseudo :�3; $+ $colour(highlight text) $nick | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo -a �3; } | set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read $mircdirmenu\kicks\pub.txt) | goto suite }
              ElseIf $gettok($read(configurations.txt,50),2,32) == 1 {
                If $gettok($read(configurations.txt,55),2,32) == 3 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pub.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pub.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pub.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
              }
              ElseIf $gettok($read(configurations.txt,50),2,32) == 2 {
                If $gettok($read(configurations.txt,55),2,32) == 3 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pub.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pub.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pub.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
              }
            }
            inc %i 
          }
        }
        inc %c
      }
    }
    If $gettok($read(configurations.txt,47),2,174) == Activé {      var %c 1, %n $lines(detect-channel.txt), %c2 = $chan
      while %c <= %n {
        If %c2 == $read(detect-channel.txt,%c) {
          If $nick == %flood.nick { inc %flood.count 1 }
          .timer 1 %flood.d.time { unset %flood.count | unset %flood.nick }
          If %flood.count >= %flood.d.line {
            If $gettok($read(configurations.txt,54),2,32) == 1 { set %detect.averto $kick.phrase($read(menu\avertir\notice-flood.txt)) }
            ElseIf $gettok($read(configurations.txt,54),2,32) != 1 { set %detect.averto $kick.phrase($nick : $read(menu\avertir\notice-flood.txt)) }
            If $gettok($read(configurations.txt,52),2,32) == 3 {
              echo $chan �3; | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Flood | echo $chan $timestamp �3; $+ $colour(info2 text) Pseudo :�3; $+ $colour(highlight text) $nick | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban
            If $active != $chan { echo -a �3; | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Flood | echo -a $timestamp �3; $+ $colour(info2 text) $+ Salon : $chan - Pseudo :�3; $+ $colour(highlight text) $nick | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo -a �3; } | set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read $mircdirflood.txt) | unset %flood.count | unset %flood.nick | goto suite }
            ElseIf $gettok($read(configurations.txt,52),2,32) == 1 {
              If $gettok($read(configurations.txt,55),2,32) == 3 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\flood.txt))
                If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
                ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
              }
              ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\flood.txt))
                If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
              }
              ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\flood.txt))
                If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
                ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
              }
            }
            ElseIf $gettok($read(configurations.txt,52),2,32) == 2 {
              If $gettok($read(configurations.txt,55),2,32) == 3 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\flood.txt))
                If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
                ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
              }
              ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\flood.txt))
                If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
              }
              ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\flood.txt))
                If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
                ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | unset %flood.count | unset %flood.nick | goto suite }
              }
            }
          }
          Else set %flood.nick $nick
        }
        inc %c
      }
    }
    If ($gettok($read(configurations.txt,48),2,174) == Activé) && ($nick != %sc.csbot) {      var %c 1, %n $lines(detect-channel.txt), %c2 = $chan
      while (%c <= %n) {
        If %c2 == $read(detect-channel.txt,%c) {
          set %majs.len 0 | set %majs.tot 0 | set %majs.boucle 0
          while $mid($1-, %majs.boucle, 1) != $null {
            inc %majs.boucle 1
            If $asc($mid($1-,%majs.boucle,1)) isnum 65-90 { inc %majs.tot | inc %majs.len 1 }
            ElseIf $asc($mid($1-,%majs.boucle,1)) isnum 97-122 { inc %majs.len 1 }
          }
          set %majs.total $calc((%majs.tot * 100) / %majs.len )
          If ((%majs.total >= %maj.pourcent) && (%majs.tot >= 10)) {
            If $gettok($read(configurations.txt,54),2,32) == 1 { set %detect.averto $kick.phrase($read(menu\avertir\notice-majuscules.txt)) }
            ElseIf $gettok($read(configurations.txt,54),2,32) != 1 { set %detect.averto $kick.phrase($nick : $read(menu\avertir\notice-majuscules.txt)) }
            If $gettok($read(configurations.txt,53),2,32) == 3 {
              echo $chan �3; | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Majuscule | echo $chan $timestamp �3; $+ $colour(info2 text) Pseudo :�3; $+ $colour(highlight text) $nick | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo $chan �3;
            If $active != $chan { echo -a �3; | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Majuscule | echo -a $timestamp �3; $+ $colour(info2 text) $+ Salon : $chan - Pseudo :�3; $+ $colour(highlight text) $nick | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo -a �3; } | set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\majuscules.txt)) | goto suite }
            ElseIf $gettok($read(configurations.txt,53),2,32) == 1 {
              If $gettok($read(configurations.txt,55),2,32) == 3 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\majuscules.txt))
                If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
              }
              ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\majuscules.txt))
                If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
              }
              ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\majuscules.txt))
                If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
              }
            }
            ElseIf $gettok($read(configurations.txt,53),2,32) == 2 {
              If $gettok($read(configurations.txt,55),2,32) == 3 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\majuscules.txt))
                If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
              }
              ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\majuscules.txt))
                If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
              }
              ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\majuscules.txt))
                If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
              }
            }
          }
          unset %majs.*
        }
        inc %c
      }
    }
  }
  :suite
}
ON ^1:JOIN:#: {
  If $nick != $me {
    If $gettok($read(configurations.txt,46),2,174) == Activé {      var %c 1, %n $lines(detect-channel.txt), %c2 = $chan
      while %c <= %n {
        If %c2 == $read(detect-channel.txt,%c) {          var %i 1, %t $lines(detect-pseudo.txt)
          while %i <= %t {
            var %txt = $read(detect-pseudo.txt,%i)
            If txt isin $nick {
              If $gettok($read(configurations.txt,54),2,32) == 1 { set %detect.averto $kick.phrase($read(menu\avertir\notice-pseudo.txt)) }
              ElseIf $gettok($read(configurations.txt,54),2,32) != 1 { set %detect.averto $kick.phrase($nick : $read(menu\avertir\notice-pseudo.txt)) }
              If $gettok($read(configurations.txt,51),2,32) == 3 {
                echo $chan �3; | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Pseudonyme �1F;[�1F;�3; $+ $colour(highlight text) $+ %txt $+ �3; $+ $colour(info2 text) $+ �1F;]�1F; | echo $chan $timestamp �3; $+ $colour(info2 text) Pseudo :�3; $+ $colour(highlight text) $nick | echo $chan �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo $chan �3;
              If $active != $chan { echo -a �3; | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;étecteu�1F;r�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ Pseudonyme �1F;[�1F;�3; $+ $colour(highlight text) $+ %txt $+ �3; $+ $colour(info2 text) $+ �1F;]�1F; | echo -a $timestamp �3; $+ $colour(info2 text) $+ Salon : $chan - Pseudo :�3; $+ $colour(highlight text) $nick | echo -a �3; $+ $colour(highlight text) $+ %signe.debut $+ �F;�3; $+ $colour(highlight text) $+ �1F;D�1F;émarch�1F;e�1F; $+ %signe.fin �F;�3; $+ $colour(info2 text) $+ F10 : Avertir - F11 : Kick - F12 : Kickban | echo -a �3; } | set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pseudo.txt)) | goto suite }
              ElseIf $gettok($read(configurations.txt,51),2,32) == 1 {
                If $gettok($read(configurations.txt,55),2,32) == 3 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pseudo.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pseudo.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pseudo.txt))
                  If $me isop %channel.detect { .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
              }
              ElseIf $gettok($read(configurations.txt,51),2,32) == 2 {
                If $gettok($read(configurations.txt,55),2,32) == 3 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pseudo.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me !isop %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pseudo.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
                ElseIf $gettok($read(configurations.txt,55),2,32) == 2 {
                  set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pseudo.txt))
                  If $me isop %channel.detect { .ban %channel.detect %auto.qui 2 | .kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                  ElseIf ($me isvoice %channel.detect) && (IriX ison %channel.detect) { .msg IriX ban # $address(%auto.qui,2) �1F;S�1F;HaMan.eXtreme.Detector.Syste�1F;m�1F; | .msg IriX kick %channel.detect %auto.qui %auto.raison | unset %channel.detect | unset %auto.qui | unset %auto.raison | goto suite }
                }
              }
            }
            Inc %i
          }
        }
        inc %c
      }
    }
  }
  :suite
}
0
Réponse 8 / 9
Soprano71 Messages postés 107 Date d'inscription vendredi 15 avril 2005 Statut Membre Dernière intervention 6 janvier 2009
31 mai 2007 à 11:56
et ds cet remote le detecteur de pseudo fonctionne pas ! qd je rentre le pseudo a detecter il le kick pas :/ et j'arrive pas a savoir d'ou cela peut prevenir ! g demander a l'auteur du script mais c'est comme parler a un mur MDRRR ! `fin voila en gros faut ce debrouillé
merci bcp tropnul de ta patience et ton aide !
0
Réponse 9 / 9
cs_wims Messages postés 2466 Date d'inscription vendredi 23 juillet 2004 Statut Membre Dernière intervention 1 août 2010 1
31 mai 2007 à 12:16
En mode barbare =/

Ok nsh, j'avaus vu le -i mais je pensais pas que tu parlais de ça
0

Discussions similaires

une question tout bete
tangjun -
tangjun -

2 réponses
Edit.text problème tout bête
Cornell711 -
Cornell711 -

4 réponses
Question bête stupide et méchante sous DOS
cs_Warwick -
loopy -

3 réponses
question bete
blanccc -
blanccc -

8 réponses
ma question peut vous paraitre bete mais ...
cs_Pestouille -
Seren -

3 réponses
Rejoignez-nous