-
AutoIt
(
http://forum.oszone.net/forumdisplay.php?f=103)
эмуляция нажатия клавиш с помощью Autoit
Всем привет, начал изучать Autoit, мне очень нужна помощь в написании одного скрипта, на эмуляцию нажатия клавиш клавиатуры (цифровых),
Код:
$i = 0
Do
$begin = TimerInit()
sleep(2000)
$dif = TimerDiff($begin)
Send("{1}")
$i = $i + 1
Until $i = 10
$i = 10
Do
$begin = TimerInit()
sleep(2000)
$dif = TimerDiff($begin)
Send("{2}")
$i = $i - 1
Until $i = 0
вот начал писать на две клавиши, но это все не то... мне нужно чтобы нажимались клавиши 1 и 2 бесконечное количество раз, с нужными мне выдержками можно даже без GUI |
Код:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $WAIT_1 = 2 ; 2 секунды
Global $WAIT_2 = 3 ; 3 секунды
$nForm1 = GUICreate("", 363, 196, 577, 289, BitOR($WS_MINIMIZEBOX,$WS_CAPTION,$WS_POPUP,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
$Button1 = GUICtrlCreateButton("X", 136, 48, 91, 89)
GUISetState(@SW_SHOW)
$iBegin_1 = TimerInit()
$iBegin_2 = TimerInit()
Do
$nMsg = GUIGetMsg()
If Round(TimerDiff($iBegin_1) / 1000) = $WAIT_1 Then
Send("{1}")
$iBegin_1 = TimerInit()
EndIf
If Round(TimerDiff($iBegin_2) / 1000) = $WAIT_2 Then
Send("{2}")
$iBegin_2 = TimerInit()
EndIf
Sleep(200)
Until $nMsg = $Button1 Or $nMsg = $GUI_EVENT_CLOSE
|
Предупреждение за нарушение правил форума, пункт 2.7:
Цитата:
В заголовке темы обязательно обозначайте название предмета, которого касается вопрос, а в теле сообщения максимально подробно опишите проблему (приведите аппаратную/программную конфигурацию, а также изложите ситуацию, в которой возникает проблема). Темы с несодержательными или слишком общими заголовками будут закрываться или переноситься в раздел "Зона тестирования" в зависимости от политики конкретного форума. Подробнее о принципах создания тем читайте в этом документе и Правилах форумов.
|
Переименуйте пожалуйста тему. |
Время: 05:47.
© OSzone.net 2001-
