!
! EDTINI.EDT initializer file.  Information on keys defined appears in
! file EDTKEYS.HLP in SYS$HELP.
!
!============================
!	Screen Width Macros
!
DEFINE MACRO WIDTH_132
INSERT =WIDTH_132
DEFINE KEY GOLD CONT W AS "EXT WIDTH_80."
SET SCREEN 132
SET WRAP 131
^Z
!
DEFINE MACRO WIDTH_80
INSERT =WIDTH_80
DEFINE KEY GOLD CONT W AS "EXT WIDTH_132."
SET SCREEN 80
SET WRAP 79
^Z
!
!============================
!	Key Definitions
!
DEFINE KEY CONT B AS "(-W)."
DEFINE KEY CONT F AS "(+W)."
!
DEFINE KEY 10 AS "."
!
DEFINE KEY GOLD 12 AS "(-23V)."
DEFINE KEY GOLD 13 AS "(+23V)."
!
DEFINE KEY GOLD CONT B AS "EXT SET SEARCH BEGIN."
DEFINE KEY GOLD CONT E AS "EXT SET SEARCH END."
DEFINE KEY GOLD CONT I AS "(8C)."
DEFINE KEY GOLD CONT W AS "EXT WIDTH_132."
DEFINE KEY GOLD CONT Z AS "EXT EXIT."
!
DEFINE KEY GOLD . AS "I~~/\~~^Z -6C."
DEFINE KEY GOLD / AS "S%~~/\~~%%."
DEFINE KEY GOLD I AS "EXT INCLUDE ?'Include file: '."
DEFINE KEY GOLD M AS "EXT FIND =MAIN."
DEFINE KEY GOLD Q AS "QUIT/SAVE."
DEFINE KEY GOLD W AS "EXT WRITE ?'Writing file: ' SELECT."
DEFINE KEY GOLD X AS "EXT EXIT."
!
!! SET TAB 4
SET SEARCH END
SET MODE CHANGE
FIND =MAIN