diff --git a/vt52.S b/vt52.S
index b847916..ab1159b 100644
--- a/vt52.S
+++ b/vt52.S
@@ -905,7 +905,7 @@ ctrl_1b ; escape -
 ctrl_09 ; tab
 
 	lda x
-	cmp #73
+	cmp #72
 	bcs :one
 
 	clc