CHANSERV TCL Script

Alchera · Post by **Alchera** » Tue Dec 07, 2004 4:31 pm

Nice to see laziness is still alive and kicking.

demond · Post by **demond** » Tue Dec 07, 2004 5:08 pm

user wrote: Emulating chanserv through a client logged on as a normal user is not easy.

now that's an understatement

JanisB · Post by **JanisB** » Sun Dec 12, 2004 7:15 am

hello, i have another question about `BotIsChanServ` theme:
how i can close/suspend channel? e.g.: +b *!*@* : I'm not going to ban myself.
How i can override this protection, because my bot is ircop, and he can use /sajoin to get himself into channel.

awyeah · Post by **awyeah** » Mon Dec 13, 2004 8:55 pm

JanisB wrote:hello, i have another question about `BotIsChanServ` theme:
how i can close/suspend channel? e.g.: +b *!*@* : I'm not going to ban myself.
How i can override this protection, because my bot is ircop, and he can use /sajoin to get himself into channel.

Well, one part of this is easy, and the other not.
The not easy part is, HOW WOULD THE BOT KNOW A PERSON IS JOINING A CLOSED CHANNEL? ONLY IF THE BOT IS IN THAT OR THOSE CHANNELS, right? But the real ChanServ has some kind of list of closed channels or something which makes it check through the ircd every second say if it is empty or not, and if not it joins and kicks everyone out and then parts.

For the banning thing it is quite simple, you can make ChanServ reside in the channel you want to close and bind join and kick everyone out who join the channel, and if nick matches a specific mask, or a user flag then it would exempt it.

Code: Select all

#Channel to close
set closechan "#yourchannel"

#Your nick to exempt
set exemptnick "god"

#Your mask to exempt
set exemptmask "oper@63.147.*"


bind join - "*" close:channel

proc close:channel {nick uhost hand chan} {
 global closechan exemptnick exemptmask
  if {([isbotnick $nick]) || ([string match -nocase 
*$exemptnick* $nick]) || ([string match -nocase *$exemptmask* $uhost]) || (![string equal -nocase $closechan $chan])} { return 0 }
   putquick "MODE $chan +b *!*@*" -next
   putquick "KICK $chan $nick :This channel has been closed by ChanServ." -next
   return 0
}

Alternatively we can also make the bot check if there is no ban *!*@*, then only place it. I am not sure what SAJOIN does though, I know about SAMODE. Also depends upon the ircd you use. I've mainly use bahamut for 6-7 years.