Provide emulated dial-up lines.

For LMODEM to work, it requires a TTY line to have the %TYDIL dial-up
bit set in TTYTYP.  Only TK-10, Morton, and DTE-20 controllers are
recognized.

build/mchn/KA/run

@@ -30,6 +30,7 @@ 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
+at mty line=6,10015 speed=9600
 set ten11 enabled
 at ten11 10011
 set auxcpu enabled

build/pdp10-kl/run

@@ -13,6 +13,8 @@ at tty 10007
 at tty line=14,10018 speed=9600
 # Tektronix
 at tty line=13,10017 speed=9600
+# Dial-up
+at tty line=12,10015 speed=9600
 set pd ena
 set pd on
 set mta type=b

build/simh/boot

@@ -7,7 +7,9 @@ at dz0 10004
 # VT52
 at dz0 line=7,10018
 # GT40
-at tty line=6,10019
+at dz0 line=6,10019
+# Dial-up
+at dz0 line=5,10015
 set rp0 rp06
 at rp0 out/simh/rp0.dsk
 b rp0

src/system/ttytyp.322

@@ -189,7 +189,7 @@ MCONDX KA,{				;;; KA
 	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 47,SPEED=9600,TY=%TYDIL	;T47 Dial-up, port 7
 	TTDOIM 50,SPEED=50000		;T50 Imlac, port 8
 	TTDTEK 51,SPEED=9600		;T51 Tektronix, port 9
 	TTDVT 52,SPEED=9600		;T52 VT52, port 10
@@ -389,7 +389,7 @@ MCONDX KL,{				;;; KL
 	TTDAAA 12,SPEED=9600		;T12
 	TTDAAA 13,SPEED=9600		;T13
 	TTDAAA 14,SPEED=9600		;T14
-	TTDAAA 15,SPEED=9600		;T15
+	TTDAAA 15,SPEED=9600,TY=%TYDIL	;T15 Dial-up
 	TTDTEK 16,SPEED=9600		;T16 Tektronix
 	TTDVT 17,SPEED=9600		;T17 VT52
 .ENDC ;}
@@ -666,7 +666,7 @@ MCONDX DB,{				;;; DB
 	TTDAAA 3,SPEED=9600		;T03 DZ Line 3
 	TTDAAA 4,SPEED=9600		;T04 DZ Line 4
 	TTDAAA 5,SPEED=9600		;T05 DZ Line 5
-	TTDAAA 6,SPEED=9600		;T06 DZ Line 6
+	TTDAAA 6,SPEED=9600,TY=%TYDIL	;T06 DZ Line 6, dial-up
 	TTDGT40 7,SPEED=9600		;T07 DZ Line 7
 	TTDVT 10,SPEED=9600		;T10 DZ Line 10