Google
 

Trailing-Edge - PDP-10 Archives - mit_emacs_170_teco_1220 - emacs/tvi9xx.elib
There are no other files named tvi9xx.elib in the archive.
(W
[0+8+FQ(+4)[1
0FO10F"G+Q1'
+FQ()+4U1
FQ1"L0'
,Q1:M(Q1+4(]1]0))
   Y,z9YA[HjXwcmzto& Setup TVI9xx Library^R Set Fkey~DIRECTORY~ ~DOC~ & Setup TVI9xx Library~DOC~ ^R Set Fkey~DOC~ ~FILENAME~~FILENAME~
~INVERT~?M(M.Mload library)BARE
FSttymacro[0
@:I*|1FSospeed
0|FSttymacro
FSttyinit
[0QPREFIX CHAR LISTU0
@:I*\0Control-A  QTVFUN
\UPREFIX CHAR LIST
]0
M.VTVFUN
128M(M.MMAKE PREFIX CHARACTER)TVFUNU.A
M.M^R Beginning of LineU:tvfun()
FShelpmacro[0
@:I*|0
!F!:I*CFkey: FSECHODIS
@:I*\:M(M.M^R Describe)\[0M02,M.IFI
|FShelpmacro
12M(M.M ^R SET FKEY)^R SET FKEY
0FO..QTVI9xx Setup HookF"N[1M1'
0B9,fFunction name: [1
m.m1[2
q2m(m.m& macro name)u1
ff&1"N
-12"L(-1+@)[3'
"#(-12+`)[3'
'
"#@ft Put 1 on fkey: 
:i*m.i
fi-"N:i* Not an FKEYfserr'
fi[3
2,m.ifi
'
@:I*|FIWf@m(m.m1)|M.VMM FKEY 1
qmm fkey 1u:tvfun(Q3)
@:I*|C Which runs the function 1.|m.vmm ~doc~ fkey 1

TVI9xxUSupport package for TeleVideo-9xx terminals
Sets up emacs to run nicely on 1200-baud and slower lines
and allows definition of up to 22 hard-coded function keys
on those TeleVideo terminals supporting them.S Do initial setup for TeleVideos.
Loads the BARE library to get docs on built-in teco functions,
sets up line speed (teco flag 1FS OSPEED) to supress multitudes of
padding characters, defines Cntl-A as a prefix character, defines ^A^A
to be the standard ^A (^R Beginning of Line), modifies the teco flag
FS HELP MAC to provide documentation for Fkey definitions, and puts
some initial default assignments on several Fkeys.  If $TVI9xx Setup
Hook$ is defined, it is run afterwards to make any additional
assignments or changes.G^R Assign Emacs function to TVI Function key.
For best performance call with C-M-X or assign to a key.  If given a numeric 
argument will interpret it as the Fkey on which to put the function. 
Unshifted Fkeys are numbered 1 through 11 and shifted Fkeys 12 through 22.
Without argument will attempt to read the Fkey from the terminal--you should
press the appropriate shifted or unshifted Fkey.  The function name will be
read from the terminal.)& Setup TVI9xx Library
^R Set Fkey
T+8+fq(+4)[20[3
<%3,-q2f2u3q3&1@;q3"l0'>
f[BBindq3-1*5,q3*5g2q:..o(0)+q2