        TECO Cursor Mode Editor V2
        ~~~~~~~~~~~~~~~~~~~~~~~~~~

This is started by typing CU from TSX (or @C from RT-11).  It
works quite well under TSX, but there can be problems with 
echoing during complicated edits.  (This may be improved in future 
versions).  If in any doubt, type <LF> or <ESC>U to update 
the screen.  Creating new text is most efficient if <DEL> is used 
to correct typing errors, as this immediately corrects the local 
TSX line buffer.  All other editing commands are passed 
immediately to TECO.  Insertions appear to overtype existing 
text, but all becomes clear when you use any command or cursor 
movement!  It is often best to type ahead without waiting for the 
screen to catch up.  

As cursor movements are very slow, use CTRL/F and CTRL/B when 
possible.  

This version offers easy to remember <ESC> sequences as 
alternatives to the keypad commands.  Where appropriate (*) these 
can be prefixed by <ESC> number for a repeat count.  (For a 
fuller explanation, see the VT52.TEC documentation.)

<ESC> E  End of line		CTRL/B  Backward move by word*
<ESC> F  Toggle fixed mode	CTRL/C  Abort from macro
<ESC> I  Insert line*		CTRL/D  Delete rest of line*
<ESC> J  Jump to start of line	CTRL/E  Erase word*
<ESC> K  TECO kommand		CTRL/F  Forward move by word*
<ESC> L  Literal char follows	CTRL/K  Kill line*
<ESC> M  Margin alignment*	CTRL/T  Top of file
<ESC> N  Next page*		CTRL/U  Kill start of line
<ESC> P  Put line(s) in buffer*	CTRL/V  Toggle seeall mode
<ESC> R  Retrieve lines		CTRL/Z  Exit and update
<ESC> S  Search for string	<DEL>   Local delete
<ESC> T  Top of page		<BK SP> Delete previous*
<ESC> U  Update screen		<5>     Delete character*
<ESC> V  Left margin*		<.>	Repeat last search*
<ESC> W  Right margin width*	<0>	Next line*
<ESC> X  Delete string/line(s)	<LF>    Redisplay line
<ESC> Z  End of page		<ESC> n  Repeat n times
<ESC><ESC> Repeat last TECO kommand

After CTRL/C type EX to update the file, or CTRL/C CTRL/C to 
abort the edit.  Alternatively cursor editing can be 
restarted by typing MI<ESC><ESC>.  A new file can be edited by 
typing MX<ESC><ESC>.    

Note that <ESC> X deletes the line(s) just put in the buffer by
<ESC> P, or searched for by <ESC> S.

Additions to VT52.TEC:
   CTRL/B - Backward move by word(s)
   CTRL/E - Erase word(s)
   CTRL/F - Forward move by words
   CTRL/T - Top of file, same as: CTRL/C EX <ESC><ESC> CU <CR><CR>
   CTRL/Z - Exit and update, same as: CTRL/C EX <ESC><ESC>

Packing text between left and right margins:
   <ESC> nn <ESC> V   sets left margin at column nn (default 1)
   <ESC> nn <ESC> W   sets right margin at column nn (default 64)
   <ESC> nn <ESC> M   packs nn lines (default 1, 0 packs a paragraph)

Changes to VT52.TEC:  <BK SP> is used for the <DEL> function, as under
  TSX <DEL> is reserved for deleting previously typed characters 
  (without activating TECO).

Useful TECO commands:
  Ntext<ESC><ESC>    searches for "text" across page boundaries
  FStext1<ESC>text2<ESC><ESC>   replaces text1 by text2  
  FNtext1<ESC>text2<ESC><ESC>   ditto across page boundaries
  EIfile2.ext<ESC><ESC>   inserts file2 in the working file


Technical notes:  
~~~~~~~~~~~~~~~~

These macros are for use with TSX V36 or later.

RT-11 version: C.COM, RTVEG.TEC, VT52X.TEC

TSX VERSION: CU.COM, TSXVEG.TEC, VT52R.TEC

In TSX the following activation characters are used:

 ^B ^D ^E ^F <BS> <TAB> <LF> ^K <CR> ^T ^V ^U

and MXSPAC should be at least 12.  Use of any of these characters,
<ESC>, or cursor movement, swaps your job into memory!  For maximum
efficiency in text input, you may not wish to activate on <TAB>.
If so, delete in VT52X "29^T 68^T 9^T"
This still looks OK when inputting text, but means an increased use
of <ESC><ESC> during editing.  

It is assumed that the TSX lead in character is 29.  (This is used in 
TSXVEG and VT52X as 29^T.) 

If you have the TECO distribution kit, you can build a version of
TECO to implement window mode (and hence this editor) on most semi-
intelligent VDUs.

The macro is reasonably bug free, but please let me know of any
problems.



Nigel Bevan 

01-977 3222 x4013/4011

August 1980
                                                                                                                                                                                                                                                                                                                                                    