1 files changed, 3 insertions(+), 3 deletions(-)

M src/nasu.tal

@@ 750,7 750,7 @@ JMP2r
 	( channel 2 )
 	[ STHr ] [ STH2r ] #0008 ADD2 LDA SWP
 	#07 SWP SUB SFT #01 AND
-	#10 SFT
+	DUP ADD
 	ADD
 
 JMP2r


@@ 957,7 957,7 @@ JMP2r
 	#0400
 	&loop
 		.dataview/x1 LDZ2 .Screen/x DEO2
-		#00 OVR #10 SFT .settings/focus LDZ2 ADD2
+		#00 OVR DUP ADD .settings/focus LDZ2 ADD2
 			#01 ;draw-chr/color STA
 			( ch1 ) LDA2k ;draw-short JSR2
 			.Screen/x DEI2k #000c ADD2 ROT DEO2


@@ 1343,7 1343,7 @@ JMP2r
 JMP2r
 	&sprite 8000 8000 8000 8000
 
-@rol ( byte -- byte ) DUP #07 SFT SWP #10 SFT ADD JMP2r
+@rol ( byte -- byte ) DUP #07 SFT SWP DUP ADD ADD JMP2r
 @ror ( byte -- byte ) DUP #70 SFT SWP #01 SFT ADD JMP2r
 
 @untitled-txt "untitled.chr $1