vch@rruxo.UUCP (Kerro Panille) (11/06/85)
A little while ago I posted an article asking if anyone had a terminfo for
a vt240. I've recieved a few replies, all saying that they use the vt240 in
vt100 mode and tell UNIX just that.
Well, I use VMS also, and VMS needs vt200 mode. What a pain changing back and
forth. Anyway, here's the terminfo I came up with. It has a few good features,
such as the 'Next Screen' and 'Prev Screen' keys work, as well as a hint as how
to get your DELETE key to be a BACKSPACE key. Read the terminfo for more details
about colors and such.
Just put the shar archive in your HOME directory, and run it. Then go into the
new directory called 'terminfo' and type:
tic vt240.ti
That should do it. Don't forget to set TERMINFO=$HOME/terminfo, and TERM=vt240;
then export (of course). Set the terminal to vt200 mode, 7 bit controls.
Vince Hatem
Bellcore
...ihnp4!rruxo!vch
Cut here and don't forget the .signature!!
================================================================================
: This is a shar archive. Extract with sh, not csh.
: The rest of this file will extract:
: terminfo/vt240.ti
echo extracting - terminfo/vt240.ti
mkdir terminfo
sed 's/^X//' > terminfo/vt240.ti << '!EOR!'
X# vt240 terminfo
X#
X# Written for UNIX System V Version 2 November, 1985
X#
X# Vincent C Hatem
X# Bell Communications Research
X# Raritian River Software Systems Center
X# 444 Hoes Lane
X# 4D-360
X# Piscataway, New Jersey 08854
X# (201) 699-4869
X# ...ihnp4!rruxo!vch
X#
X#
X# notes:
X#
X# This terminfo takes advantage of the vt240's extended keyboard and video
X# attributes. The 'Insert Here' key now works as a toggle insert key. The
X# 'Prev Screen' and 'Next Screen' keys work as page forward and page backward.
X#
X# To get the delete key (the one that is where a NORMAL terminal's backspace
X# key is) to work as a backspace key, put these commands in your .profile:
X#
X# stty intr ^C
X# stty erase ^?
X#
X#
Xvt240,
X# carriage return
X cr=^M,
X# delete line
X dl1=\E[1M$<3>,
X# insert line
X il1=\E[1L$<3>,
X# insert char
X ich1=\E[1@$<2>,
X# delete char
X dch1=\E[1P$<2>,
X# erase char
X ech=\E[1X$<2>,
X# underline char
X uc=\E[4m$<2>,
X# end underline mode
X ue=\E[24m$<2>,
X# down 1 line
X cud1=^J,
X# scroll text up
X ind=^J,
X# bell
X bel=^G,
X# 80 columns
X cols#80,
X# 24 lines
X lines#24,
X# tabs every 8 chars
X it#8,
X# clear screen
X clear=\E[H\E[2J$<50>,
X# cursor backwards
X cub1=^H,
X# auto margin
X am,
X# cursor position (absolute)
X cup=\E[%i%p1%d;%p2%dH$<5>,
X# cursor foward
X cuf1=\E[C$<2>,
X# cursor up
X cuu1=\E[A$<2>,
X# clear to end of line
X el=\E[K$<3>,
X# clear to end of display
X ed=\E[J$<50>,
X# cursor down # lines
X cud=\E[%p1%dB,
X# cursor up # lines
X cuu=\E[%p1%dA,
X# cursor back # columns
X cub=\E[%p1%dD,
X# cursor foward # columns
X cuf=\E[%p1%dC,
X# start stand-out mode
X smso=\E[1m$<2>, # makes the error messages red
X# optional stand-out mode
X# smso=\E[7;1m$<2>, # makes the error messages reverse video and red
X# end stand-out mode
X rmso=\E[m$<2>,
X# start underscore mode
X smul=\E[4m$<2>,
X# end underscore mode
X rmul=\E[m$<2>,
X# start bold
X bold=\E[1m$<2>,
X# start reverse video
X rev=\E[7m$<2>,
X# start blink mode
X blink=\E[5m$<2>,
X# exit attribute mode
X sgr0=\E[m$<2>,
X# start attribute mode
X sgr=\E[%?%p1%t;7%;%?%p2%t;4%;%?%p3%t;7%;%?%p4%t;5%;%?%p6%t;1%;m,
X# reset terminal to sane mode
X rs2=\E>\E[?3l\E[?4l\E[?5l\E[?7h\E[?8h,
X# start keypad transmit mode
X smkx=\E[?1h\E=,
X# end keypad transmit mode
X rmkx=\E[?1l\E>,
X# clear all tabs stops
X tbc=\E[3g,
X# set tab in all rows, current column
X hts=\EH,
X# home
X home=\E[H,
X# cursor key - up
X kcuu1=\EOA,
X# cursor key - down
X kcud1=\EOB,
X# cursor key - forward
X kcuf1=\EOC,
X# cursor key - backward
X kcub1=\EOD,
X# backspace key
X kbs=^H,
X# pf1 key
X kf1=\EOP,
X# pf2 key
X kf2=\EOQ,
X# pf3 key
X kf3=\EOR,
X# pf4 key
X kf4=\EOS,
X# horiz tab
X ht=^I,
X# scroll text down
X ri=\EM$<5>,
X# virtual terminal number
X vt#3,
X# newline ignored after 80 cols
X xenl,
X# xon-xoff used
X xon,
X# save cursor position
X sc=\E7,
X# restore cursor position
X rc=\E8,
X# change scroll region
X csr=\E[%i%p1%d;%p2%dr,
X# sent by next screen key
X knp=\E[6~,
X# sent by prev screen key
X kpp=\E[5~,
X# sent by insert here key
X kich1=\E[2~,
!EOR!
--
Vince Hatem ---------------- A
Bell Communications Research | UZI |----------|_ _ _\/ T
Raritan River Software Systems Center | |----------| /\ &
444 Hoes Lane ---------------- ROGER GUTS T
4D-360 / /\ DON'T NEED NO STINKIN'
Piscataway, NJ 08854 / / NECKTIES
(201) 699-4869 /-----/
...ihnp4!rruxo!vch
TRUE GRIT MYSTERIES - The detective series for those who NEVER eat quiche!
(WARNING - MAY BE EMOTIONALLY DISTURBING TO HAMSTER LOVERS)