Спасите-помогите

У кого-то из френдов был скрипт для Ворда, выделяющий цветом повторение слов в тексте и тому подобное. Не дайте погибнуть! Спасибо.

(кросспост в ру_транслейт)


UPDATE. Я пока делаю поиск с использованием wildcards с таким выражением: ([А-ЯЁа-яё]{6})(?{1,80})\1
Это работает, но как-то странно: по идее оно должно искать слова, расположенные друг от друга не более чем в 80 символах, а оно находит и выделяет слова, расположенные практически на любом расстоянии друг от друга, через несколько страниц. Что я делаю не так?