SA= 3:
ahl der Zeichengröße
Über diese Sekundäradresse kann die Zeichengröße geändert
werden.
FORMAT: OPEN Ifn, 6,3
PRINT# Ifn, "2" ....
"Zahl"
PRINT#
Ifn, 2 ...... Zahl
PRINT#
lfn,S ...... numerische Variable
1st 0
< = S
< 256,
dann gilt für S MOD (S, 4).
Ist S > = 256 dann gilt
S = 0.
PRINT# Ifn, STRt (S)
CLOSE Ifn
Ifn.... logische Filenummer
6 ..... Gerätenummer
S = Zeichengröße
0.... 80 Zeichen/Zeile
1. ... 40 Zeichen/Zeile
(Default- ert)
2. ... 20 Zeichen/Zeile
3. ... 10 Zeichen/Zeile
BEISPIEL:
100 REM xxx SEKUNDAERADRESSE
3 xxx
110 REM x WAHL DER ZEICHENGROESSE x
120 OPEN 4,6
130 OPEN 3,6,3
140 FOR 1=0 TO 3
150 READ XI
160 PRINT#3,I
120 PRINT#4,RIGHT*CSTR$CI 1,11: " = ~:X1;
• ZEICHEN"
180 PRINT#4
190 NEXT I
200 CLOSE 4: CLOSE 3
210 DATA 80,40,20,10
READY.
- 27 -