Что нового

[Элементы GUI] Автокликер-бот с выбором количества нажатий

Samk

дорогу осилит идущий
Сообщения
4
Репутация
0
Помогите пожалуйста с решением задачи:
При выборе значения в окошке и нажатии кнопки Старт мышь выполняет клики согласно выбранному значению.
Код:
#include <GUIConstants.au3>
; main window
GUICreate("Привет кликер", 130, 120) 

; number of pots (buttons, labels)
GUICtrlCreateLabel("# Pots", 10, 20) ; label, coord x, coord y
GUICtrlCreateInput("99", 10, 35, 40, 20) ; checkbox, coord, dimension
GUICtrlCreateUpdown(-1)
GUICtrlCreateLabel("Enter number of pots", 10, 60)
GUICtrlCreateButton("Start", 10, 75, 100, 30)

; start script loop
GUISetState(@SW_SHOW)
While 1
	Switch GUIGetMsg()
		Case $GUI_EVENT_CLOSE
			Exit

	EndSwitch
WEnd
 

scanfail

Знающий
Сообщения
244
Репутация
17
Сам тоже неопытен... Но пример дать смогу, возможно где-то будут ошибки :-[.
Код:
#include <GUIConstants.au3>
; main window
GUICreate("Привет кликер", 130, 120) 

; number of pots (buttons, labels)
GUICtrlCreateLabel("# Pots", 10, 20) ; label, coord x, coord y
$Click = GUICtrlCreateInput("99", 10, 35, 40, 20) ; checkbox, coord, dimension
GUICtrlCreateUpdown(-1)
GUICtrlCreateLabel("Enter number of pots", 10, 60)
$Start = GUICtrlCreateButton("Start", 10, 75, 100, 30)

GUISetState(@SW_SHOW)

$Check = GUICtrlRead($Click)

While 1
    Switch GUIGetMsg()
 Case $Start
	Clicker()
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

Func Clicker()
   MouseClick("left",@DesktopWidth,@DesktopHeight,$Check)
EndFunc
 
Автор
S

Samk

дорогу осилит идущий
Сообщения
4
Репутация
0
Спасибо, все прекрасно работает. Единственно, не знаю как выставить задержку в 3 секунды (слишком уж резво кликает :stars:smile:.
 
Автор
S

Samk

дорогу осилит идущий
Сообщения
4
Репутация
0
поспешил я радоваться... программа ушла в бесконечный и бесконтрольный клик
 
Автор
S

Samk

дорогу осилит идущий
Сообщения
4
Репутация
0
Кажется нашел причину ошибки...
Цикл
Код:
Func Clicker()
   Opt("MouseClickDelay", 3000)
   MouseClick("right",913,521,$Check)
   
EndFunc
при своем запуске постоянно обращается к окошку с указанной цифрой
Код:
$Check = GUICtrlRead($Click)

То есть, даже если я выставлю значение 1, то программа бесконечно будет считывать это значение и добросовестно выполнять 1 клик, не уменьшая на единицу предыдущее значение.
Как сделать, чтобы значение оно стало динамичным и уменьшалось после каждого клика?
За программку спасибо
Вот неплохой автокликер... http://zalil.ru/32871531/12a56fa3.4f6021e8/AutoClicker_v2_.au3
, но она также бесконечна, ограничивается лишь время, а не количество нажатий мыши.
 

Khaibit

Осваивающий
Сообщения
103
Репутация
25
Сейчас вы получаете $Check до того как начинаете изменять количество кликов, поэтому всегда выполняется 99, как задано при создании формы, попробуйте так
Код:
MouseClick("left", @DesktopWidth, @DesktopHeight, GUICtrlRead($Click))
 
Верх