|
Routines |
| Prev: 94F8 | Up: Map | Next: 95A9 |
|
Used by the routine at Messaging_RedefineKeys.
|
||||
| RedefineKey | 9569 | CALL $9688 | Call 9688. | |
| 956C | OR A | Jump to RedefineKey if A is not equal to zero. | ||
| 956D | JR NZ,RedefineKey | |||
| RedefineKey_0 | 956F | CALL $9688 | Call 9688. | |
| 9572 | OR A | Jump to RedefineKey_0 if A is zero. | ||
| 9573 | JR Z,RedefineKey_0 | |||
| 9575 | LD C,A | Jump to RedefineKey_1 if C is less than 04. | ||
| 9576 | CP $04 | |||
| 9578 | JR C,RedefineKey_1 | |||
| 957A | LD A,($F864) | Jump to RedefineKey if *F864 is not equal to zero. | ||
| 957D | OR A | |||
| 957E | JR NZ,RedefineKey | |||
| RedefineKey_1 | 9580 | LD HL,$9A59 | HL=9A59. | |
| 9583 | LD B,$08 | B=08. | ||
| 9585 | LD A,C | Jump to RedefineKey if C is equal to *HL. | ||
| RedefineKey_2 | 9586 | CP (HL) | ||
| 9587 | JR Z,RedefineKey | |||
| 9589 | INC HL | Increment HL by three. | ||
| 958A | INC HL | |||
| 958B | INC HL | |||
| 958C | DJNZ RedefineKey_2 | Decrease counter by one and loop back to RedefineKey_2 until counter is zero. | ||
| 958E | LD (IX+$00),E | Write E to *IX+00. | ||
| 9591 | LD (IX+$01),D | Write D to *IX+01. | ||
| 9594 | LD (IX+$02),A | Write A to *IX+02. | ||
| 9597 | INC IX | Increment IX by three. | ||
| 9599 | INC IX | |||
| 959B | INC IX | |||
| 959D | CALL Print_Key | Call Print_Key. | ||
| 95A0 | LD HL,$F818 | Write 12 to *F818. | ||
| 95A3 | LD (HL),$12 | |||
| 95A5 | INC HL | Increment *F819 by two. | ||
| 95A6 | INC (HL) | |||
| 95A7 | INC (HL) | |||
| 95A8 | RET | Return. | ||
| Prev: 94F8 | Up: Map | Next: 95A9 |