Prev: AFBE Up: Map Next: AFEB
AFD8: Simple beep
Used by the routine at Beep_Effect.
Input
BC Pitch of note.
Output
Beep_Simple AFD8 LD A,$10 Turn on speaker.
AFDA OUT ($FE),A
AFDC PUSH BC
Beep_Simple_0 AFDD DJNZ Beep_Simple_0 Wait for pitch duration.
AFDF POP BC
AFE0 LD A,$00 Turn off speaker.
AFE2 OUT ($FE),A
AFE4 PUSH BC
Beep_Simple_1 AFE5 DJNZ Beep_Simple_1 Wait for pitch duration.
AFE7 POP BC
AFE8 RET
FX_WhiteNoisePtr AFE9 DEFW $8000
Prev: AFBE Up: Map Next: AFEB