Add shift/caps pressed/released to Okameron defs
This commit is contained in:
parent
f247307575
commit
1cc0a0def6
|
@ -26,6 +26,9 @@ MODULE Fox32ROM;
|
|||
EXTERN PROCEDURE NewEvent: INT;
|
||||
EXTERN PROCEDURE GetNextEvent: INT;
|
||||
EXTERN PROCEDURE ScancodeToAscii: INT;
|
||||
EXTERN PROCEDURE ShiftPressed: INT;
|
||||
EXTERN PROCEDURE ShiftReleased: INT;
|
||||
EXTERN PROCEDURE CapsPressed: INT;
|
||||
|
||||
EXTERN PROCEDURE FillBackground: INT;
|
||||
EXTERN PROCEDURE DrawStrToBackground: INT;
|
||||
|
|
|
@ -46,10 +46,22 @@ GetNextEvent:
|
|||
pop r8
|
||||
ret
|
||||
|
||||
; PROCEDURE ScancodeToAscii(scancode: CHAR): CHAR;
|
||||
; PROCEDURE ScancodeToAscii(scancode: CHAR;): CHAR;
|
||||
ScancodeToAscii:
|
||||
jmp scancode_to_ascii
|
||||
|
||||
; PROCEDURE ShiftPressed();
|
||||
ShiftPressed:
|
||||
jmp shift_pressed
|
||||
|
||||
; PROCEDURE ShiftReleased();
|
||||
ShiftReleased:
|
||||
jmp shift_released
|
||||
|
||||
; PROCEDURE CapsPressed();
|
||||
CapsPressed:
|
||||
jmp caps_pressed
|
||||
|
||||
; PROCEDURE FillBackground(color: INT;);
|
||||
FillBackground:
|
||||
jmp fill_background
|
||||
|
|
Loading…
Reference in New Issue
Block a user