Routines |
Prev: 61507 | Up: Map | Next: 61586 |
Used by the routine at 61397.
|
||||
61519 | LD A,(60217) | Jump to SetDefault if *60217 is equal to 0. | ||
61522 | CP 0 | |||
61524 | JR Z,SetDefault | |||
61526 | XOR A | A=0. | ||
61527 | JR 61531 | Jump to 61531. | ||
SetDefault | 61529 | LD A,5 | A=5. | |
61531 | LD (61507),A | Write A to *61507. | ||
61534 | LD (61511),A | Write A to *61511. | ||
61537 | LD B,2 | B=2. | ||
61539 | LD DE,(61509) | DE=*61509. | ||
61543 | DEC DE | Decrease DE by one. | ||
61544 | LD A,D | Jump to 61543 if DE is not zero. | ||
61545 | OR E | |||
61546 | JP NZ,61543 | |||
61549 | LD A,(61507) | A=*61507. | ||
61552 | XOR %00010000 | Flip the speaker bit. | ||
61554 | LD (61507),A | Write A to *61507. | ||
61557 | OUT (254),A | Set border to the colour held by A. | ||
61559 | DJNZ 61539 | Decrease counter by one and loop back to 61539 until counter is zero. | ||
61561 | LD B,2 | B=2. | ||
61563 | LD DE,(61513) | DE=*61513. | ||
61567 | DEC DE | Decrease DE by one. | ||
61568 | LD A,D | Jump to 61567 if DE is not zero. | ||
61569 | OR E | |||
61570 | JP NZ,61567 | |||
61573 | LD A,(61511) | A=*61511. | ||
61576 | XOR %00010000 | Flip the speaker bit. | ||
61578 | LD (61511),A | Write A to *61511. | ||
61581 | OUT (254),A | Set border to the colour held by A. | ||
61583 | DJNZ 61563 | Decrease counter by one and loop back to 61563 until counter is zero. | ||
61585 | RET | Return. |
Prev: 61507 | Up: Map | Next: 61586 |