1 REM == 1.PROGRAMM LADEN ==========
2 REM == AUFRUF: SYS 49152 =========
3 REM == 2.PROGRAMM LADEN ==========
4 REM == VERBINDEN MIT SYS 49182 ===
5 REM == 12.04.87 H.B ==============
10 DIMHX(75)
11 FORI=0TO9:HX(48+I)=I:HX(65+I)=I+10
12 NEXT
13 FORI=49152TO49226:READMC$
14 HI=ASC(LEFT$(MC$,1)):LO=ASC(RIGHT$(MC$,1))
15 DZ=HX(HI)*16+HX(LO):POKEI,DZ:NEXT:NEW
1000 DATAA5,2B,85,FB,A5,2C,85,FC
1001 DATAA5,2D,E9,01,29,FF,85,2B
1002 DATAA5,2E,29,FF,85,2C,A9,27
1003 DATAA0,C0,20,1E,AB,60,A5,FB
1004 DATA85,2B,A5,FC,85,2C,60,20
1005 DATA20,32,2E,50,52,4F,47,52
1006 DATA41,4D,4D,20,4C,41,44,45
1007 DATA4E,2C,44,41,4E,4E,2C,27
1008 DATA53,59,53,20,34,39,31,38
1009 DATA32,27,00