Trailing-Edge
-
PDP-10 Archives
-
mit_emacs_170_teco_1220
-
emacs/wordcount.elib
There are no other files named wordcount.elib in the archive.
( W
[0+8+FQ(+4)[1
0FO1 0F"G+Q1 '
+FQ()+4U1
FQ1"L0 '
,Q1:M(Q1+4(]1]0))
@ I I W c l o K w ] ' y " b 2 F < @ C x & Count Words & Setup Wordcount Library ^R Count Words Page ^R Count Words Region ~DIRECTORY~ ~DOC~ & Count Words# ~DOC~ & Setup Wordcount Library ~DOC~ ^R Count Words Page ~DOC~ ^R Count Words Region ~DOC~ ~Filename~ ~Filename~
~INVERT~G m.m^r count words regionu...=
m.m^r count words pageu:.x( =)
Y @ft Region has
:,.f m(m.awordcount& Count words)@:=
@ft words.
0fsechoact .[0fnq0j
ff"nb[1z[2@ft Buffer: '
"#0m(m.m^R Mark Page)
.[1w.-z"n0l'.[2
@ft Page has '
m.awordcount& Count Words[3
q0,q1f [4
q1,q4m3[5q4,q2m3[6
q5+q6[7
q0jq0-q1"n0@f "nq7-1u7''
q7@:=
@ft words (q5@:=@ft+
q6@:=@ft)
0fsechoact N [00U0
[1.U1FNQ1J
FF"NF[VBWF[VZWFFSBOUND'
J<1:<FWL>"N0; '%0>
Q0 RDCOUNTA EMACS library for counting words.
Hacked 1/23/83 for Epstein@Rutgers.
Code: [RUTGERS]Pleasant;Pleasant.Emacs,
but written by Roy Marantz, I think.
Bug-reports, comments: Carter@Rutgers.v S Bind functions to keys.
^R Count Words Page on Control-X Equals,
^R Count Words Region on Control-Meta Equals./ ^R Type number of words from point to mark.H ^R Count words on this page (or whole buffer).
Print total words on page, then (before+after) indicating how
the page is split by point.
With argument, we do the same thing to the whole buffer.[ S Returns the number of words in part of the buffer.
<m>,<n> M(M.M& Count Words$) returns the number of lines
between character <m> and character <n>. If arguments are
not given, the entire buffer is used.Z & Setup Wordcount Library
^R Count Words Region
^R Count Words Page
& Count Words
T +8+fq(+4)[20[3
<%3,-q2f2u3q3&1@;q3"l0 '>
f[BBindq3-1*5,q3*5g2q:..o(0)+q2