.enable substitution
.sets cli <cli>
.if cli ne "DCL" set /dcl=ti:
.sets uic <uic>
.parse uic "," group prog
.ifdf $yn .goto 100$
.ask $yn Do you want to link the debugger into the ACP
.100$:
ass sy: in:
ass sy: ou:
ass sy: li:
ass sy: mp:
mcr set /uic=[1,24]
.ifnins ...pip ins $pip
.ifnins ...tkb ins $tkb
del sy:'group',14]odsacpbld.cmd;*,lb:[1,54]odsacp.tsk;*,mp:'group',34]*.map;*
.sets debug ""
.ift $yn .sets debug "/da"
.open odsacpbld.cmd
.enable data
;	odsacpBLD.CMD
;
; Build entirely memory resident F11ACP (odsacp) for RSX11M/M+.
; This version does not have any overlays nor does it require
; special executive support such as memory management directives.
;
; Since this thing is over 8K words minimum it is not supported
; on unmapped system (obviously).
;
; ON AN RSX-11M-PLUS SYSTEM
; Created by SYSGEN3.CMD VERSION 03.01
;
;	Name - odsacp
;
lb:[1,54]odsacp/-IP/AC/MM/CP/-FP/-MU/-PM'debug',MP:'group',34]odsacp/SP/MA/cr=
;
ou:'group',24]ods/LB:F11ACP:F11CM:F11BUF:SMCOM:DISPAT:DIRBUF:FIOSUB
ou:'group',24]ods/LB:ARWVB:INIT:MXQIO:SMRVB
ou:'group',24]ods/LB:ALLOC:BLXIO:CKSUM:CLACC:CLDAC:GTFID
ou:'group',24]ods/LB:ATCTL:DATIM:RATCM:RWATT:WATCM
ou:'group',24]ods/LB:CLATT:CLDIR:GTMAP:gtrtp
ou:'group',24]ods/LB:DARITH:DRGET:DELCK
ou:'group',24]ods/LB:INFCB:MPHDR:MPVBN:NXHDR:PROCK:RDHDR:RLEAS
ou:'group',24]ods/LB:RLFCB:RW1LB:SCFAC:SCFCB:WITRN:WRHDR:WTRN1
ou:'group',24]ods/LB:DRINI:DRPAC:DRSEF:DRVLB:DWPND:FDRMV
ou:'group',24]ods/LB:LOCAT:MATNAM:SMNXB:WACCK
ou:'group',24]ods/LB:ACCESS:DEACC
ou:'group',24]ods/LB:CLNUP:CLFCB:CLCOM
ou:'group',24]ods/LB:RDATT:RWVB:RWVBL
ou:'group',24]ods/LB:FNDNM:DREX:DRACC:INWIN
ou:'group',24]ods/LB:DRCPY:DMOUNT
ou:'group',24]ods/LB:CNTRL:MOUNT:MOUNT0:MOUNT1:MOUNT2
ou:'group',24]ods/LB:CDTTA:CATDT:MONTB:DIVD:DIVQ
LB:[1,1]EXELIB/LB
lb:[1,54]RSX11M.STB/SS
/
;
TASK=odsACP
STACK=50
UNITS=1
UIC=[1,1]
PRI=149
PAR=GEN:0:0
IDENT=06.99
TSKV=.SSTVC:7
;
; ===================================================
;              NOTE BENE
; PSECTs below $$BUF3 must map completely below 160000
;
; ===================================================
; Allocate a separate buffer for index file bitmap.
;
; If you've memory to burn, enable the EXTSCT=$$BUF0:1006.
;
EXTSCT=$$BUF0:1006
;
; Allocate a separate buffer for file headers.
;
; Always enable the EXTSCT=$$BUF1:1006 if possible.
;
EXTSCT=$$BUF1:1006
;
; Allocate private FCB pool space.
;
; The value of the EXTSCT determine the size of the
; internal FCB pool which doesn't help performance
; but cuts down on the use of system pool.  The optimum
; size is the size of an FCB (about 54(8)) times the
; number of files open plus preaccessed directories (LRU).
;
EXTSCT=$$AFR1:3300
;
; Extend the directory buffer.
;
; The EXTSCT=$$BUF3 determines the number of additional
; blocks of directory buffer to allocate.  Determine the
; size of the most frequently used directories and then
; extend $$BUF3 by that value minus one times the block
; size (1000(8)).
;
EXTSCT=$$BUF3:2000
;
/
.close
link @[1,24]odsacpbld
mcr ins $odsacp
.ift $yn mcr rea odsacp 3 ti:
.ift $yn mcr rea odsacp 2 ti:
mcr set /uic='uic'
.exit:
