www.cavefischer.at/Sharp Pocket Computer
SHARP PC-1401 Tastaturabfrage
Anzahl der Tasten (ohne BRK): 75
5:REM KEY MATRIX PC-1401
10:RESTORE 200
20:FOR X=0 TO 82
30:READ A
40:POKE &4200+X,A
50:NEXT X
100:"A"
110:WAIT 25
120:POKE &41FF,0
130:CALL &4200
140:PRINT "TASTE",PEEK &41FF
150:GOTO 120
200:DATA 16,&41,&FF,2,5,52,35,208
210:DATA 18,&5C,96,0,93,80,90,219,221,76,103,0,56,2,216,219,47,17
220:DATA 218,219,103,0,0,15,40,27,81,2,6,52,35,208
230:DATA 90,219,93,76,103,0,56,2,216,219,47,11
240:DATA 218,219,103,0,56,25,0,7
250:DATA 128,80,210,43,3,32,88,218,128,80,210,43,3
260:DATA 32,131,71,218,67,65,43,3,82,55
|
1 |
2 |
4 |
8 |
16 |
32 |
64 |
128 |
|
IB1 |
001=![](../bilder/PC-1401_Taste001.jpg) |
017=![](../bilder/PC-1401_Taste017.jpg) |
033=![](../bilder/PC-1401_Taste033.jpg) |
049=![](../bilder/PC-1401_Taste049.jpg) |
065=![](../bilder/PC-1401_Taste065.jpg) |
081=![](../bilder/PC-1401_Taste081.jpg) |
097=![](../bilder/PC-1401_Taste097.jpg) |
113=![](../bilder/PC-1401_Taste113.jpg) |
1 |
IB2 |
002=![](../bilder/PC-1401_Taste002.jpg) |
018=![](../bilder/PC-1401_Taste018.jpg) |
034=![](../bilder/PC-1401_Taste034.jpg) |
050=![](../bilder/PC-1401_Taste050.jpg) |
066=![](../bilder/PC-1401_Taste066.jpg) |
082=![](../bilder/PC-1401_Taste082.jpg) |
098=![](../bilder/PC-1401_Taste098.jpg) |
114=![](../bilder/PC-1401_Taste114.jpg) |
2 |
IB3 |
003=![](../bilder/PC-1401_Taste003.jpg) |
019=![](../bilder/PC-1401_Taste019.jpg) |
035=![](../bilder/PC-1401_Taste035.jpg) |
051=![](../bilder/PC-1401_Taste051.jpg) |
067=![](../bilder/PC-1401_Taste067.jpg) |
083=![](../bilder/PC-1401_Taste083.jpg) |
099=![](../bilder/PC-1401_Taste099.jpg) |
115=![](../bilder/PC-1401_Taste115.jpg) |
4 |
IB4 |
004=![](../bilder/PC-1401_Taste004.jpg) |
020=![](../bilder/PC-1401_Taste020.jpg) |
036=![](../bilder/PC-1401_Taste036.jpg) |
052=![](../bilder/PC-1401_Taste052.jpg) |
068=![](../bilder/PC-1401_Taste068.jpg) |
084=![](../bilder/PC-1401_Taste084.jpg) |
100=![](../bilder/PC-1401_Taste100.jpg) |
116=![](../bilder/PC-1401_Taste116.jpg) |
8 |
IB5 |
005=![](../bilder/PC-1401_Taste005.jpg) |
021=![](../bilder/PC-1401_Taste021.jpg) |
037=![](../bilder/PC-1401_Taste037.jpg) |
053=![](../bilder/PC-1401_Taste053.jpg) |
069=![](../bilder/PC-1401_Taste069.jpg) |
085=![](../bilder/PC-1401_Taste085.jpg) |
|
117=![](../bilder/PC-1401_Taste117.jpg) |
16 |
IB6 |
006=![](../bilder/PC-1401_Taste006.jpg) |
022=![](../bilder/PC-1401_Taste022.jpg) |
038=![](../bilder/PC-1401_Taste038.jpg) |
054=![](../bilder/PC-1401_Taste054.jpg) |
070=![](../bilder/PC-1401_Taste070.jpg) |
086=![](../bilder/PC-1401_Taste086.jpg) |
102=![](../bilder/PC-1401_Taste102.jpg) |
118=![](../bilder/PC-1401_Taste118.jpg) |
32 |
|
|
|
|
|
|
|
|
|
64 |
|
|
|
|
|
|
|
|
|
128 |
IA1 |
+ |
025=![](../bilder/PC-1401_Taste025.jpg) |
041=![](../bilder/PC-1401_Taste041.jpg) |
057=![](../bilder/PC-1401_Taste057.jpg) |
073=![](../bilder/PC-1401_Taste073.jpg) |
089=![](../bilder/PC-1401_Taste089.jpg) |
105=![](../bilder/PC-1401_Taste105.jpg) |
121=![](../bilder/PC-1401_Taste121.jpg) |
1 |
IA2 |
|
+ |
042=![](../bilder/PC-1401_Taste042.jpg) |
058=![](../bilder/PC-1401_Taste058.jpg) |
074=![](../bilder/PC-1401_Taste074.jpg) |
090=![](../bilder/PC-1401_Taste090.jpg) |
106=![](../bilder/PC-1401_Taste106.jpg) |
122=![](../bilder/PC-1401_Taste122.jpg) |
2 |
IA3 |
|
|
+ |
059=![](../bilder/PC-1401_Taste059.jpg) |
075=![](../bilder/PC-1401_Taste075.jpg) |
091=![](../bilder/PC-1401_Taste091.jpg) |
107=![](../bilder/PC-1401_Taste107.jpg) |
123=![](../bilder/PC-1401_Taste123.jpg) |
4 |
IA4 |
|
|
|
+ |
076=![](../bilder/PC-1401_Taste076.jpg) |
092=![](../bilder/PC-1401_Taste092.jpg) |
108=![](../bilder/PC-1401_Taste108.jpg) |
124=![](../bilder/PC-1401_Taste124.jpg) |
8 |
IA5 |
|
|
|
|
+ |
093=![](../bilder/PC-1401_Taste093.jpg) |
109=![](../bilder/PC-1401_Taste109.jpg) |
125=![](../bilder/PC-1401_Taste125.jpg) |
16 |
IA6 |
|
|
|
|
|
+ |
110=![](../bilder/PC-1401_Taste110.jpg) |
126=![](../bilder/PC-1401_Taste126.jpg) |
32 |
IA7 |
|
|
|
|
|
|
+ |
127=![](../bilder/PC-1401_Taste127.jpg) |
64 |
IA8 |
|
|
|
|
|
|
|
+ |
128 |
|
|
|
&4200: | LIDP | &41FF |
| | | |
| LIA | 5 |
| | | |
| PUSH | |
| | | |
| RA | |
| | | |
| SC | |
| | | |
| LIP | &5C |
< | ─ | ┐ | |
| ANIM | 0 |
| | │ | |
| OUTA | |
| | │ | |
| INCP | |
| | │ | |
| SL | |
| | │ | |
| EXAM | |
| | │ | |
| OUTB | |
| | │ | |
| INA | |
| | │ | |
| CPIA | 0 |
| | │ | |
| JRZP | 2 |
─ | ┐ | │ | |
| LEAVE | |
| │ | │ | |
| EXAM | |
< | ┘ | │ | |
| LOOP | 17 |
─ | ─ | ┘ | |
| EXAB | |
| | | |
| EXAM | |
| | | |
| CPIA | 0 |
| | | |
| LII | 15 |
| | | |
| JRNZP | 27 |
─ | ─ | ─ | ┐ |
| DECP | |
| | | │ |
| LIA | 6 |
| | | │ |
| PUSH | |
| | | │ |
| RA | |
| | | │ |
| SC | |
| | | │ |
| SL | |
< | ─ | ┐ | │ |
| EXAM | |
| | │ | │ |
| OUTA | |
| | │ | │ |
| INA | |
| | │ | │ |
| CPIA | 0 |
| | │ | │ |
| JRZP | 2 |
─ | ┐ | │ | │ |
| LEAVE | |
| │ | │ | │ |
| EXAM | |
< | ┘ | │ | │ |
| LOOP | 11 |
─ | ─ | ┘ | │ |
| EXAB | |
| | | │ |
| EXAM | |
| | | │ |
| CPIA | 0 |
| | | │ |
| JRZP | 25 |
─ | ─ | ┐ | │ |
| LII | 7 |
| | │ | │ |
| LP00 | |
< | ─ | ┼ | ┘ |
| INCP | |
< | ┐ | │ | |
| SR | |
| │ | │ | |
| JRNCM | 3 |
─ | ┘ | │ | |
| LDP | |
| | │ | |
| SWP | |
| | │ | |
| EXAB | |
| | │ | |
| LP00 | |
| | │ | |
| INCP | |
< | ┐ | │ | |
| SR | |
| │ | │ | |
| JRNCM | 3 |
─ | ┘ | │ | |
| LDP | |
| | │ | |
| LP03 | |
| | │ | |
| ORMA | |
| | │ | |
| EXAB | |
| | │ | |
| DECA | |
< | ┐ | │ | |
| DECI | |
| │ | │ | |
| JRNCM | 3 |
─ | ┘ | │ | |
| STD | |
| | │ | |
| RTN | |
< | ─ | ┘ | |
© 2016: Walter Fischer