Periodic word count in margin

Question

I need to have a continuous word count for an assignment. This is either in the form of a note in the margin or one parenthesised in-text every 100 words or so. For instance,

----- TEXT ------|- MARGIN -
blahblahblahblah | 100 [100th word appears on this line]

Any ideas on how to do so?

Answer 1

I know a way with the GNU Emacs application, though the limitation is that it can't recognize latex code (maybe someone has a suggestion?), and therefore would only work if it is stripped from latex code at first:

C-u 100 M-f         ;; forward-word
M-F
M-W
SPACE               ;; insert space
\                   ;; self-insert-command
marginpar{          ;; self-insert-command * 10
C-y                 ;; yank
}                   ;; self-insert-command
M-b                 ;; backward-word
DEL                 ;; backward-delete-char-untabify

Using F4 (call-last-macro) from then on will then do what you ask every 100 words (make sure to put the cursor at the word after the \marginpar{}