Communauté Eggdrop

Bonjour

Je recherche un tcl pour bannir sur des /quit message

Par exemple sur voila/orange :

[14:34:40] •Quit• PSEUDO (PG000Znowhere@223338967.fr) a quitté l'IRC (Killed (ircvoila1.tchat.orange.fr (PSEUDO(?) <- hub.chat.s1.p.fti.net[guest@localhost])))
[14:35:00] •Quit• PSEUDO (PG000Znowhere@223338967.fr) a quitté l'IRC (Killed (ircvoila1.tchat.orange.fr (PSEUDO(?) <- hub.chat.s1.p.fti.net[guest@localhost])))

etc etc ... que cela puisse bannir pour 1 minutes par exemple ou que se soit modulable selon la raison , sur des quit ausssi avec des urls etc

Merci bonne journée

dody

Je pense qu'il existe des TCL d'anti-spam qui font ça, mais sinon c'est assez facile à réaliser, par exemple:

tcl

set nospam(delay) 60
bind part - "#% *" nospam:check
proc nospam:check {nick uhost handle chan {msg ""}} {
   if { $nick == $::botnick } { return 0; }
   if { [string first "http" [string tolower $msg]] >= 0 } {
      newchanban $chan $uhost $::botnick "Part spam" $::nospam(delay)
   }
   return 0
}

Voila le principe, à toi de voir si ça peut t'aider Smile

DodY

CrazyCat