on @*:text:*:#:{
  var %i $numtok($1-,32)
  while %i {
    if ($istok(%kufurler,$remove($gettok($1-,%i,32),:,;,.,$chr(44)),32)) { if ($eval($+(%,uyari,$nick),2) == $null) { set $+(%,uyari,$nick) 1 | msg $chan $nick Lütfen Küfür Etmeyin Bu bir Uyarıdır.. } | else { ban -ku900 $chan $nick BanneD! | unset $+(%,uyari,$nick) }  }
    dec %i
  }
}