~rabbits/left

437bb951e10122a32b961ae49cd680ac80b63ed5 — Devine Lu Linvega 3 months ago f45287d
Merged redundant integers
1 files changed, 2 insertions(+), 2 deletions(-)

M src/main.tal
M src/main.tal => src/main.tal +2 -2
@@ 302,7 302,7 @@ BRK
@touch-to-addr ( -- addr* )

	( goto y )
	( b ) .Mouse/y DEI2 ( TEXTAREA-Y0 ) #0020 SUB2 #04 SFT2 NIP STH
	( b ) .Mouse/y DEI2 #0020 SUB2 #04 SFT2 NIP STH
	( a ) LITr 00
	.scroll/addr LDZ2
	&ver


@@ 312,7 312,7 @@ BRK
	&ver-end
	POP2r
	( goto x )
	( b ) .Mouse/x DEI2 .scroll/x LDZ2 ADD2 ( TEXTAREA-X0 ) #0010 SUB2 #0080 SUB2 STH2
	( b ) .Mouse/x DEI2 .scroll/x LDZ2 ADD2 #0090 SUB2 STH2
	( a ) LIT2r 0000
	&hor
		LDAk #0a EQU ,&hor-end JCN