push edi
ecx = @buf;
edi = GetNextLine(ecx); //my mistake :P

while(edi > 0) {
  WriteLn(@LineIn);
 
  add ecx, edi  
  edi = GetNextLine(ecx);
} 

int32 k = edi;
pop edi

program WIN32CUI 'test';

#include 'console.zir';
#include 'ch.zir';

const buf = loadfs('fpu_opcodes.txt');
char LineIn[1024];

/*************************************************************************/
// return value is the length of line
// strbuf is the source buffer
// dest is the buffer that hold the line extracted from source buffer  
function GetNextLine(char* strbuf; pointer dest)
{ 
  global int32 incr;

  uses esi edi;
  eax = xor;
  
  ecx = incr;
  esi = strbuf;  
  add esi, ecx
  edi = dest;
  
  while(char[esi] != 0)
   {
      if (word[esi] == "\r\n")
       {
         eax += 2; 
         break;
       }
      bl = char[Esi]; 
      char[edi] = bl; 
      eax++; 
      esi++;
      edi++;
   }
  char[edi] = 0; 
  
  add ecx, eax
  incr = ecx;
}
/*************************************************************************/

push edi
edi = GetNextLine(@buf,@LineIn);
while(edi > 0) 
 {
    print('length of line = ', edi:int, '\r\n');
    WriteLn(@LineIn);
    edi = GetNextLine(@buf,@LineIn);
 } 

pop edi

wait_key(nil);

ExitProcess(0);

eax = GetNextLine(@buf,@LineIn);
while(eax) {
    print('length of line = ', eax:int, '\r\n');
    WriteLn(@LineIn);
    eax = GetNextLine(@buf, @LineIn);
}