alias msg5dk {
  if (!%m.list) { %m.list = $str(0 $chr(32),$lines(mesaj.txt)) }
  var %r = $rand(1,$lines(mesaj.txt))
  while ($gettok(%m.list,%r,32)) { %r = $rand(1,$lines(mesaj.txt)) }
  %m.list = $puttok(%m.list,1,%r,32)
  msg $1 $read(mesaj.txt,n,%r)
  if (0 !isin %m.list) { unset %m.list }
  .timer 0 300 msg5dk $1
 }

alias mesajdöngü {
  .play -c #sohbet mesajlar.txt 300
  .timerYenidenOynat 1 $calc($lines(dosyaadi.txt) * 300) mesajdöngü
}