Что нового

[Мышь, клавиатура] Сценарий действий(автоматическое движение мыши) для игры

garapas

Новичок
Сообщения
10
Репутация
0
Версия AutoIt: 3.3.10.2

Описание: Здравствуйте,
Я в программе ничего не понимаю,но думаю с вашей помощью я справлюсь.
Суть:мне нужно что бы при нажатии(к примеру) клавишы "щ" начинался сценарий действий:мне нужно, что бы через каждые 10 минут(примерно) мышка сама начинала двигаться в течении 5 секунд(к примеру) в разные стороны(не очень сильно,градусов на 30 в разные стороны).Нужно что бы эти действия не прекращались(т.е через каждые 10 минут мышка начинала двигаться) до нажатия клавиши ш(к примеру).
Спасибо за внимание:smile:

Примечания: Нет


Добавлено:
Сообщение автоматически объединено:

Помогите пожалуйста.
 

inververs

AutoIT Гуру
Сообщения
2,135
Репутация
465
По кнопке i запускается
Код:
If Not HotKeySet('i','on') Then Exit MsgBox(0,'Ошибка','Эту кнопку нельзя использовать')
While 1
	Sleep(250)
WEnd
Func Mouse()
	Local $timer = TimerInit()
	Local $mouse_pos = MouseGetPos()
	Do
		MouseMove($mouse_pos[0] + 50,$mouse_pos[1],10)
		Sleep(100)
		MouseMove($mouse_pos[0] - 50,$mouse_pos[1],10)
		Sleep(100)
	Until TimerDiff($timer) > 5 * 1000 ;Двигаем мышь в течении 5 секунд
         MouseMove($mouse_pos[0],$mouse_pos[1],10)
EndFunc
Func on()
	Local Static $work = False
	$work = Not $work
	If $work Then
		ConsoleWrite('Включено' & @LF)
		Mouse()
		AdlibRegister('Mouse',10 * 60 * 1000) ;Функция Mouse автоматически запуститься через 10 минут
	Else
		ConsoleWrite('Выключено' & @LF)
		AdlibUnRegister('Mouse')
	EndIf
EndFunc
 
Автор
G

garapas

Новичок
Сообщения
10
Репутация
0
Большущее спасибо,пойду опробую


Добавлено:
Сообщение автоматически объединено:

Т.е я должен запустить файл,потом выходит ошибка,потом нажимать I,верно?
 

inververs

AutoIT Гуру
Сообщения
2,135
Репутация
465
Нет, если выходит ошибка то клавишу I нельзя назначить. Поменяйте на другую.
 
Верх