10 PRINT"[147]F-TASTEN BELEGUNG            THOMAS HAHN[146]"
11 FORI=52736TO52847:READA
12 Z=Z+A:POKEI,A:NEXTI
13 DIM Z(40)
14 FORI=1TO9:READB$(I):NEXTI
15 FORI=0TO39:READZ(I):NEXTI
16 AD=52848:FORF=0TO19:READA$
17 POKEAD,F:W=LEN(A$):POKEAD+1,W
18 AD=AD+2:FORX=1TOW:Z$=MID$(A$,X,1)
19 IFZ$="*"THENZ$=CHR$(34)
20 IFZ$="@"THENZ$=CHR$(13)
21 PRINTZ$;:POKEAD,ASC(Z$)
22 AD=AD+1:NEXTX:IFASC(Z$)<>13THENPRINT
23 PRINT"[145]"SPC(15)B$(Z(F*2+1))" "B$(Z(F*2)):NEXTF
24 SYS52736
25 :
26 DATA120,169,13,141,20,3,169,206,141,    21,3,88,96,165,197,160,0,217,108,206
27 DATA240,10,200,192,4,208,246,132,2,76   ,49,234,152,197,2,240,248,133,2,174
28 DATA141,2,240,6,24,105,4,202,208,251,   170,160,112,132,165,160,206,132,166
29 DATA160,0,209,165,240,25,200,72,165,    165,24,113,165,105,2,144,2,230,166
30 DATA133,165,104,202,16,231,238,32,208   ,76,49,234,200,177,165,170,134,198
31 DATA200,177,165,153,117,2,202,208,247   ,76,49,234,4,5,6,3
32 :
33 DATA "<F1>","<F3>","<F5>","<F7>","[157]"
34 DATA "<SHIFT>","<COMMODORE>"
35 DATA "<SHIFT/COMMODORE>","<CONTROL>"
36 DATA 1,5,2,5,3,5,4,5
37 DATA 1,6,2,6,3,6,4,6
38 DATA 1,7,2,7,3,7,4,7
39 DATA 1,8,2,8,3,8,4,8
40 DATA 1,9,2,9,3,9,4,9
41 :
42 REM AB HIER KOENNEN DIE EIGENEN
43 REM FUNKTIONSTASTEN EINGEGEBEN
44 REM WERDEN.
45 :
46 REM @ = <RETURN>
47 REM * = ANFUEHRUNGSZEICHEN
48 :
49 DATA "RUN@","LIST@","LOAD *"
50 DATA "SAVE *","LOAD*$*,8@","NEW@"
51 DATA "PRINT","GOTO","POKE","PEEK"
52 DATA "DATA","READ","RESTORE"
53 DATA "NEXT","GOSUB","RETURN"
54 DATA "OPEN","CLOSE","INPUT"
55 DATA "?FRE(X)+4^8@"