10 REM ******************************
20 REM * AUSGABE VON 80-ZEICHEN
30 REM * BASIC-LOADER MIT DEMO
40 REM * P. FINZEL 1986
50 REM ******************************
100 DIM A$(127):GOSUB 30000
110 GRAPHICS 8+16:SETCOLOR 2,8,10:SETCOLOR 1,0,0
120 COLOR 1:PLOT 5,5:DRAWTO 314,5:DRAWTO 314,186:DRAWTO 5,186:DRAWTO 5,5
130 PLOT 5,150:DRAWTO 314,150
140 RESTORE 1000:FOR I=0 TO 7
150 READ X,Y,ATT,A$
160 COLOR 0:PLOT X,Y:REM WICHTIG!
170 A=USR(1536,ADR(A$),LEN(A$),ATT)
180 NEXT I
190 GOTO 190
200 REM *
210 REM * UND HIER EIN PAAR TEXTE
220 REM * ALS DEMO. . .
230 REM *
1000 DATA 80,20,64,80-ZEICHENKONVERTER
1010 DATA 40,40,128,Fuer alle 8-Bit ATARI-Computer 400/800/600XL/800XL/130XE
1015 DATA 64,70,128,ERZEUGT 80-ZEICHEN DISPLAY IN DER GRAPHIKSTUFE 8
1020 DATA 60,100,192,und zusaetzlich recht flexibel in den Schriftarten
1030 DATA 16,120,0,auch normale Schrift ist moeglich
1040 DATA 16,168,0,PETER'S
1050 DATA 80,160,64,ASSEMBLERECKE
1060 DATA 192,160,128,IN COMPUTER KONTAKT
30000 REM * 80-ZEICHEN ML-PROGRAMM
30010 S=0:RESTORE 30100
30020 FOR A=1536 TO 1746:READ D:POKE A,D:S=S+D:NEXT A
30030 IF S<>25816 THEN ? "DATEN-FEHLER!":STOP 
30090 RETURN 
30100 DATA 104,104,133,209,104,133,208,104,104,133,210,104,104,133
30110 DATA 214,169,0,133,211,133,205,133,213,165,92,133,216,165,91
30120 DATA 102,216,106,102,216,106,133,212,165,212,201,80,176,103
30130 DATA 106,102,213,165,94,133,203,165,95,133,204,160,0,132,207
30140 DATA 164,211,177,208,41,127,201,96,176,11,201,32,176,4,9,64
30150 DATA 208,3,56,233,32,10,10,38,207,10,38,207,133,206,24,165,207
30160 DATA 109,244,2,133,207,162,8,160,0,177,206,36,214,16,3,32,147
30170 DATA 6,32,191,6,36,214,80,3,32,191,6,230,206,202,208,230,230
30180 DATA 212,36,214,16,6,36,213,48,4,16,4,230,212,230,205,230,211
30190 DATA 198,210,208,147,96,133,215,169,0,133,216,160,3,185,183
30200 DATA 6,36,215,240,7,185,187,6,5,216,133,216,136,16,239,165,216
30210 DATA 36,213,48,4,10,10,10,10,96,1,4,16,32,1,2,4,8,72,164,205
30220 DATA 17,203,145,203,24,165,203,105,40,133,203,144,2,230,204,104,96