if $2 == PRIVMSG {
  ;kanal nick ve mesaja deger atayip isleme devam ediyoruz on text gibi
  var %nick = $gettok($gettok($1,1,33),1,58), %mesaj = $right($4-,-1), %kanal = $3
  if %nick isreg %chan {
    if $read(kufur.txt, w,%mesaj) {
      mode %kanal ....
    }
  }

  }

  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
        }
      }
    }
  }