Нужна программа для поиска русских букв

[[ximik]]

Есть некий текст.
Например "приооратпоарыоаоарыоа"

Нужна программа которая показывала каким языком набран некий символ.

То есть "р" может быть набран как с русской раскладки клавиатуры так и английской. Только с английской это уже будет буква "Пэ"

 

[yurik13]

программа для винды? кодировка текста win1251, UTF?

 

[[ximik]]

хз какая кодировка.
Текст набран в Word.
Но могу перекодировать в нужную кодировка.
А что? есть варианты ?

 

[Trigan]

Приведи пример - зачем, может и будут варианты...
А так, очень напрягает задача - "...каким языком набран некий символ."

 

[Zevs]

хз какая кодировка.
Текст набран в Word.
Но могу перекодировать в нужную кодировка.
А что? есть варианты ?

Вам куда? В Ру или Анг? Транслитерацию юзать? Отпишитесь - сварганю макрос. Ах, да, версия Word-а какая?

 

[Zevs]

Вот примерчик макроса (на колене набросал), который переводит выделенный текст из Ру в Анг по клавишам: Й->Q, Ц->W и т.д.

Sub coding()
Const str1 As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
Const str2 As String = "ФИСВУАПРШОЛДЬТЩЗЙКЫЕГМЦЧНЯфисвуапршолдьтщзйкыегмцчня"
Dim SelStart As Long, SelEnd As Long
Dim i As Long, s As Long
SelStart = Selection.Start
SelEnd = Selection.End
For i = SelStart To SelEnd - 1
  Selection.Start = i
  Selection.End = i + 1
  s = InStr(1, str1, Selection.Text)
  If s >= 1 Then
    Selection.Text = Mid(str2, s, 1)
  End If
Next i
End Sub

 

[Abraxas]

А можно с помощью Заменить (Ctrl+H) в ворде выделить все кириллические знаки цветом или болдом, и сразу будет видно, где латинка, где кириллица.

 

[[ximik]]

спасибо всем.
Нашел скипт на php который жирным выделяет русские буквы.

 

[[ximik]]

а нужна программа для поиска русских букв к н х р о с м т
в базе данных email. А то сервер не отправлял сообщение. Так как часть кириллицей, часть латиницей.