Jump to content

Click


Recommended Posts

I am not very experienced with autoit...I have taken some classes in TRUEBASIC but I don't fully understand autoit.

What I want this program to do is:

After running the script, I do not want it to actually "start" until you press the "insert" button.

I want it to click within a circle on the screen (coordinates for center of circle is 822, 459, radius is 7) (Move to different coordinate within the circle after a random number of clicks from 1-20)

The clicks must have a random delay from 1000milliseconds to 7000 milliseconds.

I suppose this will include a "Mousemove(815 to 829, 452 to 466)

But I don't know much after this ^_^

Any help would be appreciated :)

Link to comment
Share on other sites

It doesn't work, but kinda what I want...any help getting it to work?

Global $Paused
HotKeySet("{PAUSE}", "TogglePause")
sleep(10000)
While 1
MouseMove(815 to 829, 452 to 466)
MouseGetPos, <x XX>, <y YY>
LeftClick, <XX>, <YY>
Sleep(1000 to 7000)
WEnd

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(10000)
        ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
EndFunc
Link to comment
Share on other sites

Randomly in the circle...and the place where it clicks within the circle must be changed to another random place every few clicks....Like it will click at one place for 5 clicks, then switch to another random point within the circle, click there for 3 times, switch to another point within the circle, click there 1 time, switch to antoher point within the circle and click 10 times, etc....the max it should repeat a click in the same coordinate should be 10 times.

If this doesn't clarify, please say so.

Link to comment
Share on other sites

This is what I wanted ;P Got it to work...I think....how does it look?

; Press Esc to terminate script, Pause/Break to "pause"

Global $Paused
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")

Sleep(10000);time to get to the correct screen
While 1
$z = random(1,10,1)
For $z = $z to 0 Step -1
$delay = random(1000,7000,1)
sleep($delay)
    $i = Random(1,10,1)
$X = 822
$Y = 459
$XChange = Random(-6, 6, 1)  
$YChange = Random(-6, 6, 1)  
$X = $X + $XChange
$Y = $Y + $YChange
MouseClick("left", $X, $Y, 1)
Next
WEnd



Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
EndFunc

Func Terminate()
    Exit 0
EndFunc
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...