putstream_new.i 149 B

1234567
  1. cZeile = FILL(" ", iRand) + cZeile + FILL(CHR(10), {1}).
  2. PUT STREAM Out_Stream CONTROL cZeile.
  3. iLine = iLine + {1}.
  4. cZeile = "".