[Oberon] Need V4 Code for trivial task.

[eas lab]

Very nice, thanks.

Plus I can easily extend: as I've done,eg. by:
translating "%" and """ to " " and translating "." to "`";
where V4's Hex.Open gave me the values.

which V4's Hex.Open gave me the ORD values of..

And interestingly that's achieved also by
   "just popping an extra-line into the code".
But it's not as modular/simple/safe as the canonical piping syntax:
   InputFile |Filter1 |Filter2....|FilterN > OutputFile
=======================================
         WHILE ~rd.eof DO
             IF (c = 0DX) OR (c = 0AX) OR (c = 25X) OR (c = 22X)
             THEN c := " " END;
             IF (c = 2EX)THEN c := 60X END;
             (* delete Cr, Lf, %=25 "=22 ; .=2E => `=60 *)
             Files.Write(wr, c);
             Files.Read(rd, c);
         END;

== Chris Glur.