start tok64 d64-fyoA1d
0 DATA 32,253,174,32,138,173,32,247
1 DATA 183,140,251,0,141,252,0,32
2 DATA 253,174,32,138,173,32,247,183
3 DATA 140,253,0,141,254,0,32,212
4 DATA 225,169,128,141,157,0,169,54
5 DATA 141,1,0,169,251,174,253,0
6 DATA 172,254,0,32,216,255,169,55
7 DATA 141,1,0,96,*
10 FORi=704TO763
20 READ d:POKE i,d
30 NEXT
40 PRINT"{clear}sys 704,start,end"+CHR$(34)+"pgr name"+CHR$(34)+",8"
50 PRINT"{down}savar program under basic rom"
stop tok64
(bastext 1.0)