Path: utzoo!mnetor!uunet!husc6!linus!philabs!spies!arubin
From: arubin@spies.UUCP (Andy Rubin)
Newsgroups: comp.os.vms
Subject: Re: keyboard interrupt
Message-ID: <174@spies.UUCP>
Date: 3 Feb 88 14:36:51 GMT
References: <190@umn-d-ub.D.UMN.EDU> <161@amelia.nas.nasa.gov>
Organization: Spies in the wire PUBLIC ACCESS UNIX, NY
Lines: 30
Summary: Howto:  Single character input using VMS routines

In article <161@amelia.nas.nasa.gov>, woo@amelia.nas.nasa.gov (Alex Woo) writes:
> 
> Can someone send me a VMS routine (preferably PASCAL) which
> acts like the BASIC routine INKEY?  I just want to know if
> a key as been depressed, and what character or arrow or
> function key?
> 
> Alex Woo
> 
> P.S.  Don't blame me for this, I'm asking for a friend.

You could use the SMG routines, particularly, after you've defined
the window, and pasted it, you could use:

SMG$Read_KeyStroke ( KB_ID, ASCII_KEY_VALUE )

on a DEC terminal, UP == 274, DOWN == 275, LEFT == 276, RIGHT == 277
SELECT == 314, DO == 296, HELP == 295, PREV == 315, NEXT == 316
REMOVE == 313, FIND == 311

If you need more info on setting up a pasteboard and virtual display, then
let me know - I'll respond via mail so as not to clutter up this group...

                                        - Andy

-- 
Spies in the Wire PUBLIC ACCESS UNIX  |  {allegra|ames|cmcl2|ihnp4|linus|uunet|
Mount Kisco, New York                 |     rutgers|gatech|mcnc|cbosgd|sdcsvax|
                                      |            decvax}!philabs!spies!arubin
(914) 666-3997 300/1200 8N1           |                     <arubin@spies.UUCP>