.TITLE GBLCHA .IDENT /M201/ .PSECT TCHAR,OVR,RW,D ; ; This is the definition of terminal characteristic offsets ; for VTECO. The sequences described herein are loaded in ; overlays, one for each terminal type. TECINI does the actual ; overlay loading. ; $DEC:: .WORD 0 ;0 FOR BINARY CURSOR, 1 FOR DECIMAL $EOB:: .WORD 0 ;STRING FOR END OF BUFFER $CUR:: .WORD 0 ;CURSOR POSITION OVER LF STRING $OVR:: .WORD 0 ;STRING FOR LINE WRAP $CLN:: .WORD 0 ;ERASE TO EOL $EEO:: .WORD 0 ;ERASE TO EOS $LFSEQ::.WORD 0 ;SCROLL UP $REV:: .WORD 0 ;SCROLL DOWN $CLT:: .WORD 0 ;CURSOR LEFT,DOWN,UP,RIGHT $CDN:: .WORD 0 $CUP:: .WORD 0 $CRT:: .WORD 0 $ZAP:: .WORD 0 ;ERASE ENTIRE SCREEN $ELIN:: .WORD 0 ;ERASE CURRENT LINE $DIR:: .WORD 0 ;DIRECT CURSOR ADDRESSING ; X$SIZE::.WORD 0 Y$SIZE::.WORD 0 ; X$POS:: .WORD 0 ;POSITION OF X ADDRESS Y$POS:: .WORD 0 ;POSITION OF Y ADDRESS ; $XBIAS::.WORD 0 ;BIAS TO BE APPLIED TO X ADDRESS $YBIAS::.WORD 0 ;BIAS TO BE APPLIED TO Y ADDRESS ; ; Now comes the screen work area. These are values used ; by the screen module to do its thing. ; OUTCHR::.BLKW ;OUTPUT A CHARACTER OUTBLN::.BLKW ;END OF LINE OR BUFFER CLEANER RTMOST::.BLKW ;INITED TO ZERO AS END OF LIST BUSTRT::.BLKW ;LINE COUNTER, INITED TO ZERO LINPTR::.BLKW ;CHAR COUNTER (P) OF LINE STARTS SVSTRT::.BLKW ;SAVED LINE COUNTER INITFL::.BLKW ;>=0 IMPLIES UNKNOWN SCREEN STATE BUINDX::.BLKW ;CONTAINS LINE INDEX INTO SCREEN MAP CURLIN::.BLKW ;CONTAINS LINE NUMBER OF CURSOR CURCHR::.BLKW ;CONTAINS COLUMN NUMBER OF CURSOR CURABS::.BLKW ;CONTAINS ABSOLUTE MAP POSITION OF CURSOR UNDERC::.BLKW ;CHARACTER POS OF UNDER SCORE PRELIN::.BLKW ;LAST SET LINE TO SCREEN PRECOL::.BLKW ;LAST SET COLUMN TO SCREEN CHCKBL::.BLKW ;FLAG WORD .BLKB 80. ;ROOM FOR CHARS MAPST:: .BLKB 80.*24. ;LAST KNOWN SCREEN MAPND:: ;END OF SCREEN MAP .END