start tok64 d64-34ZHnf
10 REM **
20 REM ** the magic line
30 REM ** ob. computer 6/1988
32 REM ** av: bo bergman
40 :
50 FORf=52992TO53053
55 : READa
60 : POKEf,a
65 : ch=ch+a
70 NEXT
75 IFch<>7276THENPRINT"datafel":END
80 DATA120,169,013,141,020,003,169,207,141,021,003,088,096,165,214,010,010,010
90 DATA141,062,207,024,105,050,141,062,207,024,105,009,141,063,207,172,018,208
95 DATA204,062,207,208,248,169,001,141,033,208,172,018,208,204,063,207,208,248
96 DATA169,011,141,033,208,076,049,234
100 PRINT"{clear}{right}{down}sys pd 1991
110 PRINT"{down*2}{right}the magic line
120 PRINT"{down*2}{right}starta: sys 52992
130 PRINT"{down}{right}poke 53047,sk[rmf[rg 0-15
140 PRINT"{down}{right}poke 53034,radf[rg{space*3}0-15
stop tok64
(bastext 1.0)