Routines |
Prev: 25620 | Up: Map | Next: 25664 |
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 |