!TECO INITIALIZATION FILE.  SETS UP ..L, VARIOUS FLAGS, ^R MODE!
EC
:^I..L/20FS^RMDLYW 20FS^RMCNTW/ E[ ET..S;_^RSV > 1:<ER>"N
:^I..L/-1FS^RMDLYW 0FS^RMCNTW/ .,.X..F' E]
:^I..L/..L .+1,(FSJNAME).FX..0 -D F=..0LISPT"N FSTTY INIT '
0FS^HPRINTW 0FS^MPRINTW 1FS_DISABLEW 1FSECHOLINESW -1FSBOTHCW 0U.U
/

M..LW
FSRGETTY"E3:'
Q..W-72"E%..WFSWID' 
.,.X..0 HK FJ
."G :S"N-D'"#ZJ' B,.FX..0 .,ZFX..1
    FQ..0"G -1F[FNAMSYW 1:<ER..0^Y>W F]FNAMSYW'
    FQ..1"G M..1''"#
[B[E .UBEG.UEQBJLX..0 4LX..1 QB,QEK ]E]B
.,(G..1-2D11.I40.IG..0-FWL2CI:2CI::L 2D
11.I ITECO. FSVERSIO\ .)FX..0 :FT..0
ETDSK:..S;@ @
0U1 0U2 0UU ^FTî :^I0@
FSRGETTY"E2'"#FSHEIGHT/2-1'<FT
>@ M0 ^:I..L/0:FT TECO RESTARTED...L 40F+/ 0U0
.,(1,99GJ).FX..0 F=..0LISPT"EFTLISP-INFERIOR TECO

 :I..JTECMAC EDITOR.   15.,1M.L'
 FTREADY.	TYPE ? FOR HELP.
 :FV 90:"N:FI-?"EFIW M.DW''' 0U..H M.RW