$JOB CREATION OF FGBG OPTION TAPE (ANY MONITOR)
$MSG MOUNT COS 300 SOURCE TAPE #4 ON DRIVE 0
.COPY DSK:<DTA0:FGBG?.PA,FORMC.PA,OVERLA.PA
$MSG DISMOUNT SOURCE TAPE, MOUNT BLANK TAPE ON DRIVE 0
.R ABSLDR
*DSK:ZEROES,MONITR$
.START 200
.DEL DTA0:COMP.SV
.DA 7/25/71
.R ABSLDR
*DSK:ZEROES,MONITR,PIP$
.SAVE DTA0:PIP 0-4177,10000-10377;200
.R PAL8
*DSK:FORMC_FORMC
.R ABSLDR
*DSK:ZEROES,MONITR,FORMC$
.SAVE DTA0:FORMC 0-4377;200
.R PAL8
*DSK:FGBG<DSK:FGBG1,FGBG2,FGBG3,FGBG4/K
.R ABSLDR
*DSK:ZEROES,MONITR,FGBG$
.SAVE DTA0:FGBG 0-4377,10000-17577,20000-27777;200
.R PAL8
*DSK:OVERLA<DSK:OVERLA,FGBG1,FGBG2,FGBG3,FGBG4/K
.R ABSLDR
*DSK:ZEROES,OVERLA$
.SAVE DTA0:OVERLA 0-2777,10000-16777;7600
$END CREATION FGBG OPTION TAPE