From 703ac012eee06a908bb54e26a4093de436b38a51 Mon Sep 17 00:00:00 2001 From: neauoire Date: Sat, 12 Nov 2022 18:11:47 -0800 Subject: [PATCH] Fixed scrolling bug --- src/dexe.tal | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/dexe.tal b/src/dexe.tal index 68c3d43..a0d0869 100644 --- a/src/dexe.tal +++ b/src/dexe.tal @@ -494,7 +494,7 @@ JMP2 @set-scroll ( scroll* -- ) - DUP2 #30 SFT2 ;data ADD2 .selection/key STZ2 + DUP2 #40 SFT2 ;data ADD2 .selection/key STZ2 .selection/scroll STZ2 JMP2r @@ -601,6 +601,7 @@ JMP2r @draw-table ( -- ) + .selection/key LDZ2 ;print JSR2 #0a18 DEO .frame/rows LDZ2 #0000 &loop ( addr ) DUP2 #40 SFT2 .selection/key LDZ2 ADD2 STH2 -- 2.45.2