From d25ff723bdd9ae137c82a45eb6f008d2403d87ed Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Fri, 15 Jun 2018 08:31:23 +0200
Subject: [PATCH] Minor edits to TAA; UUOS.

---
 src/taa/uuos.100 | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/taa/uuos.100 b/src/taa/uuos.100
index 028e1cfb..36ab31a8 100644
--- a/src/taa/uuos.100
+++ b/src/taa/uuos.100
@@ -6,7 +6,7 @@
 ; SYSEN2; MSEND 140 (timestamp 1979-11-10)
 ; Caller must define DBP, and may define UUOERR if they provide UERROR.
 
-TITLE UUOS
+SUBTTL UUOS
 
 ; Useful locations relative to P inside UUO handlers
 UUO40==-14
@@ -139,7 +139,7 @@ UOASCD:	POP	P,B
 	PUSHJ	P,SIOTA
 	JRST	UUORET
 
-UOCTLP:	MOVEI	A,20
+UOCTLP:	MOVEI	A,^P            ; print ^P-code
 	PUSHJ	P,IOTAD
 	MOVE	A,B
 	PUSHJ	P,IOTAD
@@ -157,7 +157,7 @@ UOSIX:	SKIPN	C,(P)
 	PUSHJ	P,SIOTA
 	JRST	UUORET
 
-UOVPOS:	MOVEI	A,20
+UOVPOS:	MOVEI	A,^P            ; set vertical position
 	PUSHJ	P,IOTAD
 	MOVEI	A,"V
 	PUSHJ	P,IOTAD
@@ -165,7 +165,7 @@ UOVPOS:	MOVEI	A,20
 	PUSHJ	P,IOTAD
 	JRST	UUORET
 
-UOHPOS:	MOVEI	A,20
+UOHPOS:	MOVEI	A,^P            ; set horizontal position
 	PUSHJ	P,IOTAD
 	MOVEI	A,"H
 	PUSHJ	P,IOTAD