setudef flag antipub
bind pub - * proc:antipub

proc proc:antipub {nick uhost hand chan text} {
global username
set why "antipub"
if {[channel get $chan antitake} {return}
if {[string match $text "*#*"]} {newchanban $chan $uhost $username "channel $why protection enabled (Time:[channel get $chan ban-time])" [channel get $chan ban-time] sticky }
}