russiansoul
Новичок
- Сообщения
- 2
- Репутация
- 0
Здравствуйте уважаемые форумчане
хочу написать программу для автоматической замены букв если раскладка английская и чтоб учитывала регистры
например:
хочу написать программу для автоматической замены букв если раскладка английская и чтоб учитывала регистры
например:
Код:
$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