Okut { 
  var %1. 1,%2. $numtok($read(dosya.txt,1),44)
  while (%1. <= %2.) {
    msg # %1. $gettok($read(dosya.txt),%1.,44)
    inc %1.
  }
}