AHK: RegExMatch - сохранение целого слово с совпадением

text =
(
В переменной book сохранен большой текст. Я хочу из всего текста вычленить только слова, в которых содержится сочетание "рус" (Русь, русский, белорус, брусок, русалка, и т.д.). И каждое из этих слов сохранялось в массив words, с растущим индексом по порядку поиска ( words[0] = Русь; words[1] = русский и т.д. )
Слова с совпадением должны сохраняться целиком (целое слово, с границами по бокам).
)

words := []
while RegExMatch(text, "iO)[а-я]*рус[а-я]*", match, A_Index = 1 ? 1 : match.Pos(0) + match.Len(0))
   words.Push(match[0])

; проверка
for k, v in words
   MsgBox, % k ": " v

Haystack = 
(
Я хочу из всего текста вычленить только слова, в которых содержится сочетание "рус" (, русский, белорус, брусок, русалка, и т.д.).
)

MsgBox % RegExReplace(Haystack, "Oi)(*UCP)\b(\w*?рус\w*)\b")

book = 
(
В переменной book сохранен большой русско-английский текст. Я хочу из всего текста вычленить только слова, в которых содержится сочетание "рус" (Русь, русский, белорус, брусок, русалка, и т.д.). И каждое из этих слов сохранялось в массив words, с растущим индексом по порядку поиска ( words[0] = Русь; words[1] = русский и т.д. )
Слова с совпадением должны сохраняться целиком (целое слово, с границами по бокам).
)
words := []
RegExReplace(book, "i)[-а-я]*рус[-а-я]*(?Cf)")

; проверка
for k, v in words
   MsgBox, % k ": " v

f(m)  {
   global words
   words.Push(m)
}

Haystack = 
(
русско-английский словарь
)

RegExMatch(Haystack, "Oi)(*UCP)\b(\w*?рус\w*)\b", words)

MsgBox % words[1] "`n" words.Count()