[Info-vax] x86 Update 4/22/19

[Stephen Davies]

On Tuesday, 30 April 2019 21:50:27 UTC+1, Peter 'EPLAN' LANGSTOeGER  wrote:
> ...
> Or define a systemwide EVE$INIT to point to an EVE$INIT.EVE file like this:
> 
> TPU IF GET_INFO (SCREEN, "MOTIF") THEN SET (MOUSE,ON) ELSE SET (MOUSE,OFF) ENDIF
> DEF KEY=CONTROL-B SET WIDTH 132
> DEF KEY=CONTROL-N SET WIDTH 80
> DEF KEY=F8 QUIT
> DEF KEY=GOLD-E EXIT
> DEF KEY=GOLD-Q QUIT
> DEF KEY=GOLD-X TPU WRITE_FILE (SELECT_RANGE,"TMP.TMP")
> DEF KEY=GOLD-LEFT  "SHIFT LEFT 8"
> DEF KEY=GOLD-RIGHT "SHIFT RIGHT 8"
> SET CURSOR BOUND
> SET NOEXIT ATTRIBUTE CHECK
> SET SCROLL MARGIN 7 7
> SET NOWRAP

My EVE customisations are over 100 lines. Most are just keyboard
shortcuts for common EVE functions but some initialisation and TPU
functions worth mentioning are:

SET TABS SPACES
SET TABS VISIBLE
DEF KEY=GOLD-TAB TPU COPY_TEXT(ASCII(9)) ! if really need a hard tab
DEF KEY=GOLD-M TPU SET (MOUSE,ON)  ! for terminal mode
DEF KEY=GOLD-N TPU SET (MOUSE,OFF) ! for terminal mode
DEF KEY=CTRL-REMOVE TPU WRITE_CLIPBOARD("", eve$selection (true,,, eve$x_select_remove_flag))
DEF KEY=CTRL-INSERT TPU READ_CLIPBOARD
DEF KEY=M4CLICK TPU SCROLL(CURRENT_WINDOW, -3) ! repeat for M4CLICK2..5
DEF KEY=M5CLICK TPU SCROLL(CURRENT_WINDOW, 3) ! repeat for M5CLICK2..5

I actually save them in a section file and use a minimal EVE init file
(for speed and so that I can also save some common macros) but I like to
maintain a text file listing the 'contents' of the section file.

I have also used 'extend' to add some additional TPU functions for things
like indenting a block of text. Basically, I don't really understand why
anyone would prefer EDT, but the recent post showing a lack of awareness
of commands such "SET CURSOR BOUND" may explain it.