Antipub - avec avertissement + contre pub (pour bots)

Commenter

Contenu du snippet

Chose à faire :
le mettre dans son dossier MIRC , tapez n'importe ou : /load -rs antipub.mrc . Ensuite faîtes un click droit sur 1 channel , et entrer le nom du chan ou vous voulez que le script soit actif , exemple #Pubs (n'oubliez pas le "#")
Son fonctionnement :
lorsque une personne tapera le nom d'un chan , dans une de ses phrases (exemple : BoB: venez sur mon #chan c'est le meilleur...) alors il aura un avertissement du bot écrit sur le chan , et votre bot , joinera #chan avec un contre pub , (exemple /join #chan , ensuite "BoB a écris sur #lechan ou vous voulez que le script soit actif : venez sur mon #chan c'est le meilleur puis un /part #chan)
et si "bob" refait une pub , il sera automatiquement banni pendant 2 min
et ca repart en boucle , (si il refait un pub (avertissement) 1 autre (kick ban 2mn)

Source / Exemple : 


menu channel,nicklist,query {
  -
  Script-Antipub
  .ProtectChan:{ set %chan $$?="Entre le channel à protéger" }
} }

on *:TEXT:*#*:%chan: {
  /set %frase $1-
  if ($nick isop %chan) { //echo -a 4Tu ne peux pas kicker $nick (Op) }
  elseif ($read(kb.txt, w, * $+ $address($nick,3) $+ *)) && ($nick !isop %chan) && ($wildtok(%frase,#*,1,32) != %chan) {
    /set %lam $address($nick,3)
    /mode %chan +b %lam
    /timer 1 1 /kick %chan $nick 4no pubs! (2nd time) = KickBan 2mn 
    /write -d kb.txt %lam
  /timer 1 120 /mode %chan -b %lam }
  elseif ($wildtok(%frase,#*,1,32) != %chan) {
    /msg %chan 4C5aution $nick 4no pubs! (1st time) Next Time = KickBan 2mn 
    /write kb.txt $address($nick,3) 
    /join $wildtok(%frase,#*,1,32)
  /timer 1 2 /msg $wildtok(%frase,#*,1,32) 5< 4g04g04g0 on %chan 5> 4pub détectée sur %chan de $nick 12[4 $+ $asctime(HH:nn) $+ 12] < $+ $nick $+ > : %frase  }}
if ($me ison $wildtok(%frase,#*,1,32)) { //echo -a 4Tu es déjà sur le chan :)  }
elseif ($me !ison $wildtok(%frase,#*,1,32)) { /timer 1 8 /part $wildtok(%frase,#*,1,32) } }

on *:ACTION:*#*:%chan: {
  /set %frase $1-
  if ($nick isop %chan) { //echo -a 4Tu ne peux pas kicker $nick (Op) }
  elseif ($read(kb.txt, w, * $+ $address($nick,3) $+ *)) && ($nick !isop %chan) && ($wildtok(%frase,#*,1,32) != %chan) {
    /set %lam $address($nick,3)
    /mode %chan +b %lam
    /timer 1 1 /kick %chan $nick 4no pubs! (2nd time) = KickBan 2mn 
    /write -d kb.txt %lam
  /timer 1 120 /mode %chan -b %lam }
  elseif ($wildtok(%frase,#*,1,32) != %chan) {
    /msg %chan 4C5aution $nick 4no pubs! (1st time) Next = KickBan 2mn 
    /write kb.txt $address($nick,3) 
    /join $wildtok(%frase,#*,1,32)
  /timer 1 2 /msg $wildtok(%frase,#*,1,32) 5< 4g04g04g0 on %chan 5> 4pub détectée sur %chan de $nick 12[4 $+ $asctime(HH:nn) $+ 12] < $+ $nick $+ > : %frase  }}
if ($me ison $wildtok(%frase,#*,1,32)) { //echo -a 4Tu es déjà sur le chan :)  }
elseif ($me !ison $wildtok(%frase,#*,1,32)) { /timer 1 8 /part $wildtok(%frase,#*,1,32) } }

Conclusion :


petit script qui marche uniquement pour 1 channel :/
j'avais ce script dans un de mes bots, je n'ai jamais réellement mis le nez dedans, mais il fonctionne.
Je sais qu'il a bien plus à pas mal de users sur @qnet . Mais je sais pas si il est réellement utile ailleurs :) car Qnet c'est une mentalité assez spécial :D

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.