Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- IFG C, 0x1f ;if the key is an ASCII key
- SET PC, kd.checkASCII ;; Arrow keys ASCII codes are more than 0x1f, so we should check them, else we print the character.
- IFE C, 0x10 ;backspace
- JSR kd.keystroke.backspace
- SET PC, POP
- ;return from the interrupt
- :kd.checkASCII
- IFG C, 0x7f
- IFL C, 0x84
- IFN [A+6], 0
- JSR [A+6] ;; Arrow keys.
- ; Else:
- SET PC, kd.keystroke.writeChar
Add Comment
Please, Sign In to add comment