Prev: 6414 Up: Map Next: 6440
6424: Routine at 6424
Used by the routine at 6500.
6424 LD C,$05 C=05.
6426 LD B,$20 B=20.
6428 LD A,(HL) A=*HL.
6429 INC HL Increment HL by one.
642A LD (DE),A Write A to *DE.
642B INC E Increment E by one.
642C DJNZ $6428 Decrease counter by one and loop back to 6428 until counter is zero.
642E DEC E Decrease E by one.
642F LD A,E A=E.
6430 AND %11100000 Keep only bits 5-7.
6432 LD E,A E=A.
6433 INC D Increment D by one.
6434 DEC C Decrease C by one.
6435 JR NZ,$6426 Jump to 6426 until C is zero.
6437 ADD A,$20 A+=20.
6439 LD E,A E=A.
643A RET Z Return if A is zero.
643B LD A,D D-=05.
643C SUB $05
643E LD D,A
643F RET Return.
Prev: 6414 Up: Map Next: 6440