.ENABLE SUBSTITUTION
;
;	VIRTUAL DISK PACKAGE
;
; THIS COMMAND FILE REQUIRES THE FOLLOWING DEVICE ASSIGNMENTS:
;
;	SY0:	SOURCE DISK
;	LB0:	SYSTEM LIBRARY DISK
;	TG0:	TARGET DISK
;	LI0:	LISTING DEVICE
;
; NOTE, TG0: IS USED TO SUPPLY THE EXECTUIVE CONFIGURATION AND
; SYMBOL TABLE FILE. THE RESULTING TASKS AND DRIVERS ARE PLACED
; ARE LEFT IN THIS UIC.
;
; IF THE CURRENT DEVICE ASSIGNMENTS ARE CORRECT, ANSWER THE NEXT
; QUESTION 'YES'. IF 'NO', THE COMMAND FILE WILL PAUSE WHILE YOU
; MAKE THE ASSIGNMENTS. THE CURRENT ASSIGNMENTS ARE SHOWN BELOW:
;
ASN
;
.ASK FLAG ASSIGNMENTS CORRECT
.IFT FLAG .GOTO 100
.PAUSE
.100: ;
; ASSEMBLE VIRTUAL DISK SOURCES.
;
.SETS MACSW "/-SP/CR"
;
MAC AVD,LI0:AVD'MACSW'=LB0:[1,1]EXEMC/ML,SY0:'<UIC>'VDPRE,AVD
MAC DVD,LI0:DVD'MACSW'=LB0:[1,1]EXEMC/ML,SY0:'<UIC>'VDPRE,DVD
MAC VDDRV,LI0:VDDRV'MACSW'=LB0:[1,1]EXEMC/ML,RSXMC/PA:1,SY0:'<UIC>'VDPRE,VDDRV
MAC VDTAB,LI0:VDTAB'MACSW'=LB0:[1,1]EXEMC/ML,RSXMC/PA:1,SY0:'<UIC>'VDPRE,VDTAB
;
; BUILD VIRTUAL DISK TASKS AND DRIVER.
;
.SETS TKBSW "/-SP/CR"
.;
.OPEN VDDRV.TKB
.DATA VDDRV/-MM/-HD,VDDRV'TKBSW',VDDRV=VDDRV,VDTAB
.DATA [1,54]RSX11M.STB/SS
.DATA [1,1]EXELIB/LB
.DATA /
.DATA STACK=0
.DATA PAR=DRVPAR:120000:14000
.DATA //
.CLOSE
TKB @VDDRV.TKB
.OPEN AVD.TKB
.DATA AVD/MM/CP/-FP/PR:5,LI0:AVD'TKBSW'=AVD,TG0:[1,54]RSX11M.STB/SS
.DATA /
.DATA UNITS=3
.DATA ASG=TI:2
.DATA ASG=SY:3
.DATA TASK=...AVD
.DATA PRI=100
.DATA PAR=GEN
.DATA /
.CLOSE
TKB @AVD.TKB
.OPEN DVD.TKB
.DATA DVD/MM/CP/-FP/PR:5,LI0:DVD'TKBSW'=DVD,TG0:[1,54]RSX11M.STB/SS
.DATA /
.DATA UNITS=3
.DATA ASG=TI:2
.DATA ASG=SY:3
.DATA TASK=...DVD
.DATA PRI=100
.DATA PAR=GEN
.DATA /
.CLOSE
TKB @DVD.TKB
;
; ALL DONE, EXIT.
;