|
Routines |
| Prev: 45900 | Up: Map | Next: 46014 |
|
|
||||
|
Test for a keypress...
|
||||
| PressAnyKey | 45995 | XOR A | A=0. | |
| 45996 | IN A,(254) | Check for keyboard input. | ||
| 45998 | OR %11100000 | Set bits 5-7. | ||
| 46000 | CP 255 | If the result is not 255 jump to PressAnyKey. | ||
| 46002 | JR NZ,PressAnyKey | |||
|
Test for a key release...
|
||||
| PressAnyKey_Debounce | 46004 | XOR A | A=0. | |
| 46005 | IN A,(254) | Check for keyboard input. | ||
| 46007 | OR %11100000 | Set bits 5-7. | ||
| 46009 | CP 255 | If the result is 255 jump to PressAnyKey_Debounce. | ||
| 46011 | JR Z,PressAnyKey_Debounce | |||
| 46013 | RET | Return. | ||
| Prev: 45900 | Up: Map | Next: 46014 |