1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-14 15:45:47 +00:00

Add HX ITS for hactrn.org; update to eight RP03 disks.

This commit is contained in:
Lars Brinkhoff 2020-06-08 12:31:28 +02:00
parent 2bcad66e90
commit 193156c643
7 changed files with 147 additions and 6 deletions

View File

@ -130,7 +130,7 @@ HOST : 10.3.0.54 : MC.MIT.EDU, MIT-MC, MC : PDP-10 : ITS : :
;;; DistriBution ITS and generic KA
HOST : %CHAOS%%IP% : %HOSTNAME%, DB, KA, KL : PDP-10 : ITS : :
;; Hactrn public ITS.
HOST : 205.166.94.7 : HACTRN.ORG, HX : PDP-10 : ITS : :
;;; Global ITS and Lispm network

30
build/mchn/HX/boot Normal file
View File

@ -0,0 +1,30 @@
set console wru=034
set cpu its
set cpu 1024k
set cpu mpx
set rpa dis
set rpb dis
set tua dis
set fha dis
set dpb dis
set lpt dis
set cr dis
set dc disable
set dtc dis
set dk dis
set pd ena
set pd on
at ptr out/pdp10-ka/dskdmp.rim
at mta0 out/pdp10-ka/sources.tape
set mta mpx=7
set mta type=b
at dpa0 out/pdp10-ka/rp03.2
at dpa1 out/pdp10-ka/rp03.3
at dpa2 out/pdp10-ka/rp03.0
at dpa3 out/pdp10-ka/rp03.1
at dpa4 out/pdp10-ka/rp03.4
at dpa5 out/pdp10-ka/rp03.5
at dpa6 out/pdp10-ka/rp03.6
at dpa7 out/pdp10-ka/rp03.7
set dpa noheaders
b ptr

25
build/mchn/HX/init Normal file
View File

@ -0,0 +1,25 @@
set console wru=034
set cpu its
set cpu 512k
set rpa dis
set rpb dis
set tua dis
set fha dis
set dpb dis
set lpt dis
set cr dis
set dc disable
set dtc dis
set dk dis
at mta0 out/pdp10-ka/magdmp2.tap
at mta5 out/pdp10-ka/reboot.tape
at dpa0 out/pdp10-ka/rp03.2
at dpa1 out/pdp10-ka/rp03.3
at dpa2 out/pdp10-ka/rp03.0
at dpa3 out/pdp10-ka/rp03.1
at dpa4 out/pdp10-ka/rp03.4
at dpa5 out/pdp10-ka/rp03.5
at dpa6 out/pdp10-ka/rp03.6
at dpa7 out/pdp10-ka/rp03.7
set dpa headers
b mta0

30
build/mchn/HX/mchn.tcl Normal file
View File

@ -0,0 +1,30 @@
proc dskdmp_switches {hriflg} {
expect "Configuration"
respond "?" "ASK\r"
respond "HRIFLG=" "$hriflg\r"
respond "BOOTSW=" "N\r"
respond "R11R6P=" "N\r"
respond "R11R7P=" "N\r"
respond "RM03P=" "N\r"
respond "RM80P=" "N\r"
respond "RH10P=" "N\r"
respond "DC10P=" "N\r"
respond "NUDSL=" "500.\r"
respond "KS10P=" "N\r"
respond "KL10P=" "N\r"
}
proc peek_switches {} {
respond "with ^C" "340P==0\r\003"
}
proc mark_packs {} {
mark_pack "0" "2" "2"
mark_pack "1" "3" "3"
mark_pack "2" "0" "0"
mark_pack "3" "1" "1"
mark_pack "4" "4" "4"
mark_pack "5" "5" "5"
mark_pack "6" "6" "6"
mark_pack "7" "7" "7"
}

56
build/mchn/HX/run Normal file
View File

@ -0,0 +1,56 @@
set console wru=034
set cpu its
set cpu 1024k
set cpu idle
set cpu mpx
set rpa dis
set rpb dis
set tua dis
set fha dis
set dpb dis
set lpt dis
set cr dis
set dc disable
set dtc dis
set dk dis
set pd enabled
set pd on
set dk disabled
set stk enabled
set tk enabled
at tk 10000 speed=300
# 10001 reserved for GE bagbiters, hah.
set dpk enabled
at dpk 10002 speed=4800
at dpk line=11,10019 speed=4800
at dpk line=15,10020 speed=4800
set mty enabled
at mty 10003 speed=50000
at mty line=9,10018 speed=9600
at mty line=8,10017 speed=9600
at mty line=7,10016;notelnet speed=50000
set ten11 enabled
at ten11 10011
set auxcpu enabled
at auxcpu 10006
set imp enabled
set imp mac=e2:6c:84:1d:34:a3
set imp ip=192.168.2.101/24
set imp gw=172.31.1.100
set imp host=10.3.0.6
at imp tap:tap0
at ptr out/pdp10-ka/dskdmp.rim
at dpa0 out/pdp10-ka/rp03.2
at dpa1 out/pdp10-ka/rp03.3
at dpa2 out/pdp10-ka/rp03.0
at dpa3 out/pdp10-ka/rp03.1
at dpa4 out/pdp10-ka/rp03.4
at dpa5 out/pdp10-ka/rp03.5
at dpa6 out/pdp10-ka/rp03.6
at dpa7 out/pdp10-ka/rp03.7
set mta mpx=7
set mta type=b
set dt mpx=6
set imp mpx=4
set dpa noheaders
b ptr

View File

@ -374,9 +374,9 @@ DEFOPT PAGPRE==1 ; Page-in preemption
DEFOPT SCHBLN==10. ;NUMBER OF RUNNABLE JOBS TO REMEMBER
DEFOPT NQCHN==30. ;NUMBER 2314 CHNLS
DEFOPT NQS==4 ;# DISK UNITS
DEFOPT NQS==8 ;# DISK UNITS
DEFOPT NTUTBL==1 ;TUTS ARE ONE BLOCK LONG
DEFSYM NUDSL==250. ;# USER DIRECTORIES ON DISK
DEFSYM NUDSL==500. ;# USER DIRECTORIES ON DISK
DEFOPT RP10P==1 ;HAS DEC RP10 DISK CONTROL (RP02)
DEFOPT QRDCMP==1 ;SOFTWARE READ-COMPARE
DEFOPT DMDSK==1 ;USES DM DISK FORMAT

View File

@ -130,8 +130,8 @@ PRINTX /Which machine? /
];KA
IFCE MCHN,HX,[
FIRSPK==0
LASTPK==3
NUDSL==250.
LASTPK==7
NUDSL==500.
DC10P==0
RP10P==1
RH10P==0
@ -142,7 +142,7 @@ PRINTX /Which machine? /
TTLPTP==0
TCMXH==55.
LIGHTS==4 ;PI
];KA
];HX
IFCE MCHN,DM,[
FIRSPK==17.
LASTPK==21.