Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/dakac.ctl
There are no other files named dakac.ctl in the archive.
!**** DAKAC.CTL
@DEFINE DSK DSK:,<KIRCHOFF>
!***** ASSEMBLE PROGRAM
MAC::@R MACRO
*DAKAC@
@IF (ERROR) @GOTO BLO
LNK::@R LINK
*DAKAC.SAV/SAV=DAKAC/NOSYM/NOINIT/GO
@IF (ERROR) @GOTO BLO
!**** RUN PROGRAM SIMULATION
SIM::@RUN DIAMON.SAV
*
*KASIM
*Y
*0
*1
*32
*F
*0
*DAKAC/P
@IF (ERROR) @GOTO BLO
CRF::@R CREF
*DSK:DAKAC.LST_DAKAC
@IF (ERROR) @GOTO BLO
DC2::@RUN DECDOC.SAV
*DAKAC/S=DAKAC.TXT,DAKAC.HST,DAKAC.LST,DAKAC.SIM
@IF (ERROR) @GOTO BLO
DEL::@DEL DAKAC.LST,DAKAC.REL,DAKAC.SIM
@IF (ERROR) @GOTO BLO
@GOTO LOG
!
BLO::@R PIP
*DAKAC.BLO=NUL:FOO
LOG::