[mod.computers.vax] "Inquire/for 10 seconds only"

stokes%cmc.cdn%ubc.CSNET@CSNET-RELAY.ARPA.UUCP (07/30/86)

I would like to add a line or two to our systartup.com that
would ask the user if he wanted a test boot only.  If he 
answered yes, logins would be set to zero and no "system up"
announcement would be made.  If no answer was typed in, the
question would time-out in a given amount of time like 10
seconds for example.  Anybody know a quick and dirty way to
do this ??  I.E.  INQUIRE/TIMEOUT=00:10 ??

Peter 
Canadian Microelectronics Corporation
Queens University
Kingston, Ontario

stokes@cmc.cdn
stokes@qucdncmc.bitnet

DCOTTLER%rca.com@CSNET-RELAY.ARPA.UUCP (07/30/86)

> Anybody know a quick and dirty way to
> do this ??  I.E.  INQUIRE/TIMEOUT=00:10 ??

Try:

$ READ /TIME_OUT=10 /PROMPT="someprompt" opa0: p1
$ P1 = F$EDIT(P1,"TRIM,UPCASE")

					- Dan Cottler, <dcottler@rca.com>
					  RCA Advanced Technology Labs

WOLF@BBNG (Jerry Wolf) (07/30/86)

Use READ/PROMPT="promptstring"/TIMEOUT=n SYS$COMMAND.  This also has
the effect (advantage?) of NOT interpreting the typed-in line, such
as CAPITALIZING, ignoring anyhting after a "!", and other DCL-isms.
Cheers,
  Jerry Wolf
  BBN Laboratories

sci@KESTREL.ARPA.UUCP (07/31/86)

	A  Quick and Dirty that I use is a FORTRAN program that does a
		timed QIO.

The Prompt that It issues comes from the DCL via the FOREIGN command line
and the user's response is stored in a symbol before the program exits

If you want the source code, give me a ring.
		Mike Liveright, {415} 494-2233

p.s. It's about 70 lines of code + 70 of comments.