mirror of
https://github.com/PDP-10/its.git
synced 2026-02-01 14:32:07 +00:00
80 lines
1.6 KiB
Groff
Executable File
80 lines
1.6 KiB
Groff
Executable File
|
||
;DECSYSTEM10 KL10 PDP-11 DIAGNOSTIC CONSOLE UTILITY
|
||
|
||
|
||
DECVER=7
|
||
MCNVER=0
|
||
|
||
|
||
.TITLE KLDCPU DECSYSTEM10 KL10 PDP-11 DIAGNOSTIC CONSOLE UTILITY, VER 0.7
|
||
|
||
;;;MODIFICATION HISTORY
|
||
;;;
|
||
;;; 15 NOV 75 OBTAINED FROM DEC (KLDCP REV 7)
|
||
;;; 15 NOV 75 CONVERTED TO PALX FORMAT
|
||
;;;
|
||
|
||
|
||
;.LIST MC,MD
|
||
;.DSABL GBL
|
||
;.DSABL REG
|
||
.ABS
|
||
;.ENABL AMA
|
||
|
||
;JOHN R. KIRCHOFF
|
||
;DIGITAL EQUIPMENT CORPORATION
|
||
;MARLBORO, MASS. 01752
|
||
|
||
;ASSEMBLY PARAMETERS
|
||
|
||
;DTEASB=1 ;ASSEMBLE DTE20
|
||
;KWASB= 1 ;ASSEMBLE KW CLOCK
|
||
;DLASB= 1 ;ASSEMBLE DL11
|
||
;DHASB= 1 ;ASSEMBLE DH11
|
||
;TAASB= 1 ;ASSEMBLE TA CASSETTE
|
||
RXASB= 1 ;ASSEMBLE RX11/RX01 FLOPPY
|
||
TCASB= 1 ;ASSEMBLE TC DECTAPE
|
||
RPASB= 1 ;ASSEMBLE RP04 DISK PACK
|
||
LPASB= 1 ;ASSEMBLE LP20 LINE PRINTER
|
||
|
||
$NB= 8. ;USE 8 BREAKPOINTS
|
||
|
||
;UTILITY CODE BEGINS AT LOCATION 3000
|
||
|
||
PRGSRT= 3000
|
||
COREND= 28.*1024.*2.
|
||
|
||
;SPECIAL KLDCP LINKAGE ADDRESSES
|
||
|
||
START= 100000 ;CONSOLE START
|
||
$CNTLC= 100004 ;CONTROL C
|
||
$CONSL= 100014 ;RETURN TO CONSOLE
|
||
|
||
$TKS= 100020 ;TTY KBD STATUS
|
||
$TKB= 100022 ;TTY KBD BUFFER
|
||
$TPS= 100024 ;TTY PRINTER STATUS
|
||
$TPB= 100026 ;TTY PRINTER BUFFER
|
||
|
||
$LPS= 100030 ;LP11 - LINE PRINTER STATUS
|
||
$LPB= 100032 ;LP11 - LINE PRINTER BUFFER
|
||
|
||
$FSTKS= 100034 ;FIELD SERVICE KLINIK INPUT STATUS
|
||
$FSTKB= 100036 ;FIELD SERVICE KLINIK INPUT BUFFER
|
||
$FSTPS= 100040 ;FIELD SERVICE KLINIK OUTPUT STATUS
|
||
$FSTPB= 100042 ;FIELD SERVICE KLINIK OUTPUT BUFFER
|
||
|
||
$CMTKS= 100044 ;COMM INPUT STATUS
|
||
$CMTKB= 100046 ;COMM INPUT BUFFER
|
||
$CMTPS= 100050 ;COMM OUTPUT STATUS
|
||
$CMTPB= 100052 ;COMM OUTPUT BUFFER
|
||
|
||
FUQ:: ;SEE EQUIVALENT PLACE IN KLDCP FOR WHY THIS IS HERE
|
||
|
||
;INSERT THE REST
|
||
|
||
.INSRT PRM11
|
||
.INSRT KLDCU1
|
||
.INSRT SBST11
|
||
|
||
.END $ILOAD
|
||
|