Anti leech pro

Commenter

Contenu du snippet

Bonjour à tous,

Voici un petit script qui permet de kicker les mechants leecheurs s'ils ne disent meme pas bonjour et ne patiente pas au moins une minute avant d'utiliser certaines commandes (ici !list, !xdcc, !bt, !news) il sera alors banni pendant pendant 300 secondes (5 minutes)

Ce script peut etre utiliser en meme temps sur plusieurs chans a la fois!!!
Le fait que le leecheur peut eventuellement changer de pseudo est aussi géré!!!
Le script gere aussi ceux qui saluent avec le /me!!!
Ceux qui font @find et xdcc list sur le chan sont aussi kické

Pour pouvoir parametrer le script au niveau :
- du temps a patienter avant de leecher il faut changer la ligne "set -u60 %laps [ $+ [ $nick ] ] 1" ici configurer pour faire attendre le leecheurs 60 secondes, en par exemple "set -u120 %laps [ $+ [ $nick ] ] 1" pour le faire patienter 120 secondes
- du temps du ban idem avec les lignes "ban -u300 # $nick 2"

Ben voila c tout

Si celui la vous plait peut etre que plein d'autre suivront ^_^

Source / Exemple : 


on *:CONNECT:{
  unset %compteur*
}

on *:join:#:{ 
  if (($me isop #) || ($me ishop #)) && (%chance_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] == $null) {
    set %compteur_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] 1
    set -u60 %laps_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] 1
      .timer 1 10 $ $+ iif(( $nick isreg $chan ),.notice $nick 6Bienvenue sur $chan $nick !!! N'oublie pas de saluer en entrant sur le chan et de patienter au moins une minute avant de leecher ^^  )
  }
}

on *:part:#:{
  if ($me isop #) || ($me ishop #) {
    set -u10 %chance_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] 1
  }
}

on *:quit:{
  var %i 1
  var %NbreChanQuit $comchan($nick,0)
  while (%i <= %NbreChanQuit) {
    if ($comchan($nick,%i).help) || ($comchan($nick,%i).op) {
      set -u120 %chance_ [ $+ [ $comchan($nick,%i) ] $+ _ $+ [ $nick ] ] 1
    }
    inc %i
  }
}

on *:NICK:{
  var %i 1
  var %NbreChan $comchan($nick,0)
  while (%i <= %NbreChan) {
    if (%compteur_ [ $+ [ $comchan($nick,%i) ] $+ _ $+ [ $nick ] ] != $null) {
      %compteur_ [ $+ [ $comchan($nick,%i) ] $+ _ $+ [ $newnick ] ] = %compteur_ [ $+ [ $comchan($nick,%i) ] $+ _ $+ [ $nick ] ]
      unset %compteur_ [ $+ [ $comchan($nick,%i) ] $+ _ $+ [ $nick ] ]
    }
    inc %i
  }
}

on *:TEXT:*:#:{
  if ($me isop #) || ($me ishop #) {
    if ($1 == xdcc) && ($2 == list) {
      ban -u300 # $nick 2      
      kick # $nick 0,4 /!\ Boulay detected /!\  Pas de xdcc list ici :p ( $+ %TotalKick $+ )
    }
    if ($1 == @find) {
      ban -u300 # $nick 2      
      kick # $nick 0,4 /!\ Boulay detected /!\  Pas de @find ici :p ( $+ %TotalKick $+ )
    }
  }
  if (($1 != !list) && ($1 != !xdcc) && ($1 != !bt) && ($1 != !news) && (%compteur_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] != $null)) {
    unset %compteur_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ]
  }
  if ($me isop #) || ($me ishop #) { 
    if ((($1 == !list) || ($1 == !xdcc) || ($1 == !bt) || ($1 == !news)) && ((%compteur_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] == $null) && (%laps_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] != $null))) {
      ban -u300 # $nick 2      
      kick # $nick 0,4 /!\ Leecheur detected /!\  Patiente au moins une minute la prochaine fois avant de leecher 7(Script by Prince_Altaiir)
    }
    if ((($1 == !list) || ($1 == !xdcc) || ($1 == !bt) || ($1 == !news)) && ((%compteur_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] != $null) && (%laps_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] != $null))) {
      ban -u300 # $nick 2      
      kick # $nick 0,4 /!\ Leecheur detected /!\  Dis bonjour et patiente au moins une minute la prochaine fois avant de leecher 7(Script by Prince_Altaiir)
    }
    if ((($1 == !list) || ($1 == !xdcc) || ($1 == !bt) || ($1 == !news)) && ((%compteur_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] != $null) && (%laps_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] == $null))) {
      ban -u300 # $nick 2      
      kick # $nick 0,4 /!\ Leecheur detected /!\  Dis bonjour la prochaine fois avant de leecher 7(Script by Prince_Altaiir)
    }
  }
}

on *:ACTION:*:#:{
  if (%compteur_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ] != $null) {
    unset %compteur_ [ $+ [ $chan ] $+ _ $+ [ $nick ] ]
  }
}

on *:KICK:#:{
  if ($nick == $me) {
    if (%TotalKick == $null) {
      set %TotalKick 1
    }
    else { 
      inc %TotalKick
    }
  }
}

Conclusion :


J'attends toutes vos remarques constructives et eventuelles amélioratios avec impatience ;)

Pour des mises à jour venez faire un petit tour sur mon chan et puis adressez vous à [-_-Prince^__^Altaiir-_-]
/server -m irc.ff.st -j #IRPG

++ les rebelles xD

A voir également

S'inscrire maintenant

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.

Du même auteur (altair20)