BEISPIEL:
100 REM xxx SEKUNDAERADRESSE
5 xxx
110 REM x FESTLEGEN DER LINIENART x
120 OPEN 3,6
130 OPEN 1,6,1
140 OPEN 5,6,5
150 FOR 1=0 TO 15
160 PRINT#5,I
120 PRINT#1,"M":30;-Ix20+10
180 PRINT#1,'D':480; -1x20+10
190 NEXT
200 PRINT#5,0
210 PRINT«1,H"
220 FOR 1=0 TO 15
230 PRINT#3,RIGHT*C"
"+STR1CI 1,21
240 NEXT
250 CLOSE 1: CLOSE 3: CLOSE 5
READY .
0 —
1 —
2 —
3 —
4 —
5 —
6 "
7 -
8 -
9 -
10 -'
11 -
12 -
13 -
14 -
15 -
- 33 -