diff --git a/gui/m291/src/m291.tal b/gui/m291/src/m291.tal index bd5dfc3..563fe82 100644 --- a/gui/m291/src/m291.tal +++ b/gui/m291/src/m291.tal @@ -285,7 +285,8 @@ POP2 STH2r STH2r SWP2 OVR2 ADD2 SWP2 ( | print ) calc-width .secprog STZ2 - !message/ + + !message/ @handle-id3 ( buf* char -- ) POP [ LIT ". ] find-next INC2 LDA2k @@ -632,8 +633,7 @@ [ LIT2 05 -Screen/sprite ] DEO .Screen/x DEI2 INC2 .Screen/x DEO2 INC2 GTH2k ?&>l - POP2 POP2 - ( >> ) + POP2 POP2 JMP2r @ ( -- ) .secfrom LDZ2