Help on AutoClick

[wendellgun]

Hi guys, Im from Brazil and I not speak english very well so I made this picture to try and show what I'm trying to do

can someone help me?

[Jos]

It is not clear what you want:

- is this shown window from your script?

- what do you want to click?

Jos

[somdcomputerguy]

Help someone help you. What is it you are trying to do? Or what is your question?

[wendellgun]

I did this drawing in koda

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 280, 106, 324, 298)
$Input1 = GUICtrlCreateInput("Input1", 72, 24, 65, 21)
$Label1 = GUICtrlCreateLabel("Auto Click Left", 0, 24, 73, 17)
$Button1 = GUICtrlCreateButton("F2 Start", 16, 56, 105, 41)
$Label2 = GUICtrlCreateLabel("(X Clicks with sleep 1000)", 144, 24, 125, 17)
$Button2 = GUICtrlCreateButton("F3 Pause", 144, 56, 105, 41)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
EndSwitch
WEnd

Now I need to plan to do exactly as the design

I need to streamline my work

[wendellgun]

Im sooo noob in program

I will try to explain in pascal

----------------

enter the amount of clicks

read(input1);

first = 0

While first < input1

Do

MouseClick("Left")

Sleep(1000)

can someone do this program for me?

Edited April 14, 2013 by wendellgun

[wendellgun]

Im trying with no pause becouse i dont know the comand

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Auto Click", 282, 58, 192, 124)
$Button1 = GUICtrlCreateButton("F2 para iniciar", 8, 8, 113, 41)
$Button2 = GUICtrlCreateButton("F3 para pausar", 136, 8, 129, 41)
Dim $Form1_AccelTable[2][2] = [["{F2}", $Button1],["{F3}", $Button2]]
GUISetAccelerators($Form1_AccelTable)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
         Global $First
$First = 0
Do
   MouseClick("Left")
   Sleep(1000)
   $First += 1
Until $First = 100
EndSwitch
WEnd

and working but i dont want this way :/

Edited April 14, 2013 by wendellgun

[JohnOne]

read(input1); = GUICtrlRead($Input1)

[ileandros]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Auto Click", 282, 120, 192, 124)
$Button1 = GUICtrlCreateButton("F2 para iniciar", 8, 8, 113, 41)
$Button2 = GUICtrlCreateButton("F3 para pausar", 136, 8, 129, 41)
$label = GUICtrlCreateLabel("Number: ", 130, 85)
$input = GUICtrlCreateInput("", 180,80,80,25)
Dim $Form1_AccelTable[2][2] = [["{F2}", $Button1],["{F3}", $Button2]]
GUISetAccelerators($Form1_AccelTable)
GUISetState(@SW_SHOW)
While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
  Case $Button1
   $First = 0
   Do
    MouseClick("Left")
    Sleep(1000)
    $First += 1
   Until $First = GUICtrlRead($input)
 EndSwitch
WEnd

[wendellgun]

now just need to learn to pause the process. you've helped me a lot

THANK YOU ileandros :thumbsup:

[ileandros]

I would do it like this if i was you. This is how you can toggle it.

HotKeySet("s", "_start")
HotKeySet("p", "_pause")
HotKeySet("e", "_exit")
$Active = 0
$button = "left"

While (True)
 If $Active = 1 Then
  MouseClick($button)
  Sleep(1000)
 EndIf
WEnd
Func _start()
 $Active = 1
EndFunc
Func _pause()
 $Active = 0
EndFunc
Func _exit()
 Exit
EndFunc