;
;++++++ NEW STUFF FOR AUTO TURN-ON WITH TRMOFF.LIT +++++++++
;
       PUSH    D1                      ;save everything (paranoid we are)
       PUSH    D7
       PUSH    A6
       PUSH    D3
       CLR     D1                      ;clear the reg
       MOVW    T.STS(A5),D6            ;get the terminal status word
       PUSH    D6                      ;and save the original
       ANDW    #20000,D6               ;get this bit
       CMPW    D6,#20000               ;see if this bit is on (tv OFF)
       BLO     CONT                    ;NO, tv is ON, so normal processing
       POP     D6                      ;tv OFF, so get the status word
       MOVW    #20000,D7               ;and the bit indicating it's OFF
       COMW    D7                      ;complement
       ANDW    D7,D6                   ;and turn this bit off (tv will be ON)
       MOVW    D6,@A5                  ;move this into the status word
       LEA     A6,C37                  ;get the "turn on" byte string address
       MOV     A6,D1                   ;move this address to D1 for TRMBFQ
       MOV     #2,D3                   ;the number of bytes for turn on
       TRMBFQ                          ;turn tv ON
CONT:   POP     D6                      ;restore junk
       POP     D3
       POP     A6
       POP     D7
       POP     D1
;
;++++++ END OF "NEW HOT STUFF" - ZOUNDS! ++++++++++++++++
;