|
Routines |
| Prev: 40656 | Up: Map | Next: 40760 |
|
|
||||
| 40657 | LD HL,40656 | HL=40656. | ||
|
This entry point is used by the routine at 40651.
|
||||
| 40660 | LD BC,0 | BC=0000. | ||
|
This entry point is used by the routine at 40641.
|
||||
| 40663 | LD A,(HL) | A=*HL. | ||
| 40664 | AND A | Jump to 40690 if A is zero. | ||
| 40665 | JR Z,40690 | |||
| 40667 | LD B,A | B=A. | ||
| 40668 | XOR A | A=0. | ||
| 40669 | LD DE,0 | DE=0000. | ||
| 40672 | CALL 40734 | Call 40734. | ||
| 40675 | LD A,(41014) | A=*41014. | ||
| 40678 | LD B,C | B=C. | ||
| 40679 | LD DE,0 | DE=0000. | ||
| 40682 | CALL 61889 | Call 61889. | ||
| 40685 | SET 6,(IX+5) | Set bit 6 of *IX+5. | ||
| 40689 | RET | Return. | ||
|
Return if it's still morning.
|
||||
| 40690 | LD A,(40930) | Return if *Messaging_AM_PM is equal to ASCII 97 ("a") e.g. is it AM still? | ||
| 40693 | CP 97 | |||
| 40695 | RET Z | |||
|
It's afternoon now.
|
||||
| 40696 | LD A,(40928) | Return if *CurrentTime_Hour is not equal to 9. | ||
| 40699 | CP 9 | |||
| 40701 | RET NZ | |||
| 40702 | LD DE,504 | DE=0504. | ||
| 40705 | LD A,30 | A=30. | ||
| 40707 | CALL 53924 | Call 53924. | ||
| 40710 | ADD A,E | A+=E. | ||
| 40711 | LD E,A | E=A. | ||
| 40712 | LD A,(40970) | A=*40970. | ||
| 40715 | CALL 40734 | Call 40734. | ||
| 40718 | LD A,(41014) | A=*41014. | ||
| 40721 | LD B,16 | B=16. | ||
| 40723 | LD DE,2032 | DE=2032. | ||
| 40726 | CALL 61889 | Call 61889. | ||
| 40729 | RES 6,(IX+5) | Reset bit 6 of *IX+5. | ||
| 40733 | RET | Return. | ||
| 40734 | LD (HL),A | Write A to *HL. | ||
| 40735 | LD IX,(40983) | IX=*40983. | ||
| 40739 | LD (IX+15),B | Write B to *IX+15. | ||
| 40742 | LD (IX+1),255 | Write 255 to *IX+1. | ||
| 40746 | LD L,(IY+6) | L=*IY+6. | ||
| 40749 | LD H,(IY+7) | H=*IY+7. | ||
| 40752 | ADD HL,DE | HL+=DE. | ||
| 40753 | LD (IY+6),L | Write L to *IY+6. | ||
| 40756 | LD (IY+7),H | Write H to *IY+7. | ||
| 40759 | RET | Return. | ||
| Prev: 40656 | Up: Map | Next: 40760 |