www.cavefischer.at/Sharp Pocket Computer
SHARP PC-1401 Tastaturabfrage mit Verwendung der ROM Routine &048F
Anzahl der Tasten: 76
5:REM KEY MATRIX PC-1401 ROM
10:POKE &4100,&E4,&8F,103,255,57,5,16,&40,&FF,82,55
20:WAIT 25
30:CALL &4100
40:PRINT "TASTE",PEEK &40FF
50:GOTO 30
000= |
001= |
002= |
003= |
004= |
005= |
006= |
+ |
007= |
008= |
009= |
010= |
011= |
012= |
+ |
|
013= |
014= |
015= |
016= |
017= |
+ |
|
|
018= |
019= |
020= |
021= |
+ |
|
|
|
022= |
023= |
024= |
+ |
|
|
|
|
025= |
026= |
+ |
|
|
|
|
|
027= |
+ |
|
|
|
|
|
|
+ |
|
|
|
|
|
|
|
028= |
029= |
030= |
031= |
032= |
033= |
034= |
035= |
036= |
037= |
038= |
039= |
040= |
041= |
042= |
043= |
044= |
045= |
046= |
047= |
048= |
049= |
050= |
051= |
052= |
053= |
054= |
055= |
056= |
057= |
058= |
059= |
060= |
|
062= |
063= |
064= |
065= |
066= |
067= |
068= |
069= |
070= |
071= |
072= |
073= |
074= |
075= |
076= |
|
|
|
|
|
|
|
|
|
|
&4100: | CAL | &048F | < | ┐ |
| CPIA | 255 | | │ |
| JRZM | 5 | ─ | ┘ |
| LIDP | &40FF | | |
| STD | | | |
| RTN | | | |
© 2017: Walter Fischer