Prev: 38092 Up: Map Next: 38242
38207: Routine at 953F
Used by the routine at 37488.
38207 LD BC,39408 BC=39408.
38210 LD HL,(39335) HL=*39335.
38213 AND A Set flags.
38214 SBC HL,BC HL-=BC.
38216 RET Z Return if {} is zero.
38217 SRL L Shift L right.
38219 LD B,L B=L.
38220 LD HL,39408 HL=39408.
38223 PUSH BC Stash BC on the stack.
38224 LD E,(HL) E=*HL.
38225 INC HL Increment HL by one.
38226 LD D,(HL) D=*HL.
38227 INC HL Increment HL by one.
38228 LD (39335),HL Write HL to *39335.
38231 EX DE,HL Exchange the DE and HL registers.
38232 CALL 38242 Call 38242.
38235 LD HL,(39335) HL=*39335.
38238 POP BC Restore BC from the stack.
38239 DJNZ 38223 Decrease counter by one and loop back to 38223 until counter is zero.
38241 RET Return.
Prev: 38092 Up: Map Next: 38242