From: r0mill01@ulkyvx.louisville.edu
Newsgroups: comp.edu.composition
Subject: (Fwd: *C&CD*) Making Vax Edit easier (13)
Date: 14 Oct 92 10:30:44 GMT
Organization: University of Louisville


Date:         Wed, 14 Oct 1992 04:54:38 EDT
From:         IN%"RobertRoyar@Delphi.com" Robert Royar (C&CD Moderator)
Message-id:   <1992Oct14.045438.1.Grendel.Lair@Cratylus>
Subject:      Making Vax Edit easier (13)
Reply-to:     IN%"R0MILL01@ULKYVX.LOUISVILLE.EDU"  C&CD
Organization: Cratylus Educational Software

Liz Hamp-Lyons laments
>Date: Tue, 13 Oct 1992 22:08:32 -0600
>From: Liz Hamp-Lyons <LHAMPLYONS@cudnvr.denver.colorado.edu>
>Message-id: <01GPX3CSMUU89AMETQ@ulkyvx.bitnet>
>Subject: Pegasus Mail (*MBU*)

>it can do must be better than
>the antiquated "edit" system I use on this Vax account.
>Thnaks
>Liz Hamp-Lyons

If you are running VMS and you have a true vt100,102,200,or 300 series
terminal or emulator for your PC, then you have a few options you may not
know to make your mail creation chores easier.
   1.  Set your terminal type and editing characteristics in your
       sys$login:login.com file to allow full recall and line editing
   2.  Use the /edit qualifier with the MAIL> send command.
   3.  Use EVE (or TPU) as your default editor.
   4.  Use an EDT statrtup file (name it sys$login:edtini.edt)
       to define special editing commands and get full-screen mode.
   5.  (If on a PC emulator) define your keypad and function keys
       on the micro side to match the commands you want.

   1.  Set your terminal type and editing characteristics in your
       sys$login:login.com file to allow full recall and line editing

       Include this command in your (user) root directory login procedure
       file:
        $set terminal /inquire/line_editing/page=24/insert/edit_mode
       The paging qualifier may not be necessary, and your PC terminal
       emulator needs to know how to respond correctly to the /inquire
       command the Vax will send it--most VT100 or better emulators do
       this.  You will have full insert and recall editing at the VMS
       command line.

   2.  Use the /edit qualifier with the MAIL> send command.

       No matter what editor choices you make, you must specify the /edit
       qualifier to get screen editing--line editing will be set based on
       the values supplied in the above `set term...' statement.

   3.  Use EVE (or TPU) as your default editor.

       EVE is a user-configurable programmable editor which can be set up at
       the start of your session to be the default editor for your mail use.
       In your sys$login:login.com file add the line
        $ define mail$edit CALLABLE_TPU
       When you begin mail, use the /edit qualifier (ie `$mail/edit') or
       use the /edit qualifier on the same line as you type the `send'
       command from within mail.  EVE will not run on any terminal "lower"
       than the VT100, so if you're still using a VT52, you'll have to
       bypass this editor.  By the way `CALLABLE_TPU' may be replaced by
       the name of a Digital Command Language (DCL) procedure file (such as
       MAILEDIT.COM) should you wish to use yet another editor for
       mailing--one that is not part of the standard system package.  To get
       at EVE via DCL (the `$' prompt), use the command
        $ edit/tpu [name_of_file_to_edit]

   4.  Use an EDT statrtup file (name it sys$login:edtini.edt)
       to define special editing commands and get full-screen mode.

       EDT can be initialized to emulate a vast array of editors.  Attached
       to the End of this document is a sample star-up file some of us you
       for EDT.  When EDT runs, it searches the sys$login directory (again,
       your personal root directory) for a file named
        EDTINI.EDT
       It assumes that file contains valid definitions and commands.  You
       need to know your GOLD Key on your emulator.  MS-Kermit 3.11 (the
       best (free) Vax front end around for DOS) uses the F1 key for GOLD in
       its default key definition scripts, but you can change that. The
       VT102 emulator I use on my Atari simply maps the VT102 keyboard
       directly onto the Atari keyboard, so GOLD is in the same place on my
       ST as it is on the VT102 keyboard in the office.

   5.  (If on a PC emulator) define your keypad and function keys
       on the micro side to match the commands you want.

       My keypad and function keys are defined to match the same definitions
       that Digital assigns to the default VT100/EDT package (i.e. the
       Numeric keypad `DOT' is select and Numeric keypad `SIX' is cut.  But
       I could have defined the keys to match those in my micro editor (e.g.
       the `DOT' could be FORWARD-DELETE-CHARACTER).

Again for any of you on a Vax and using an MS-DOS (or Windows) PC to
connect, I highly recommend the Columbia University's MS-Kermit program.
Not only do you get the full Kermit protocol (with server capabilities) but
the VT102, VT300 emulation can even handle the ALL-IN-ONE menu system
garbage, and it can handle Techtonix graphic-terminal commands.  The
software is free, but you can also get it bundled in a book from Digital
press:
   Gianone, Christine M. (1992) _Using MS-DOS Kermit: Connecting your
     PC to the electronic world_ (second edition). Burlington, MA: Digital
     Press (order number EY-H893E-DP; 1-800-DIGITAL for ordering).

Another useful book if anyones would like to learn more about the power of
DCL is
   Anagnostopoulos, Paul C. (1989) _VAX/VMS: Writing real programs in DCL_.
     Burlington, MA: Digital Press (order number EY-C168E-DP; 1-800-DIGITAL
     for ordering).

==cut here======== sample == sys$login:edtini.edt== file=====
! Set-up:
!
! Suppress the bell or buzzer that signals errors
SET QUIET
! Define delimiters for the word entity
SET ENTITY WORD '  .,?!;:[]()<>*-+=/\'
! Define delimiters for the sentence entity
SET ENTITY SENTENCE '. ?!'
! Suppress line numbers in line mode
SET NONUMBERS
! Wrap full words to the next line at 75 characters
SET WRAP 75
!
! Key Definitions:
!
! Change to the specified buffer
DEFINE KEY GOLD B AS "EXT CHANGE =?'CHANGE TO BUFFER: '."
! Change to the last current line in the previous buffer
DEFINE KEY GOLD C AS "EXT CHANGE LAST."
! Change the case of the current word
DEFINE KEY GOLD D AS "+CHGCW."
! Locate the last current line in the MAIN buffer
DEFINE KEY GOLD G AS "EXT FIND=MAIN.."
! Prompt for a buffer name and then locate the last current line
! in the specified buffer
DEFINE KEY GOLD H AS "EXT FIND=?*'BUFFER:  '.."
! Exit file
DEFINE KEY GOLD E AS "EXT EXIT."
! Fill the text of the current paragraph to the right margin
DEFINE KEY GOLD P AS "FILLPAR."
! Quit file
DEFINE KEY GOLD Q AS "EXT QUIT."
! Shift screen left 1 tab (8 columns)
DEFINE KEY GOLD L AS "SHL."
! Shift screen right 1 tab (8 columns)
DEFINE KEY GOLD R AS "SHR."
! Replace all occurrences of the specified string in the
! current buffer with the specified string
DEFINE KEY GOLD S AS "EXT S/?*'REPLACE: '/?*'   WITH: '/WHOLE."
! Transpose the two characters to the left of the cursor
DEFINE KEY GOLD T AS "BACK C DC ADV C UNDC."
! Write the current buffer to the specified file
DEFINE KEY GOLD W AS "EXT WRITE ?*'WRITE TO FILE: '."
! Include the specified file at the current line
DEFINE KEY GOLD X AS "EXT INCLUDE ?*'INCLUDE FILE: '."
! Include the specified file at the beginning of
! the specified buffer
DEFINE KEY GOLD Y AS "EXT INCLUDE ?*'INCLUDE FILE: ' =?*' BUFFER: ';FIND BEGIN."
!
! Select editing mode:
SET MODE CHANGE

 -- Robert Royar (RobertRoyar@Delphi.com) New York Institute of Technology
    "Do not search for the truth. Simply cease to cherish opinion"
                                           - Sengstan, Third Zen Patriarch

------------------------------