SET KEYPAD
SET MODE CHANGE
DEFINE KEY CONTROL Z AS ""
DEFINE KEY GOLD 7 AS "EXT ?*'Command: '."
DEFINE KEY GOLD 14 AS "SHR."
DEFINE KEY GOLD 15 AS "SHL."
DEFINE KEY GOLD H AS "EXT SET HELP HELPLIB ; HELP ?*'System HELP Topic: '; SET HELP EDTHELP."
DEFINE KEY GOLD V AS "XLATEVPW>^Z."
DEFINE KEY FUNCTION 23 AS "27ASC."
DEFINE KEY FUNCTION 33 AS "EXT SET HELP HELPLIB ; HELP ?*'System HELP Topic: '; SET HELP EDTHELP."
DEFINE KEY FUNCTION 34 AS "XLATEVPW>^Z."
DEFINE KEY GOLD CONTROL D AS "XLATE?*'DCL to CLIPBOARD command: '^Z."
SET COMMAND SYS$LOGIN:EDTINI.EDT