From a679ba38190bfed6ae150a12e819ad7527c495d1 Mon Sep 17 00:00:00 2001
From: sik
Date: Sun, 5 Mar 2017 20:57:11 -0300
Subject: Upgrade!

---
 src-z80/core/sfx.z80 | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'src-z80/core/sfx.z80')

diff --git a/src-z80/core/sfx.z80 b/src-z80/core/sfx.z80
index 1c62873..4bca4c7 100644
--- a/src-z80/core/sfx.z80
+++ b/src-z80/core/sfx.z80
@@ -1,6 +1,8 @@
 ;****************************************************************************
 ; PlaySFX [command $02]
 ; Plays a SFX
+;----------------------------------------------------------------------------
+; breaks: all
 ;****************************************************************************
 
 PlaySFX:
@@ -48,6 +50,8 @@ PlaySFX:
 ;****************************************************************************
 ; ProcessSFX
 ; Processes a tick for a SFX
+;----------------------------------------------------------------------------
+; breaks: all
 ;****************************************************************************
 
 ProcessSFX:
@@ -147,10 +151,14 @@ ProcessSFXRun:
 
     cp $F8                      ; Events $F0-$F7: set FM parameters
     jp c, SetFMParamSFX
+    cp $FA                      ; Events $F8-$F9: set FM register
+    jp c, SetFMRegSFX
 
 ;****************************************************************************
 ; StopSFX* [command $03, event $FF]
 ; Stops SFX playback
+;----------------------------------------------------------------------------
+; breaks: all
 ;****************************************************************************
 
 StopSFXEvent:
@@ -186,6 +194,8 @@ StopSFX:
 ;****************************************************************************
 ; ClearSFX
 ; Clears SFX resources
+;----------------------------------------------------------------------------
+; breaks: all
 ;****************************************************************************
 
 ClearSFX:
-- 
cgit v1.2.3