PDP-10 Archive: emacs/scrlin.elib from mit_emacs_170_teco

Trailing-Edge - PDP-10 Archives - mit_emacs_170_teco_1220 - emacs/scrlin.elib

There are no other files named scrlin.elib in the archive.

(W
[0+8+FQ(+4)[1
0FO10F"G+Q1'
+FQ()+4U1
FQ1"L0'
,Q1:M(Q1+4(]1]0))
   )TBanzk"\i)\9HvS
_iiFsAz

& Kill SCRLIN Library& Setup SCRLIN Library^R Beginning of Line^R Down Line^R End of Line^R Up Line~DIRECTORY~~DOC~ & Kill SCRLIN Library ~DOC~ & Setup SCRLIN Library~DOC~ ^R Beginning of Line~DOC~ ^R Down Line~DOC~ ^R End of Line~DOC~ ^R Up Line~DOC~ ~FILENAME~~FILENAME~

~INVERT~M.M^R Beginning of LineU.A
M.M^R End of lineU.E
M.M^R Down LineU.N
M.M^R Up LineU.P
FSRGETTY"G1M.VUse Screen Lines'8m.m^R Beginning of Line-qA"efs^RInituA'
m.m^R End of Line-qE"efs^RInituE'
m.m^R Down Line-qN"em.m^R Down Real LineuN'
m.m^R Up Line-qP"em.m^R Up Real LineuP'0FO..QUse Screen LinesF"NW1'[S
FS^RPREV-1002"N
Q.H-777777."L
FS^RHPOSU.H''
1002FS^RLAST
FF"EQS"E@:L'
"#1:<0,(FSWIDTH):FM>W'
.-Z"EI
-2'
QS"EL''
"#QS"E@L'"#US''
1:<QS,Q.H&777777.:FM>
FSI&DLINE"NFSOSPEEDF"N-1200:"G99F[%CENTER@0V'''
0h0FO..QUse Screen LinesF"NW1'[S
FS^RPREV-1002"N
Q.H-777777."L
FS^RHPOSU.H''
1002FS^RLAST
QS"N-F"E-1'US'
1:<QS,Q.H&777777.(QS"E@-L:'"#@')FM>"N1:<0,Q.H&777777.:FM>'
FSI&DLINE"NFSOSPEEDF"N-1200:"G0F[%CENTER@0V'''
0*0FO..QUse Screen Lines"E@0L0'
FF"N@0L0'
FSSAIL"EFS^RHPOS-1"E40.,0A-40."L:R'''
FS^RHPOS"E12.,0A-12."NR''
:<0,0@FM
fs^HPrint"L
0a-"ER'"#0;''"#0;'>W
0,0FO..QUse Screen Lines"E@:L0'
FF"N@:L0'
FSSAIL"E
FS^RHPOS-(FSWIDTH-2)"E
40.,1A-40."L:C'''
FS^RHPOS-(FSWIDTH-1)"E
@F
"E:C''
1:<0,(FSWIDTH):FM>W
0
SCRLIN,SCRLIN macros for moving on screen linesS Assign ^A, ^E, ^N, ^PS Remove redefinitionsf^R Move down vertically to next real line.
Continuation lines are normally skipped.  If given after the
last LF in the buffer, makes a new one at the end.
If Use Screen Lines is 1, then continuation lines are not skipped.k^R Move up vertically to next real line.
Continuation lines are skipped unless Use Screen Lines is 1F^R Go to beginning of line.
Normally, this refers to text lines (i.e. go to after the previous CRLF).
However, if Use Screen Lines is 1, it refers to the beginning of a screen
line (only useful on display consoles).  If the cursor is already at the
edge of the screen on a continued line, then the cursor is moved to the
beginning of the preceeding screen line.  With an argument, the cursor is
always moved to the beginning of the text line.5^R Go to end of the line.
Normally, this refers to text lines (i.e. go to before the next CRLF).
However, if Use Screen Lines is 1, it refers to the end of a screen
line (only useful on display consoles).  If the cursor is already at the
edge of the screen on a continued line, then the cursor is moved to the
beginning of the next screen line first.  With an argument, the cursor
is always moved to the end of the text line.s& Setup SCRLIN Library
& Kill SCRLIN Library
^R Down Line
^R Up Line
^R Beginning of Line
^R End of Line
T+8+fq(+4)[20[3
<%3,-q2f2u3q3&1@;q3"l0'>
f[BBindq3-1*5,q3*5g2q:..o(0)+q2