diff --git a/projects/examples/demos/cube3d.tal b/projects/examples/demos/cube3d.tal
index b5c79c4..e32a88d 100644
--- a/projects/examples/demos/cube3d.tal
+++ b/projects/examples/demos/cube3d.tal
@@ -112,8 +112,8 @@ JMP2r
 JMP2r
 
 @abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
-@lts2 #8000 ADD2 SWP2 #8000 ADD2 GTH2 JMP2r
-@gts2 #8000 ADD2 SWP2 #8000 ADD2 LTH2 JMP2r
+@lts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 GTH2 JMP2r
+@gts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 LTH2 JMP2r
 
 @table ( 256 xy )
 	f7f8 f9fa fbfc fcfd fefe ffff ffff ffff
diff --git a/projects/examples/devices/mouse.tal b/projects/examples/devices/mouse.tal
index 50d4c9e..ccb10a5 100644
--- a/projects/examples/devices/mouse.tal
+++ b/projects/examples/devices/mouse.tal
@@ -98,7 +98,7 @@ BRK
 JMP2r
 
 @abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
-@lts2 #8000 ADD2 SWP2 #8000 ADD2 GTH2 JMP2r
-@gts2 #8000 ADD2 SWP2 #8000 ADD2 LTH2 JMP2r
+@lts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 GTH2 JMP2r
+@gts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 LTH2 JMP2r
 
 @pointer-icn 80c0 e0f0 f8e0 1000
diff --git a/projects/software/clock.tal b/projects/software/clock.tal
index 5d7f9b5..8228b40 100644
--- a/projects/software/clock.tal
+++ b/projects/software/clock.tal
@@ -221,8 +221,8 @@ JMP2r
 
 @mod DUP2 DIV MUL SUB JMP2r
 @abs2 DUP2 #0f SFT2 EQU #05 JCN #0000 SWP2 SUB2 JMP2r
-@lts2 #8000 ADD2 SWP2 #8000 ADD2 GTH2 JMP2r
-@gts2 #8000 ADD2 SWP2 #8000 ADD2 LTH2 JMP2r
+@lts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 GTH2 JMP2r
+@gts2 #8000 STH2k ADD2 SWP2 STH2r ADD2 LTH2 JMP2r
 @is-uc DUP #40 GTH SWP #5b LTH AND JMP2r
 @is-lc DUP #60 GTH SWP #7b LTH AND JMP2r
 @is-num DUP #2f GTH SWP #3a LTH AND JMP2r