From 5bfd098b58add69d52e5a1a2bd655ae99ff383e8 Mon Sep 17 00:00:00 2001 From: neauoire Date: Tue, 30 Nov 2021 11:41:37 -0800 Subject: [PATCH] Fixed outline drawing --- src/main.tal | 26 +++++++++++++------------- 1 file changed, 13 insertions(+), 13 deletions(-) diff --git a/src/main.tal b/src/main.tal index d42c670..664f1af 100644 --- a/src/main.tal +++ b/src/main.tal @@ -185,13 +185,13 @@ .frame/x1 LDZ2 #0090 ++ .frame/y1 LDZ2 #0020 #0028 SIZE-TO-RECT ;zoomview SET-RECT .frame/x1 LDZ2 #00c0 ++ .frame/y1 LDZ2 #0048 #0020 SIZE-TO-RECT ;dataview SET-RECT - .tileview/x1 LDZ2 #0002 -- .tileview-frame/x1 STZ2 - .tileview/y1 LDZ2 #0002 -- .tileview-frame/y1 STZ2 + .tileview/x1 LDZ2 #0001 -- .tileview-frame/x1 STZ2 + .tileview/y1 LDZ2 #0001 -- .tileview-frame/y1 STZ2 .tileview/x2 LDZ2 INC2 .tileview-frame/x2 STZ2 .tileview/y2 LDZ2 INC2 .tileview-frame/y2 STZ2 - .zoomview/x1 LDZ2 #0002 -- .zoomview-frame/x1 STZ2 - .zoomview/y1 LDZ2 #0002 -- .zoomview-frame/y1 STZ2 + .zoomview/x1 LDZ2 #0001 -- .zoomview-frame/x1 STZ2 + .zoomview/y1 LDZ2 #0001 -- .zoomview-frame/y1 STZ2 .zoomview/x2 LDZ2 INC2 .zoomview-frame/x2 STZ2 .zoomview/y2 LDZ2 #0007 -- .zoomview-frame/y2 STZ2 @@ -250,23 +250,23 @@ BRK .Controller/button DEI #01 AND ;on-control JCN2 .Controller/key DEI - DUP #31 ! ,&no-1 JCN + #31 !~ ,&no-1 JCN ( color ) #00 .settings/color STZ ;draw-toolview JSR2 &no-1 - DUP #32 ! ,&no-2 JCN + #32 !~ ,&no-2 JCN ( color ) #01 .settings/color STZ ;draw-toolview JSR2 &no-2 - DUP #33 ! ,&no-3 JCN + #33 !~ ,&no-3 JCN ( color ) #02 .settings/color STZ ;draw-toolview JSR2 &no-3 - DUP #34 ! ,&no-4 JCN + #34 !~ ,&no-4 JCN ( color ) #03 .settings/color STZ ;draw-toolview JSR2 &no-4 - DUP #08 ! ,&no-delete JCN + #08 !~ ,&no-delete JCN ( delete ) ;op-erase ;run-selection JSR2 SET-STATE ;redraw JSR2 &no-delete - DUP #20 ! ,&no-zoom JCN + #20 !~ ,&no-zoom JCN ( zoom ) .settings/zoom TOGGLE ;redraw JSR2 &no-zoom - DUP #71 ! ,&no-tool0 JCN + #71 !~ ,&no-tool0 JCN ( tool ) #00 .settings/tool STZ ;redraw JSR2 &no-tool0 - DUP #77 ! ,&no-tool1 JCN + #77 !~ ,&no-tool1 JCN ( tool ) #01 .settings/tool STZ ;redraw JSR2 &no-tool1 - DUP #1b ! ,&no-escape JCN + #1b !~ ,&no-escape JCN ( escape ) RESET-SELECTION ;redraw JSR2 &no-escape POP