.TITLE ADDCHA .IDENT /V01N/ .PSECT CHA,OVR,D,LCL ; CHARACTERISTICS BLOCK FOR ADDS TERMINAL ; THE FOLLOWING LINES MUST BE KEPT IN ORDER. TO VERIFY THIS ; INSPECT 'GBLCHA' ONESHT: .WORD 0 ; TERMINAL LOOPS LINES: .WORD 24. ; 24 LINES WIDTH: .WORD 80. ; BY 80 CHARACTERS DEC: .BYTE -1,0 ; DECIMAL X, BINARY Y ADDRESS HOSTR: .BYTE 4,13,40,0,0 ; ASCII STRING TO HOME CURSOR .=HOSTR+16. CSSTR: .BYTE 3,14,0,0 ; CLEAR SCREEN STRING, FIRST CHAR IS .=CSSTR+16. ; LEN OF STRING. 16 BYTES RESERVED CASTR: .BYTE 10.,13,0,0,0,$ESC,5,0,0,0,0 ; CURSOR ADDRESSING STRING, FIRST CHAR .=CASTR+32. ; IS LEN OF STRING. 32 BYTES RESERVED XPOS: .WORD 7 ; X COORDINATE GOES IN CASTR+5 YPOS: .WORD 2 ; Y COORDINATE GOES IN CASTR+2 XBIA: .WORD 0 ; BIAS ADDED TO X,Y TO MAKE 1,1 UPPER YBIA: .WORD 40 ; LEFT CORNER OF SCREEN .END