$ SET NOON
$! BUILD PCCPCP ON VMS IN COMPATIBILITY MODE
$! NOTE WE ASSUME NO OBJECT FILES EXIST ALREADY.
$! This is the template for the command file to build AnalytiCalc
$! for PDP11 running RSX11M or RSX11M+. It runs OK under VMS 3.7
$! and 4.2 but needs the RSX11M SYSLIB and TKB and has some site
$! dependencies here and in the ODL files it uses that may need
$! to be modified. They are relatively small however.
$!
$! THIS IS THE CLOSEST I CAN READILY DO UNDER VMS V3.7 TO BUILD
$! FOR PDP11. IT DOES FIT, USING AN RSX11M+ V2.0 VERSION OF SYSLIB
$! AND RSX VERSION OF F77 OTS. HOWEVER MY FCS IS THE NON-ANSI ONE
$! AND SMALL DIFFERENCES IN VERSIONS CAN DETERMINE WHETHER THINGS
$! FIT OR NOT. YOU MAY HAVE TO EDIT VKLUGPRM.FTN TO GET THINGS
$! TO FIT, OR TRY ADJUSTING STACK SIZE A LITTLE. THERE ARE TASK IMAGES
$! SUPPLIED WHICH CAN BE USED, TO SAVE YOURSELF WORK. IF YOU CAN DO
$! I/D SPACE AND USE FCSFSL, I ADVISE YOU TO FLATTEN THE OVERLAYS AND
$! USE THOSE FEATURES; THE PROGRAM CAN RUN LOTS FASTER IF YOU DO. I CANNOT
$! TEST SUCH FEATURES MYSELF AND MUST LEAVE SUCH MANIPULATIONS TO
$! OTHERS. SORRY FOR THE INCONVENIENCE...
$!  	GLENN EVERHART
$ COPY PVKLUGPRM.FOR VKLUGPRM.FTN
$ F4P AT=AT.FOR/NOTR/NOI4/NOF77
$ F4P BASCNG=BASCNG.FOR/NOTR/NOI4/NOF77
$ F4P BLOCK=BLOCK.FOR/NOTR/NOI4/NOF77
$ F4P CALBIN=CALBIN.FOR/NOTR/NOI4/NOF77
$ F4P CALC=CALC.FTN/NOTR/NOI4/NOF77/DE
$ F4P CALUN=CALUN.FOR/NOTR/NOI4/NOF77
$ F4P CMDMUN=CMDMUN.F40/NOTR/NOI4/NOF77
$ F4P CMND=CMND.FOR/NOTR/NOI4/NOF77
$ F4P CONTYP=CONTYP.FOR/NOTR/NOI4/NOF77
$ F4P DECLR=DECLR.FOR/NOTR/NOI4/NOF77
$! MAY NEED TO USE OLDER DSPSHT IF NEW IS TOO BIG
$! F4P DSPSHT=DSPSHT.FOR/NOTR/NOI4/NOF77
$ F4P DSPSHT=DSPSHT.F40/NOTR/NOI4/NOF77
$ F4P DTRFIN=DTRFIN/NOTR/NOI4/NOF77
$ F4P ERRCX=ERRCX.FOR/NOTR/NOI4/NOF77
$ F4P ERRMSG=ERRMSG.FOR/NOTR/NOI4/NOF77
$ F4P FLIP=FLIP.FOR/NOTR/NOI4/NOF77
$ F4P FRMEDT=FRMEDT.FOR/NOTR/NOI4/NOF77
$ F4P GETNNB=GETNNB.FOR/NOTR/NOI4/NOF77
$ F4P GMSUBS=GMSUBS.FOR/NOTR/NOI4/NOF77
$ F4P INDEX=INDEX.FOR/NOTR/NOI4/NOF77
$ F4P INPOST=INPOST.FOR/NOTR/NOI4/NOF77
$ F4P JULIAN=JULIAN.FOR/NOTR/NOI4/NOF77
$ F4P LIST=LIST.FOR/NOTR/NOI4/NOF77
$ F4P MDET=MDET.FOR/NOTR/NOI4/NOF77
$ F4P REFLECT=REFLECT.FOR/NOTR/NOI4/NOF77
$ F4P MOUT=MOUT.FOR/NOTR/NOI4/NOF77
$ F4P MTXEQU=MTXEQU.FOR/NOTR/NOI4/NOF77
$ F4P MULADD=MULADD.FOR/NOTR/NOI4/NOF77
$ F4P MULCON=MULCON.FOR/NOTR/NOI4/NOF77
$ F4P MULDIV=MULDIV.FOR/NOTR/NOI4/NOF77
$ F4P MULMUL=MULMUL.FOR/NOTR/NOI4/NOF77
$ F4P NEXTEL=NEXTEL.FTN/NOTR/NOI4/NOF77
$ F4P POSTVL=POSTVL.FOR/NOTR/NOI4/NOF77
$ F4P RECALC=RECALC.FOR/NOTR/NOI4/NOF77
$ F4P RND=RND.FOR/NOTR/NOF77/I4
$ F4P SLEND=SLEND.FOR/NOTR/NOI4/NOF77
$ F4P SPREDSHT=SPREDSHTP.PR1/NOTR/NOI4/NOF77/DE
$ F4P SPRINI=SPREDSHT.PR2/NOTR/NOF77/NOI4/DE
$ F4P STRCMP=STRCMP.FOR/NOTR/NOI4/NOF77
$! F4P TTYINI=TTYINI.FTN/NOTR/NOI4/NOF77
$ F4P GETTTL=GETTTL.FOR/NOTR/NOI4/NOF77
$ MAC TTYINI=TTYINI
$ PIP TTYINI.OBJ/AP=GETTTL.OBJ
$ DEL GETTTL.OBJ;*
$ F4P USRCMD=USRCMD.FTN/NOTR/NOI4/NOF77
$ F4P USRFCT=USRFCT.FOR/NOTR/NOI4/NOF77/DE
$! SELECT ONE OF THE FOLLOWING SCREEN SUPPORT ROUTINES
$ F4P UVT100=UVTAVO.FOR/NOTR/NOI4/NOF77
$!  UVT52.FOR
$!  UVTAVO.FOR
$!  UVTCS.FOR
$!  UVTDM.FOR
$!  UVTTV925.FOR
$!  UVT52.FOR
$! END OF SCREEN SUPPORT ROUTINES
$ F4P VAROUT=VAROUT.FOR/NOTR/NOI4/NOF77
$ F4P VARSCN=VARSCN.FOR/NOTR/NOI4/NOF77
$ F4P WRKFIL=WRKFIL.FIV/NOTR/NOI4/NOF77
$ F4P WSHEET=WSHEET.F40/NOTR/NOI4/NOF77
$ F4P XQTCMD=XQTCMD.FTN/NOTR/NOI4/NOF77
$ F4P ZERO=ZERO.FOR/NOTR/NOI4/NOF77
$ F4P ZNEG=ZNEG.FOR/NOTR/NOI4/NOF77
$ PIP ERRMSG.OBJ/AP=DTRFIN.OBJ
$! ENSURE DTRFIN DUMMY ROUTINE IS WHERE IT CAN BE ACCESSED FROM
$! XQTCMD PRIOR TO EXIT FROM SHEET. KEEP IT OUT OF ROOT TO
$! AVOID BLOWING 32K ADDRESS SPACE.
$!
$! NOTE: NOW RUN THROUGH LBRCRE.CMD TO MAKE NEEDED OBJECT LIBRARIES,
$! AND BUILD WITH PCCPDP.CMD OR PCCPRO.CMD FOR TASKBUILD.
$!  BE *** CAREFUL *** THAT YOU USE THE VERSION OF FCS THAT DOESN'T
$! SUPPORT ANSI MAGTAPE OR IT'LL FAIL.  ALSO, THE BUILD ISN'T YET
$! TESTED WITH RECALC.FOR. IF IT'S TOO BIG, USE RECALC.FFF INSTEAD
$! WHICH IS KNOWN TO WORK.