SGNTT.CMD;2/-AU=SGNTT.CMD;1
-6
	.SETS TTV0 ":60"
	.SETS TTV1 ":300"
	.SETS TTV2 ":310"
	.SETS TTV3 ":330"
	.SETS TTV4 ":400"
	.SETS TTV5 ":410"
	.SETS TTV6 ":420"
	.SETS TTV7 ":430"
	.SETS TTV10 ":440"
	.SETS TTV11 ":500"
	.SETS TTV12 ":510"
	.SETS TTV13 ":570"
	.SETS TTC0 ":177560"
	.SETS TTC1 ":175610"
	.SETS TTC2 ":175620"
	.SETS TTC3 ":175640"
	.SETS TTC4 ":175670"
	.SETS TTC5 ":175700"
	.SETS TTC6 ":175710"
	.SETS TTC7 ":175720"
	.SETS TTC10 ":175730"
	.SETS TTC11 ":175630"
	.SETS TTC12 ":175770"
	.SETS TTC13 ":176000"
-25,28
.DL10:	.SETN ZN1 0
	.ASK TTLOG DO YOU WANT TERMINAL LOGGING SUPPORT
	.IFT TTLOG .DATA #0 $T$LOG=0
-31,31
	.IFT <ESCAPE> .GOTO DL10C
-45,47
.DL12:	.SETN NLINE 1
-50
	.IFDF TTV'CONTR' .SETS DEF TTV'CONTR'
	.IFNDF TTV'CONTR' .SETS DEF ""
	.IFDF TTC'CONTR' .SETS DEF1 TTC'CONTR'
	.IFNDF TTC'CONTR' .SETS DEF1 ""
-56,56
-66,66
-495,495
.UCB40:	.IFT TTLOG .IF CONTR = 0 .IF LINE = 0 .DATA #1 TTLOG==.-.TT'TTN'
	.IFT TTLOG .DATA #1 	.BLKW	4
	.IF CONTR = 0 .IF LINE = 0 .DATA #1 'DEV'ND=.
/