Add a horizontal line at the end of the print
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: POP P,Y ;Restore the Y register.
|
PFIEEX: MOVE A,[440700,,HLINE] ;Print a horizontal line
|
||||||
|
PUSHJ P,PUTLN
|
||||||
|
POP P,Y ;Restore the Y register.
|
||||||
POP P,X ;Restore the index register.
|
POP P,X ;Restore the index register.
|
||||||
POP P,C ;Restore the C register.
|
POP P,C ;Restore the C register.
|
||||||
POP P,B ;Restore the B register.
|
POP P,B ;Restore the B register.
|
||||||
|
|||||||
Reference in New Issue
Block a user