From 0c4055d685c2c0a997353ff07ad4da9c46675f52 Mon Sep 17 00:00:00 2001
From: Gale Faraday <k4mu1kazum4@gmail.com>
Date: Wed, 15 Oct 2025 17:47:50 -0500
Subject: [PATCH] fix(buzbee): fix garbled register transfer

---
 src/buzbee.s | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/buzbee.s b/src/buzbee.s
index 7ecf063..60e82f1 100644
--- a/src/buzbee.s
+++ b/src/buzbee.s
@@ -317,7 +317,8 @@ RUNIF
   beq NOTOK@
   ldx #0           ; Counting up from zero
   lda BBVAR.tokens ; Load token
-  tfr a,b          ; Get the index in D
+  tfr a,d          ; Get the index in D
+  clra
   asld             ; Cheaply << to get *2, pointer size
   tfr d,x          ; Move to X so we can use indexed mode with the offset
   jmp [IFPTRTBL,x] ; Select IF