DataMuseum.dk

Presents historical artifacts from the history of:

Regnecentalen RC-900

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Regnecentalen RC-900

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦a5375eaf7⟧ TextFile

    Length: 13052 (0x32fc)
    Types: TextFile
    Notes: UNIX file
    Names: »Tcap«

Derivation

└─⟦657bff2be⟧ Bits:30004160/disk1.imd SW95860 UNIPLEX+ release 1.0 (dansk)
└─⟦657bff2be⟧ UNIX Filesystem
    └─⟦this⟧ »ua/new/usr/UAP/Tcap« 

TextFile

V.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T.......T....H..
******
* Uniplex-II Plus Terminal Definitions file
* File:    UAP/Tcap
* Release: V6.00
* Date:    24 Nov 1987
*
*Notes: - Please keep this file up-to-date and compatible with
*         Uniplex-II Plus!!
*           Keep the file in alphabetical tty order please!!
*
*         PAINT string defaults to: '[]Z Z_[[ZZZZ  ACZ'
*         you therefore are better without it on a standard monochrome
*         terminal
*
******

******
*         RC Terminals included:  5.05.88 - Regnecentralen / Arne G. Jensen
*
*         Included print effect Z (STANDOUT) in at386/sat386/AT386/SAT386
*         entries - 12.08.88  RC/AGJ
*
******

* NB: #EFFECTS section moves here in version 6.00
*     (in version 5.xx it was in uniplex.cmd)

#EFFECTS
A=Skyggeskrift
B=FED font
C=Understregning
D=Understreg tekst
E=Fed & understr.
G=LILLE font
H=STOR font
I=KURSIV font
J=Indeks op
K=Indeks ned
L=Baggrund
M=Dobbelt understregning
N=Dobbelt understreg tekst
O=PS-LILLE font
P=PS-NORMAL font
Q=FP-LILLE font
R=FP-NORMAL font
S=NORMAL font
T=Overstreg skygge
U=Overstreg skr▶86◀streg
V=Overstreg bindestreg
X=Indeks fyldetegn
[=GRAFIK font
))

.FS
** @(#) 14 Aug 87 ALTOS II checked by Chris.

#II,alt2,altosII
INIT=$-'[>1h'-$-'[25;H'-$-'[K'-$-'[7m'
DEINIT=$-'[m'
A=$-'[7m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4;2m',$-'[m'
E=$-'[4;7m',$-'[m'
I=$-'[2m',$-'[m'
[=14,15
BOXC='D3EZB?4YA@C'
BOXE='[[[[[[[[[[['
FILLC='[2*^_N0X1:'
FILLE='[[A[[[[[[['
PAINT='[]A A_[[AAAZ'
MAP=0,160,$-'(1'-97-$-'(B'      * Hard Space (NBSP)
MAP=0,161,$-'(1'-78-$-'(B'      * Open shriek
MAP=0,162,$-'(1'-60-$-'(B'      * Cent
MAP=0,163,$-'(1'-61-$-'(B'      * Sterling
MAP=0,165,$-'(1'-62-$-'(B'      * Yen
MAP=0,170,$-'(1'-71-$-'(B'      * Feminine ordinal
MAP=0,171,$-'(1'-79-$-'(B'      * Double Guillemot
MAP=0,172,$-'(1'-75-$-'(B'      * Logical NOT
MAP=0,176,$-'(1'-105-$-'(B'     * Ring
MAP=0,177,$-'(1'-98-$-'(B'      * Plus/minus
MAP=0,178,$-'(1'-110-$-'(B'     * 2 superscript
MAP=0,181,$-'(1'-87-$-'(B'      * Mu
MAP=0,183,$-'(1'-107-$-'(B'     * Centre dot
MAP=0,186,$-'(1'-72-$-'(B'      * 1 superscript
MAP=0,187,$-'(1'-80-$-'(B'      * Masculin ordinal
MAP=0,188,$-'(1'-77-$-'(B'      * Double Guillemot
MAP=0,189,$-'(1'-76-$-'(B'      * 1/4
MAP=0,191,$-'(1'-73-$-'(B'      * 1/2
MAP=0,196,$-'(1'-47-$-'(B'      * A umlaut
MAP=0,197,$-'(1'-48-$-'(B'      * A ring
MAP=0,199,$-'(1'-33-$-'(B'      * C cedilla
MAP=0,201,$-'(1'-49-$-'(B'      * E acute
MAP=0,209,$-'(1'-70-$-'(B'      * N tilde
MAP=0,214,$-'(1'-58-$-'(B'      * O umlaut
MAP=0,216,$-'(1'-94-$-'(B'      * O stroke
MAP=0,220,$-'(1'-59-$-'(B'      * U umlaut
MAP=0,223,$-'(1'-82-$-'(B'      * Beta (ss Germ.)
MAP=0,224,$-'(1'-38-$-'(B'      * a grave
MAP=0,225,$-'(1'-65-$-'(B'      * a acute
MAP=0,226,$-'(1'-36-$-'(B'      * a c/flex
MAP=0,228,$-'(1'-37-$-'(B'      * a umlaut
MAP=0,229,$-'(1'-39-$-'(B'      * a ring
MAP=0,230,$-'(1'-50-$-'(B'      * ae dipthong
MAP=0,231,$-'(1'-40-$-'(B'      * c cedilla
MAP=0,232,$-'(1'-43-$-'(B'      * e grave
MAP=0,233,$-'(1'-35-$-'(B'      * e acute
MAP=0,234,$-'(1'-41-$-'(B'      * e c/flex
MAP=0,235,$-'(1'-42-$-'(B'      * e umlaut
MAP=0,236,$-'(1'-46-$-'(B'      * i grave
MAP=0,237,$-'(1'-66-$-'(B'      * i acute
MAP=0,238,$-'(1'-45-$-'(B'      * i c/flex
MAP=0,239,$-'(1'-44-$-'(B'      * i umlaut
MAP=0,241,$-'(1'-69-$-'(B'      * n tilde
MAP=0,242,$-'(1'-54-$-'(B'      * o grave
MAP=0,243,$-'(1'-67-$-'(B'      * o acute
MAP=0,244,$-'(1'-52-$-'(B'      * o c/flex
MAP=0,246,$-'(1'-53-$-'(B'      * o umlaut
MAP=0,247,$-'(1'-103-$-'(B'     * Divide sign
MAP=0,249,$-'(1'-56-$-'(B'      * u grave
MAP=0,250,$-'(1'-68-$-'(B'      * u acute
MAP=0,251,$-'(1'-55-$-'(B'      * u c/flex
MAP=0,252,$-'(1'-34-$-'(B'      * u umlaut
MAP=0,255,$-'(1'-57-$-'(B'      * y umlaut
))

** @(#) 14 Aug 87 ALTOS III checked by Chris.

#altos3,alt3
INIT=$-'[>1h'-$-'[25;H'-$-'[K'-$-'[7m'
DEINIT=$-'[m'
A=$-'[7m',$-'[m'
B=$-'[5m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[7m'-$-'[4m',$-'[m'
E=$-'[4m'-$-'[5m',$-'[m'
F=$-'[7m'-$-'[5m',$-'[m'
G=$-'[5m',$-'[m'
H=$-'[4m',$-'[m'
I=$-'[7m'-$-'[5m',$-'[m'
[=14,15
BOXC='JYOMXLVKWNU'
BOXE='[[[[[[[[[[['
FILLC='BART*:=_^`'
FILLE='[[[[[[[[[['
))

** @(#) 25th November 87 standard ANSI tty checked by Chris/PB.

#ansi
A=$-'[1m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4;7m',$-'[m'
E=$-'[4;1m',$-'[m'
I=$-'[1;7m',$-'[m'
BOXC=205-186-206-201-203-187-185-188-202-200-204
BOXE='           '
FILLC=' '-176-221-177-178-197-206-179-186-220
FILLE='Z    Z Z  '
PAINT='[]Z Z_[['
))
.FS
** @(#) 14th August 87 color ANSI/TI-1100 console checked by Chris.

#ansicolor
A=$-'[2;2;0m',$-'[2;7;0m'
B=$-'[2;0;2m',$-'[2;7;0m'
C=$-'[2;7;0m'-$-'[4m',$-'[2;7;0m'
D=$-'[2;3;0m'-$-'[4m',$-'[2;7;0m'
E=$-'[2;2;0m'-$-'[4m',$-'[2;7;0m'
G=$-'[2;1;0m',$-'[2;7;0m'
H=$-'[2;14;0m',$-'[2;7;0m'
I=$-'[2;3;0m',$-'[2;7;0m'
J=$-'[2;1;2m',$-'[2;7;0m'
K=$-'[2;14;1m',$-'[2;7;0m'
M=$-'[2;7;1m'-$-'[4m',$-'[2;7;0m'
N=$-'[2;3;1m'-$-'[4m',$-'[2;7;0m'
O=$-'[2;4;1m',$-'[2;7;0m'
P=$-'[2;4;7m',$-'[2;7;0m'
Q=$-'[2;5;1m',$-'[2;7;0m'
R=$-'[2;5;7m',$-'[2;7;0m'
S=$-'[2;7;1m',$-'[2;7;0m'
T=$-'[2;0;4m',$-'[2;7;0m'
U=$-'[2;14;4m',$-'[2;7;0m'
V=$-'[2;1;4m',$-'[2;7;0m'
W=$-'[2;0;5m',$-'[2;7;0m'
X=$-'[2;4;7m',$-'[2;7;0m'
Y=$-'[2;0;3m',$-'[2;7;0m'
BOXC=196-179-197-218-194-191-180-217-193-192-195
BOXE='           '
FILLC=176-177-178-240-233-246-174-247-175-232
FILLE='          '
PAINT='[]B T_[[TUXX'
))
.FS
***************************  RC940 COLOR TERMINAL - 880812 - AGJ/RC

#at386,AT386,sat386,SAT386
HIGHBIT
MAP=0,173,'-'
MAP=0,137,$-'[30;42m>'-$-'[32;40m'
MAP=0,141,'~'
MAP=0,253,$-'[30;42m^'-$-'[32;40m'
MAP=0,160,$-'[30;42m '-$-'[32;40m'
MAP=137,251,137
MAP=141,252,141
MAP=160,255,160
MAP=173,240,173
A=$-'[1;33;40m',$-'[0;32;40m'
B=$-'[1;32;40m',$-'[0;32;40m'
C=$-'[1;36;40m',$-'[0;32;40m'
D=$-'[36;40m',$-'[32;40m'
E=$-'[1;37;40m',$-'[0;32;40m'
G=$-'[36;44m',$-'[32;40m'
H=$-'[37;44m',$-'[32;40m'
I=$-'[1;34;40m',$-'[0;32;40m'
J=$-'[37;45m',$-'[32;40m'
K=$-'[30;45m',$-'[32;40m'
L=$-'[30;47m',$-'[32;40m'
M=$-'[34;47m',$-'[32;40m'
N=$-'[1;34;47m',$-'[0;32;40m'
O=$-'[1;37;42m',$-'[0;32;40m'
P=$-'[34;42m',$-'[32;40m'
Q=$-'[1;36;42m',$-'[0;32;40m'
R=$-'[1;34;42m',$-'[0;32;40m'
S=$-'[30;42m',$-'[32;40m'
T=$-'[30;41m',$-'[32;40m'
U=$-'[37;41m',$-'[32;40m'
V=$-'[36;41m',$-'[32;40m'
W=$-'[30;43m',$-'[32;40m'
X=$-'[30;46m',$-'[32;40m'
Y=$-'[34m',$-'[32m'
Z=$-'[30;42m',$-'[32;40m'
BOXC=205-186-206-201-203-187-185-188-202-200-204
BOXE='YYYYYYYYYYY'
FILLC=32-32-32-32-32-196-179-32-32-197
FILLE='TLGOXTGWJX'
PAINT='B X X_[[XAXG'
))

******************  RC949 TERMINAL - 880519 - AGJ/RC

#at386m,AT386M
HIGHBIT
MAP=0,173,'-'
MAP=0,137,$-'[7m>'-$-'[m'
MAP=0,141,'~'
MAP=0,253,$-'[7m^'-$-'[m'
MAP=0,160,$-'[7m '-$-'[m'
MAP=137,251,137
MAP=141,252,141
MAP=160,255,160
MAP=173,240,173
A=$-'[1m',$-'[m'
B=$-'[1m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4m',$-'[m'
E=$-'[1;4m',$-'[m'
M=$-'[4m',$-'[m'
N=$-'[4m',$-'[m'
Y=$-'[7m',$-'[m'
BOXC=205-186-206-201-203-187-185-188-202-200-204
FILLC=32-176-177-178-196-179-197-205-186-206
FILLE='YYYYYYYYYY'
PAINT='  Z Z_[[Z ZZ'
))
.FS

*       Freedom 200 - should work with the Freedom 100 also

** @(#) 14.8.87 FREEDOM 200 checked by Chris.

#freedm2
INIT=$-'f'
DEINIT=13
A=$-'G4',$-'G0'
C=$-'G8',$-'G0'
D=$-'GH',$-'G0'
E=$-'G<',$-'G0'
I=$-'G@',$-'G0'
[=$-'$',$-'%'
BOXC='KJIBNCLDOAM'
BOXE='[[[[[[[[[[['
FILLC='*TX1#=@RQ$'.
FILLE='[[[[A[A[[A'
PLOTC='x*+o-='
JOINC='......'
PAINT='[]A A_[[AAAZ'
))
.FS

** @(#) 14.8.87 ICL 6404 checked by Chris.

#iclcol,icl6404cg
A=$-'[020',$-'[070'
B=$-'[002',$-'[070'
C=$-'[870',$-'[070'
D=$-'[860',$-'[070'
E=$-'[820',$-'[070'
G=$-'[040',$-'[070'
H=$-'[030',$-'[070'
I=$-'[060',$-'[070'
J=$-'[042',$-'[070'
K=$-'[043',$-'[070'
M=$-'[874',$-'[070'
N=$-'[864',$-'[070'
O=$-'[014',$-'[070'
P=$-'[017',$-'[070'
Q=$-'[054',$-'[070'
R=$-'[057',$-'[070'
S=$-'[074',$-'[070'
T=$-'[001',$-'[070'
U=$-'[031',$-'[070'
V=$-'[041',$-'[070'
W=$-'[005',$-'[070'
X=$-'[017',$-'[070'
Y=$-'[006',$-'[070'
[=$-'$'-$-'[050',$-'%'-$-'[070'
BOXC=':5?6><=9;37'
BOXE='[[[[[[[[[[['
FILLC='       Y&&'
FILLE='TBKQWYR[TB'
PLOTC='*******'
PLOTE='TBKQWYR'
JOINC='L'
JOINE='['
PAINT='[]B T_[[TUXX'
))

.FS
** @(#) 14 August 87 LINK checked by Chris.

#link
INIT=$-'A14'-$-'f'
DEINIT=13
A=$-'G4',$-'G0'
C=$-'G8',$-'G0'
D=$-'Gx',$-'G0'
E=$-'G<',$-'G0'
I=$-'Gp',$-'G0'
[=$-'H'-2,$-'H'-3
BOXC=':68M0N9O=L4'
BOXE='[[[[[[[[[[['
FILLC='7?>*G=;KDC'
FILLE='[[[A[[[[[['
PLOTC='x*+o-='
JOINC='......'
PAINT='[]A A_[[AAAZ'
))
.FS

***************************  RC750 8 BIT TERMINAL - 880519 - AGJ/RC

#partner,PARTNER
HIGHBIT
MAP=0,173,'-'
MAP=0,137,$-'[7m>'-$-'[m'
MAP=0,141,'~'
MAP=0,253,$-'[7m^'-$-'[m'
MAP=0,160,$-'[7m '-$-'[m'
MAP=137,251,137
MAP=141,252,141
MAP=160,255,160
MAP=173,240,173
A=$-'[1m',$-'[m'
B=$-'[1m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4m',$-'[m'
E=$-'[1;4m',$-'[m'
M=$-'[4m',$-'[m'
N=$-'[4m',$-'[m'
Y=$-'[7m',$-'[m'
BOXC=205-186-206-201-203-187-185-188-202-200-204
FILLC=32-176-177-178-196-179-197-205-186-206
FILLE='YYYYYYYYYY'
PAINT='A Z Z_[[ZAZZ'
))

******************  RC45/900 TERMINAL - 880519 - AGJ/RC

#sat386m,SAT386M
HIGHBIT
MAP=0,173,'-'
MAP=0,137,$-'[7m>'-$-'[m'
MAP=0,141,'~'
MAP=0,253,$-'[7m^'-$-'[m'
MAP=0,160,$-'[7m '-$-'[m'
MAP=137,251,137
MAP=141,252,141
MAP=160,255,160
MAP=173,240,173
A=$-'[1m',$-'[m'
B=$-'[1m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4m',$-'[m'
E=$-'[1;4m',$-'[m'
M=$-'[4m',$-'[m'
N=$-'[4m',$-'[m'
Y=$-'[7m',$-'[m'
BOXC=205-186-206-201-203-187-185-188-202-200-204
FILLC=32-176-177-178-196-179-197-205-186-206
FILLE='YYYYYYYYYY'
PAINT='A Z Z_[[ZAZZ'
))
.FS
** @(#) TEK 4207 checked by Chris, 16 September 87

#tek4207
ss
A=$-'[32m',$-'[m'
B=$-'[30;42m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4;36m',$-'[m'
E=$-'[32;4m',$-'[m'
G=$-'[34m',$-'[m'
H=$-'[33m',$-'[m'
I=$-'[36m',$-'[m'
J=$-'[34;42m',$-'[m'
K=$-'[34;43m',$-'[m'
M=$-'[4;44m',$-'[m'
N=$-'[4;36;44m',$-'[m'
O=$-'[31;44m',$-'[m'
P=$-'[31;47m',$-'[m'
Q=$-'[35;44m',$-'[m'
R=$-'[35;47m',$-'[m'
S=$-'[37;44m',$-'[m'
T=$-'[30;41m',$-'[m'
U=$-'[33;41m',$-'[m'
V=$-'[34;41m',$-'[m'
W=$-'[30;45m',$-'[m'
X=$-'[31;47m',$-'[m'
Y=$-'[30;46m',$-'[m'
[=$-'[35m'-$-'(3',$-'[m'-$-'(B'
PAINT='[]B T_[[TUXX'
BOXC='qxnlwkujvmt'
BOXE='[[[[[[[[[[['
FILLC=' ` D E    '
FILLE='T[K[Q[BWYR'
PLOTC='EFG0f-'
PLOTE='[[[[[['
JOINC='~'
JOINE='['
FILTER='gd_tekconfig -p tek4207'
))

** @(#) 14 August 87 VISUAL 550 checked by Chris.
#vis550,v550
ss
A=$-'[1m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4;7m',$-'[m'
E=$-'[1;4m',$-'[m'
I=$-'[1;7m;,$-'[m'
[=14,15
BOXC='qxnlwkujvmt'
BOXE='[[[[[[[[[[['
FILLC='a `|$z{*~y'
FILLE='[G[[G[[Z[['
FILTER='gd_tekconfig -p vis550'
))
.FS
*  vt100
*
*  N.B.  This is deliberately a subset to allow
*        the vt100 to be used for testing unknown terminals
*        The graphics in particular may cause problems.

#vt100
A=$-'[1m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4m',$-'[m'
E=$-'[4m',$-'[m'
[=14,15
BOXC='qxnlwkujvmt'
BOXE='[[[[[[[[[[['
FILLC='a `|$z*{%y'
FILLE='[B[[B[B[B['
))

.FS
* DEC vt240 and vt220 terminals
* N.B.  No support for color vt240 in here

*************************** STANDARD VT200 TERMINAL - 880519 - AGJ/RC

#vt240,vt220,vt200,VT200
HIGHBIT
MAP=0,173,'-'
MAP=0,137,$-'[7m>'-$-'[m'
MAP=0,141,'~'
MAP=0,253,$-'[7m^'-$-'[m'
MAP=0,160,$-'[7m '-$-'[m'
MAP=137,251,137
MAP=141,252,141
MAP=160,255,160
MAP=173,240,173
A=$-'[1m',$-'[m'
B=$-'[1m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4m',$-'[m'
E=$-'[4;1m',$-'[m'
M=$-'[4m',$-'[m'
N=$-'[4m',$-'[m'
W=$-'(0'-$-'[1;7m',$-'(B'-$-'[m'
Y=$-'(0'-$-'[7m',$-'(B'-$-'[m'
[=$-'(0',$-'(B'
BOXC='qxnlwkujvmt'
BOXE='[[[[[[[[[[['
FILLC='  xxqq--nn'
FILLE='WYWYWYWYWY'
PAINT='A Z Z_[[ZAZZ'
JOINC='~~~~~'
JOINE='[[[[['
))

***************************  RC45 VT200 TERMINAL - 880519 - AGJ/RC

#vt200+rc,VT200+RC
HIGHBIT
MAP=0,173,'-'
MAP=0,137,$-'[7m>'-$-'[m'
MAP=0,141,'~'
MAP=0,253,$-'[7m^'-$-'[m'
MAP=0,160,$-'[7m '-$-'[m'
MAP=137,251,137
MAP=141,252,141
MAP=160,255,160
MAP=173,240,173
A=$-'[1m',$-'[m'
B=$-'[1m',$-'[m'
C=$-'[4m',$-'[m'
D=$-'[4m',$-'[m'
E=$-'[1;4m',$-'[m'
M=$-'[4m',$-'[m'
N=$-'[4m',$-'[m'
W=14-$-'[6m',15-$-'[m'
Y=14-$-'[7m',15-$-'[m'
[=14,15
BOXC='qxnlwkujvmt'
BOXE='[[[[[[[[[[['
FILLC='  xxqq--nn'
FILLE='WYWYWYWYWY'
PAINT='A Z Z_[[ZAZZ'
))
.FS
** @(#) 14th August 87 WYSE-50 checked by Chris.

* The following INIT/DEINIT are undocumented codes to write text to the
* bottom line of a real wyse50. They seldom work on wyse50 emulators.
* INIT=$-'f'
* DEINIT=13

#wyse50,wy50
[=$-'H'-2,$-'('-$-'H'-3
BOXC='z6820395=q4'
BOXE='[[[[[[[[[[['
FILLC='?78?78?78'
FILLE='[[[[[[[[['
))
.FS
** @(#) 14th August 87 WYSE-60 checked by Chris.

#wyse60,wy60,wyse60-132,wy60-132
INIT=$-'f'
DEINIT=13
A=$-'G4',$-'G0'
B=$-'Gt',$-'G0'
C=$-'G8',$-'G0'
D=$-'Gx',$-'G0'
E=$-'G8',$-'G0'
F=$-'Gp',$-'G0'
G=$-'Gt',$-'G0'
H=$-'Gx',$-'G0'
I=$-'G<',$-'G0'
J=$-'G|',$-'G0'
K=$-'G|',$-'G0'
L=$-'G|',$-'G0'
Y=$-'H'-2-$-'G4',$-'H'-3-$-'G0'
Z=$-'G4',$-'G0'
[=$-'H'-2,$-'H'-3
FILLC='  ;8;8~|><'
FILLE='AB[YY[YYAZ'
BOXC=':6820395=14'
BOXE='[[[[[[[[[[['
PAINT='[]G A_[[AAAZ'
))

***************
* End of File *
***************