Sujet Précédent Sujet Suivant

Souci :((

Soprano71 Messages postés 107 Date d'inscription vendredi 15 avril 2005 Statut Membre Dernière intervention 6 janvier 2009 - 5 juil. 2007 à 16:42
cs_ISoKa Messages postés 435 Date d'inscription jeudi 27 avril 2006 Statut Membre Dernière intervention 17 octobre 2008 - 5 juil. 2007 à 20:59
voila je comprend pas pk il kick pas qd le pseudo join le chan ! pouvai vous m'aidé svp ??merci

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 }
                }
              }
            }

5 réponses

Réponse 1 / 5
uaip Messages postés 1466 Date d'inscription mardi 20 février 2007 Statut Membre Dernière intervention 7 février 2011
5 juil. 2007 à 19:24
bah ya plein de paramètres extérieurs au code qu'on peut pas vérifier.. apres, par exemple ta var %c2, j'ai juste regardé les quelques ligens qui suivaient et tu l'utilisais pas.. t'es sûr qu'elle est utile ?
bref, je peux pas trop t'aider, mais si ce code sert simplement a kicker, je crois que tu te prends un peu la tete, la... (si c'est pareil pour chaque event, j'ose pas imaginer la taille de la remote )
0
Réponse 2 / 5
cs_ISoKa Messages postés 435 Date d'inscription jeudi 27 avril 2006 Statut Membre Dernière intervention 17 octobre 2008
5 juil. 2007 à 20:26
bah j'ai a peine matté le code mais déja je voi :
var %txt = $read(detect-pseudo.txt,%i)
            If txt isin $nick {
manque pas un "%" ?

ISoKa
0
Réponse 3 / 5
uaip Messages postés 1466 Date d'inscription mardi 20 février 2007 Statut Membre Dernière intervention 7 février 2011
5 juil. 2007 à 20:35
j'ai vu aussi ce truc, ca m'a étonné, mais ptetre que c'ets genre un pseudo "catatxt" mais c'est vrai que le code n'est pas tres clair, on a aucune donnée.
0
Réponse 4 / 5
cs_ISoKa Messages postés 435 Date d'inscription jeudi 27 avril 2006 Statut Membre Dernière intervention 17 octobre 2008
5 juil. 2007 à 20:35
De plus en mattant bien un truc aussi lourd à chaque join y a pas interet à ce que tu sois sur un gros chan, ni a ce que tu ai bcp de pseudo en blacklist. essai ptete de faire un truc plus rapide genre avec du file handling ou encore mieu en hash table ca serai bcp plus fluide je pense.
encore une chose aussi pas besoin de faire une boucle sur chaque ligne pour voir si une ligne d'un txt est strictement egale à une chaine de craractere donné. $read gere deja ca tout seul.

ISoKa
0

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

Posez votre question
Réponse 5 / 5
cs_ISoKa Messages postés 435 Date d'inscription jeudi 27 avril 2006 Statut Membre Dernière intervention 17 octobre 2008
5 juil. 2007 à 20:59
en mattant oubli le file handling met tout en hash table direct ca serai mieu.
de meme ca serai pas plus judicieu au lieu de :
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 $chan $nick
%auto.raison | unset %channel.detect | unset %auto.qui | unset
%auto.raison | goto suite }
}
de mettre plutot :
ElseIf $gettok($read(configurations.txt,55),2,32) == 1 {
                 
If $me isop %channel.detect { .kick %channel.detect %auto.qui $kick.phrase($read(menu\kicks\pseudo.txt)) }

                }
        else { set %auto.qui $nick | set %channel.detect $chan | set %auto.raison $kick.phrase($read(menu\kicks\pseudo.txt)) }
}
comme ca tu ne set tes variables que si tu n'es pas op et que tu veux par la suite kicker par tes raccourcis claviers (F10 machin), et ceci est bien sur applicable partout dans ton code vu que je voi que tu en fai pas mal de trucs comme ca, et en plus ca raccourci un peu ton code ce qui est pas mal je trouve.
ISoKa
0
Rejoignez-nous