diff --git a/gui/notepad/src/notepad.tal b/gui/notepad/src/notepad.tal index fa5523c..9dfc660 100644 --- a/gui/notepad/src/notepad.tal +++ b/gui/notepad/src/notepad.tal @@ -433,7 +433,8 @@ #0000 .Screen/x DEO2 #0018 .Screen/y DEO2 [ LIT2 80 -Screen/pixel ] DEO - ( >> ) + + ! @ ( -- ) [ LIT2 00 -collapsed ] LDZ EQU ?{ JMP2r } @@ -460,7 +461,7 @@ [ LIT2 05 -Screen/sprite ] DEO .Screen/x DEI2k #0008 SUB2 ROT DEO2 &block walk-char POP INC2 LDAk ?&>w - &end POP2 + &end POP2 JMP2r @ ( -- ) [ LIT2 26 -Screen/auto ] DEO