mirror of
https://github.com/equant/apple2idiot.git
synced 2024-06-13 08:29:38 +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 |