From 84ae0b31f3c661c632c3fd21a2dae498186fc257 Mon Sep 17 00:00:00 2001
From: tildearrow <tildearrow@protonmail.com>
Date: Thu, 12 Jan 2023 18:33:11 -0500
Subject: [PATCH] OPZ: pan macro

---
 src/engine/platform/tx81z.cpp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/engine/platform/tx81z.cpp b/src/engine/platform/tx81z.cpp
index c3f64741..2b119abb 100644
--- a/src/engine/platform/tx81z.cpp
+++ b/src/engine/platform/tx81z.cpp
@@ -152,6 +152,14 @@ void DivPlatformTX81Z::tick(bool sysTick) {
       chan[i].freqChanged=true;
     }
 
+    if (chan[i].std.panL.had) {
+      chan[i].chVolL=(chan[i].std.panL.val&2)>>1;
+      chan[i].chVolR=chan[i].std.panL.val&1;
+      chan[i].freqChanged=true;
+
+      immWrite(chanOffs[i]+ADDR_LR_FB_ALG,(chan[i].state.alg&7)|(chan[i].state.fb<<3)|(chan[i].active?0x40:0)|(chan[i].chVolR<<7));
+    }
+
     if (chan[i].std.phaseReset.had) {
       if (chan[i].std.phaseReset.val==1 && chan[i].active) {
         chan[i].keyOn=true;