From 84ca3186406f65f65a18b18130dcecab2c78e2d3 Mon Sep 17 00:00:00 2001
From: Javier Degirolmo
Date: Wed, 7 Dec 2011 19:58:15 -0300
Subject: Some updates... Trying to fix SFX restoring but still broken

---
 src-z80/core/bgm.z80 | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

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

diff --git a/src-z80/core/bgm.z80 b/src-z80/core/bgm.z80
index c1650f1..ebda240 100644
--- a/src-z80/core/bgm.z80
+++ b/src-z80/core/bgm.z80
@@ -41,8 +41,17 @@ PlayBGM:
 
     ld hl, ProcessBGM           ; Tell Echo to process BGM
     ld (DoTick_BGM+1), hl
+    
+    ld b, 8                     ; Kill all FM channels explicitly
+.resetallfm:
+    ld a, b
+    and $04
+    rrca
+    ld iyl, a
+    ld a, b
+    call KillFM
+    djnz .resetallfm
 
-    PollPCM
     jp IdleLoop                 ; End of subroutine
 
 ;****************************************************************************
@@ -244,7 +253,8 @@ ClearBGM:
 .resetfm:
     PollPCM
     
-    xor a                       ; Reset BGM volume
+    ;xor a                       ; Reset BGM volume
+    ld a, $7F
     ld (de), a
     dec e
     
-- 
cgit v1.2.3