Re: [jed-users] VT100 compatible terminal emulator?

[Roland Hughes <roland@xxxxxxxxxxxxxxxxxxxx>]

Join the Usenet newsgroup

comp.os.vms

you can find it on groups.google.com

Search the message archives for xterm and terminal emulator. This 
discussion comes up a lot. Xterm is always breaking. There are lots of 
different startup scripts. Mine own broke several times back when I was 
using VMS.

Yeah, I wrote this book.

https://www.theminimumyouneedtoknow.com/app_book.html

Here is the one I was using recently for Eisner


#!/bin/sh
#        vax
# 09-17-96    Bob Ess      - initial creation
# 09-26-96    Shig Katada  - Additional keybindings
#
#        Script file to incorporate keybindings and command line
#        options for connecting to a VAX node

# Usage statement
Usage(){
    echo
    echo " Usage  : vax -options"
    echo
    echo " Options: -80   for 80 column terminal"
    echo "          -132  for 132 column terminal"
    echo "          -fg colorname"
    echo "          -bg colorname"
    echo "          -fn fontname"
    echo "          -fb bold fontname"
    echo "          -host [altair] [devel] [leonis] [castor]"
    echo ""
    echo " Example: \"vax -80 -fg white -bg black -fn 9x15 -fb 9x15b 
-host castor\""
    echo "          Starts a VAX session with an 80 column terminal"
    echo "          with a black background, white foreground, a normal"
    echo "          font of 9x15 and a bold font of 9x15b, and connects"
    echo "          to the node 'castor'"
    echo
    echo "          If you need additional help, please call Workstation"
    echo "          Services at x92396."
    echo
    exit 1
}


# Default to a black foreground with a white background.
# Use the 9x15 and 9x15bold fonts. Connect to castor by default.
#
    FG=yellow
    BG=black
    HOST=192.168.1.8
    FONTFAMILY="Liberation Mono"
    COLS=80



    xterm  -title "VAX" -132 -sb -sl 4000 +t -bc -geo ${COLS}x32 -fg 
${FG} -bg ${BG} \
        -cr red -fa "$FONTFAMILY" -xrm \
        'XTerm*VT100.translations:     #override \n\
        ~Shift  <Key>F1:    string(0x1b)    string("OP") \n \
        ~Shift  <Key>F2:    string(0x1b)    string("OQ") \n \
        ~Shift  <Key>F3:    string(0x1b)    string("OR") \n \
        ~Shift  <Key>F4:    string(0x1b)    string("OS") \n \
        ~Shift  <Key>F5:    string("Break") \n \
        ~Shift  <Key>F6:    string(0x1b)    string("[17~") \n \
        ~Shift  <Key>F7:    string(0x1b)    string("[18~") \n \
        ~Shift  <Key>F8:    string(0x1b)    string("[19~") \n \
        ~Shift  <Key>F9:    string(0x1b)    string("[20~") \n \
        ~Shift  <Key>F10:   string(0x1b)    string("[21~") \n \
        ~Shift  <Key>F11:   string(0x1b)    string("[23~") \n \
        ~Shift  <Key>F12:   string(0x1b)    string("[24~") \n \
        Shift   <Key>F1:    string(0x1b)    string("[23~") \n \
        Shift   <Key>F2:    string(0x1b)    string("[24~") \n \
        Shift   <Key>F3:    string(0x1b)    string("[25~") \n \
        Shift   <Key>F4:    string(0x1b)    string("[26~") \n \
        Shift   <Key>F5:    string(0x1b)    string("[28~") \n \
        Shift   <Key>F6:    string(0x1b)    string("[29~") \n \
        Shift   <Key>F7:    string(0x1b)    string("[31~") \n \
        Shift   <Key>F8:    string(0x1b)    string("[32~") \n \
        Shift   <Key>F9:    string(0x1b)    string("[33~") \n \
        Shift   <Key>F10:   string(0x1b)    string("[34~") \n \
        Shift   <Key>F11:   string(0x1b)    string("[28~") \n \
        Shift   <Key>F12:   string(0x1b)    string("[29~") \n \
                <Key>Print: string(0x1b)    string("[28~") \n \
                <Key>Cancel:    string(0x1b) string("[29~") \n \
                <Key>Pause: string(0x1b)    string("Om") \n \
                <Key>Insert:    string(0x1b) string("[2~") \n \
                <Key>Delete:    string(0x1b) string("[3~") \n \
                <Key>Home:  string(0x1b)    string("[1~") \n \
                <Key>End:       string(0x1b) string("[4~") \n \
                <Key>Prior: string(0x1b)    string("[5~") \n \
                <Key>Next:  string(0x1b)    string("[6~") \n \
                <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("Ol") \n \
                <Key>KP_Enter:  string(0x1b)    string("OM") \n \
                <Key>KP_Decimal: string(0x1b)   string("On") \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 \
        ~Shift  <Key>Up:        string(0x1b)    string("[A") \n \
        Shift   <Key>Up:        scroll-back(1,lines) \n \
        ~Shift  <Key>Down:  string(0x1b)    string("[B") \n \
        Shift   <Key>Down:  scroll-forw(1,lines) \n \
                <Key>Select:            select-start() \n\
                <Key>0x1000FF02: select-end(CUT_BUFFER0) \n\
        <Btn1Down>:             select-start() \n\
        <Btn1Up>:               select-end(PRIMARY, CLIPBOARD, 
CUB_BUFFER0) \n\
        Shift<Btn1Down>:        select-start() \n\
           Shift<Btn1Motion>:        select-extend() \n\
        Shift<Btn1Up>:            select-end(CLIPBOARD) \n\
        Shift<Btn2Up>: insert-selection(CLIPBOARD) \n\
        Shift<Btn3Down>:        start-extend() \n\
        Shift<Btn3Motion>:        select-extend() \n\
        Shift<BtnUp>:            select-end(CLIPBOARD)\n'\
        -e ssh nobody@xxxxxxxxxxxxxxxx &


I did not try Jed using it. EDT seemed to work just fine. Can't remember 
if they had LSE.

I never did anything with font menus and such. I just put this in my 
~/bin directory and made it executable under the name dec-u-serv

I last used that on Ubuntu 20.04 LTS but is has been quite a few months

On 7/26/21 5:02 AM, Ulli Horlacher wrote:
> I am using jed with edt mode since I was forced to switch from VMS to UNIX
> in the early 1990's.
>
> The edt function keys are hardwired in my brain, because it was my first
> editor.
>
> So far, I was using jed within the classical xterm terminal emulator, but
> for some unknown reasons the xterm popup menus (font selection, etc) are
> not working any more for me.
>
> The VTE based terminal emulators like gnome-terminal or xfce4-terminal
> have a bad VT100 support: they have no application keypad mode, which I
> REALLY need. For example, on a VT100 or xterm the key "0" on the numeric
> keypad produce <ESC>Op, whereas gnome-terminal produces just 0. Therefore,
> their VT100 mode is very bad = broken for me.
>
> Are there any other X11 terminal emulators with a good VT100 support?
>
> I cannot use xjed, because many of my hosts do not have X11.
--
Roland Hughes, President
Logikal Solutions
(630)-205-1593

http://www.theminimumyouneedtoknow.com
http://www.infiniteexposure.net
http://www.johnsmith-book.com
http://www.logikalblog.com
http://www.interestingauthors.com/blog

_______________________________________________
For list information, visit <http://jedsoft.org/jed/mailinglists.html>.