 NAM STY-CT82
 STTL CT-82 TERMINAL DRIVER FOR STYLOGRAPH
 OPT PAG
 PAG

*SET UP FOR TERMINAL #1
 ORG 6
 FCB 1


*EQUATES FOR SETTING UP ADDRESSES
*TO APPEND CORRECTLY TO STYLOGRAPH.
*THESE EQUATES MUST BE SET TO THE VALUES
*WHICH CAN BY LISTED BY THE "STYFIX" COMMAND.

TRMBEG EQU $146F ************************
TRMSEQ EQU $15DF ************************



*-------------- TERMINAL POINTERS ------------
*THE FIRST 32 BYTES ARE RESERVED FOR 16 ADDRESS 
*POINTERS TO MACHINE LANGUAGE ROUTINES IF USED.
*THE NEXT BYTE SPECIFIES THE CHARACTERISTICS OF
*THE TERMINAL.
*THE NEXT 13 BYTES INDICATE THE SEQUENCE NUMBER
*THAT IS CALLED FOR THE TERMINAL FUNCTIONS.

*TERMINAL SPECIFICATION CONSTANTS
D2479 EQU 0 24 ROW BY 79 COLUMNS
D2480 EQU 1 24 X 80
D2082 EQU 2 20 X 82
D2482 EQU 3 34 X 82
CYX EQU $80 OUTPUT Y(ROW) THEN X(COLUMN) ON CURSOR ADDRESS
CAD20 EQU  $40 ADD $20 TO CURSOR ADDRESSES
SSCD EQU $20 CAN SCROLL SCREEN DOWN
LERF EQU $10 HAS LINE ERASE FUNCTION



 ORG TRMBEG+$20

*TERMINAL SEQUENCE POINTERS
 FCB LERF+SSCD+D2082 TERMINAL CHARACTERISTICS
 FCB 1  CURMV  - CURSOR MOVE
 FCB 2  CURON  - CURSOR ON
 FCB 3  CUROFF - CURSOR OFF
 FCB 4  BLINK  - BLINK CURSOR
 FCB 5  SOLID  - SOLID CURSOR
 FCB 6  CLRS   - CLEAR SCREEN
 FCB 7  LERASE - ERASE LINE
 FCB 8  SCRLUP - SCROLL UP
 FCB 9  SCRLDN  - SCROLL DOWN
 FCB 10 SCINIT  - INITIALIZE TERMINAL
 FCB 11 SSHUT   - SHUT DOWN SCREEN
 FCB 12 ATT0    - NO CHARACTER ATTRIBUTES
 FCB 13 ATT1    - CHARACTER ATTRIBUTES
 



*------------ TERMINAL SEQUENCES ---------------
*THESE ARE THE SEQUENCES THAT ARE NORMALLY SENT TO THE
*TERMINAL FOR THE VARIOUS FUNCTIONS.
*THEY ARE IN "SERIAL" ORDER AND ARE POINTED TO
*BY THE BYTES IN THE TERMINAL SEQUENCE POINTERS
*DEFINED PREVIOUSLY.
*THE SEQUENCES ALWAYS END WITH THE "N" BIT SET.

N EQU $80
M EQU $FF


 ORG TRMSEQ VALUE INDICATED BY "STYFIX"
*0  - NO FUNCTION, DO NOT MODIFY THIS BYTE
 FCB N
*1  - CURSOR MOVE
 FCB $B+N
*2  - CURSOR ON
 FCB $1E,5+N
*3  - CURSOR OFF
 FCB $1E,$15+N
*4  - BLINK CURSOR
 FCB $1E,3+N
*5  - SOLID CURSOR
 FCB $1E,$13+N
*6, - CLEAR SCREEN
 FCB $10,$16+N
*7  - ERASE LINE
 FCB 6+N
*8  - SCROLL UP
 FCB $E+N
*9  - SCROLL DOWN
 FCB $F+N
*10 - INITIALIZE SCREEN
 FCB $1E,1,$1E,$13,$1E,4,$1E,5,$1E,7,$1E,$1A
 FCB $1E,$C,$1E,$1D,$1C,$12+N
*11 - SHUT DOWN SCREEN
 FCB $1E,$A+N ALLOW LINE FEEDS
*12 - NO CHARACTER ATTRIBUTE
 FCB $1E,$6+N HIGH INTENSITY
*13 - CHARACTER ATTRIBUTE
 FCB $1E,$16+N LOW INTENSITY

