alias MuraTT {
  var %Ja 1 
  while %Ja <= $lines(folder.txt) { 
    msg #k $read(folder.txt,%Ja) 
    inc %Ja
  }
}
alias basla {
  timerdd 0 03 MuraTT
}
alias dur {
  .timerdd off
}
menu * {
  Okut
  .basla:/basla
  .Dur:/dur
}