Prev: A58F Up: Map Next: A5E1
A5B2: Routine at A5B2
Used by the routine at A491.
A5B2 BIT 7,(HL) Test bit 7 of *HL.
A5B4 LD A,$FF A=FF.
A5B6 PUSH HL Stash HL on the stack.
A5B7 JR NZ,$A5BA Jump to A5BA if DE is not equal to FF.
A5B9 XOR A A=00.
A5BA LD HL,$7B00 HL=7B00.
A5BD LD DE,$7B01 DE=7B00+01.
A5C0 LD (HL),A Write A to *HL.
A5C1 LD BC,$0078 BC=0078.
A5C4 LDIR LDIR.
A5C6 LD DE,$7B00 DE=7B00.
A5C9 LD A,($9B12) A=*9B12.
A5CC LD L,A L=A.
A5CD ADD A,A A+=A.
A5CE ADD A,L A+=L.
A5CF LD L,A L=A.
A5D0 LD H,$00 H=00.
A5D2 ADD HL,DE HL+=DE.
A5D3 EX DE,HL Exchange the DE and HL registers.
A5D4 POP HL Restore HL from the stack.
A5D5 LD A,$10 A=10.
A5D7 LDI LDI.
A5D9 LDI LDI.
A5DB LDI LDI.
A5DD DEC A Decrease A by one.
A5DE JR NZ,$A5D7 Jump to A5D7 if A is not equal to 10.
A5E0 RET Return.
Prev: A58F Up: Map Next: A5E1