.SETF F4PRES
.SETF FCSRES
MAC DSKUPD.OBJ;1=DSKUPD
F4P DSKACNT.OBJ;1=DSKACNT/TR:NONE
.SETS LIBOP ";"
.TESTFILE LB:[1,1]F4PRES.STB
.IF <FILERR> EQ 1 .SETT F4PRES
.TESTFILE LB:[1,1]FCSRES.STB
.IF <FILERR> EQ 1 .SETT FCSRES
.IFT F4PRES  .SETS RESLIB "LIBR=F4PRES:RO"
.IFT FCSRES  .SETS RESLIB "LIBR=FCSRES:RO"
.IFT F4PRES .IFT FCSRES .SETS RESLIB "CLSTR=F4PRES,FCSRES:RO"
.OPEN DSKACNT.BLD;1
.ENABLE DATA
DSKACNT.TSK;1/CP/MM/FP=DSKACNT,LB:[1,1]F4POTS/LB
/
'RESLIB'
//
.DISABLE DATA
.CLOSE
TKB @DSKACNT.BLD
PIP DSKACNT.OBJ;1/DE,DSKACNT.BLD;1
PIP DSKUPD.MAC/PU,DSKACNT.FTN
