shah@fnboot.fnal.gov (99480_Hemant, Shah) (04/11/91)
Here's the way you can do it under X11. Append the line between
asterisks to $HOME/.Xdefaults file.
************************************************************************
*myxterm.c132: true
*myxterm.Translations: #override \
<Key>BackSpace: string(0x7f) \n\
<Key>Num_Lock: string(0x1b) string("OP") \n\
<Key>KP_Divide: string(0x1b) string("OQ") \n\
<Key>KP_Multiply: string(0x1b) string("OR") \n\
<Key>KP_Subtract: string(0x1b) string("OS") \n\
<Key>KP_Add: string(0x1b) string("Om") \n\
<Key>Pause: string(0x1b) string("Ol") \n\
<Key>Print: string(0x1b) string("[28~") \n\
<Key>Cancel: string(0x1b) string("[29~") \n\
<Key>KP_0: string(0x1b) string("Op") \n\
<Key>KP_1: string(0x1b) string("Oq") \n\
<Key>KP_2: string(0x1b) string("Or") \n\
<Key>KP_3: string(0x1b) string("Os") \n\
<Key>KP_4: string(0x1b) string("Ot") \n\
<Key>KP_5: string(0x1b) string("Ou") \n\
<Key>KP_6: string(0x1b) string("Ov") \n\
<Key>KP_7: string(0x1b) string("Ow") \n\
<Key>KP_8: string(0x1b) string("Ox") \n\
<Key>KP_9: string(0x1b) string("Oy") \n\
<Key>KP_Decimal: string(0x1b) string("On") \n\
<Key>Insert: string(0x1b) string("[1~") \n\
<Key>Home: string(0x1b) string("[2~") \n\
<Key>Prior: string(0x1b) string("[3~") \n\
<Key>Delete: string(0x1b) string("[4~") \n\
<Key>End: string(0x1b) string("[5~") \n\
<Key>Next: string(0x1b) string("[6~") \n\
<Key>KP_Enter: string(0x1b) string("OM") \n\
<Key>F1: string(0x1b) string("[17~") \n\
<Key>F2: string(0x1b) string("[18~") \n\
<Key>F3: string(0x1b) string("[19~") \n\
<Key>F4: string(0x1b) string("[20~") \n\
<Key>F5: string(0x1b) string("[21~") \n\
<Key>F6: string(0x1b) string("[23~") \n\
<Key>F7: string(0x1b) string("[24~") \n\
<Key>F8: string(0x1b) string("[25~") \n\
<Key>F9: string(0x1b) string("[26~") \n\
<Key>F10: string(0x1b) string("[28~") \n\
<Key>F11: string(0x1b) string("[29~") \n\
<Key>F12: string(0x1b) string("[31~") \n\
***********************************************************************
This will emulate VT220 key pad on IBM as follows :
[VT100/VT200 Keys] [Keys on IBM keyboard]
PF1 Num Lock
PF2 /
PF3 *
PF4 -
7 7
8 8
9 9
- +
4 4
5 5
6 6
, Pause
1 1
2 2
3 3
Enter Enter
0 0
. .
Find Insert
Insert Here Home
Remove Page Up
Select Delete
Prev Screen End
Next Screen Page Down
Up Arrow Up Arrow
Down Arrow Down Arrow
Right Arrow Right Arrow
Left Arrow Left Arrow
F6 F1
F7 F2
F8 F3
F9 F4
F10 F5
F11 F6
F12 F7
F13 F8
F14 F9
Help F10, Print Screen
Do F11, Scroll Lock
F17 F12
Here's the script file that will start aixterm with vt220 emulation,
it is an executable file called vt220 :
*******************************************************************
#! /bin/sh
T="vt100 terminal"
if test $# -gt 0
then
case $1 in
-*) ;;
*)
E="$1"
T="$1 $T"
shift
esac
fi
if test x$E != x
then
/usr/bin/X11/aixterm -132 -sb -sk -v -fullcursor -fn Rom14\
-T "$T" -name myxterm -s -j $* \
-e sh -c "exec telnet $E" &
else
/usr/bin/X11/aixterm -132 -sb -sk -v -fullcursor -fn Rom14\
-T "$T" -name myxterm -s -j $* &
fi
*******************************************************************
To start emulation type vt220, ot if you want to telnet to a VMS node
type vt220 node_name.
Have fun :-)
##### #####
Hemant Shah ##### #####
Fermilab ######################
ACCESS/System Integration ######################
##### #####
####### #######
Email : shah@fnusg4.fnal.gov ################ ################
Voice : (708) 840-8071 ############## ##############
############ ############
############ ############
############## ##############
################ ################
####### #######
##### #####
######################
######################
##### ######
##### #####