$EB48/60232:   Check for Shift, CTRL, C=

EB48: AD 8D 02  LDA $028D     ; Flag: Shift Keys
EB4B: C9 03     CMP #$03
EB4D: D0 15     BNE $EB64
EB4F: CD 8E 02  CMP $028E     ; Last Shift Key used for debouncing
EB52: F0 EE     BEQ $EB42     ; Process Key Image
EB54: AD 91 02  LDA $0291     ; Flag: Upper/Lower Case change
EB57: 30 1D     BMI $EB76
EB59: AD 18 D0  LDA $D018     ; VIC: Memory Control Register
EB5C: 49 02     EOR #$02
EB5E: 8D 18 D0  STA $D018     ; VIC: Memory Control Register
EB61: 4C 76 EB  JMP $EB76

Jump from $EB4D:

EB64: 0A        ASL
EB65: C9 08     CMP #$08
EB67: 90 02     BCC $EB6B
EB69: A9 06     LDA #$06

Jump from $EB67:

EB6B: AA        TAX
EB6C: BD 79 EB  LDA $EB79,X   ; Pointers to Keyboard decoding tables
EB6F: 85 F5     STA $F5       ; Vector: Current Keyboard decoding Table
EB71: BD 7A EB  LDA $EB7A,X   ; Pointers to Keyboard decoding tables
EB74: 85 F6     STA $F6       ; Vector: Current Keyboard decoding Table

Jump from $EB57, $EB61:

EB76: 4C E0 EA  JMP $EAE0     ; Process Key Image

    Previous Page / Next Page