on *:join:*:$iif($nick != $me,$iif($server iswm %sunc, rumuzdegis $nick $chan))
on *:start: set %line 1
alias rumuzdegis {
  if %line > $lines(rumuzlar.txt) {
    set %line 1
  }
  else {
    nick $read(rumuzlar.txt)
    inc %line
  }
}
menu channel  {
  © Rumuz Değiştirme FZ
  .Aç:set %deger $??"Rumuzlar arasındaki geçerli süreyi girin [Örneğin; 0 65 gibi]" | set %sunc $??"Çalışılacak sunucuları aralarına virgül koyarak girin [Örneğin; irc.sohbet.net,irc.FZbilisim.com gibi]" |  echo -a $+($timestamp,$chr(32),$chr(2),Rumuz değiştirme açıldı.,$chr(3)) | .timerlines %deger rumuzdegis    
  .Kapat:.timerlinesz off | unset %deger | echo -a $+($timestamp,$chr(32),$chr(2),Rumuz değiştirme kapatıldı.,$chr(3))
}
set %sunc $??"irc.sohbet.net,irc.FZbilisim.com" bu kod ile sunucu adları yazacagım yer açılıyor

alias nnick {
  var %c $scon(0)
  while %c {
    scon %c nick $read(rumuzlar.txt)
    dec %c
  }
}