Prev: 25620 Up: Map Next: 25664
25636: Routine at 6424
Used by the routine at 25856.
25636 LD C,5 C=5.
25638 LD B,32 B=32.
25640 LD A,(HL) A=*HL.
25641 INC HL Increment HL by one.
25642 LD (DE),A Write A to *DE.
25643 INC E Increment E by one.
25644 DJNZ 25640 Decrease counter by one and loop back to 25640 until counter is zero.
25646 DEC E Decrease E by one.
25647 LD A,E A=E.
25648 AND %11100000 Keep only bits 5-7.
25650 LD E,A E=A.
25651 INC D Increment D by one.
25652 DEC C Decrease C by one.
25653 JR NZ,25638 Jump to 25638 until C is zero.
25655 ADD A,32 A+=32.
25657 LD E,A E=A.
25658 RET Z Return if A is zero.
25659 LD A,D D-=5.
25660 SUB 5
25662 LD D,A
25663 RET Return.
Prev: 25620 Up: Map Next: 25664