~rabbits/nasu

e0c73e07b826b2a149332de14ea9c184bd390db2 — neauoire 4 months ago 231c035
Minor optimizations
2 files changed, 5 insertions(+), 7 deletions(-)

M src/manifest.tal
M src/nasu.tal
M src/manifest.tal => src/manifest.tal +1 -1
@@ 36,7 36,7 @@ BRK
		BRK
		&no-sub
	( do not leave if menu is active )
	;draw-menu/sel LDA #ff NEQ ,&no-leave JCN
	;draw-menu/sel LDA INC ,&no-leave JCN
	.Mouse/y DEI2 #000c LTH2 ,&no-leave JCN
		,menu-close JSR
		&no-leave

M src/nasu.tal => src/nasu.tal +4 -6
@@ 752,9 752,7 @@ JMP2r
	STH
	OVR2 SWP2 ,get-pixel-addr JSR
	( ch1 ) OVR2 OVR2 STHkr #00 ,toggle-pixel JSR
	( ch2 ) #0008 ADD2 STHr #01 ,toggle-pixel JSR

JMP2r
	( ch2 ) #0008 ADD2 STHr #01

@toggle-pixel ( x* addr* color -- )



@@ 967,11 965,11 @@ JMP2r
	( tools )
	.Screen/x DEI2k #0008 ADD2 ROT DEO2
	;brush-icn .Screen/addr DEO2
	#01 [ .settings/tool LDZ #00 EQU ] ADD .Screen/sprite DEO
	#01 .settings/tool LDZ #00 EQU ADD .Screen/sprite DEO
	;select-icn .Screen/addr DEO2
	#01 [ .settings/tool LDZ #01 EQU ] ADD .Screen/sprite DEO
	#01 .settings/tool LDZ #01 EQU ADD .Screen/sprite DEO
	;zoom-icns [ #00 .settings/zoom LDZ #30 SFT2 ADD2 ] .Screen/addr DEO2
	#01 [ .settings/tool LDZ #02 EQU ] ADD .Screen/sprite DEO
	#01 .settings/tool LDZ #02 EQU ADD .Screen/sprite DEO
	( file i/o )
	;draw-state JSR2
	.toolview/x2 LDZ2 STH2k #0018 SUB2 .Screen/x DEO2