Prev: A737 Up: Map Next: A79F
A763: Routine at A763
Used by the routines at B1D4 and BBAE.
Input
IX Actor Entity
A763 LD A,(IX+$01) A=IX+01 (current location).
A766 CALL HandlerOrchidType Call HandlerOrchidType.
A769 LD DE,$97DA DE=OrchidData.
A76C LD C,(HL) BC=the orchid type from HL.
A76D INC HL
A76E LD B,(HL)
A76F LD A,C A=C.
A770 AND %00000111 Keep only bits 0-2.
A772 OR %01001000 Set bits 3 and 6.
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 Keep only bit 3.
A77E LD (DE),A
A77F INC DE
A780 CALL HandlerOrchidPosition 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 Keep only bits 0-2.
A78D OR %01000000 Set bit 6.
A78F LD (DE),A
A790 INC DE
A791 LD A,B
A792 AND %11111000 Keep only bits 3-7.
A794 LD (DE),A
A795 INC DE
A796 LD A,C
A797 RRCA
A798 RRCA
A799 RRCA
A79A RRCA
A79B AND %00001111 Keep only bits 0-3.
A79D LD (DE),A
A79E RET Return.
Prev: A737 Up: Map Next: A79F