home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Set of Apple II Hard Drive Images
/
eric.hdv
/
TEST
/
READ4PDL.BAS
< prev
next >
Wrap
BASIC Source File
|
2020-08-13
|
223b
|
6 lines
5 PRINT CHR$(4)"BLOAD READ4PDL.OBJ"
10 A = 24576 +15 *256
15 B = 12 *4096 +6 *16 +1
20 CALL A
30 PRINT PEEK(A +6)" " PEEK(A +7)" " PEEK(A +8)" " PEEK(A +9)" " PEEK(B)" " PEEK(B +1)" " PEEK(B +2)
40 GOTO 20