Trailing-Edge
-
PDP-10 Archives
-
klad_sources
-
klad.sources/dbkdct.mac
There are no other files named dbkdct.mac in the archive.
;*MAINDEC-10-DBKDC
DECVER=2
MCNVER=0
XLIST
DEFINE NAME(MCNVER,DECVER),<
TITLE DBKDC DECSYSTEM10 KI10 IOT/PI RELIABILITY TEST, VER MCNVER,DECVER>
LIST
LALL
NAME \MCNVER,\DECVER
;*COPYRIGHT 1972,1976
;*DIGITAL EQUIPMENT CORP.
;*MARLBORO, MASS. 01752
;*JOHN R. KIRCHOFF
;*RICHARD P. MALISKA
LOC 137
MCNVER,DECVER
NOSYM
SUBTTL SUBROUTINE PACKAGE PARAMETERS
;*DEFINE SUBROUTINE PARAMETERS
KI10==1
EXCASB==1
PGMEND==1
DEBUG==100
MEMMAP==1
KLOLD==1
;*DEFINE SPECIAL PROGRAM PARAMETERS
SADR1=STARTC ;SPECIAL FEATURE START TO RETIME CLOCK
SADR2=BEGIN
SADR3=BEGIN
SADR4=BEGIN
SADR5=JRST BEGIN
SADR6=JRST BEGIN
SADR7=JRST BEGIN
SADR8=JRST BEGIN
SADR9=JRST BEGIN
SADR10=JRST BEGIN
SADR11=JRST BEGIN
PAREA0=0
PAREA1=123457,,715243
PAREA2=0
PAREA3=SIXBIT/DBKDC/
PAREA4=SIXBIT/TMP/
PAREA5=0
PAREA6=0
LOPCNT=^D10 ;IN RELIAB CYCLE LOOP EACH TEST 10. TIMES
BUFF=END+100
BUFEND=BUFF+2001
BUFF1=BUFEND+100
INTBLK=BUFF