github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-04-27 20:48:35 +00:00
Code Issues Releases Wiki Activity

Add TT ITS: KA10, eight DC-10 disks.

Browse Source
This commit is contained in:
Lars Brinkhoff
2018-09-10 07:44:44 +02:00
parent 2e19c93314
commit d9b0319722
11 changed files with 285 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

30
build/mchn/TT/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
set ai enabled
at ai0 out/pdp10-ka/dc10.0
at ai1 out/pdp10-ka/dc10.1
at ai2 out/pdp10-ka/dc10.2
at ai3 out/pdp10-ka/dc10.3
at ai4 out/pdp10-ka/dc10.4
at ai5 out/pdp10-ka/dc10.5
at ai6 out/pdp10-ka/dc10.6
at ai7 out/pdp10-ka/dc10.7
b ptr

25
build/mchn/TT/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
set ai enabled
at ai0 out/pdp10-ka/dc10.0
at ai1 out/pdp10-ka/dc10.1
at ai2 out/pdp10-ka/dc10.2
at ai3 out/pdp10-ka/dc10.3
at ai4 out/pdp10-ka/dc10.4
at ai5 out/pdp10-ka/dc10.5
at ai6 out/pdp10-ka/dc10.6
at ai7 out/pdp10-ka/dc10.7
b mta0

30
build/mchn/TT/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=" "Y\r"
respond "NUDSL=" "500.\r"
respond "KS10P=" "N\r"
respond "KL10P=" "N\r"
}
proc peek_switches {} {
respond "with ^C" "340P==1\r\003"
}
proc mark_packs {} {
mark_pack "0" "0" "0"
mark_pack "1" "1" "1"
mark_pack "2" "2" "2"
mark_pack "3" "3" "3"
mark_pack "4" "4" "4"
mark_pack "5" "5" "5"
mark_pack "6" "6" "6"
mark_pack "7" "7" "7"
}

72
build/mchn/TT/run Normal file
View File

@@ -0,0 +1,72 @@
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 dpy enabled
set dk disabled
set stk enabled
set tk enabled
at tk 10000 speed=300
# 10001 reserved for GE bagbiters, hah.
# 10002 Datapoint kludge
set mty enabled
at mty 10003 speed=50000
at mty line=10,10015;notelnet speed=50000
at mty line=11,10019 speed=4800
at mty line=12,10016;notelnet speed=50000
at mty line=13,10017 speed=9600
at mty line=14,10018 speed=9600
at mty line=15,10020 speed=4800
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
set ai enabled
at ai0 out/pdp10-ka/dc10.0
at ai1 out/pdp10-ka/dc10.1
at ai2 out/pdp10-ka/dc10.2
at ai3 out/pdp10-ka/dc10.3
at ai4 out/pdp10-ka/dc10.4
at ai5 out/pdp10-ka/dc10.5
at ai6 out/pdp10-ka/dc10.6
at ai7 out/pdp10-ka/dc10.7
set mta mpx=7
set mta type=b
set dt mpx=6
set imp mpx=4
set wcnsls enabled joystick cscope
set ocnsls enabled
set imx enabled mpx=3
set imx channel=2;unit0;axis0;negate
set imx channel=3;unit0;axis1
set imx channel=10;unit0;axis3;negate
set imx channel=5;unit1;axis0;negate
set imx channel=6;unit1;axis1
set imx channel=30;unit1;axis3;negate
set imx channel=70;unit2;axis0
set imx channel=71;unit2;axis1;negate
set imx channel=73;unit2;axis3
set imx channel=77;unit3;axis0
set imx channel=76;unit3;axis1;negate
set imx channel=74;unit3;axis3
b ptr