diff --git a/gui/notepad/src/notepad.tal b/gui/notepad/src/notepad.tal
index ba9ec37..70b6d8f 100644
--- a/gui/notepad/src/notepad.tal
+++ b/gui/notepad/src/notepad.tal
@@ -250,8 +250,8 @@
 	,&x2 STR2
 	STH2
 	STH2
-	( dx ) ,&x2 LDR2 STH2kr SUB2 abs2 ,&dx STR2
-	( sx ) #0001 #ffff STH2kr ,&x2 LDR2 lts2 [ JMP SWP2 POP2 ] ,&sx STR2
+	( dx ) #0001 #ffff ,&x2 LDR2 STH2kr SUB2k abs2 ,&dx STR2
+	( sx ) SWP2 lts2 [ JMP SWP2 POP2 ] ,&sx STR2
 	( y x -> x y ) SWP2r
 	( dy ) #0000 ,&y2 LDR2 STH2kr SUB2 abs2 SUB2 ,&dy STR2
 	( sy ) #0001 #ffff STH2kr ,&y2 LDR2 lts2 [ JMP SWP2 POP2 ] ,&sy STR2