Prev: 25715 Up: Map Next: 25784
25770: Play square wave sound
Used by the routines at 25715 and 25784.
Input
D Duration of wave
PlaySquareWave 25770 LD A,16 A=16 (speaker on = bit 4).
25772 OUT (254),A
25774 LD B,D Decrease duration by one and loop back to PlaySquareWave_Loop until counter is zero.
PlaySquareWave_Loop 25775 DJNZ PlaySquareWave_Loop
25777 XOR A Speaker off.
25778 OUT (254),A
25780 LD B,D Decrease duration by one and loop back to Silence_Loop until counter is zero.
Silence_Loop 25781 DJNZ Silence_Loop
25783 RET Return.
Prev: 25715 Up: Map Next: 25784