A763: Routine at A763
A763 |
LD A,(IX+$01) |
A766 |
CALL HandlerOrchidType |
A769 |
LD DE,$97DA |
A76C |
LD C,(HL) |
A76D |
INC HL |
A76E |
LD B,(HL) |
A76F |
LD A,C |
A770 |
AND %00000111 |
A772 |
OR %01001000 |
A774 |
LD (DE),A |
A775 |
INC DE |
A776 |
LD A,(IX+$01) |
A779 |
LD (DE),A |
A77A |
INC DE |
A77B |
LD A,C |
A77C |
AND %00001000 |
A77E |
LD (DE),A |
A77F |
INC DE |
A780 |
CALL HandlerOrchidPosition |
A783 |
LD A,(HL) |
A784 |
INC HL |
A785 |
LD (DE),A |
A786 |
INC DE |
A787 |
LD A,(HL) |
A788 |
LD (DE),A |
A789 |
INC DE |
A78A |
LD A,B |
A78B |
AND %00000111 |
A78D |
OR %01000000 |
A78F |
LD (DE),A |
A790 |
INC DE |
A791 |
LD A,B |
A792 |
AND %11111000 |
A794 |
LD (DE),A |
A795 |
INC DE |
A796 |
LD A,C |
A797 |
RRCA |
A798 |
RRCA |
A799 |
RRCA |
A79A |
RRCA |
A79B |
AND %00001111 |
A79D |
LD (DE),A |
A79E |
RET |