home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Set of Apple II Hard Drive Images
/
eric.hdv
/
TEST
/
TABLE.bas
< prev
next >
Wrap
BASIC Source File
|
2020-08-13
|
461b
|
14 lines
10 REM TABLE ACCESS ROUTINE
20 REM START
30 DATA 32,33,144,160,0
40 REM LOOP
50 DATA 140,1,196,32,11,144,177,8,141,1,196,32,22,144,192,15,240,4,200,76,5,128,96
60 REM START2
70 DATA 32,77,144,160,0
80 REM LOOP2
90 DATA 140,129,196,32,55,144,177,10,141,129,196,32,66,144,192,15,240,4,200,76,33,128,96
100 A = 32768: REM BEGINNING ADDRESS, $8000
110 FOR X = 0 TO 55: READ D
120 POKE A +X,D
130 NEXT
140 PRINT "MOCKINGBOARD ROUTINES LOADED"