

"   TERMINAL DEFINITION FILE FOR CDC VIKING 721 TERMINAL                      "

" Automatic tabbing is available as a user or site option.  To enable it,     "
" change the automatic_tabbing firective from FALSE to TRUE, and look at the  "
" set_screen_mode and set_line_mode directives for comment-disabled references"
" to the variables enable_autotab and disable_autotab -- enable these         "
" references by blanking over the comment quotes.                             "

"   VARIABLES                                                                 "
clear_all_tabs      = (rs dc2 'Y')
disable_autotab     = (rs '#')
disable_blink       = (eot)
disable_auto_cr     = (rs '''')
disable_protect     = (rs dc2 'L')
disable_touchpanel  = (rs dc2 'Q')
disable_old_attr    = (rs '-')
enable_auto_cr      = (rs '&')
enable_autotab      = (rs '"')
enable_clear        = (rs '$')
enable_cr_delim     = (rs enq)
enable_blink        = (etx)
enable_protect      = (rs dc2 'K')
enable_typeamatic   = (rs dc2 'i')
enable_touchpanel   = (rs dc2 'R')
end_print           = (rs 7f(16))
large_cyber_mode    = (rs dc2 'B')
page_mode           = (syn)
pop_fn_keys         = (rs dc2 71(16) cr)
push_fn_keys        = (rs dc2 70(16) cr)
scroll_mode         = (dc2)
shift_numeric_pad   = (rs dc2 6B(16))
start_inverse       = (rs 'D')
start_underline     = (ack)
stop_inverse        = (rs 'E')
stop_underline      = (nak)

"   MODEL NAME AND COMMUNICATION TYPE                                         "
model_name          value = 'CDC_721'
communications      type  = asynch
application_string  name='insert_delete_scrolling' out='true'

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

"   CURSOR POSITIONING INFORMATION                                            "
cursor_pos_encoding      bias  = (32)   type = cdc721_cursor
cursor_pos_column_first  value = TRUE
cursor_pos_column_length value = (0)
cursor_pos_row_length    value = (0)
cursor_pos_begin         in    = (1e(16) 4d(16) 1f(16))  label = 'TOUCH'
cursor_pos_begin         out   = (stx)
cursor_pos_second        out   = (7E(16) soh)

"   CURSOR MOVEMENT INFORMATION                                               "
cursor_home              inout = (em)     label='HOME'
cursor_up                inout = (etb)
cursor_down              inout = (sub)
cursor_left              inout = (bs)
cursor_right             inout = (can)

"   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  = wrap_adjacent_next

"   TERMINAL ATTRIBUTES                                                       "
automatic_tabbing        value = FALSE
clears_when_change_size  value = TRUE
function_key_leaves_mark value = 0
has_hidden               value = TRUE
has_protect              value = TRUE
home_at_top              value = TRUE
multiple_sizes           value = TRUE
tabs_to_home             value = FALSE
tabs_to_tab_stops        value = TRUE
tabs_to_unprotected      value = TRUE

"   SCREEN SIZES                                                              "
set_size       rows = 30 columns = 80   out = (rs dc2 'H' rs dc2 '^')  ..
 character_specification = (11,70,4) line_specification = (1,29,2) ..
 device = 'TOUCH_PANEL'
set_size rows = 30 columns = 132  out = (rs dc2 'G' rs dc2 '^') ..
 character_positions = (20,26,33,39,45,51,57,64,70,76,82,88, ..
 95,101,107,113) line_specification = (1,29,2) device = 'TOUCH_PANEL'

"   SCREEN AND LINE MODE TRANSITION                                           "
set_screen_mode     out = (push_fn_keys  shift_numeric_pad  enable_clear...
 large_cyber_mode  disable_auto_cr  enable_cr_delim  clear_all_tabs ...
 enable_blink  end_print  page_mode  disable_old_attr ..
 "enable_touchpanel" "enable_autotab" )

set_line_mode       out = (scroll_mode  enable_auto_cr  clear_all_tabs  ...
 "disable_touchpanel" pop_fn_keys "disable_autotab" )

"   TERMINAL CAPABILITIES                                                     "
delete_char         inout = (rs 4e(16))       label='DLETE_C'
delete_line_stay    inout = (rs 51(16))       label='DLETE_L'
erase_char          inout = (1f(16))
erase_end_of_line   inout = (vt)              label='CLR_EOL'
erase_field_stay    inout = (rs 59(16))
erase_field_bof     inout = (rs 5D(16))
erase_page_home     inout = (ff)              label='CLEAR_P'
insert_char         inout = (rs 4f(16))       label='INSRT_C'
insert_line_stay    inout = (rs 52(16))       label='INSRT_L'
tab_backward        inout = (rs 0b(16))
tab_clear           inout = (rs dc2 'X')
tab_clear_all       inout = (clear_all_tabs)
tab_forward         inout = (ht)
tab_set             inout = (rs dc2 'W')

"   MISCELLANEOUS TERMINAL SEQUENCES                                          "
bell_nak            out = (bel)
output_begin        out = (disable_protect)
output_end          out = (enable_protect)
protect_all         out = (rs 'G')

"   PROGRAMMABLE FUNCTION KEY INPUT INFORMATION                               "
f1        in = (rs 71(16)) label= 'f1'
f2        in = (rs 72(16)) label= 'f2'
f3        in = (rs 73(16)) label= 'f3'
f4        in = (rs 74(16)) label= 'f4'
f5        in = (rs 75(16)) label= 'f5'
f6        in = (rs 76(16)) label= 'f6'
f7        in = (rs 77(16)) label= 'f7'
f8        in = (rs 78(16)) label= 'f8'
f9        in = (rs 79(16)) label= 'f9'
f10       in = (rs 7A(16)) label= '10'
f11       in = (rs 7B(16)) label= '11'
f12       in = (rs 7C(16)) label= '12'
f13       in = (rs 7D(16)) label= '13'
f14       in = (rs 7E(16)) label= '14'
f15       in = (rs 70(16)) label= '15'
f16       in = (rs dc2 31(16)) label= '16'
f1_s      in = (rs 61(16))     label= '  SF1'
f2_s      in = (rs 62(16))     label= '  SF2'
f3_s      in = (rs 63(16))     label= '  SF3'
f4_s      in = (rs 64(16))     label= '  SF4'
f5_s      in = (rs 65(16))     label= '  SF5'
f6_s      in = (rs 66(16))     label= '  SF6'
f7_s      in = (rs 67(16))     label= '  SF7'
f8_s      in = (rs 68(16))     label= '  SF8'
f9_s      in = (rs 69(16))     label= '  SF9'
f10_s     in = (rs 6A(16))     label= '  SF10'
f11_s     in = (rs 6B(16))     label= '  SF11'
f12_s     in = (rs 6C(16))     label= '  SF12'
f13_s     in = (rs 6D(16))     label= '  SF13'
f14_s     in = (rs 6E(16))     label= '  SF14'
f15_s     in = (rs 60(16))     label= '  SF15'
f16_s     in = (rs dc2 32(16)) label= '  SF16'

"   CDC STANDARD FUNCTION KEY INPUT INFORMATION                               "
next      in = 13  label='NEXT'
undo      in = (rs 75(16))     label= 'f5'
undo_s    in = (rs 65(16))     label= '  SF5'
back      in = (rs 5F(16))     label= 'BACK'
back_s    in = (rs 5B(16))     label= 'Shift-BACK'
help      in = (rs 5C(16))     label= 'HELP'
help_s    in = (rs 58(16))     label= 'Shift-HELP'
stop      in = (rs 49(16))     label= 'STOP'
stop_s    in = (rs 4A(16))     label= 'Shift-STOP'
down      in = (rs dc2 20(16)) label= 'DOWN'
down_s    in = (rs dc2 21(16)) label= 'Shift-DOWN'
up        in = (rs dc2 24(16)) label= 'UP'
up_s      in = (rs dc2 25(16)) label= 'Shift-UP'
fwd       in = (rs dc2 28(16)) label= 'FWD'
fwd_s     in = (rs dc2 29(16)) label= 'Shift-FWD'
bkw       in = (rs dc2 2C(16)) label= 'BKW'
bkw_s     in = (rs dc2 2d(16)) label= 'Shift-BKW'
edit      in = (rs 5E(16))     label= 'EDIT'
edit_s    in = (rs 5A(16))     label= 'Shift-EDIT'
data      in = (rs dc2 35(16)) label= 'DATA'
data_s    in = (rs dc2 36(16)) label= 'Shift-DATA'

"   TERMINAL VIDEO ATTRIBUTES                                                 "
alt_begin           out = (fs)
alt_end             out = (gs)
blink_begin         out = (so etx)
blink_end           out = (si)
hidden_begin        out = (rs dc2 '[')
hidden_end          out = (rs dc2 5C(16))
inverse_begin       out = (start_inverse)
inverse_end         out = (stop_inverse)
protect_begin       out = (rs dc2 'I')
protect_end         out = (rs dc2 'J')
underline_begin     out = (start_underline)
underline_end       out = (stop_underline)
low_intensity_begin  out = (fs)
low_intensity_end    out = (gs)
high_intensity_begin out = (gs)
high_intensity_end   out = (fs)

"   LOGICAL ATTRIBUTE SPECIFICATIONS                                          "
error_begin         out = (start_inverse)
error_end           out = (stop_inverse)
input_text_begin    out = (start_underline)
input_text_end      out = (stop_underline)
italic_begin        out = (start_inverse)
italic_end          out = (stop_inverse)
message_begin       out = ()
message_end         out = ()
output_text_begin   out = ()
output_text_end     out = ()
title_begin         out = ()
title_end           out = ()

"   LINE DRAWING CHARACTER SPECIFICATION                                      "
ld_fine_begin            out = (rs fs)
ld_fine_end              out = (rs gs)
ld_fine_horizontal       out = 20(16)
ld_fine_vertical         out = 21(16)
ld_fine_upper_left       out = 22(16)
ld_fine_upper_right      out = 23(16)
ld_fine_lower_left       out = 24(16)
ld_fine_lower_right      out = 25(16)
ld_fine_up_t             out = 26(16)
ld_fine_down_t           out = 27(16)
ld_fine_left_t           out = 28(16)
ld_fine_right_t          out = 29(16)
ld_fine_cross            out = 2A(16)
ld_medium_begin          out = (rs fs)
ld_medium_end            out = (rs gs)
ld_medium_horizontal     out = 2B(16)
ld_medium_vertical       out = 2C(16)
ld_medium_upper_left     out = 2D(16)
ld_medium_upper_right    out = 2E(16)
ld_medium_lower_left     out = 2F(16)
ld_medium_lower_right    out = 30(16)
ld_medium_up_t           out = 31(16)
ld_medium_down_t         out = 32(16)
ld_medium_left_t         out = 33(16)
ld_medium_right_t        out = 34(16)
ld_medium_cross          out = 35(16)
ld_bold_begin            out = start_inverse
ld_bold_end              out = stop_inverse
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 CDC VIKING 721 TERMINAL               "
