27778: Routine at 27778
L27778 |
27778 |
LD A,(HL) |
|
27779 |
INC HL |
|
27780 |
CP 65 |
|
27782 |
JR C,L27778_0 |
|
27784 |
CP 91 |
|
27786 |
JR NC,L27778_0 |
|
27788 |
ADD A,32 |
L27778_0 |
27790 |
CP (IX+0) |
|
27793 |
INC IX |
|
27795 |
JR NZ,L27778_5 |
|
27797 |
LD A,(IX+0) |
|
27800 |
CP 35 |
|
27802 |
JR NZ,L27778 |
|
27804 |
LD A,13 |
|
27806 |
SUB B |
|
27807 |
CP 4 |
|
27809 |
JR NZ,L27778_1 |
|
27811 |
LD A,1 |
|
27813 |
LD (28107),A |
|
27816 |
LD A,4 |
L27778_1 |
27818 |
CP 5 |
|
27820 |
JR C,L27778_2 |
|
27822 |
CP 9 |
|
27824 |
JR NC,L27778_2 |
|
27826 |
LD A,5 |
L27778_2 |
27828 |
CP 9 |
|
27830 |
JR C,L27778_3 |
|
27832 |
SUB 3 |
L27778_3 |
27834 |
LD B,A |
|
27835 |
LD HL,28687 |
|
27838 |
LD DE,18 |
L27778_4 |
27841 |
ADD HL,DE |
|
27842 |
DJNZ L27778_4 |
|
27844 |
LD DE,27663 |
|
27847 |
LD BC,18 |
|
27850 |
LDIR |
|
27852 |
POP BC |
|
27853 |
RET |
L27778_5 |
27854 |
LD A,(IX+0) |
|
27857 |
INC IX |
|
27859 |
CP 35 |
|
27861 |
JR NZ,L27778_5 |
|
27863 |
RET |