|
Routines |
| Prev: A639 | Up: Map | Next: A682 |
|
Used by the routine at A461.
|
||||
| A652 | LD DE,$7B00 | DE=7B00. | ||
| A655 | LD HL,$7840 | HL=7840. | ||
| A658 | INC L | Increment L by one. | ||
| A659 | LD B,$40 | B=40. | ||
| A65B | LD A,(DE) | A=*DE. | ||
| A65C | AND (HL) | Merge the bits from *HL. | ||
| A65D | LD (HL),A | Write A to *HL. | ||
| A65E | INC L | Increment L by one. | ||
| A65F | INC E | Increment E by one. | ||
| A660 | LD A,(DE) | A=*DE. | ||
| A661 | AND (HL) | Merge the bits from *HL. | ||
| A662 | LD (HL),A | Write A to *HL. | ||
| A663 | INC L | Increment L by one. | ||
| A664 | INC E | Increment E by one. | ||
| A665 | LD A,(DE) | A=*DE. | ||
| A666 | AND (HL) | Merge the bits from *HL. | ||
| A667 | LD (HL),A | Write A to *HL. | ||
| A668 | INC L | Increment L by one. | ||
| A669 | INC E | Increment E by one. | ||
| A66A | LD A,(DE) | A=*DE. | ||
| A66B | AND (HL) | Merge the bits from *HL. | ||
| A66C | LD (HL),A | Write A to *HL. | ||
| A66D | INC L | Increment L by one. | ||
| A66E | INC DE | Increment DE by one. | ||
| A66F | LD A,(DE) | A=*DE. | ||
| A670 | AND (HL) | Merge the bits from *HL. | ||
| A671 | LD (HL),A | Write A to *HL. | ||
| A672 | INC L | Increment L by one. | ||
| A673 | INC E | Increment E by one. | ||
| A674 | LD A,(DE) | A=*DE. | ||
| A675 | AND (HL) | Merge the bits from *HL. | ||
| A676 | LD (HL),A | Write A to *HL. | ||
| A677 | INC L | Increment L by one. | ||
| A678 | INC E | Increment E by one. | ||
| A679 | LD A,(DE) | A=*DE. | ||
| A67A | AND (HL) | Merge the bits from *HL. | ||
| A67B | LD (HL),A | Write A to *HL. | ||
| A67C | INC HL | Increment HL by one. | ||
| A67D | INC L | Increment L by one. | ||
| A67E | INC E | Increment E by one. | ||
| A67F | DJNZ $A65B | Decrease counter by one and loop back to A65B until counter is zero. | ||
| A681 | RET | Return. | ||
| Prev: A639 | Up: Map | Next: A682 |