Commodore MPS-801 - Print Position Determination

1121 DATA156.162.193,193,182,162
;;:121 FOP 1:= 1 TO~':;
30 READ A
4121 A$=A$+CHR$(A)
:i(1 t·H:~:;·n- I
1:;;0 OF'EJ4:::;:., 4
'?O FOP I;;::: 1 T04
80 PRINT#3,CHR$(S)A$;
9(1 PI? I t·rr#::::. CHR$ ( l:i) II CUt'H'1ODOF.:E"
1 'J0 t·H::::·n· I
11 (1 CI...0:;:;[3
After typing RUN, you get this result:
G COt'lt'10DORE
G cOt'1t10DORE
G COt'1t10DORE
G COt1t'lODORE
3.9
S.4 Print Position Detennination
With the CHR$(I6) code you can determine the print start position.
This
is done by assigning a 2-digit number following the CHR$(16)
(see the examples below).
Example 1
1 (1 OPEtH) 4
2(1 FOf;.: 1=1 T04
:;:121 PR I tH#4., II 01 ~234~:;6'?:~::9 II .;
4 0 t·~ E::·n- I
5121 F'RINT#4)CHR$(10);
6121 PRINT#4)CHR$(16)CHR$(4S)CHR$(~~)
II t,1P':'-'-'r.11II ; . - - .
I "_I -=:'... .
78 PRINT#4,CHRt(16)CHR$(51)CHR$(48)
"F'P I tH"EP " . -.
8(1 CLOSE4
27.