mirror of
https://github.com/equant/apple2idiot.git
synced 2024-09-29 11:54:59 +00:00
9 lines
215 B
QBasic
9 lines
215 B
QBasic
100 CA = 49664: REM CARD ADDRESS 0XCN0
|
|
120 AA = CA +1: REM APPL CMD ADDRESS
|
|
140 ESPA = CA: REM ESP CMD ADDRESS
|
|
150 MAX = 42
|
|
200 FOR N = 0 TO MAX
|
|
215 P = CA +N
|
|
220 C = PEEK(P)
|
|
245 PRINT P,C, CHR$(C)
|
|
250 NEXT N |