on @*:TEXT:*:*:{
.timer 1 8 unset %floodkont! [ $+ [ $nick ] ]
inc %floodkont! [ $+ [ $nick ] ]
if (%floodkont! [ $+ [ $nick ] ] == 5) { mode $chan +b $nick | kick $chan $nick Flood! }
}

on @*:TEXT:*:#:{
var %kufurler ***,kevaşe,fahişe,Vs,Vs
var %i $numtok(%kufurler,44)
while (%i > 0) {
if ($gettok(%kufurler,%i,44) isin $strip($1-)) { mode $chan +b $nick | kick $chan $nick Küfür }
}
}