set bans on +b *!ident@* and for non irccloud to set a regular ban *!*@host
Code: Select all
bind pub o|o !kb2 pubm:kickban2
proc pubm:kickban2 {nick host hand chan text} {
set text [split $text]
set whom3 [lindex $text 0]
set reason "Requested"
if {[llength $text]>1} { set reason [join [lrange $text 1 end]] }
if {[set chost [getchanhost $whom3 $chan]] ne ""} {
set mask3 [maskhost "$whom3!$chost" 2]
putquick "NOTICE $nick :Kick and Ban $whom3 ($mask3) ------- With Reason: $reason"
putserv "MODE $chan +b $mask3"
putserv "KICK $chan $whom3 :$reason"
} else {
putquick "NOTICE $nick :$whom3 is not on $chan"
}
}
for example if someone with host
~sid95262@highgate.irccloud.com is on channel to get *!~sid95262@*
and if someone with host uid300068@id-300068.charlton.irccloud.com to get *!uid300068@* to use to set a ban on
and if someone with a regular host like Mibbit@c-71-231-192-20.hsd1.wa.comcast.net to get *!*@c-71-231-192-20.hsd1.wa.comcast.net