Trailing-Edge
-
PDP-10 Archives
-
bb-m403a-bk
-
tttbl.ddt
There are 2 other files named tttbl.ddt in the archive. Click here to see a list.
""COMMAND FILE TO DUMP TERMINAL DATA BASE"
4C
""CTY LINE BLOCK"
DLTBL/
""DL11-E LINE BLOCKS"
DLETBL/
""DH11 LINE BLOCKS"
0-10<ZZ:
C
"" LINE POINTER DH11 CSR LINE SPEED STSW1 STSW2"
STSW2+10<SL:
%FOX1:
ZZ+10<ZZ:
SL+2<SL:
ZZ'10+1=DHTBL+ZZ/Q<YY:DHTBL+ZZ+2[Q<XX:DHTBL+ZZ+4/DHTBL+ZZ+6/SL/
%IF EQ YY %FOX3
""OUTPUT PENDING FOR THIS LINE"
%FOX2:
""NODE ADDRESS::"CYY=
""NEXT NODE ADDRESS::"YY/Q<YY:
""NUMBER OF CHARACTERS::"1B.+6/Q<WW:
""CHARACTER STRING::"WWT.+4/
%IF ERR %FOX4
%IF NE YY %FOX2
%FOX3:
%IF NE XX %FOX1
%FOX4:
""END OF TERMINAL DATA BASE"