From 8fdf49b8e53fd3063ccc2eb51c49c3b6e4d073bb Mon Sep 17 00:00:00 2001
From: sik
Date: Mon, 22 Jan 2018 19:19:19 -0300
Subject: Echo 1.6 release... kind of a mess, will clean up in further commits
 I guess

---
 src-z80/core/main.z80 | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

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

diff --git a/src-z80/core/main.z80 b/src-z80/core/main.z80
index 387b879..1de8930 100644
--- a/src-z80/core/main.z80
+++ b/src-z80/core/main.z80
@@ -20,6 +20,11 @@ EntryPoint:
     ld (RAM_PSGData+16), a
     ld (RAM_PSGData+32), a
     ld (RAM_PSGData+48), a
+    dec a
+    ld (RAM_PSGData+11), a
+    ld (RAM_PSGData+11+16), a
+    ld (RAM_PSGData+11+32), a
+    ld (RAM_PSGData+11+48), a
 
     ld hl, $6000                ; Set default bank
     ld (hl), l
@@ -114,6 +119,8 @@ RunCommand:
     jp z, SetPCMRate
     dec a                       ; Command $08: pause BGM
     jp z, PauseBGM
+    dec a                       ; Command $09: set stereo
+    jp z, SetStereo
 
     PollPCM
 
@@ -207,17 +214,11 @@ DoTick_PSGSkip:
 ;****************************************************************************
 ; LoadList [command $01]
 ; Loads the pointer list
+;----------------------------------------------------------------------------
+; notes: doesn't return
 ;****************************************************************************
 
 LoadList:
-;    ld hl, RAM_ComBank          ; Get command parameters
-;    ld c, (hl)
-;    inc l
-;    ld e, (hl)
-;    inc l
-;    ld d, (hl)
-;    ex de, hl
-    
     ld hl, (RAM_ComAddr)        ; Get command parameters
     ld a, (RAM_ComBank)
     ld c, a
-- 
cgit v1.2.3