.; .; VDXASM.CMD .; .; Assembles the VD: source files. Called by VDXGEN.CMD .; .; .ENABLE SUBSTITUTION .ENABLE GLOBAL .; .; .SETN EXSTAT 1 ! Assume success .; .; MAC AVD,AVD/-SP=LB:[1,1]EXEMC/ML,'$RSXMC'RSXMC/PA:1,'$DEV''$UIC'VDPRE,AVD .IF NE 1 .GOTO ERROR .; .; MAC DVD,DVD/-SP=LB:[1,1]EXEMC/ML,'$RSXMC'RSXMC/PA:1,'$DEV''$UIC'VDPRE,DVD .IF NE 1 .GOTO ERROR .; .; MAC SVD,SVD/-SP=LB:[1,1]EXEMC/ML,'$RSXMC'RSXMC/PA:1,'$DEV''$UIC'VDPRE,SVD .IF NE 1 .GOTO ERROR .; .; Because the next 2 assemblies require MAC command lines longer than .; 80 characters if issued in the form 'MAC ', command lines .; in indirect files are used, thus saving 4 characters (MAC ). .OPEN VDDRVASM.CMD .DATA VDDRV,VDDRV/-SP=LB:[1,1]EXEMC/ML,'$RSXMC'RSXMC/PA:1,'$DEV''$UIC'VDPRE,VDDRV .CLOSE MAC @VDDRVASM .IF NE 1 .GOTO ERROR .; .; .OPEN VDTBLASM.CMD .DATA VDTBL,VDTBL/-SP=LB:[1,1]EXEMC/ML,'$RSXMC'RSXMC/PA:1,'$DEV''$UIC'VDPRE,VDTBL .CLOSE MAC @VDTBLASM .IF NE 1 .GOTO ERROR .; .; .; Exit .EXIT: .EXIT EXSTAT .; .; If error someplace .ERROR: .SETN EXSTAT 2 .GOTO EXIT