.ENABLE SUBSTITUTION .ENABLE GLOBAL .ASKS F4 WHAT IS YOUR F77 COMPILER INSTALLED AS (F4P?) .;COMMAND FILE TO BUILD PORTACALC ON PDP11 (RSX11M+) .; GLENN EVERHART, 12/21/82 ; THIS IS THE LESS OVERLAIN OF THE 2 OVERLAY FILES. PIP VKLUGPRM.FTN/NV=OVKLUGPRM.FTN .OPEN PORTACALC.BLD .DATA PCC/FP/CP=OPCC/MP .SETS NM "AT" .GOSUB WORK .SETS NM "BASCNG" .GOSUB WORK .SETS NM "BLOCK" .GOSUB WORK .SETS NM "CALBIN" .GOSUB WORK .SETS NM "CMDMUN" .GOSUB WORK .SETS NM "TTYINI" .GOSUB WORK .SETS NM "CALC" .GOSUB WORK .SETS NM "CALUN" .GOSUB WORK .SETS NM "CMND" .GOSUB WORK .SETS NM "CONTYP" .GOSUB WORK .SETS NM "DECLR" .GOSUB WORK .SETS NM "DSPSHT" .GOSUB WORK .SETS NM "ERRCX" .GOSUB WORK .SETS NM "ERRMSG" .GOSUB WORK .SETS NM "FLIP" .GOSUB WORK .SETS NM "GETNNB" .GOSUB WORK .SETS NM "INPOST" .GOSUB WORK .SETS NM "LIST" .GOSUB WORK .SETS NM "MOUT" .GOSUB WORK .SETS NM "MULADD" .GOSUB WORK .SETS NM "MULCON" .GOSUB WORK .SETS NM "MULDIV" .GOSUB WORK .SETS NM "MULMUL" .GOSUB WORK .SETS NM "NEXTEL" .GOSUB WORK .SETS NM "POSTVL" .GOSUB WORK .SETS NM "RECALC" .GOSUB WORK .SETS NM "SLEND" .GOSUB WORK .SETS NM "OSPREDSHT" .GOSUB WORK .SETS NM "STRCMP" .GOSUB WORK .SETS NM "INDEX" .GOSUB WORK .SETS NM "UVT100" .GOSUB WORK .SETS NM "VAROUT" .GOSUB WORK .SETS NM "VARSCN" .GOSUB WORK .SETS NM "OXQTCMD" .GOSUB WORK .SETS NM "ZERO" .GOSUB WORK .SETS NM "ZNEG" .GOSUB WORK .; NOTE IF YOUR FORTRAN OTS IS SOMEWHERE ELSE OR YOU .; DON'T USE F4P/F77, YOU'LL HAVE TO EDIT THIS. .DATA TASK=...PCC .DATA UNITS=10 .DATA ASG=TI:1:5:6:8 .DATA MAXBUF=512 ;.DATA SUPLIB=FCSFSL:SV .DATA // .CLOSE SRD /OV/DE TKB @PORTACALC.BLD .GOTO DONE .WORK: 'F4' 'NM'='NM'/NOTR/NOF77 TRU 'NM'.OBJ;* .RETURN .DONE: