Routines |
Prev: 38601 | Up: Map | Next: 38644 |
Used by the routine at 34762.
|
||||||||
38622 | LD E,A | Save the value of A in E for later retrieval | ||||||
38623 | LD C,254 | We will output to port 254 | ||||||
38625 | LD D,A | Copy A into D; bits 0-2 of D determine the initial border colour | ||||||
38626 | RES 4,D | Reset bit 4 of D (initial speaker state) | ||||||
38628 | RES 3,D | Reset bit 3 of D (initial MIC state) | ||||||
38630 | LD B,E | Initialise B (delay counter for the inner loop) | ||||||
38631 | CP B | Is it time to flip the MIC and speaker and make the border black? | ||||||
38632 | JR NZ,38636 | Jump if not | ||||||
38634 | LD D,24 | Set bits 3 (MIC) and 4 (speaker) of D, and reset bits 0-2 (black border) | ||||||
38636 | OUT (C),D | Set the MIC state, speaker state and border colour | ||||||
38638 | DJNZ 38631 | Jump back until the inner loop is finished | ||||||
38640 | DEC A | Is the outer loop finished too? | ||||||
38641 | JR NZ,38625 | Jump back if not | ||||||
38643 | RET |
Prev: 38601 | Up: Map | Next: 38644 |