0 PRINT"[153][147]":POKE53280,0:POKE53281,0
1 PRINT"[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]"
2 PRINT"[145][159]    [208][207][215][197][210] [196][201][211][203] 64 - [208]ROGRAMMENU 2/95    "
3 PRINT"[145][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]"
5 PRINT"[159]1 = [212][207][208]-[208][210][199]:[215][215][214] ([210]EMIX)"
6 PRINT"2 = [214]OKABELN (11)"
7 PRINT"3 = [215]ITZE (9)                4 = [215]ORT-[211]PIEL 2"
8 PRINT"5 = [200]AUPTMENU"
9 PRINT"6 = [210][197][211][197][212]"
10 INPUT"[201]HRE [215]AHL";A:PRINT"[145][145][145]"
11 IF A<1 OR A>6 THEN0
12 IF A = 1 THEN GOTO105
13 IF A = 2 THEN GOTO300
14 IF A = 3 THEN GOTO410
15 IF A = 5 THEN GOTO500
16 IF A = 6 THEN GOTO600
17 IF A = 4 THEN GOTO200
20 GET M$:IF M$=""THEN20
21 GOTO1
105 POKE828,0
106 PRINT CHR$(147) CHR$(17)
107 PRINT "LOAD"CHR$(34);"LOA*";CHR$(34); ",8,1
108 [153] [199](17) [199](17) [199](17) [199](17) "RUN"
109 [151]631,13:[151]632,13:[151]198,2
110 [153] [199](19);:[128]
200 [151]828,0
201 [153] [199](147) [199](17)
202 [153] "LOAD"[199](34);"WORT*";[199](34); ",8
203 PRINT CHR$(17) CHR$(17) CHR$(17) CHR$(17) "RUN"
204 POKE631,13:POKE632,13:POKE198,2
205 PRINT CHR$(19);:END
300 POKE828,0
301 PRINT CHR$(147) CHR$(17)
302 PRINT "LOAD"CHR$(34);"VOKA*";CHR$(34); ",8
303 [153] [199](17) [199](17) [199](17) [199](17) "RUN"
304 [151]631,13:[151]632,13:[151]198,2
305 [153] [199](19);:[128]
410 [151]828,0
411 [153] [199](147) [199](17)
412 [153] "LOAD"[199](34);"WITZE";[199](34); ",8
413 PRINT CHR$(17) CHR$(17) CHR$(17) CHR$(17) "RUN"
414 POKE631,13:POKE632,13:POKE198,2
415 PRINT CHR$(19);:END
500 POKE828,0
501 PRINT CHR$(147) CHR$(17)
502 PRINT "LOAD"CHR$(34);"HAUPT*";CHR$(34); ",8
503 [153] [199](17) [199](17) [199](17) [199](17) "RUN"
504 [151]631,13:[151]632,13:[151]198,2
505 [153] [199](19);:[128]
600 [158]64738