if $2 == PRIVMSG {
    if $3 == Botun-nickki && *.*.* !iswm $remove($gettok($1,1,33),:) {
      if $remove($gettok($1,1,33),:) {
        %nick = $remove($gettok($1,1,33),:)
        %mesaj = $right($4-,-1) 
        var %t 1
        while (%t <= $lines(kufur.txt)) {
          if ($read(kufur.txt,%t) iswm %mesaj) {
            swbot privmsg %nick Atılacak Mesajın
          }
          inc %t
        }
      }
    }
  }