Path: utzoo!mnetor!uunet!husc6!cmcl2!brl-adm!umd5!umbc3!rostamia
From: rostamia@umbc3.UMD.EDU (Dr. Rouben Rostamian )
Newsgroups: comp.os.vms
Subject: DEFINE/KEY
Message-ID: <676@umbc3.UMD.EDU>
Date: 3 Jan 88 18:41:22 GMT
Reply-To: rostamia@umbc3.UMD.EDU (Dr. Rouben Rostamian (MATH))
Organization: University of Maryland, Baltimore County
Lines: 32
Keywords: Define/key/terminate
Summary: Help needed

I would like to be able to redefine some typing keys on a LK201 (vt220,
that is) keyboard in a command procedure.  The DCL dictionary says that
you may define the keys on the numeric keypad, some of the function
keys, and the keys on the editing keypad with the exception of the
up-arrow and down-arrow keys.  

Now, some application progams do define the up-arrow and down-arrow keys
somehow, although not in DCL.

Questions:

1. Does anyone know how to define the up-arrow and down-arow keys in
   DCL?

2. Does anyone know how to define some of the typing keys in DCL? 
   For example, something equivalent to the silly definition 
   $ define/key/terminate pf1 "show users"
   with the typing key "A", for instance, substituted for pf1.

3. Does anyone know how to use INQUIRE or READ to enter only one
   character with one keystroke, without having to press Return?
   For example, 
   $ inquire/terminate char "Press any key"
   should assign char = "Q" if the Q key is pressed at the inquire
   prompt, without a need to type Return.  Of course, the example
   above will not work, because /terminate is not a valid qualifier
   for Inquire.

   Hints, comments, suggestions, and flames :-) are appreciated.  


   Rouben Rostamian