Скорость клика мыши в скрипте

[Петр]

Версия AutoIt: 3.

Описание: Ребят имеется скрипт на 1000 кликов по координатам (1 координаты-1000кликов) и так далее. Но проблема в том что клики делаются со скоростью света, а надо что бы между кликами было примерно 2-3 секунды. Прошу помощи, как мне это сделать?
И почему то не работает остановка скрипта. Запуск работает а вот остановка нет, не могу понять почему.


Примечания:

HotKeySet('Esc', '_Exit')
HotKeySet('z', '_Click')
HotKeySet('я', '_Click')
Global $iClicks = 1000;1000кликов
While 1

WEnd
Func _Click()

MouseClick('Right',707,563)
MouseClick('Right',707,595)
MouseClick("Left", 477, 694, $iClicks)

MouseClick('Right',740,563)
MouseClick('Right',739,595)
MouseClick("Left", 477, 694, $iClicks)

MouseClick('Right',771,564)
MouseClick('Right',772,594)
MouseClick("Left", 477, 694, $iClicks)

MouseClick('Right',807,562)
MouseClick('Right',805,598)
MouseClick("Left", 477, 694, $iClicks)

MouseClick('Right',839,563)
MouseClick('Right',839,596)
MouseClick("Left", 477, 694, $iClicks)

MouseClick('Right',871,564)
MouseClick('Right',871,595)
MouseClick("Left", 477, 694, $iClicks)

MouseClick('Right',906,562)
MouseClick('Right',904,598)
MouseClick("Left", 477, 694, $iClicks)

MouseClick('Right',937,564)
MouseClick('Right',937,596)
MouseClick("Left", 477, 694, $iClicks)

Send("ESC")


EndFunc ;==>_Click

Func _Exit()
Exit
EndFunc ;==>_Exit

 

[Петр]

Со скоростью кликов разобрался. А вот с остановкой программы нет=(

 

[ra4o]

Не мучьте компьютер , добавьте паузу небольшую в цикл

While 1
  sleep(200)
WEnd

 

[Петр]

то есть это мне удалить да? "Opt("MouseClickDelay", 1000)"

Не мучьте компьютер , добавьте паузу небольшую в цикл

While 1
  sleep(200)
WEnd

 

[ra4o]

Нет, пусть остаётся ,это пауза между кликами.

 

[Alofa]

... то есть это мне удалить да?..

То есть это значит запустить скрипт в режиме ожидания (без нажатия на "z"), открыть диспетчер задач и посмотреть загрузку ЦП.
После этого вставить в цикл While...WEnd паузу в виде sleep(200) и повторить шаг 1 - так сказать почувствуйте разницу.

Затем откройте справку и ответьте для себя, что в этой строке не так:

HotKeySet('Esc', '_Exit')

 

[Петр]

Добавлено:

Сообщение автоматически объединено: 4 Авг 2017

Все разобрался =) спасибо за помощь =) еще вопросик, как можно переделать код что бы всплывало окно подсказка типа F5-старт
F6-стоп
F7-выход
типа такого

HotKeySet("{F5}", "Start")
HotKeySet("{F6}", "Stop")
HotKeySet("{F7}", "Close")
Global $iClicks = 1000;1000кликов
Global $Paused
Opt("MouseClickDelay", 2000)
While 1
sleep(200)
WEnd
Func Start()

MouseClick('Right',905,549)
MouseClick('Right',905,586)
MouseClick("Left", 170, 540, $iClicks)

MouseClick('Right',944,550)
MouseClick('Right',944,588)
MouseClick("Left", 170, 540,, $iClicks)

MouseClick('Right',980,549)
MouseClick('Right',980,589)
MouseClick("Left", 170, 540,, $iClicks)

MouseClick('Right',1019,550)
MouseClick('Right',1019,592)
MouseClick("Left", 170, 540, $iClicks)

MouseClick('Right',1057,550)
MouseClick('Right',1057,594)
MouseClick("Left", 170, 540, $iClicks)

MouseClick('Right',1096,556)
MouseClick('Right',1096,596)
MouseClick("Left", 170, 540, $iClicks)

MouseClick('Right',1134,555)
MouseClick('Right',1134,595)
MouseClick("Left", 170, 540, $iClicks)

MouseClick('Right',1173,555)
MouseClick('Right',1173,595)
MouseClick("Left", 170, 540, $iClicks)

Send("ESC")


EndFunc ;==>_Click

Func Stop()
$Paused = NOT $Paused
While $Paused
sleep(100)
WEnd
EndFunc
Func Close()
Exit 0
EndFunc

 

[ra4o]

Когда, при каких условиях должна всплывать подсказка ?

 

[Петр]

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

Когда, при каких условиях должна всплывать подсказка ?

 

[ra4o]

У Вас координат вагон целый, можно конечно использовать для ввода значений

InputBox()

, для подсказок

ToolTip()

 

[Петр]

Ну ладно это не столь важно, еще вопросик при нажатии паузы он возвращает все на начало, а можно как ни будь сделать так, что бы при паузе он останавливался и продолжал работу при нажатии старта на том месте где он остановился? ну и соответственно что бы продолжал кликать там где остановился


Добавлено:

Сообщение автоматически объединено: 4 Авг 2017

И по поводу

ToolTip()

как увеличить размер самой иконки которая всплывает?