diff --git a/gui/m291/src/m291.tal b/gui/m291/src/m291.tal
index 4357c0c..9142de3 100644
--- a/gui/m291/src/m291.tal
+++ b/gui/m291/src/m291.tal
@@ -382,7 +382,7 @@
 	[ LIT2r 000a ] [ LIT2r 0000 ]
 	&>loop ( -- )
 		LDAk [ LIT "0 ] SUB DUP #09 GTH ?{
-			OVR2r MUL2r #00 SWP STH2
+			OVR2r MUL2r [ LITr 00 ] STH
 			ADD2r INC2 !&>loop }
 	POP STH2r POP2r JMP2r