13 lines
405 B
NASM
13 lines
405 B
NASM
;================================================================================
|
|
; Heart Beep Logic
|
|
;================================================================================
|
|
BeepLogic:
|
|
LDA.l HeartBeep : BEQ +
|
|
STA.w HeartBeepTimer
|
|
LDA.b #$2B : STA.w SFX2
|
|
RTL
|
|
+
|
|
LDA.b #$FF : STA.w HeartBeepTimer
|
|
RTL
|
|
;================================================================================
|