|
Routines |
| Prev: 25556 | Up: Map | Next: 25931 |
|
Used by the routine at 25556.
|
||||
| 25731 | LD DE,(23431) | DE=*23431. | ||
| 25735 | LD BC,15360 | BC=15360 (CHARSET-256). | ||
| 25738 | LD H,0 | H=0. | ||
| 25740 | LD L,A | L=A. | ||
|
This entry point is used by the routine at 27457.
|
||||
| 25741 | ADD HL,HL | HL+=HL. | ||
| 25742 | ADD HL,HL | HL+=HL. | ||
|
This entry point is used by the routine at 27457.
|
||||
| 25743 | ADD HL,HL | HL+=HL. | ||
| 25744 | ADD HL,BC | HL+=BC. | ||
| 25745 | PUSH DE | Stash DE and HL on the stack. | ||
| 25746 | PUSH HL | |||
| 25747 | LD DE,27427 | DE=27427. | ||
| 25750 | LD BC,2048 | BC=2048. | ||
| 25753 | LD A,(HL) | A=*HL. | ||
| 25754 | LD (DE),A | Write A to *DE. | ||
| 25755 | INC HL | Increment HL by one. | ||
| 25756 | INC DE | Increment DE by one. | ||
| 25757 | BIT 1,A | Test bit 1 of A. | ||
| 25759 | JR Z,25763 | Jump to 25763 if DE is equal to 0. | ||
| 25761 | LD C,255 | C=255. | ||
| 25763 | DJNZ 25753 | Decrease counter by one and loop back to 25753 until counter is zero. | ||
| 25765 | LD DE,27427 | DE=27427. | ||
| 25768 | LD B,8 | B=8. | ||
| 25770 | LD A,(DE) | A=*DE. | ||
| 25771 | RLA | RLA. | ||
| 25772 | JR NC,25776 | Jump to 25776 if DE is greater than or equal to 8. | ||
| 25774 | OR %10000000 | Set bits 7. | ||
| 25776 | BIT 0,C | Test bit 0 of C. | ||
| 25778 | JR Z,25790 | Jump to 25790 if DE is equal to 8. | ||
| 25780 | LD H,A | H=A. | ||
| 25781 | AND %00001111 | Keep only bits 0-3. | ||
| 25783 | LD L,A | L=A. | ||
| 25784 | LD A,H | A=H. | ||
| 25785 | AND %11110000 | Keep only bits 4-7. | ||
| 25787 | RL L | Rotate L left. | ||
| 25789 | OR L | Set the bits from L. | ||
| 25790 | AND %11111100 | Keep only bits 2-7. | ||
| 25792 | LD (DE),A | Write A to *DE. | ||
| 25793 | INC DE | Increment DE by one. | ||
| 25794 | DJNZ 25770 | Decrease counter by one and loop back to 25770 until counter is zero. | ||
| 25796 | POP HL | Restore HL and DE from the stack. | ||
|
This entry point is used by the routine at 27457.
|
||||
| 25797 | POP DE | } | ||
| 25798 | LD HL,27427 | HL=27427. | ||
| 25801 | EX DE,HL | Exchange the DE and HL registers. | ||
| 25802 | PUSH HL | Stash HL on the stack. | ||
| 25803 | LD A,(23434) | A=*23434. | ||
| 25806 | AND %00000011 | Keep only bits 0-1. | ||
| 25808 | DEC A | Decrease A by one. | ||
| 25809 | JR Z,25832 | Jump to 25832 if A is equal to L. | ||
| 25811 | DEC A | Decrease A by one. | ||
| 25812 | JR Z,25856 | Jump to 25856 if A is equal to L. | ||
| 25814 | DEC A | Decrease A by one. | ||
| 25815 | JR Z,25893 | Jump to 25893 if A is equal to L. | ||
| 25817 | LD B,8 | B=8. | ||
| 25819 | LD A,(DE) | A=*DE. | ||
| 25820 | LD (HL),A | Write A to *HL. | ||
| 25821 | INC DE | Increment DE by one. | ||
| 25822 | INC H | Increment H by one. | ||
| 25823 | DJNZ 25819 | Decrease counter by one and loop back to 25819 until counter is zero. | ||
| 25825 | POP HL | Restore HL from the stack. | ||
| 25826 | INC HL | Increment HL by one. | ||
| 25827 | LD (23431),HL | Write HL to *23431. | ||
| 25830 | JR 25912 | Jump to 25912. | ||
| 25832 | LD B,8 | B=8. | ||
| 25834 | LD A,(DE) | A=*DE. | ||
| 25835 | DEC HL | Decrease HL by one. | ||
| 25836 | SRL (HL) | Shift *HL right. | ||
| 25838 | SRL (HL) | Shift *HL right. | ||
| 25840 | SLA A | Shift A left (with carry). | ||
| 25842 | RL (HL) | Rotate *HL left. | ||
| 25844 | SLA A | Shift A left (with carry). | ||
| 25846 | RL (HL) | Rotate *HL left. | ||
| 25848 | INC HL | Increment HL by one. | ||
| 25849 | LD (HL),A | Write A to *HL. | ||
| 25850 | INC H | Increment H by one. | ||
| 25851 | INC DE | Increment DE by one. | ||
| 25852 | DJNZ 25834 | Decrease counter by one and loop back to 25834 until counter is zero. | ||
| 25854 | JR 25825 | Jump to 25825. | ||
| 25856 | LD B,8 | B=8. | ||
| 25858 | LD A,(DE) | A=*DE. | ||
| 25859 | DEC HL | Decrease HL by one. | ||
| 25860 | SRL (HL) | Shift *HL right. | ||
| 25862 | SRL (HL) | Shift *HL right. | ||
| 25864 | SRL (HL) | Shift *HL right. | ||
| 25866 | SRL (HL) | Shift *HL right. | ||
| 25868 | SLA A | Shift A left (with carry). | ||
| 25870 | RL (HL) | Rotate *HL left. | ||
| 25872 | SLA A | Shift A left (with carry). | ||
| 25874 | RL (HL) | Rotate *HL left. | ||
| 25876 | SLA A | Shift A left (with carry). | ||
| 25878 | RL (HL) | Rotate *HL left. | ||
| 25880 | SLA A | Shift A left (with carry). | ||
| 25882 | RL (HL) | Rotate *HL left. | ||
| 25884 | INC HL | Increment HL by one. | ||
| 25885 | LD (HL),A | Write A to *HL. | ||
| 25886 | INC H | Increment H by one. | ||
| 25887 | INC DE | Increment DE by one. | ||
| 25888 | DJNZ 25858 | Decrease counter by one and loop back to 25858 until counter is zero. | ||
|
This entry point is used by the routine at 27457.
|
||||
| 25890 | POP HL | Restore HL from the stack. | ||
| 25891 | JR 25912 | Jump to 25912. | ||
| 25893 | LD B,8 | B=8. | ||
| 25895 | LD A,192 | A=192. | ||
| 25897 | AND (HL) | Merge the bits from *HL. | ||
|
This entry point is used by the routine at 27457.
|
||||
| 25898 | LD (HL),A | Write A to *HL. | ||
| 25899 | LD A,(DE) | A=*DE. | ||
| 25900 | SRL A | Shift A right. | ||
| 25902 | SRL A | Shift A right. | ||
| 25904 | OR (HL) | Set the bits from *HL. | ||
| 25905 | LD (HL),A | Write A to *HL. | ||
| 25906 | INC H | Increment H by one. | ||
| 25907 | INC DE | Increment DE by one. | ||
| 25908 | DJNZ 25895 | Decrease counter by one and loop back to 25895 until counter is zero. | ||
| 25910 | JR 25825 | Jump to 25825. | ||
| 25912 | POP AF | Restore AF from the stack. | ||
| 25913 | PUSH AF | Stash AF on the stack. | ||
| 25914 | LD A,(23434) | A=*23434. | ||
| 25917 | CP 41 | Compare A with 41. | ||
| 25919 | JP Z,25664 | Jump to 25664 if A is equal to 41. | ||
| 25922 | INC A | Increment A by one. | ||
| 25923 | LD (23434),A | Write A to *23434. | ||
|
This entry point is used by the routine at 25556.
|
||||
| 25926 | POP AF | Restore AF, DE, BC and HL from the stack. | ||
| 25927 | POP DE | |||
| 25928 | POP BC | |||
| 25929 | POP HL | |||
| 25930 | RET | Return. | ||
| Prev: 25556 | Up: Map | Next: 25931 |