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

M tgachr/tgachr.tal

@@ 74,9 74,9 @@ BRK
 	( print details )
 	;src-txt ;print-str JSR2
 	;print-str JSR2
-	LIT '( #18 DEO #00
+	LIT "( #18 DEO #00
 	;image/image-type LDA #10 SFT ;image-types ADD2 LDA2 ;print-str JSR2
-	LIT ') #18 DEO #0a18 DEO
+	LIT ") #18 DEO #0a18 DEO
 
 	( get parser )
 	;image/image-type LDA


@@ 139,11 139,11 @@ JMP2r
 	STH SWP2 NIP
 	STHr SWP
 	STH2r SFT #01 AND ,&do-set JCN
-		( mask ) #01 #07 ROT #07 AND SUB #40 SFT SFT #ff EOR AND
+		( mask ) #0107 ROT #07 AND SUB #40 SFT SFT #ff EOR AND
 		( save ) ROT ROT STA
 		JMP2r
 	&do-set
-		( mask ) #01 #07 ROT #07 AND SUB #40 SFT SFT ORA
+		( mask ) #0107 ROT #07 AND SUB #40 SFT SFT ORA
 		( save ) ROT ROT STA
 
 JMP2r