Trailing-Edge
-
PDP-10 Archives
-
ks10_8080_microcode
-
m80.ctl
There are no other files named m80.ctl in the archive.
@DEL *.LOG
;
; First separate KS.MAS file into the separate files
;
@DEL *.M80
@TV
*;ESEP.TEC
@
;
; Now make a first pass assembly of the code
;
CR1::
@GET CROSS
@I VER
@START
*FOR21.DAT/PTP,/M80/EQ:PASS1:SCECOD= CONDEF.M80,CHKSMS.M80,HCORE.M80,CMDS.M80,SUBRTN.M80,DR.M80,MSG.M80,STORE.M80
@IF (ERROR) @GOTO PUN
;
; Now that first pass is done, we can run our special program that
; computes a checksum from the "FOR21.DAT" just created, and outputs
; this special as a symbol representing the checksum for each RAM
; chip in the 8080 CSL.
;
@RU CHKSUM
;
; Now assemble with this checksum included
;
CR2::
@RU CROSS
*FOR20.DAT/I,KNS10.PNT/M80/OCT/CRF/EQ:PASS2:SCECOD= CONDEF.M80,CHKSMS.M80,HCORE.M80,CMDS.M80,SUBRTN.M80,DR.M80,MSG.M80,STORE.M80
CR3::
@RU CROSS
*FOR21.DAT/PTP,KNS10.PNT/M80/OCT/CRF/EQ:PASS2:SCECOD= CONDEF.M80,CHKSMS.M80,HCORE.M80,CMDS.M80,SUBRTN.M80,DR.M80,MSG.M80,STORE.M80
CR4::
@RU CROSS
*FOR22.DAT,KNS10.PNT/M80/OCT/CRF/EQ:PASS2:SCECOD= CONDEF.M80,CHKSMS.M80,HCORE.M80,CMDS.M80,SUBRTN.M80,DR.M80,MSG.M80,STORE.M80
;
; Add on the 8080 Register Descriptions.
;
@APPEND IOPLT.REG KNS10.PNT
;
; Now generate BIN file in proper format for blaster paper tape.
;
@RU DATAIO
@DEL *.M80
@VDIR KNS10.PNT,FOR21.DAT,DATAIO.BIN,KS.MAS,CREF.RES