Bot anti-pubRésolu

Question

Bonjour &#224; tous, voil&#224; j'ai &#233;t&#233; charg&#233; de faire un bot anti-pub pour un channel sur QuakeNet.

Il est sens&#233;, lorsque quelqu'un pub pour un channel, rejoindre le channel, laisser un message et repartir du channel



Un ami m'a donc (beaucoup) aid&#233; &#224; faire &#231;a :



on *:text:*:#monchannel {

  if ($chr(35) isin $1-) { 

    var %chan-name = $chr(35) $+ $gettok($gettok($1-,1,35),1,32)

    join %chan-name

    msg %chan-name monmessage

    part %chan-name

  }

}



le soucis c'est que le bot garde le tout premier channel cit&#233;, et &#224;
caque fois que quelqu'un remet un # dans sa phrase, il rejoin toujours
le m&#234;me channel m&#234;me si ce n'est pas le m&#234;me...

et de plus, il ne d&#233;livre pas le message et ne repart pas...



une derniere chose, j'aimerais que ce bot donne des avertissement a l'user qui pub, et qu'il le kick au bout de 3 fois... 



Merci d'avance pour vos r&#233;ponses, je sais que je ne suis pas toujours
tr&#232;s clair dans mes explications, n'h&#233;sitez donc pas &#224; me le faire
savoir.. merci  encore

Nolson · Accepted Answer

1- Tu as oubli&#233; les deux points &#224; la fin du on text :
on *:text:*:#monchannel: {

2- Remplace 1 par 2 dans ton $gettok($1-,1,35) --> $gettok($1-,2,35)

3- Pour les avertissements et le kick, incr&#233;mente une variable personnalis&#233;e &#224; chaque pub et avec des IF sur cette variable tu effectues l'action que tu veux.
/help /inc

Mc_AbBeR · Answer

var %chan-name = $chr(35) $+ $gettok($gettok($1-,1,35),1,32)

Voila le probl&#232;me, il faut le unset...

Nolson · Answer

Mc_AbBeR pas besoin de unset puisque c'est une variable locale.

cs_YkS · Answer

ouais d&#233;sol&#233;, j'avais pas oubli&#233; les ":" sur le remote du bot, donc &#231;a vient pas de l&#224; :)

j'vais essayer de remplacer le 1 par le 2 comme tu me l'as dis ;)



edit : &#231;a a l'air de marcher le truc c'est que il lache 2 fois
"monmessage" et il met pleins de messages d erreur... :s mais bon &#231;a
fonctionne, j'ai r&#233;adapt&#233; un peu :



on *:text:*:#mychannel: {

if ($chr(35) isin $1-) { 

  var %chan-name = $chr(35) $+ $gettok($gettok($1-,2,35),1,32)

  msg #mychannel Pas de pub ici $nick s'il te plais ;) merci :)    

  join %chan-name

  timer 5 4 /msg %chan-name (Pub reply) Pub d&#233;t&#233;ct&#233;e sur
#mychannel pour %chan-name effectu&#233;e par $nick ... merci de rejoindre
#mychannel :)

  timer 6 10 /part %chan-name

}

}



P.S : Faudrait que je rajoute quoi pour qu'il n'effectue pas tout &#231;a lorsque quelqu'un pub pour #mychannel ?

Nolson · Answer

Normal tes timers ne sont pas adapt&#233;s !
Remplace le 5 et le 6 de tes timers par des 1 :
timer 1 4 .....
timer 1 10 .....

cs_YkS · Answer

okay  merci beaucoup :P



et pour &#233;viter que les actions s'effectuent sur #mychannel ?

cs_YkS · Answer

bon tout marche niquel j'ai remis les timers comme il faut, j'te remercie beaucoup Nolson pour ton aide :)



Je cherche toujours &#224; empecher les actions de se faire lorsque la pub
est #mychannel, et aussi comment faire un kick apr&#232;s 3 avertos... j'ai
regard&#233; dans l'help comme tu me l'as dis, le soucis c'est que d&#233;j&#224;
c'est pas facile &#224; comprendre, et de surcroit c'est en anglais, j'ai
cherch&#233; un mirc.hlp en fran&#231;ais, mais je trouve que des traductions
bidons et y'a m&#234;me pas tout dedans :/



Merci d'avance pour vos futures r&#233;ponses, et encore merci Nelson



P.S : "Remplace 1 par 2 dans ton $gettok($1-,1,35) --> $gettok($1-,2,35)" 

&#231;a sert &#224; quoi d'avoir chang&#233; exactement ? je suis novice en
scripting j'aimerais donc savoir &#224; quoi &#231;a sert sans copier b&#234;tement,
merci Nelson ;)

fjxokt · Answer

on *:text:*:#mychannel: {

 if ($chr(35) isin $1-) { 

   var %chan-name = $chr(35) $+ $gettok($gettok($1-,2,35),1,32)

if (%chan-name != #mychannel) {

   msg #mychannel Pas de pub ici $nick s'il te plais ;) merci :)    

   join %chan-name


  timer 5 4 /msg %chan-name (Pub reply) Pub d&#233;t&#233;ct&#233;e sur #mychannel
pour %chan-name effectu&#233;e par $nick ... merci de rejoindre #mychannel :)

   timer 6 10 /part %chan-name

}

 }

 }

cs_YkS · Answer

Merci fjxokt :)

Le pire c'est que j'aurais su le faire, mais j'arrive pas &#224; imaginer quoi m&#234;ttre...j'arrives pas &#224; y penser tout seul :/



Merci beaucoup ;)

cs_YkS · Answer

bon, &#231;a marche mais y'a un nouveau soucis (j'vais le delete le bot je
sent ^^) c'est que si la personne ne met rien avant #pub, &#231;a bug et &#231;a
fait &#231;a :



(21:05:46) (@YkS) #pub

(21:05:46) (@[CFnet]Bot) Pas de pub ici YkS s'il te plait ;) merci :)

(21:05:47)     &#151;&#155; can't join # (requires key (+k))

(21:05:47)     &#151;&#155; press (Control+F2) to retry!

(21:05:50)     &#151;&#155; &#149;(Pub&#149; reply) Pub d&#233;t&#233;ct&#233;e sur
#CFnet pour effectu&#233;e par YkS ... merci de rejoindre #CFnet :)

(21:05:51)     &#151;&#155; no such nickname: ((Pub)



il ne marche que si la personne dit : "quelquechose #pub" et je vois vraiment pas d'o&#249; &#231;a peut venir...



en tout cas un grand merci &#224; tous vous m'avez d&#233;j&#224; pas mal d&#233;bloqu&#233; ;)

S333 · Answer

Je sais pas o&#249; en est ton code, mais je reprends celui de fjkokt :)




                
                on *:text:*:#mychannel: {

      if ($chr(35) isin $1-) { 

          var %chan-name = $chr(35)
$+ $gettok($iif($gettok($1-,2,35) !=
$null,$gettok($1-,2,35),$gettok($1-,1,35)) ,1,32)

            if (%chan-name != #mychannel) {

            msg #mychannel Pas de pub ici $nick s'il te plais ;) merci :)    

            join %chan-name


          timer 5 4 /msg %chan-name (Pub reply) Pub d&#233;t&#233;ct&#233;e sur #mychannel
pour %chan-name effectu&#233;e par $nick ... merci de rejoindre #mychannel :)

            timer 6 10 /part %chan-name

         }

      }

  }



Tout &#231;a est bien sur optimisable, au cas o&#249; il y a plusieurs channels de mensionn&#233;s.

Voil&#224; normalement &#231;a marche.

PS: J'ai juste chang&#233; la ligne avec le var %chan-name =
-------------------------------------
Signature des parents :

cs_YkS · Answer

alors l&#224; S333 j'te remercie infiniment, &#231;a marche niquel.. bravo, et
merci &#224; tout ceux qui ont post&#233; avant et m'ont bien aid&#233;.. &#231;a fait
plaisir de voir que des gens savent encore aider sur des forums... en
esperant qu'&#224; force je pourrais moi aussi aider... j'ai du boulot quand
m&#234;me ^^

Merci :)



P.S : me reste plus qu'&#224; trouver le moyen pour kicker au bout de 3 fois ^^

fjxokt · Answer

pour cela tu peux utiliser les hash tables

exemple



on *:text:*:#mychannel:{

  if ($chr(35) isin $1-) {

    var %chan-name = $chr(35) $+
$gettok($iif($gettok($1-,2,35) !=
$null,$gettok($1-,2,35),$gettok($1-,1,35)) ,1,32)

    if (%chan-name != #mychannel) {

      hinc -m pub $nick
| if ($hget(pub,$nick) == 3) { kick $chan $nick c'est la troisieme fois
que tu pub | hdel pub $nick }

      else msg #mychannel Pas de pub ici $nick s'il te plais ;) merci :) 

      join %chan-name

      timer 5 4 msg %chan-name (Pub reply) Pub
d&#233;t&#233;ct&#233;e sur #mychannel pour %chan-name effectu&#233;e par $nick ... merci
de rejoindre #mychannel :)

      timer 6 10 part %chan-name

    }

  }

}

cs_YkS · Answer

Ca marche tr&#232;s bien, je te remercie beaucoup, j'vous remercie tous pour
m'avoir bien aid&#233;, j'ai pu terminer le bot gr&#226;ce &#224; vous et le livrer en
temps et en heure :)



merci infiniment ;)

Bot anti-pub

14 réponses

Votre réponse

Discussions similaires