From 6b0aee8cf7cb6f6ea89fd02c42939b80f1fc02f4 Mon Sep 17 00:00:00 2001
From: tildearrow <tildearrow@protonmail.com>
Date: Fri, 16 Sep 2022 02:00:42 -0500
Subject: [PATCH] OPL: "fix" stereo in OPL1/2

---
 src/engine/platform/opl.cpp | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/src/engine/platform/opl.cpp b/src/engine/platform/opl.cpp
index eb49637e..2dd6d1dc 100644
--- a/src/engine/platform/opl.cpp
+++ b/src/engine/platform/opl.cpp
@@ -249,7 +249,9 @@ void DivPlatformOPL::acquire_nuked(short* bufL, short* bufR, size_t start, size_
     if (os[1]>32767) os[1]=32767;
   
     bufL[h]=os[0];
-    bufR[h]=os[1];
+    if (oplType==3 || oplType==759) {
+      bufR[h]=os[1];
+    }
   }
 }
 
@@ -1520,7 +1522,7 @@ void DivPlatformOPL::reset() {
 }
 
 bool DivPlatformOPL::isStereo() {
-  return true;
+  return (oplType==3 || oplType==759);
 }
 
 bool DivPlatformOPL::keyOffAffectsArp(int ch) {