Программа для транслитерации

russiansoul · 21 Янв 2015

Здравствуйте уважаемые форумчане
хочу написать программу для автоматической замены букв если раскладка английская и чтоб учитывала регистры
например:

Код:

$dll = DllOpen("user32.dll")
while 1
Local $eng[7]=['q','w','e','r','t','y','u,']
Local $rus[7]=['й','ц','у','к','е','н','г']
Local $hex[7]=['51','57','45','52','54','59','55']
for $i=0 to 6
If _IsPressed($hex[$i],$dll) Then
Consolewrite(,$eng[$i])
If @KBLayout=0419 Then
If _IsPressed($hex[$i],$dll) Then
Consolewrite(,$rus[$i])
		EndIf
		While _IsPressed($hex[$i]) = 1
		WEnd
next
WEnd

InnI · 21 Янв 2015

Непонятно, при чём тут транслитерация...
Вот примерно то, что вы хотели изобразить

Код:

#include <Misc.au3>
#include <WinAPISys.au3>

$dll = DllOpen("user32.dll")

Global $eng[7] = ['q' , 'w' , 'e' , 'r' , 't' , 'y' , 'u' ]
Global $rus[7] = ['й' , 'ц' , 'у' , 'к' , 'е' , 'н' , 'г' ]
Global $hex[7] = ['51', '57', '45', '52', '54', '59', '55']

While Sleep(10)
  For $i = 0 To 6
    If _IsPressed($hex[$i], $dll) Then
      Switch _WinAPI_GetKeyboardLayout(WinGetHandle("[active]"))
        Case 0x04090409
          ConsoleWrite($eng[$i])
        Case 0x04190419
          ConsoleWrite($rus[$i])
        Case Else
          ConsoleWrite("?")
      EndSwitch
      While _IsPressed($hex[$i])
      WEnd
    EndIf
  Next
WEnd

AZJIO · 21 Янв 2015

russiansoul
Так уже написана TextCorrection

Astel064 · 22 Янв 2015

А вот и мое детище, правда, писал давно, но пользуюсь по сей день :smile:

LngSwitcher
Исходники тут: *скачать*

russiansoul · 22 Янв 2015

спасибо всем :IL_AutoIt_1:

Автор темы	Похожие темы	Форум	Ответы	Дата
R	Программа для сигнализации о движении в окне и при этом нужно сделать скриншот не всего окна, а по координатам	Стол заказов	1	22 Ноя 2021
R	Мышь, клавиатура Программа для пооЧередного нажатия клавиш в игре	Общие вопросы по AutoIt	1	28 Сен 2019
	Программа для создания GDI-Регионов на основе изображения	Примеры и рабочие проекты	2	2 Авг 2019
	Программа для рисования Путей с помощью интерфейса GdiPlus	Примеры и рабочие проекты	0	27 Июл 2019
Y	[Автоматизация] [Автоматизация] Программа для отслеживания времени простоя ПК по питанию и по связ	Стол заказов	0	16 Апр 2019

Поиск

Поиск

Программа для транслитерации

russiansoul

Новичок

InnI

AutoIT Гуру

AZJIO

Меценат

Astel064

Помог мой пост, ставь +!

russiansoul

Новичок