Prev: A613 Up: Map Next: A652
A639: Routine at A639
Used by the routine at 9D42.
A639 LD A,($9B10) A=*9B10.
A63C ADD A,$03 A+=03.
A63E PUSH HL Stash HL on the stack.
A63F LD B,$10 B=10.
A641 AND A Set flags.
A642 RR (HL) Rotate *HL right.
A644 INC HL Increment HL by one.
A645 RR (HL) Rotate *HL right.
A647 INC HL Increment HL by one.
A648 RR (HL) Rotate *HL right.
A64A INC HL Increment HL by one.
A64B DJNZ $A641 Decrease counter by one and loop back to A641 until counter is zero.
A64D POP HL Restore HL from the stack.
A64E DEC A Decrease A by one.
A64F JR NZ,$A63E Jump to A63E if A is not equal to A.
A651 RET Return.
Prev: A613 Up: Map Next: A652