@@ 523,18 523,20 @@ BRK
( skip ) .Mouse/state DEI #00 ! BRK?
.Mouse/x DEI2 .toolview/x1 LDZ2 -- 8// NIP
-
- DUP HOR SWP - #01 ! ,&no-save JCN
+ DUP #1f ! ,&no-save JCN
;save-file JSR2
;draw-state JSR2
+ POP RELEASE-MOUSE BRK
&no-save
- DUP HOR SWP - #03 ! ,&no-load JCN
+ DUP #1d ! ,&no-load JCN
;load-file JSR2
+ POP RELEASE-MOUSE BRK
&no-load
- DUP HOR SWP - #04 ! ,&no-name JCN
+ DUP #1c ! ,&no-name JCN
#00 ;draw-filepath JSR2
;untitled-txt ;new-file JSR2
;redraw JSR2
+ POP RELEASE-MOUSE BRK
&no-name
DUP #04 ! ,&no-brush JCN
#00 .settings/tool STZ
@@ 551,12 553,6 @@ BRK
;draw-tileview JSR2
;draw-toolview JSR2
&no-zoom
- DUP #07 > OVR HOR SWP - #05 > #0101 !! ,&no-rename JCN
- #00 ;draw-filepath JSR2
- ;on-frame-trap .Screen/vector DEO2
- ;on-button-trap .Controller/vector DEO2
- BRK
- &no-rename
INCk .settings/color LDZ ! ,&no-eraser JCN
#00 .settings/color STZ
;draw-colorview JSR2
@@ 569,8 565,13 @@ BRK
;draw-toolview JSR2
POP RELEASE-MOUSE BRK
&no-color
+ DUP #08 < ,&no-rename JCN
+ #00 ;draw-filepath JSR2
+ ;on-frame-trap .Screen/vector DEO2
+ ;on-button-trap .Controller/vector DEO2
+ POP RELEASE-MOUSE BRK
+ &no-rename
POP
-
RELEASE-MOUSE
BRK