egghelp/eggheads community

Prob in Noticeban tcl

2002-10-21T04:57:09-04:00

its working now thanks for help

Statistics: Posted by suchwani — Mon Oct 21, 2002 4:57 am

Prob in Noticeban tcl

2002-10-20T03:46:54-04:00

seems like a very old version

Code:

 ([string tolower $nick] == "ChanServ")} change it to ([string tolower $nick] == "chanserv")}

but even old NoticeBan.tcl didn't set *!*@* ban when server noticed channel as far as I recall checking if user is on channel is in NoticeBan1.1.tcl you can get it at
http://cord.nu/~pulse/stuff/tcl/NoticeBan1.1.zip

Statistics: Posted by Nexus6 — Sun Oct 20, 2002 3:46 am

Prob in Noticeban tcl

2002-10-20T03:40:13-04:00

Also a bit strange:

Code:

[string tolower $nick] == "ChanServ"

Statistics: Posted by egghead — Sun Oct 20, 2002 3:40 am

Prob in Noticeban tcl

2002-10-20T02:11:47-04:00

Adding a check to see if the user that sent the notice is actually in the channel first might help.

Statistics: Posted by tainted — Sun Oct 20, 2002 2:11 am

Prob in Noticeban tcl

2002-10-20T02:04:05-04:00

i m using noticeban tcl by pulse. there r some error in dat tcl. like when anyone deop by chanserv . then bot ban the service host.
-ChanServ:#- has deopped
* ChanServ sets mode: -o
* sets mode: +b *!*@dal.net
in netsplit sometime server send notice in channel that flood protection activited for
then bot banned the host *!*@*
twisted.ma.us.dal.net:#- flood protection activited for
* sets mode: +b *!*@*
i added services ip in bot +f flag but it wont work
can anyone fix it dat bot don't detect notice by chanserv and by any server.

bind NOTC - * NoticeBan

Code:

proc NoticeBan {nick uhost handle text dest} {global botnick if {![validchan $dest]} { return 0 } if {[matchattr $nick mo|mo $dest] || [isop $nick $dest] || [isvoice $nick $dest] || [matchattr $nick o|o $dest]} {return 0} if {([isbotnick $nick]) || ([string tolower $nick] == "ChanServ")} {return 0} set banmask "*!*@[lindex [split $uhost @] 1]"putquick "KICK $dest $nick :Don't use channel notice, \002only\002 channel ops(@)/voices(+) can use it."putquick "MODE $dest +b $banmask"return 1}

Statistics: Posted by suchwani — Sun Oct 20, 2002 2:04 am