home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C64'er
/
C64'er.iso
/
87xx
/
8703a.d64
/
listing
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
498b
|
24 lines
1 REM EINSTELLEN DES ZEILENABSTANDES
2 REM MIT N/216 ZOLL
5 PRINTCHR$(147)
10 INPUT"WIEVIEL N/216 ZOLL";ZO
20 OPEN1,4
25 REM DEFINITION EINES KASTENS
30 PRINT#1,CHR$(27);":";CHR$(0);CHR$(0);CHR$(0);
40 PRINT#1,CHR$(27);"%";CHR$(1);CHR$(0);
50 PRINT#1,CHR$(27);"&";CHR$(0);"AA";
60 PRINT#1,CHR$(139);
70 FOR N=1TO11
80 READA
90 PRINT#1,CHR$(A);
95 DATA 255,0,255,0,255,0,255,0,255,255,0
100 NEXTN
105 REM FESTLEGEN DES ZEILENABSTANDES
110 PRINT#1,CHR$(27);CHR$(51);CHR$(ZO)
115 FOR A=1TO3
118 REM AUSDRUCK EINER ZEILE DES NEUEN
119 REM ZEICHENS
120 PRINT#1,"AAAAAAAAAAAAAAAAAAAAAAAA"
130 NEXT
200 RUN