# Bad nick/ident kick
# Don't edit anything below unless you know what you're doing
bind join - "*fuck*" join_badnick
bind join - "*bitch*" join_badnick
bind join - "*asshole*" join_badnick 
bind join - "*kontol*" join_badnick
bind join - "*contol*" join_badnick
bind join - "*pepek*" join_badnick
bind join - "*vevek*" join_badnick
bind join - "*ngentot*" join_badnick
bind join - "*kentot*" join_badnick
bind join - "*jembut*" join_badnick
bind join - "*zembut*" join_badnick
bind join - "*pantat*" join_badnick
bind join - "*totong*" join_badnick
bind join - "*tetek*" join_badnick
bind join - "*vagina*" join_badnick
bind join - "*pukimak*" join_badnick
bind join - "*bujanginam*" join_badnick
bind join - "*cibai*" join_badnick
bind join - "*cibe*" join_badnick
bind join - "*lanciau*" join_badnick
bind join - "*lancau*" join_badnick
bind join - "*memek*" join_badnick
bind join - "*cipap*" join_badnick

proc join_badnick {nick host hand chan} {
putlog "$nick $hand $chan $host"
global join_badnick channel botnick ZName 
if {$hand != ""} {
set ZZReason "\[4x]: detected bad nick/ident for $nick"
pushmode $chan +b $nick
putserv "KICK $chan $nick :\[4x]: bad nick/ident"
newchanban $chan $host $botnick $ZZReason 15
}}