Add cr/lf before closing hline
This commit is contained in:
@@ -128,7 +128,9 @@ PFIENO: .IOT CHTTYO,[040] ;Print a space.
|
|||||||
SOJE Y,PFIELN ;End the line and start a new one.
|
SOJE Y,PFIELN ;End the line and start a new one.
|
||||||
JUMPA PFIENO ;Jump back to print the next number.
|
JUMPA PFIENO ;Jump back to print the next number.
|
||||||
|
|
||||||
PFIEEX: MOVE A,[440700,,HLINE] ;Print a horizontal line
|
PFIEEX: .IOT CHTTYO,[^M] ;Print carriage return
|
||||||
|
.IOT CHTTYO,[^J] ;Print line feed.
|
||||||
|
MOVE A,[440700,,HLINE] ;Print a horizontal line
|
||||||
PUSHJ P,PUTLN
|
PUSHJ P,PUTLN
|
||||||
POP P,Y ;Restore the Y register.
|
POP P,Y ;Restore the Y register.
|
||||||
POP P,X ;Restore the index register.
|
POP P,X ;Restore the index register.
|
||||||
|
|||||||
Reference in New Issue
Block a user