alias kufur { write kufur.txt $1 }
alias kufsil { write -dl kufur.txt $1 }
on *:text:*:#: {
  if $nick isop $chan { halt }
  var %' $lines(kufur.txt)
  while (%' > 0) {
    if ($read(kufur.txt,%') iswm $strip($1-)) {
      mode $chan +b $nick | kick $chan $nick 5Advertising/Swear/Bad Enforcing!.. 14 Başkalarının terbiyesizliğine karşı en emin silah, bir insanın kendi terbiyesidir. 4(Chesterfiedl) : $replace($ifmatch,a,*,e,*,ı,*,i,*,o,*,ö,*,u,*,ü,*,İ,*,I,*)
    }
    dec %'
  }
}