10 PRINT"[147][144]  << ADRESSENLISTE >>":PRINT" MIT DIESEM PROGRAMM KOENNEN SIE NAMEN,"
20 PRINT"ADRESSEN & TELEFONNUMMERN SPEICHERN UND":PRINT"SIE JEDERZEIT WIEDER ";
30 PRINT"AUFRUFEN."
40 PRINT"BEI EINGABE EINES IN DER LISTE GESPEI-"
45 PRINT"CHERTEN NAMENS WERDEN DIE ADRESSE UND"
50 PRINT"DIE TELEFONNUMMER GEDRUCKT.
52 [153]"(WOLLEN SIE DAS PROGRAMM BEENDEN, SO"
54 [153]"GEBEN SIE ALS NAMEN <ENDE> EIN.)"
60 [153]"GEBEN SIE Z.B.:STOPCBM-64  EIN."
70 [153] "EINGABE DES NAMENS:":[140]
80 [133] N$
82 [139]N$[178]"ENDE"[167]500
90 [135] L$
100 [139] L$ [178] "ENDE DER LISTE" [167] 330
110 [135] A1$,A2$,T$
120 [139] L$ [179][177] N$ [167] 90
130 [153]"LOAD"
140 [153]N$
150 [153] "STOPADRESSE:"
160 [153]"     "A1$
170 [153]A2$
180 [153]"T.:"T$
190 [137]70
200 [143]-------------------------------
210 [143] NEUE NAMEN KOENNEN JEDERZEIT           DER LISTE HINZUGEFUEGT WERDEN.
220 [143] ES MUESSEN DAZU NUR GENUEGEND           DATABEFEHLE FUER JEDE EINGABE
230 [143] DER LISTE ,DIE NAMEN, STRASSE,          STADT UND TELEFONNUMMER
240 [143] ENTHALTEN, GESCHRIEBEN WERDEN.          ------------------------------
250 [153]""
260 [131] "CBM-64","LYONER STR.38"
270 [131] "6000 FRANKFURT/M 71"
280 [131] " (0611)6638/0"
290 [131] "COMMODORE","901 CALIFORNIA AVE."
300 [131] "PALO ALTO, CA 94304"
310 [131] "(415) 326-4000"
320 [131] "ENDE DER LISTE"
330 [153]N$
340 [153]"STEHT NICHT IN DER LISTE"
350 [137]70
500 [128]