Trailing-Edge
-
PDP-10 Archives
-
ks10_8080_microcode
-
reles2.ctl
There are no other files named reles2.ctl in the archive.
@CONNECT Z:<1PETTY>
@;NOW MAKE A FIRST PASS ASSEMBLY OF THE CODE
@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,END.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
CHKSUM::
@RU CHKSUM
@;NOW ASSEMBLE WITH THIS CHECKSUM INCLUDED
@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,END.M80
@;ADD ON THE 8080 REGISTER DESCRIPTIONS
@APPEND IOPLT.REG KNS10.PNT
@;NOW GENERATE BIN FILE IN PROPER FORMAT FOR BLASTER PAPER TAPE
DATAIO::
@RU DATAIO
ANA::
@RU ANA
PUN::
@VD KNS10.PNT,FOR21.DAT,DATAIO.BIN,*.M80,CREF.RES