10 REM LADEPROGRAMM
20 A$="ZEICHENSATZ":REM ZEICHENSATZNAME
30 B$="HAUPTPROGRAMM":REM BASICPROGRAMM
40 :
50 ON(1+PEEK(826))GOTO60,70,90
60 POKE826,1:LOAD"UNI-LOAD/SAVE",8,1:RUN
70 POKE826,2:SYS850
80 LOAD(A$),8,1,8192:RUN
90 POKE53281,0:POKE53280,0
100 PRINT"[144][147]POKE43,1:POKE44,48:POKE12288,0:NEW"
110 PRINT"LOAD";CHR$(34);B$;CHR$(34);",8
120 [153]"PRINTCHR$(5);CHR$(147):RUN"
130 [151]826,0:[151]198,3:[151]631,13:[151]632,13:[151]633,13:[153]"";