Auto Click

[Rewl]

Introduction

As I play alot of games that make you have to click, My hand gets tired from all the clicking. So as a second program I thought, "Why not make an auto clicker." So I did.

Launches

v1.0 -- Release

What it Does

Auto clicker that when your right click, it pauses the script for 2 seconds than goes back to auto clicking.

Controls are:

Esc- close

Spacebar - Pause

Bugs

None right now! Post any!

Source

expandcollapse popup

#include<IE.au3>
#include <Misc.au3>


HotKeySet("{ESC}" , "close")
HotKeySet("{SPACE}" , "startpause")

Dim $click = False
$dll = DllOpen("user32.dll")

CMsgBox(64, "Rewl's Auto Click v1.0" , "Thank-you for using Auto Clicker, Press ""ESC"" to close the program and ""spacebar"" to pause the clicker and SpaceBar to start it.")

Func close()
    $iE = _IECreate()
    $m = MsgBox(4 , "Rewl's Auto Click v1.0" , "Thank-you for trying the program, Press yes to visit Auto-IT Thread.")
    IF $m = 6 Then
        _IENavigate($iE , "http://www.autoitscript.com/forum/topic/122227-auto-click/")
    EndIf
    Exit
EndFunc

Func startpause()
   If $click = False Then
      $click = True
      ToolTip("Rewl Auto Click v1.0 Running." , 0 , 0)
   Else
      $click = False
      ToolTip("Rewl Auto Click v1.0 Paused." , 0 , 0)
   EndIf
EndFunc


While 1
    If _IsPressed ( "02" ) = 1 Then
        ConsoleWrite ( "Sleep ( 2000 )" & @Crlf )
        Sleep ( 2000 )
        $click = True
    EndIf

   If $click = True Then
    MouseClick("left")
    Sleep(50)
EndIf
sleep(20)
WEnd

Auto Clicker.au3

Edited November 17, 2010 by Rewl

[JohnOne]

Hey the script didnt worked.

[wakillon]

it's a good start !

[Jos]

Introduction

As I play alot of games that make you have to click, My hand gets tired from all the clicking. So as a second program I thought, "Why not make an auto clicker." So I did.

Lets not go into autoclicker mode and stick to our rules.

*click*