if $2 == JOIN {
sockwrite -nt $sockname privmsg #opers : $iif($read(kanal.txt,w,$right($3,-1)),var,yok)
}

alias kanallar {
  var %i 1
  while %i <= $lines(kanal.txt,%i) {
    echo -a $read(kanal.txt,w,$3)
    inc %i
  }
} 

if $2 == JOIN {
  if $3 == kanallar {
    sw privmsg #opers kanal bulundu 
  }
elseif $3 != kanallar {
   sw privmsg #opers bulunamadı
} 

kanal.txt yazanlar
:#zurna
#zurna