______________________________________________________________________________

				USR

      Module RUNSUB runs any program called USER.EXE from a command file, 
 USER.COM located IN THE AREA where MIIPS is being run.  See Volume 3 - 
 "PROGRAMING AND SETTING UP" for a detailed description of how to set 
 up this process.

	WARNING!  If ypu do a C while in this routine
	ALL IS LOST!  - to recover - do several  Ys
	then several LOGOUTs and then LOGIN again.

 ______________________________________________________________________

	STRUCTURE OF THE UTEST.COM FILE:
 $ ON ERROR THEN GOTO END
 $ ON CONTROL_C THEN GOTO END
 $ ON CONTROL_Y THEN GOTO END
 $ IF P1.EQS."" THEN INQUIRE P1 SUBROUTINE
 $ SET VERIFY
 $ COPY 'P1.FOR UTEST.FOR
 $ EDIT UTEST.FOR
 @UTEST.CMD
 $ FOR/DEBUG/NOOPT/CHECK=ALL UTEST
 $ @ULINK.COM UTEST 'P2
 $ SET VERIFY
 $ DELETE UTEST.FOR.*,UTEST.OBJ.*
 $ REN UTEST.EXE USER.EXE
 $ END:
 $ SET NOVERIFY


	STRUCTURE OF THE UTEST.CMD FILE:
			! The ^ is used to represent an escape character
			  See VAX VMS VOL 3A "TEXT EDITING.." p 5-57
			  for an example of how to enter escape
			  characters into a file.
 FSUBROUTINE 
           ^       
 D.
 I.
	PROGRAM USER
 FENTRY 			! Only necessayr if you have
        ^			entry points.
 D.
 SRETURN  ^/1:*/*
        ^^
 E

	STRUCTURE OF THE USER.COM FILE:
 $ ASSIGN PLOT.PLT FOR079
 $ ASSIGN SYS$OUTPUT FOR078
 $ ASSIGN SYS$INPUT FOR075
 $ ASSIGN RASTER.PLT FOR076
 $ ASSIGN VECT.RPL FOR053
 $ ASSIGN TTA6: TEKTRONIX
 $ ASSIGN USER.LOG FOR007
 $ ASSIGN USR.SVE FOR049
 $ ASSIGN SYS$COMMAND: SYS$INPUT:
 $ RUN/NODEB USER.EXE
 $ LOGOUT
 ______________________________________________________________________________