"   TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM31 TERMINAL                 "

"   The position of DIP Switch Location C11 SW6 determines whether the       "
"   underline function or the blanking (hidden) function is enabled.  This   "
"   TDU assumes that the underline function has been enabled.  Comments are  "
"   used to indicate changes to be made if the blanking function is to be    "
"   enabled.                                                                 "

"   VARIABLES                                                                "

    clear_home          = (esc '*')
    normal_attr         = (esc 'G0')
    start_alternate     = ()
    start_blink         = (esc 'G2')
"   Uncomment this line if DIP Switch Location C11 SW6 is ON. (hidden)"
"   start_hidden        = (esc 'G1') "
    start_inverse       = (esc 'G4')
"   Uncomment this line if DIP Switch Location C11 SW6 is OFF. (underline)"
    start_underline     = (esc 'G1')
    start_protect       = (esc '&')
    stop_protect        = (esc '''')
    no_end_block_1      = (esc '.100') " No <cr> after FUNCTION/<char> "
    default_end_block_1 = (esc '.10D') " Send <cr> after FUNCTION/<char> "
    no_auto_page        = (esc 'w')

"   MODEL NAME AND COMMUNICATION TYPE                                         "
    model_name          value = 'ADM_31'
    communications      type  = asynch
    application_string name='driver_procedure' out='tup$bootstrap_adm31_driver'

"   END OF INFORMATION SPECIFICATION                                          "
    end_of_information  in    = (0)

"   CURSOR POSITIONING INFORMATION                                            "
    cursor_pos_encoding      bias  = (32)  type = binary_cursor
    cursor_pos_column_first  value = FALSE
    cursor_pos_column_length value = (0)
    cursor_pos_row_length    value = (0)
    cursor_pos_begin         out   = (esc '=')
    cursor_pos_second        out   = ()
    cursor_pos_third         out   = ()

"   CURSOR MOVEMENT INFORMATION                                               "
    cursor_home              inout = (rs)
    cursor_up                inout = (vt)
    cursor_down              inout = (lf)
    cursor_left              inout = (bs)
    cursor_right             inout = (ff)

"   CURSOR BEHAVIOR (for cursor movement keys)                                "
    move_past_right          type  = wrap_adjacent_next
    move_past_left           type  = wrap_adjacent_next
    move_past_top            type  = wrap_same_next
    move_past_bottom         type  = wrap_same_next

"   CURSOR BEHAVIOR (for character keys)                                      "
    char_past_right          type  = wrap_adjacent_next
    char_past_left           type  = wrap_adjacent_next
    char_past_last_position  type  = scroll_next

"   TERMINAL ATTRIBUTES                                                       "
    automatic_tabbing        value = FALSE
    clears_when_change_size  value = FALSE
    function_key_leaves_mark value = 1
" Change                                                               "
"   Uncomment this line if DIP Switch Location C11 SW6 is ON. (hidden) "
"   has_hidden               value = TRUE                              "
"   Uncomment this line if DIP Switch Location C11 SW6 is OFF. (underline)"
    has_hidden               value = FALSE
    has_protect              value = FALSE
    home_at_top              value = TRUE
    multiple_sizes           value = FALSE
    programmable_tab_stops   number = 0
    tabs_to_home             value = FALSE
    tabs_to_tab_stops        value = FALSE
    tabs_to_unprotected      value = FALSE

"   SCREEN SIZES                                                              "
    set_size       rows = 24 columns = 80

"   SCREEN AND LINE MODE TRANSITION                                            "

    screen_init   out = (no_auto_page no_end_block_1 clear_home stop_protect)
    line_init     out = (default_end_block_1 clear_home stop_protect)

"   TERMINAL CAPABILITIES                                                     "
    delete_char         inout = (esc 'W')        label='CHAR DELETE'
    delete_line_bol     inout = (esc 'R')        label='LINE DELETE'
    erase_end_of_line   inout = (esc 'T')        label='LINE ERASE'
    erase_page_home     inout = (clear_home)
    insert_char         inout = (esc 'Q')        label='CHAR INSERT'
    insert_line_bol     inout = (esc 'E')        label='LINE INSERT'
    tab_backward        inout = (esc 'I')
    tab_forward         inout = (ht)

"   MISCELLANEOUS TERMINAL SEQUENCES                                          "
    bell_nak            out = (bel)
    output_begin        out = ()
    output_end          out = ()

"   PROGRAMMABLE FUNCTION KEY INPUT INFORMATION                               "
    f1        in = (soh '1')             label='f1'
    f2        in = (soh '2')             label='f2'
    f3        in = (soh '3')             label='f3'
    f4        in = (soh '4')             label='f4'
    f5        in = (soh '5')             label='f5'
    f6        in = (soh '6')             label='f6'
    f7        in = (soh '7')             label='f7'
    f8        in = (soh '8')             label='f8'
    f9        in = (soh 'q')             label='fq'
    f10       in = (soh 'w')             label='fw'
    f11       in = (soh 'e')             label='fe'
    f12       in = (soh 'r')             label='fr'
    f13       in = (soh 't')             label='ft'
    f14       in = (soh 'y')             label='fy'
    f15       in = (soh 'u')             label='fu'
    f16       in = (soh 'i')             label='fi'
    f1_s      in = (soh '!')             label='f!'
    f2_s      in = (soh '"')             label='f"'
    f3_s      in = (soh '#')             label='f#'
    f4_s      in = (soh '$')             label='f$'
    f5_s      in = (soh '%')             label='f%'
    f6_s      in = (soh '&')             label='f&'
    f7_s      in = (soh '''')            label='f'''
    f8_s      in = (soh '(')             label='f('
    f9_s      in = (soh 'Q')             label='fQ'
    f10_s     in = (soh 'W')             label='fW'
    f11_s     in = (soh 'E')             label='fE'
    f12_s     in = (soh 'R')             label='fR'
    f13_s     in = (soh 'T')             label='fT'
    f14_s     in = (soh 'Y')             label='fY'
    f15_s     in = (soh 'U')             label='fU'
    f16_s     in = (soh 'I')             label='fI'

"   CDC STANDARD FUNCTION KEY INPUT INFORMATION                               "
    next      in = 13                    label='RETURN'
    next_s    in = ()
    back      in = ()
    back_s    in = ()
    help      in = ()
    help_s    in = ()
    stop      in = ()
    stop_s    in = ()
    down      in = ()
    down_s    in = ()
    up        in = ()
    up_s      in = ()
    fwd       in = ()
    fwd_s     in = ()
    bkw       in = ()
    bkw_s     in = ()
    edit      in = ()
    edit_s    in = ()
    data      in = ()
    data_s    in = ()

"   TERMINAL VIDEO ATTRIBUTES                                                "
    alt_begin           out = ()
    alt_end             out = (normal_attr)
"   Uncomment this line if DIP Switch Location C11 SW6 is ON. (hidden)"
"   hidden_begin        out = (start_hidden)                           "
    hidden_begin        out = ()
    hidden_end          out = (normal_attr)
    inverse_begin       out = (start_inverse)
    inverse_end         out = (normal_attr)
    protect_begin       out = ()
    protect_end         out = ()
"   Uncomment this line if DIP Switch Location C11 SW6 is OFF. (underline)"
    underline_begin     out = (start_underline)
    underline_end       out = (normal_attr)

"   LOGICAL ATTRIBUTE SPECIFICATIONS                                          "
    error_begin         out = (start_inverse)
    error_end           out = (normal_attr)
"   Uncomment this line if DIP Switch Location C11 SW6 is ON. (hidden)"
"   input_text_begin    out = (start_inverse)                          "
"   Uncomment this line if DIP Switch Location C11 SW6 is OFF. (underline)"
    input_text_begin    out = ()
    input_text_end      out = ()
    italic_begin        out = (start_inverse)
    italic_end          out = (normal_attr)
    message_begin       out = ()
    message_end         out = ()
    output_text_begin   out = ()
    output_text_end     out = ()


"   LINE DRAWING CHARACTER SPECIFICATION                                      "
    ld_fine_begin            out = ()
    ld_fine_end              out = ()
    ld_fine_horizontal       out = ('-')
    ld_fine_vertical         out = ('|')
    ld_fine_upper_left       out = ('*')
    ld_fine_upper_right      out = ('*')
    ld_fine_lower_left       out = ('*')
    ld_fine_lower_right      out = ('*')
    ld_fine_up_t             out = ('T')
    ld_fine_down_t           out = ('_')
    ld_fine_left_t           out = ('|')
    ld_fine_right_t          out = ('|')
    ld_fine_cross            out = ('+')
    ld_medium_begin          out = ()
    ld_medium_end            out = ()
    ld_medium_horizontal     out = ('-')
    ld_medium_vertical       out = ('|')
    ld_medium_upper_left     out = ('*')
    ld_medium_upper_right    out = ('*')
    ld_medium_lower_left     out = ('*')
    ld_medium_lower_right    out = ('*')
    ld_medium_up_t           out = ('T')
    ld_medium_down_t         out = ('_')
    ld_medium_left_t         out = ('|')
    ld_medium_right_t        out = ('|')
    ld_medium_cross          out = ('+')
    ld_bold_begin            out = (start_inverse)
    ld_bold_end              out = (normal_attr)
    ld_bold_horizontal       out = (' ')
    ld_bold_vertical         out = (' ')
    ld_bold_upper_left       out = (' ')
    ld_bold_upper_right      out = (' ')
    ld_bold_lower_left       out = (' ')
    ld_bold_lower_right      out = (' ')
    ld_bold_up_t             out = (' ')
    ld_bold_down_t           out = (' ')
    ld_bold_left_t           out = (' ')
    ld_bold_right_t          out = (' ')
    ld_bold_cross            out = (' ')

"   END OF TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM31 TERMINAL           "
