Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

ANTI CLONE / MASS JOIN


Information sur la source

Catégorie :Bots Classé sous : anti, clone, massjoin, mass, join Niveau : Débutant Date de création : 28/04/2006 Vu : 7 432

Note :
8 / 10 - par 1 personne
8,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (12)
Ajouter un commentaire et/ou une note

Description

bonjours alors voila ma 1ère sources,je n'est pas vraiment crée ce code,mais surtout modifié pour mon usage personnel
code anti clone fourni par un ami trouvé je c'est pas où et le mass join trouvé sur ce site
je vous fournir deux code,le 1er pour un usage sur un bot X²(mon code comprendra des protection pour les users ayant access au bot) la 2nd sera le code tout simplement

 

Source

  • ;PARTI POUR UN BOT X²
  • on !^*:join:#: {
  • if ( $address($me,2) != $address($nick,2) ) {
  • if ( $chan != #!bot! ) {
  • if ( $me isop $chan ) && ($nick != %chan1_user_ [ $+ [ $nick ] ] ) && ($nick != %chan2_user_ [ $+ [ $nick ] ] ) && ($nick != %chan3_user_ [ $+ [ $nick ] ] ) && ($nick != %chan4_user_ [ $+ [ $nick ] ] ) && ($nick != %chan5_user_ [ $+ [ $nick ] ] ) {
  • if ( $chan == %chan1 ) { anticlone | massjoin | halt }
  • if ( $chan == %chan2 ) { anticlone | massjoin | halt }
  • if ( $chan == %chan3 ) { anticlone | massjoin | halt }
  • if ( $chan == %chan4 ) { anticlone | massjoin | halt }
  • if ( $chan == %chan5 ) { anticlone | massjoin | halt }
  • }
  • }
  • }
  • }
  • ;parti sans les protection pour bot ou script mirc autre que X²
  • on !^*:join:#: {
  • if ( $address($me,2) != $address($nick,2) ) {
  • if ( $chan != #!bot! ) {
  • anticlone
  • massjoin
  • halt
  • }
  • }
  • }
  • ;ensuite rajouté c'est alias qui son réelement les anti clone et mass join
  • alias anticlone {
  • set %scannombre
  • set %clonenick
  • set %clone.comp
  • :start
  • inc %scannombre
  • if ($nick(#,%scannombre) == $null) { goto end }
  • elseif ($nick == $nick(#,%scannombre)) { goto start }
  • elseif ($address($nick,2) == $address($nick(#,%scannombre),2)) { /set %clonenick %clonenick $nick(#,%scannombre) | Inc %clone.comp | goto start }
  • else goto start
  • :end
  • if (%clone.comp > 1) {
  • if (%clonenick != $null ) {
  • haltdef
  • mode $chan +mi
  • mode $chan +b $address($nick,2)*
  • kick $chan $gettok(%clonenick,1,32) 7.: 14HanNNnnNNn je voi 7DoUbLe !!! 3BOUGE aC t ClôNe 2 MerDe ... 4( Clônes detect ) 154y $me $fulldate 7:.
  • kick $chan $gettok(%clonenick,2,32) 7.: 14HanNNnnNNn je voi 7DoUbLe !!! 3BOUGE aC t ClôNe 2 MerDe ... 4( Clônes detect ) 154y $me $fulldate 7:.
  • kick $chan $gettok(%clonenick,3,32) 7.: 14HanNNnnNNn je voi 7DoUbLe !!! 3BOUGE aC t ClôNe 2 MerDe ... 4( Clônes detect ) 154y $me $fulldate 7:.
  • .timer 1 20 msg %cr 7.: 3 $nick 2a clôné sur4 $chan 2avec le host 14: $address($nick,5) 7:.
  • .timer 1 10 msg $chan 7.: 2attaque de 4clône détecté2 mise en place des 4modes +im 2pour plus de sécurité, ceux ci seront enlevé dans4 quelques secondes 2si vous tenez a parler,allé dans le pv de3 d'un op 2et demandé un 1voice 7:.
  • .timer 1 15 mode $chan -m
  • .timer 1 60 mode $chan -i
  • }
  • }
  • unset %scannombre %clonenick %clone.comp
  • }
  • alias massjoin {
  • if ( %entrer [ $+ [ $chan ] ] >= 1 ) { /inc %entrer [ $+ [ $chan ] ] 1
  • if ( %entrer [ $+ [ $chan ] ] <= 4 ) { /halt }
  • if ( %entrer [ $+ [ $chan ] ] > 4 ) {
  • mode $chan +mi
  • mode $chan +b $address($nick,2)*
  • kick $chan $nick 7.: 2HanNNnnNNn 14Mass Join !!! 2by $me $fulldate 7:.
  • .timer 1 20 msg %cr 7.: 14Mass Join sur4 $chan 7:.
  • .timer 1 10 msg $chan 7.: 14Mass Join détecté2 mise en place des 4modes +im 2pour plus de sécurité, ceux ci seront enlevé dans4 quelques secondes 2si vous tenez a parler,allé dans le pv de3 d'un op 2et demandé un 1voice 7:.
  • .timer 1 15 mode $chan -m
  • .timer 1 60 mode $chan -i
  • }
  • }
  • else { /inc -u5 %entrer [ $+ [ $chan ] ] 1 }
  • }
;PARTI POUR UN BOT X²

on !^*:join:#: {
  if ( $address($me,2) != $address($nick,2) ) {
    if ( $chan != #!bot! ) {
      if ( $me isop $chan ) && ($nick != %chan1_user_ [ $+  [ $nick ] ] ) && ($nick != %chan2_user_ [ $+  [ $nick ] ] ) && ($nick != %chan3_user_ [ $+  [ $nick ] ] ) && ($nick != %chan4_user_ [ $+  [ $nick ] ] ) && ($nick != %chan5_user_ [ $+  [ $nick ] ] ) {  
        if ( $chan == %chan1 ) { anticlone | massjoin | halt }
        if ( $chan == %chan2 ) { anticlone | massjoin | halt }
        if ( $chan == %chan3 ) { anticlone | massjoin | halt }
        if ( $chan == %chan4 ) { anticlone | massjoin | halt }
        if ( $chan == %chan5 ) { anticlone | massjoin | halt } 
      }
    }
  }
}
;parti sans les protection pour bot ou script mirc autre que X²

on !^*:join:#: {
  if ( $address($me,2) != $address($nick,2) ) {
    if ( $chan != #!bot! ) {
      anticlone
      massjoin
      halt
    }
  }
}
;ensuite rajouté c'est alias qui son réelement les anti clone et mass join

alias anticlone {
  set %scannombre 
  set %clonenick 
  set %clone.comp
  :start
  inc %scannombre 
  if ($nick(#,%scannombre) == $null) { goto end } 
  elseif ($nick == $nick(#,%scannombre)) { goto start } 
  elseif ($address($nick,2) == $address($nick(#,%scannombre),2)) { /set %clonenick %clonenick $nick(#,%scannombre) | Inc %clone.comp | goto start } 
  else goto start 
  :end 
  if (%clone.comp > 1) {
    if (%clonenick != $null ) { 
      haltdef
      mode $chan +mi
      mode $chan +b $address($nick,2)*
      kick $chan $gettok(%clonenick,1,32) 7.: 14HanNNnnNNn je voi 7DoUbLe !!! 3BOUGE aC t ClôNe 2 MerDe ... 4( Clônes detect ) 154y $me $fulldate 7:.
      kick $chan $gettok(%clonenick,2,32) 7.: 14HanNNnnNNn je voi 7DoUbLe !!! 3BOUGE aC t ClôNe 2 MerDe ... 4( Clônes detect ) 154y $me $fulldate 7:.
       kick $chan $gettok(%clonenick,3,32) 7.: 14HanNNnnNNn je voi 7DoUbLe !!! 3BOUGE aC t ClôNe 2 MerDe ... 4( Clônes detect ) 154y $me $fulldate 7:.
      .timer 1 20 msg %cr 7.: 3 $nick 2a clôné sur4 $chan 2avec le host 14:  $address($nick,5)  7:.
      .timer 1 10 msg $chan 7.: 2attaque de 4clône détecté2 mise en place des 4modes +im 2pour plus de sécurité, ceux ci seront enlevé dans4 quelques secondes 2si vous tenez a parler,allé dans le pv de3 d'un op 2et demandé un 1voice 7:.
      .timer 1 15 mode $chan -m
      .timer 1 60 mode $chan -i 
    }
  }
  unset %scannombre %clonenick %clone.comp       
}
alias massjoin {
  if ( %entrer [ $+ [ $chan ] ] >= 1 ) { /inc %entrer [ $+ [ $chan ] ] 1
    if ( %entrer [ $+ [ $chan ] ] <= 4 ) { /halt }
    if ( %entrer [ $+ [ $chan ] ] > 4 ) {
      mode $chan +mi
      mode $chan +b $address($nick,2)*
kick $chan $nick 7.: 2HanNNnnNNn 14Mass Join !!! 2by $me $fulldate 7:.
      .timer 1 20 msg %cr 7.: 14Mass Join sur4 $chan  7:.
      .timer 1 10 msg $chan 7.: 14Mass Join détecté2 mise en place des 4modes +im 2pour plus de sécurité, ceux ci seront enlevé dans4 quelques secondes 2si vous tenez a parler,allé dans le pv de3 d'un op 2et demandé un 1voice 7:.
      .timer 1 15 mode $chan -m
      .timer 1 60 mode $chan -i 
    }
  }
  else { /inc -u5 %entrer [ $+ [ $chan ] ] 1 }
}

Conclusion

précision la variable %cr précise un salon donné(salon des comptes rendu pour ma part)
clone limité as 3/salon ==> mode +im ==> mode -m après 15seconde et mode -i après 1minute
massjoin pratique contre les attaques de proxy(testé moi même hier) et marche trés bien
 

Commentaires et avis

signaler à un administrateur
Commentaire de RCA ArKanis le 28/04/2006 18:31:10

très mal codé et plein de fautes d'orthographe (en une phrase tu dois en avoir 7 ou plus) :x
apparement tu ne connais pas l'impératif (c'est beaucoup plus important de le connaître que de savoir coder en mIRC Script)

pense aux boucles WHILE, les goto c'est nul.

if ( $chan == %chan1 ) { anticlone | massjoin | halt }
...
if ( $chan == %chan5 ) { anticlone | massjoin | halt }
omg ^^
t'aurais pu faire en sorte que ce ne soit pas limité et t'aurais dû utiliser elseif
en plus %chan1, %chan2, ... sont des noms de variables communs, il est fort possible qu'elles soient utilisées par d'autres scripts

Tu as deux ON JOIN, regroupe les deux en un seul

  mode $chan +mi
  mode $chan +b $address($nick,2)*
devient : mode $chan +mib $address($nick,2) (y'a pas d'étoile)

tu n'as pas besoin de / devant l'instruction INC, et le 1 est par défaut, enlève le pour gagner en place

if ( %entrer [ $+ [ $chan ] ] <= 4 ) { /halt }
à quoi ça te sert d'arrêter le code vu qu'après tu as un IF qui est exactement l'inverse de celui-là

if (%clonenick == $null) => vérifie si tu peux le raccourcir en if (!%clonenick) : %clonenick peut-être égal à 0 ou à $false ?, ça m'étonnerait ^^

dans ton alias anticlone, tu utilises $nick(#,%scannombre), mais # est assez flou, tu devrais utiliser un paramètres
j'veux dire par là : tu tapes /anticlone #chan, et c'est $nick($1,%scannombre) qui est utilisé

tu aurais pu utiliser des hash tables pour gagner en rapidité et en clarté

Question utilité, tu dis toi même que c'est pour ton usage personnel ^^
Tu as vraiment modifié ce code à partir d'un autre ? T'aurais pu trouver un code à modifier un peu mieux quand même :x

signaler à un administrateur
Commentaire de wims le 28/04/2006 21:25:30

Que dire de plus, a part que :

set %scannombre
set %clonenick
set %clone.comp

Tu aurait pu mettre des variables locales
Et les premiers codes, ce sont ceux que l'on fait reelement sois même :)

signaler à un administrateur
Commentaire de NeeToX le 29/04/2006 04:13:21

bonsoir
d'une chose je n'est jamais dit que j'avais fait ce code et j'ai l'ai bien précisé,2nd chose je ne ss pas ici pour faire mon beau,mais surtout pour fournir des sources qui peuve aider,j'aime moi même eu du mal avec les sources,je n'ai jamais dit que g été un bon scripteur,concernant les deux on join si t'avai lu tu vérai que c'est deux application différente soit pour les personnes ayant un bot X² soit pour un script classique,il es vrai que %chan1 etc... doit être utilisé par d'autre script,je n'y es pas pensé et tt le monde n'est pas parfait,me craché pas dessus ...
concernant le code d'origine j'ai modifié celui là vu k'il marché assé bien et réagissé rapidement voilà tout
pour le ban $address($nick,2)* ==> l'étoile n'y es pas dans mon script je ne sait pas d'où ça sort :s
et pour les fautes de français j'en ss vraiment navré g dé lacune depui tré petit et ça ne sait jamais arrangé .
merci kan mm de vos com's

signaler à un administrateur
Commentaire de RCA ArKanis le 29/04/2006 11:26:24

Je ne critique pas ton codage, je te donne des conseils pour t'améliorer, pour être compris des autres, ...
J'essaye également de faire en sorte que certaines erreurs ne soient plus refaites dans d'autres codes, et que tu les comprennes.
Je suis désolé mais savoir parler ta langue mère correctement c'est plus important que de programmer n'importe quel langage.

Si vraiment j'en avais rien à faire de ta source, j'aurai pas passé 20 minutes à tout corriger.
Mes motivations sont surtout de rendre le codage meilleur : plus clair, plus court, plus rapide à exécuter. J'ai jamais dit que la perfection existait ...

J'vois que t'aimes pas qu'on corrige tes oeuvres, j'vais donc essayer de m'en souvenir pour celles qui vont être sur ce site à l'avenir.

signaler à un administrateur
Commentaire de wims le 29/04/2006 12:54:06

Idem, si on post un commentaire c'est que l'on a pris le temps de regarder la source.J'ai bien vu que tu avais dis que ce n'était pas ton code mais essaye juste de trouver des idées qui viennent de toi :)

Pour en revenir au code :
-Il y a bien une étoile ici : mode $chan +b $address($nick,2)*
if (%clone.comp > 1) {
    if (%clonenick != $null ) {

Si %clone.comp > 1 alors %clonenick existe forcement
Qu'est-ce qui ce passe si ya plus de trois clones ? Tu va kické que les 3 premiers. essaye de modifier ca.

signaler à un administrateur
Commentaire de RCA ArKanis le 29/04/2006 13:12:14

pourquoi est-ce qu'il y aurait une étoide ? oO

$address($nick,2) tout court c'est très bien !
y'a même pas de $+ ou autre

signaler à un administrateur
Commentaire de wims le 29/04/2006 14:00:02

Non mais je suis d'accord Arkanis :x
Je dis juste qu'il y a une étoile présente dans son code :
"$address($nick,2)*"
et qu'il ne devrait pas en avoir une

signaler à un administrateur
Commentaire de NeeToX le 30/04/2006 00:42:32

dsl arkanis pour hier soir c été mon mauvais jour
pour le $address($nick,2)* je disai ke dans le code de mon bot ==> * n'est pas présente,et je ne l'ai pa rajouter,je c tré bien ke c inutile :s pour revenir a ma langue mère,c une site code dc pr mon pb de langue j'irai sur un site dédié a ça ... pour les corrections de mes erreurs c pa ke j'aime pa kon me lé corrige,c la façon don vous le montré
pi g jamais vraimen regardé s'il y avé dé chose inutile,je v donc corrigé tt les érreures ke vs m'avé montré
merci a vous
bonne soiré ou journée en fonction de quand vous lirai le mess

ps : je c y a plein de faute normal je ss précé alors j'écri en sms

signaler à un administrateur
Commentaire de tofu le 03/05/2006 15:30:59

on @^*:join:#:{
  inc -z %protect.j. $+ $chan $+ . $+ $site 7
  if (%protect.j. [ $+ [ $chan ] $+ . $+ [ $site ] ] > 13) {
    echo -a  Flood join/part de $nick - $address($nick,2) sur $chan - $server
    raw -q mode $chan +ib $address($nick,2)
    raw -q kick $chan $nick : Flood interdit.
    timerban 1 5 mode $chan -i
  }
}

et ya pas grand chose à modif pour faire un 'anti mass join'

signaler à un administrateur
Commentaire de wims le 03/05/2006 20:00:18

Autant /ban -k $nick Flood interdit.

signaler à un administrateur
Commentaire de tofu le 03/05/2006 22:15:04

oui dsl, j'avais fais ça avec d'anciennes versions de mIRC...

on peut aussi mettre les deux commandes en un //raw -q (ce qui revient au ban -k)

signaler à un administrateur
Commentaire de Trollz le 03/06/2006 21:22:51

1/10

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Anti-Mass join Anti-clone [ par Soprano71 ] bonjour a tous ! y aurai t'il un anti clone en dial et anti-mass join  svp ? Anti mass join [ par Xrf ] Bonjour, voila j'aimerai cree un add on anti mass join pour stoper les clone. Cette add on pourai prendre place sur un bot sop voir ircop. Seulement j Anti flood join [ par nightmar ] Salut tous le monde esque quelqu'un pourait me dire se qui ne vas pas dans mon code ? svpOn 1:JOIN:#Aeons:{ if (% [ $+ [ join ] [ $+ [ $nick ] ] ] ) Anti mass kick [ par Milk0z ] BAN: on *:RAWMODE:#:{ if (( $mid($1- &lt; ,1 ,7 )) &amp;&amp; ( +b isin $1 ) { ... } } DEOP: on *:DEOP:#:{ if ($modefirst) { ... } Je ne trouve pas anti clone [ par sylveur ] bon ba le bl&#232;me c'est que sur mon server un pett coqu'un joue au clone. je cherche un bn anti-cone en mirc mai je trouve as.. et je voulai savoir Bot Anti-clone [ par shadowsexpect ] Bonjour a tous, je construit mon bot depuis maintenant une semaine, et je voudrais qu'il serve aussi pour la sécurtié du server, pour ce faire j'aimer Recherche detecteur de clone on join [ par DeViL66 ] Salut,Je recherche un scanner de clone On Join sp&#233;cial, que&nbsp;quand le clone d'une personne rentre sur un chan, cela nous avertisse. Aussi pou pourquoi ce script anti j/p ban les mecs qui /hop??? [ par int3r_ ] Bonjour, Voilà c'que j'ai dans le remote ;anti join-part ON *:JOIN:#monChan: { set %join. [ $+ [ $nick ] ] 1 .timerunset 1 60 unset %join. [ $+ 1 anti-clone plizz [ par reva94 ] Bonjours , depuis X temp je cherche 1 bon anti-clone, je n'en trouve point :'(Est ce que quelqu'un aurai 1 remote pour ban-kick 15 min &lt;== La meme whoiseur ? lamers :p [ par Xer0z ] bonjour , je voudrais savoir si qu elle q'un pouvais me faire ou expliqu&#233; commant fonctionne c tres simple , je voudrais simplement que quan on m


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,905 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.