Prev: A6D2 Up: Map Next: A702
A6D3: Routine at A6D3
A6D3 INC IX Increment IX by one.
A6D5 LD A,(IX+$00) A=*IX+00.
A6D8 LD ($A6D1),A Write A to *A6D1.
A6DB DEC A Decrease A by one.
A6DC CALL $D2A4 Call D2A4.
A6DF INC A Increment A by one.
A6E0 LD ($A6D2),A Write A to *A6D2.
A6E3 INC IX Increment IX by one.
A6E5 LD A,($A6D2) A=*A6D2.
A6E8 LD HL,$A6D1 HL=A6D1.
A6EB CP (HL) Jump to A6F5 if A is not equal to *HL.
A6EC JR NZ,$A6F5
A6EE PUSH IX Stash IX on the stack.
A6F0 CALL $A5CD Call A5CD.
A6F3 POP IX Restore IX from the stack.
A6F5 CALL $A6BB Call A6BB.
A6F8 LD HL,$A6D1 Decrease *A6D1 by one.
A6FB DEC (HL)
A6FC JR NZ,$A6E5 Jump back to A6E5 until *HL is zero.
A6FE DEC IX Decrease IX by one.
A700 XOR A A=00.
A701 RET Return.
Prev: A6D2 Up: Map Next: A702