Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/diamon.ctl
There are no other files named diamon.ctl in the archive.
!**** DIAMON.CTL
!***** ASSEMBLE PROGRAM
MAC::@R MACRO
*DIAMON@
@IF (ERROR) @GOTO BLO
LNK::@RUN DLINK
*DIAMON.SAV/SAV=DIAMON/NOSYM/NOINIT/GO
@IF (ERROR) @GOTO BLO
@GET DIAMON.SAV
@SAVE DIAMON.EXE
@IF (ERROR) @GOTO BLO
CRF::@R CREF
*DSK:DIAMON.LST=DIAMON
@IF (ERROR) @GOTO BLO
DC1::@RUN DECDOC.SAV
*DIAMON
@IF (ERROR) @GOTO BLO
DC2::@RUN DECDOC.SAV
*DIAMON/S=DIAMON.TXT,DIAMON.HST,DIAMON.DOC,DIAMON.LST
@IF (ERROR) @GOTO BLO
DEL::@DEL DIAMON.LST,DIAMON.DOC,DIAMON.REL
@IF (ERROR) @GOTO BLO
CNV::@RUN CONVRT.SAV
*DIAMON
@IF (ERROR) @GOTO BLO
@GOTO LOG
!
BLO::@R PIP
*DIAMON.BLO=NUL:FOO
LOG::