From b589e26ed78ade17bb05fa7698afbea2726d228a Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Wed, 14 Aug 2019 08:30:59 +0200
Subject: [PATCH] Update descriptions and speeds for KA ITS tty lines.

---
 build/pdp10-ka/run    |  6 +--
 src/system/ttytyp.320 | 96 +++++++++++++++++++++----------------------
 2 files changed, 51 insertions(+), 51 deletions(-)

diff --git a/build/pdp10-ka/run b/build/pdp10-ka/run
index fed712a6..1a3fdbc2 100644
--- a/build/pdp10-ka/run
+++ b/build/pdp10-ka/run
@@ -19,12 +19,12 @@ set dpy enabled
 set dk disabled
 set stk enabled
 set tk enabled
-at tk 10000
+at tk 10000 speed=300
 # 10001 reserved for GE bagbiters, hah.
 set dpk enabled
-at dpk 10002
+at dpk 10002 speed=4800
 set mty enabled
-at mty 10003
+at mty 10003 speed=50000
 set ten11 enabled
 at ten11 10011
 set auxcpu enabled
diff --git a/src/system/ttytyp.320 b/src/system/ttytyp.320
index 3d24b077..8481e11b 100644
--- a/src/system/ttytyp.320
+++ b/src/system/ttytyp.320
@@ -151,54 +151,54 @@ MCONDX MLKA,{				;;; ML-KA
 
 MCONDX KA,{				;;; KA
 	TTDLA36 0,TT=%TTLCL+%TT340,HOR=80.,SPEED=110	;T00 System Console
-	TTDAAA 1,SPEED=9600,TT=%TT340	;T01
-	TTDAAA 2,SPEED=9600     	;T02
-	TTDAAA 3,SPEED=9600		;T03
-	TTDAAA 4,SPEED=9600		;T04
-	TTDAAA 5,SPEED=9600		;T05
-	TTDAAA 6,SPEED=9600		;T06
-	TTDAAA 7,SPEED=9600		;T07
-	TTDAAA 10,SPEED=9600		;T10
-	TTDAAA 11,SPEED=9600		;T11
-	TTDAAA 12,SPEED=9600		;T12
-	TTDAAA 13,SPEED=9600		;T13
-	TTDAAA 14,SPEED=9600		;T14
-	TTDAAA 15,SPEED=9600		;T15
-	TTDAAA 16,SPEED=9600		;T16
-	TTDAAA 17,SPEED=9600		;T17
-	TTDAAA 20,SPEED=9600		;T20
-	TTDAAA 21,SPEED=9600		;T21
-	TTDAAA 22,SPEED=9600		;T22
-	TTDAAA 23,SPEED=9600		;T23
-	TTDAAA 24,SPEED=9600		;T24
-	TTDAAA 25,SPEED=9600		;T25
-	TTDAAA 26,SPEED=9600		;T26
-	TTDAAA 27,SPEED=9600		;T27
-	TTDAAA 30,SPEED=9600		;T30
-	TTDAAA 31,SPEED=9600		;T31
-	TTDAAA 32,SPEED=9600		;T32
-	TTDAAA 33,SPEED=9600		;T33
-	TTDAAA 34,SPEED=9600		;T34
-	TTDAAA 35,SPEED=9600		;T35
-	TTDAAA 36,SPEED=9600		;T36
-	TTDAAA 37,SPEED=9600		;T37
-	TTDAAA 40,SPEED=9600		;T40
-	TTDAAA 41,SPEED=9600		;T41
-	TTDAAA 42,SPEED=9600		;T42
-	TTDAAA 43,SPEED=9600		;T43
-	TTDAAA 44,SPEED=9600		;T44
-	TTDAAA 45,SPEED=9600		;T45
-	TTDAAA 46,SPEED=9600		;T46
-	TTDAAA 47,SPEED=9600		;T47
-	TTDAAA 50,SPEED=9600		;T50
-	TTDAAA 51,SPEED=9600		;T51
-	TTDAAA 52,SPEED=9600		;T52
-	TTDAAA 53,SPEED=9600		;T53
-	TTDAAA 54,SPEED=9600		;T54
-	TTDAAA 55,SPEED=9600		;T55
-	TTDAAA 56,SPEED=9600		;T56
-	TTDAAA 57,SPEED=9600		;T57
-	TTDAAA 60,SPEED=9600		;T60
+	TTDAAA 1,SPEED=300,TT=%TT340	;T01 TK10 port 1
+	TTDAAA 2,SPEED=300           	;T02 TK10 port 2
+	TTDAAA 3,SPEED=300		;T03 TK10 port 3
+	TTDAAA 4,SPEED=300		;T04 TK10 port 4
+	TTDAAA 5,SPEED=300		;T05 TK10 port 5
+	TTDAAA 6,SPEED=300		;T06 TK10 port 6
+	TTDAAA 7,SPEED=300		;T07 TK10 port 7
+	TTDAAA 10,SPEED=300		;T10 TK10 port 8
+	TTDAAA 11,SPEED=300		;T11 TK10 port 9
+	TTDAAA 12,SPEED=300		;T12 TK10 port 10
+	TTDAAA 13,SPEED=300		;T13 TK10 port 11
+	TTDAAA 14,SPEED=300		;T14 TK10 port 12
+	TTDAAA 15,SPEED=300		;T15 TK10 port 13
+	TTDAAA 16,SPEED=300		;T16 TK10 port 14
+	TTDAAA 17,SPEED=300		;T17 TK10 port 15
+	TTDAAA 20,SPEED=300		;T20 TK10 port 16
+	TTDAAA 21,SPEED=4800		;T21 Datapoint port 1
+	TTDAAA 22,SPEED=4800		;T22 Datapoint port 2
+	TTDAAA 23,SPEED=4800		;T23 Datapoint port 3
+	TTDAAA 24,SPEED=4800		;T24 Datapoint port 4
+	TTDAAA 25,SPEED=4800		;T25 Datapoint port 5
+	TTDAAA 26,SPEED=4800		;T26 Datapoint port 6
+	TTDAAA 27,SPEED=4800		;T27 Datapoint port 7
+	TTDAAA 30,SPEED=4800		;T30 Datapoint port 8
+	TTDAAA 31,SPEED=4800		;T31 Datapoint port 9
+	TTDAAA 32,SPEED=4800		;T32 Datapoint port 10
+	TTDAAA 33,SPEED=4800		;T33 Datapoint port 11
+	TTDAAA 34,SPEED=4800		;T34 Datapoint port 12
+	TTDAAA 35,SPEED=4800		;T35 Datapoint port 13
+	TTDAAA 36,SPEED=4800		;T36 Datapoint port 14
+	TTDAAA 37,SPEED=4800		;T37 Datapoint port 15
+	TTDAAA 40,SPEED=4800		;T40 Datapoint port 16
+	TTDAAA 41,SPEED=50000		;T41 Morton port 1
+	TTDAAA 42,SPEED=50000		;T42 Morton port 2
+	TTDAAA 43,SPEED=50000		;T43 Morton port 3
+	TTDAAA 44,SPEED=50000		;T44 Morton port 4
+	TTDAAA 45,SPEED=50000		;T45 Morton port 5
+	TTDAAA 46,SPEED=50000		;T46 Morton port 6
+	TTDAAA 47,SPEED=50000		;T47 Morton port 7
+	TTDAAA 50,SPEED=50000		;T50 Morton port 8
+	TTDAAA 51,SPEED=50000		;T51 Morton port 9
+	TTDAAA 52,SPEED=50000		;T52 Morton port 10
+	TTDAAA 53,SPEED=50000		;T53 Morton port 11
+	TTDAAA 54,SPEED=50000		;T54 Morton port 12
+	TTDAAA 55,SPEED=50000		;T55 Morton port 13
+	TTDAAA 56,SPEED=50000		;T56 Morton port 14
+	TTDAAA 57,SPEED=50000		;T57 Morton port 15
+	TTDAAA 60,SPEED=50000		;T60 Morton port 16
 .ENDC ;}
 
 MCONDX EX,{				;;; EX