Code: Select all
10 POKE55,0:POKE56,61:POKE247,0:POKE248,61:POKE249,0:POKE250,62:CLR
11 FORT=16128TO16351:READA:POKET,A:NEXT:SYS16128
12 :
13 DATA 169,11,141,143,2,169,63,141,144,2,96,173,141,2,10,201,8,144,2,169,6,170,189,86
14 DATA 63,133,245,189,87,63,133,246,164,203,177,245,170,196,197,240,7,160,16,140,140,2
15 DATA 208,32,41,127,44,138,2,48,22,112,26,201,127,240,19,201,20,240,12,201,32,240,8
16 DATA 201,29,240,4,201,17,208,6,76,161,235,76,186,235,76,214,235,94,63,159,63,224,236
17 DATA 163,237,49,51,53,55,57,43,92,20,96,119,114,121,105,112,42,13,4,97,100,103,106
18 DATA 108,59,29,3,1,120,118,110,44,47,17,32,122,99,98,109,46,1,133,2,115,102,104,107
19 DATA 58,61,134,113,101,116,117,111,64,94,135,50,52,54,56,48,45,19,136,255,33,35,37
20 DATA 39,41,43,124,148,126,87,82,89,73,80,125,141,4,65,68,71,74,76,93,157,131,1,88,86
21 DATA 78,60,63,145,32,90,67,66,77,62,1,137,2,83,70,72,75,91,61,138,81,69,84,85,79,123
22 DATA 94,139,34,36,38,40,48,95,147,140,255
I've put this into the *.zip file of the attachment.
You first run this program (with the standard +8K RAM setting in BLK1, i.e. 11775 bytes free), then enter the OPEN statement (you'll already have to use Shift to write OPEN
) and then press F8. STOP/RESTORE returns to the standard keyboard driver. Please give a feedback how you fare with this.