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