![]() |
Routines |
Prev: 9ED0 | Up: Map | Next: 9F38 |
|
||||
9ED1 | LD HL,$9ED0 | HL=9ED0. | ||
This entry point is used by the routine at 9ECB.
|
||||
9ED4 | LD BC,$0000 | BC=0000. | ||
This entry point is used by the routine at 9EC1.
|
||||
9ED7 | LD A,(HL) | A=*HL. | ||
9ED8 | AND A | Jump to 9EF2 if A is zero. | ||
9ED9 | JR Z,$9EF2 | |||
9EDB | LD B,A | B=A. | ||
9EDC | XOR A | A=00. | ||
9EDD | LD DE,$0000 | DE=0000. | ||
9EE0 | CALL $9F1E | Call 9F1E. | ||
9EE3 | LD A,($A036) | A=*A036. | ||
9EE6 | LD B,C | B=C. | ||
9EE7 | LD DE,$0000 | DE=0000. | ||
9EEA | CALL $F1C1 | Call F1C1. | ||
9EED | SET 6,(IX+$05) | Set bit 6 of *IX+05. | ||
9EF1 | RET | Return. | ||
Return if it's still morning.
|
||||
9EF2 | LD A,($9FE2) | Return if *Messaging_AM_PM is equal to ASCII 61 ("a") e.g. is it AM still? | ||
9EF5 | CP $61 | |||
9EF7 | RET Z | |||
It's afternoon now.
|
||||
9EF8 | LD A,($9FE0) | Return if *CurrentTime_Hour is not equal to 09. | ||
9EFB | CP $09 | |||
9EFD | RET NZ | |||
9EFE | LD DE,$01F8 | DE=01F8. | ||
9F01 | LD A,$1E | A=1E. | ||
9F03 | CALL $D2A4 | Call D2A4. | ||
9F06 | ADD A,E | A+=E. | ||
9F07 | LD E,A | E=A. | ||
9F08 | LD A,($A00A) | A=*A00A. | ||
9F0B | CALL $9F1E | Call 9F1E. | ||
9F0E | LD A,($A036) | A=*A036. | ||
9F11 | LD B,$10 | B=10. | ||
9F13 | LD DE,$07F0 | DE=07F0. | ||
9F16 | CALL $F1C1 | Call F1C1. | ||
9F19 | RES 6,(IX+$05) | Reset bit 6 of *IX+05. | ||
9F1D | RET | Return. | ||
9F1E | LD (HL),A | Write A to *HL. | ||
9F1F | LD IX,($A017) | IX=*A017. | ||
9F23 | LD (IX+$0F),B | Write B to *IX+0F. | ||
9F26 | LD (IX+$01),$FF | Write FF to *IX+01. | ||
9F2A | LD L,(IY+$06) | L=*IY+06. | ||
9F2D | LD H,(IY+$07) | H=*IY+07. | ||
9F30 | ADD HL,DE | HL+=DE. | ||
9F31 | LD (IY+$06),L | Write L to *IY+06. | ||
9F34 | LD (IY+$07),H | Write H to *IY+07. | ||
9F37 | RET | Return. |
Prev: 9ED0 | Up: Map | Next: 9F38 |