! Version:	'X-1'
!
! This file contains the definitions necessary to set up the keypad
! recognition for the ACL editor.  The basic form for a key definition is:
!
!		DEFINE action AS characters OR characters OR ...
!
! where 'action' is a keyword to describe the desired action and 'characters'
! is a list of characters that must be entered to invoke the desired action.
! The list of characters must either be a character string preceeded by the
! keyword "escape" or a single character preceeded by the keyword "control".
! In addition, the keyword "gold" may also appear to indicate that striking
! the defined gold key must preceed the list of characters entered to invoke
! the desired action.  A character string is defined as a series of characters
! within angle bracket (<>) delimiters.  Within the character string case is
! preserved.
!
! For example:
!
! To define the ACE entering action as being a control-A character, the
! following definition must appear:
!
!	define enter_ace as control,A
!
! it may also appear as
!
!	define enter_ace as control,<A>
!
! To define the ACE entering action as being the ENTER key on the keypad,
! the following definition must appear:
!
!	define enter_ace as escape,<OM>
!
! Define the basic keypad keys
!
define gold as ss3,<P> or escape,<P>
define help as ss3,<Q> or csi,<28~> or escape,<Q>
define help_format as gold,ss3,<Q> or csi,<26~> or escape,<Q>
define locate_string as gold,ss3,<R> or csi,<1~> or gold,escape,<?x>
define locate_next as ss3,<R> or escape,<?x>
define delete_ace as ss3,<S> or escape,<R>
define undelete_ace as gold,ss3,<S> or gold,escape,<R>
define select_field as ss3,<w> or escape,<?w>
define advance_field as gold,ss3,<w> or gold,escape,<?w>
define delete_word as ss3,<m> or escape,<?y>
define undelete_word as gold,ss3,<m> or gold,escape,<?y>
define advance_position as ss3,<t> or escape,<?t>
define backup_position as ss3,<u> or escape,<?u>
define delete_character as ss3,<l> or escape,<?v>
define undelete_character as gold,ss3,<l> or gold,escape,<?v>
define move_word as ss3,<q> or escape,<?q>
define move_eol as ss3,<r> or escape,<?r>
define delete_eol as gold,ss3,<r> or gold,escape,<?r>
define insert_ace as gold,ss3,<p> or csi,<2~> or gold,escape,<?p>
define move_ace as ss3,<p> or escape,<?p>
define select_item as ss3,<n> or escape,<?n>
define enter_ace as ss3,<M> or escape,<?M> or csi,<29~>
define previous_screen as csi,<5~>
define next_screen as csi,<6~>
!
! Define the arrow keys
!
define up_arrow as ss3,<A> or csi,<A> or escape,<A>
define down_arrow as ss3,<B> or csi,<B> or escape,<B>
define right_arrow as ss3,<C> or csi,<C> or escape,<C>
define left_arrow as ss3,<D> or csi,<D> or escape,<D>
!
! Define the remaining miscellaneous keys
!
define insert_overstrike as control,A
define move_bol as csi,<24~> or control,H
define rubout_word as csi,<25~> or control,J
define screen_refresh as control,R or control,W
define session_reset as gold,control,R or gold,control,W
define rubout_bol as control,U or control,X
define undelete_line as gold,control,U or gold,control,X
define exit as csi,<17~> or csi,<19~> or csi,<21~> or control,Z
define quit_session as gold,control,Z
!
define rubout_character as rubout