Re: Escape codes for printer control

[Andrew Rivers <andrew.rivers@CWCOM.NET>]

Dennis
Many thanks.
However this is not the resolution of my problem.
I am able to create the required escape contol character.
   write 1 from chr<27> '&l1O'
does exactly the same thing as
   encode '<27>' into $landscapeEscChar
   write 1 from $landscapeEscChar '&l1O'

The problem come with the actual printing of the ASCII text file.

This issue resolves around the way Postscip ignores escape characters other
than Postscript control characters,

Again many thanks for your input.

Andrew

***********************************************************

>I had a similar problem a week ago. Everyone I asked suggested that I used

>the  ENCODE instruction. Maybe, this  could help you.
>
>Look at this:
>
>      ENCODE
>'<27>&l12d0e0o1x1s<27>&a1g<27>&a0r<27>&f0s<27>&f1000y3x<27>&f1s<27>(s4099<27

>>(s15h<10>' into $INIT
>      ENCODE '<27>&a' into $ROW
>      ENCODE '<27>=' into $HALF_LINE
>      IF $EMPLID_OLD <> ''
>         NEW-PAGE
>      END-IF
>      PRINT $INIT               (,)
>      PRINT $ROW                (,)
>      PRINT '3R'                (,)
>