letzter Code korrigiert
This commit is contained in:
parent
1d22f97936
commit
12fb7af1b3
Binary file not shown.
@ -596,68 +596,73 @@ Verhindere das Prellen der Tasten durch Software um doppelte Tastendrücke zu ve
|
|||||||
anf:
|
anf:
|
||||||
CALL wmatr ; Tasten abfragen
|
CALL wmatr ; Tasten abfragen
|
||||||
CALL ziff ; Ziffern abfragen
|
CALL ziff ; Ziffern abfragen
|
||||||
CALL anz ; Ausgabe auf Anzeige
|
|
||||||
JMP anf
|
JMP anf
|
||||||
matr:
|
|
||||||
MOV ECX, 50000h ; Entprelltimer
|
|
||||||
t: DEC ECX
|
|
||||||
JNZ t
|
|
||||||
IN AL, 5Ah ; Zeile einlesen
|
|
||||||
MOV BL, AL ; in Register B sichern
|
|
||||||
SHL BL, 4 ; Bits nach oben schieben
|
|
||||||
IN AL, 5Bh ; Spalte einlesen
|
|
||||||
OR BL, AL ; Spalten & Zeilen in Byte zusammenfassen
|
|
||||||
RET
|
|
||||||
wmatr:
|
wmatr:
|
||||||
CALL matr ; Tasten abfragen
|
CALL matr
|
||||||
JNZ wmatr ; weiter wenn keine Taste gedrueckt
|
CMP BH, 0h
|
||||||
w2: CALL matr ; Taste abfragen
|
JNZ wmatr
|
||||||
JZ w2 ; weiter wenn Taste gedrueckt
|
lp: CALL matr
|
||||||
|
CMP BH, 0h ; Entprelltimer
|
||||||
|
JZ lp
|
||||||
RET
|
RET
|
||||||
ziff:
|
matr:
|
||||||
CMP BL, 17h
|
MOV ECX, 5000h
|
||||||
|
t: DEC ECX
|
||||||
|
JNZ t
|
||||||
|
MOV AL, 01h
|
||||||
|
OUT 5Ah, AL
|
||||||
|
IN AL, 5Bh
|
||||||
|
MOV BL, AL
|
||||||
|
z0:
|
||||||
|
CMP BL, 01h
|
||||||
JNC z1
|
JNC z1
|
||||||
MOV BH, 3Fh
|
MOV BH, 3Fh
|
||||||
RET
|
RET
|
||||||
z1: CMP BL, 18h
|
z1: CMP BL, 02h
|
||||||
JNC z2
|
JNC z2
|
||||||
MOV BH, 03h
|
MOV BH, 03h
|
||||||
RET
|
RET
|
||||||
z2: CMP BL, 20h
|
z2: CMP BL, 04h
|
||||||
JNC z3
|
JNC z3
|
||||||
MOV BH, 6Dh
|
MOV BH, 6Dh
|
||||||
RET
|
RET
|
||||||
z3: CMP BL, 24h
|
z3: CMP BL, 08h
|
||||||
JNC z4
|
JNC w2
|
||||||
MOV BH, 67h
|
MOV BH, 67h
|
||||||
RET
|
RET
|
||||||
z4: CMP BL, 33h
|
w2: MOV AL, 02h
|
||||||
|
OUT 5Ah, AL
|
||||||
|
IN AL, 5Bh
|
||||||
|
MOV BL, AL
|
||||||
|
z4: CMP BL, 01h
|
||||||
JNC z5
|
JNC z5
|
||||||
MOV BH, 53h
|
MOV BH, 53h
|
||||||
RET
|
RET
|
||||||
z5: CMP BL, 34h
|
z5: CMP BL, 02h
|
||||||
JNC z6
|
JNC z6
|
||||||
MOV BH, 76h
|
MOV BH, 76h
|
||||||
RET
|
RET
|
||||||
z6: CMP BL, 36h
|
z6: CMP BL, 04h
|
||||||
JNC z7
|
JNC z7
|
||||||
MOV BH, 7Eh
|
MOV BH, 7Eh
|
||||||
RET
|
RET
|
||||||
z7: CMP BL, 40h
|
z7: CMP BL, 08h
|
||||||
JNC z8
|
JNC w3
|
||||||
MOV BH, 23h
|
MOV BH, 23h
|
||||||
RET
|
RET
|
||||||
z8: CMP BL, 65h
|
w3: MOV AL, 04h
|
||||||
|
OUT 5Ah, AL
|
||||||
|
IN AL, 5Bh
|
||||||
|
MOV BL, AL
|
||||||
|
z8: CMP BL, 01h
|
||||||
JNC z9
|
JNC z9
|
||||||
MOV BH, 7Fh
|
MOV BH, 7Fh
|
||||||
RET
|
RET
|
||||||
z9: CMP BL, 66h
|
z9: CMP BL, 02h
|
||||||
JNC zq
|
JNC zq
|
||||||
MOV BH, 77h
|
MOV BH, 77h
|
||||||
RET
|
RET
|
||||||
zq: CMP BL, 77h
|
zq: MOV BH, 0h
|
||||||
JNC z1
|
|
||||||
MOV BH, 04h
|
|
||||||
RET
|
RET
|
||||||
anz:
|
anz:
|
||||||
MOV AL, BH
|
MOV AL, BH
|
||||||
|
Loading…
Reference in New Issue
Block a user