100 POKE56,96:CLR
110 IFPEEK(828)=0THENPOKE828,1:LOAD"MA.LICHTORGEL",8,1
120 IFPEEK(828)=1THENPOKE828,2:SYS49152:GOTO140
130 IFPEEK(828)=2THENSYS49152+24
140 PRINT"[147] OPTIONSMENUE"
150 PRINT" [192][192][192][192][192][192][192][192][192][192][192][192]"
160 PRINT"<F1>  SPEICHER VORBEREITEN"
170 PRINT"<F5>  LADEN DER DATEN"
180 PRINT"<F7>  SPEICHERN DER DATEN"
190 PRINT"<E>   ZURUECK ZUM EDITOR"
200 POKE198,0:WAIT198,1:GETZ$
210 :
220 IFZ$="[133]"THEN270  :REM F1
230 IFZ$="[135]"THEN510  :REM F3
240 IFZ$="[136]"THEN600  :REM F5
250 IFZ$="E"THEN130  :REM F7
255 GOTO200
260 :
270 PRINT"[147] VORBEREITEN DES SPEICHERS"
280 PRINT" [192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
290 PRINT"DAS ZEITRASTER WIRD IM FORMAT"
300 PRINT"STUNDEN,MINUTEN,SEKUNDEN,1/60SEKUNDEN
310 [153]"    ,  ,  ,       ONONON"
320 [153]">>HH,MM,SS,XX<< ERWARTET"
330 [133]T(3),T(2),T(1),T(0)
340 [129]I[178]0[164]3
350 [139]T(I)[179]0[167][153]"EINGABEFEHLER !":[137]320
360 [139]T(I)[177]59[167][153]"EINGABEFEHLER !":[137]320
370 [130]
380 [129]I[178]0[164]3
390 [151]50018[170]I,T(I)
400 [130]
410 [153]"LOADDIE ABSTUFUNG ERFOLGT"
420 [153]"1/60 SEK"T(0)
430 [153]"SEKUNDEN"T(1)
440 [153]"MINUTEN "T(2)
450 [153]"STUNDEN "T(3)
460 [153]"OK J/N":[151]198,0:[146]198,1:[161]Z$
470 [139]Z$[178]"J"[167] 490
480 [158]49152[170]24:[137]140
490 [158]49152
500 :
510 [153]"LOAD LADEN VON DATEN   $ = DIRECTORY"
511 [153]" TANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN"
520 N$[178]"":[133]"DATENNAME";N$
530 [139]N$[178]"$"[167][158]49152[170]9:[137]520
540 [139]N$[178]""[167]140
550 [139] [195](N$)[177]11[167][153]"EINGABEFEHLER NUR 11 ZEICHEN ERLAUBT":[137]520
560 N$[178]"DL."[170]N$
570 [147]N$,8,1
580 [137]130
590 :
600 [153]"LOAD SPEICHERN VON DATEN   $ = DIRECTORY"
601 [153]" TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN"
610 N$[178]"":[133]"DATENNAME";N$
620 [139]N$[178]"$"[167][158]49152[170]9:[137]610
630 [139]N$[178]""[167]140
640 [139] [195](N$)[177]11[167][153]"EINGABEFEHLER NUR 11 ZEICHEN ERLAUBT":[137]610
650 N$[178]"DL."[170]N$
660 [129]I[178]1[164][195](N$)
670 [151] 52991[170]I,[198]([202](N$,I,1)):[130]
680 [151]194,96
690 [151]193,0
700 [151]175,160
710 [151]174,0
720 [151]187,0
730 [151]188,207
740 [151]183,[195](N$)
750 [151]186,8:[151]185,3:[158]62954
760 [137]130