WarRock Autoclicker!

[Exploite]

While (1) 

   Sleep(1000) 
    
   If WinExists("WarRock") Then 
      WinActivate("WarRock") 
       
      MouseMove(x,y,0) 
      MouseClick("left", x, y, 1, 0) 
       
      MouseMove(x,y,0) 
      MouseClick("left", x, y, 1, 0) 

      MouseMove(x,y,0) 
      MouseClick("left", x, y, 1, 0)

   EndIf 

WEnd

Tell me what to edit if there is anything to edit.

Question: Is that how I make an infinite loop right? Without a hotkey?

[Pain]

Remove the MouseMove part, you don't need it.

Also take a look at the different Opt parameters because you are interacting with a game.

The MouseClick* options are the important ones for you.

To answer your question, yes that's how you make an infinite loop but it wouldn't hurt to assign a hotkey to get away from the loop (but still not close the program).

[Exploite]

What is an 'Opt parameter' exactly? I searched in help but nothing comes up? O.O

[Pain]

  Quote

You may use Opt() as an alternative to AutoItSetOption().

http://www.autoitscript.com/autoit3/docs/f...ItSetOption.htm

[Exploite]

  Pain said:

http://www.autoitscript.com/autoit3/docs/f...ItSetOption.htm

Where does:

AutoItSetOption ( "option" [, param] )

And what do I put in it?

[Exploite]

HotKeySet("^!z","SuckMe")
HotKeySet("^!x","Inmebaby")

While 1
    Sleep(100)
WEnd

Func SuckMe()
    While 2
        Sleep(100) 
    
      If WinExists("WarRock") Then 
              WinActivate("WarRock") 
            
        MouseClick(263, 97, 1, 1)
        
        MouseClick(884, 684, 1, 1)

        MouseClick(800, 718, 1, 1)

   EndIf
    WEnd
EndFunc
Func Inmebaby()
    Exit
EndFunc

That's the code my friend coded by heart, so excuses me for his variable names.

Is there anything wrong with this code? Because it doesn't click anything at all/doesn't run. My screen resolution is 1024x768 too.

[gauss5546]

Try this.

CODE

HotKeySet("^!z","SuckMe")

HotKeySet("^!x","Inmebaby")

While 1

Sleep(100)

WEnd

Func SuckMe()

While 2

Sleep(100)

If WinExists("WarRock") Then

WinActivate("WarRock")

MouseClick("left",263, 97, 1, 1)

MouseClick("left",884, 684, 1, 1)

MouseClick("left",800, 718, 1, 1)

EndIf

WEnd

EndFunc

Func Inmebaby()

Exit

EndFunc

Your forgot to specify which mouse button the Auto It clicked!

[Exploite]

  gauss5546 said:

Try this.

CODE

HotKeySet("^!z","SuckMe")

HotKeySet("^!x","Inmebaby")

While 1

Sleep(100)

WEnd

Func SuckMe()

While 2

Sleep(100)

If WinExists("WarRock") Then

WinActivate("WarRock")

MouseClick("left",263, 97, 1, 1)

MouseClick("left",884, 684, 1, 1)

MouseClick("left",800, 718, 1, 1)

EndIf

WEnd

EndFunc

Func Inmebaby()

Exit

EndFunc

Your forgot to specify which mouse button the Auto It clicked!

Oh wow thanks, I fail.

[Exploite]

This is the code I have now:

HotKeySet("^!z","SuckMe")
HotKeySet("^!x","Inmebaby")

While 1
    Sleep(100)
WEnd

Func SuckMe()
    While 2
        Sleep(100) 
    
      If WinExists("WarRock") Then 
              WinActivate("WarRock") 
            
        MouseClick("left", 263, 97, 1, 1)
        
         MouseClick("left", 884, 684, 1, 1)

        MouseClick("left", 800, 718, 1, 1)

   EndIf
    WEnd
EndFunc
Func Inmebaby()
    Exit
EndFunc

Ok this is what I currently have and it doesn't click in-game...any ideas?

Edited November 13, 2008 by Exploite

[Exploite]

Is anyone going to help me with this? Or are we just going to accumulate the views like we've been doing.

8 replies with 4 being mine, and about 70 views. That's not a good sign.

[Pain]

Opt("MouseClickDelay", 10); default
Opt("MouseClickDownDelay", 10);default
Opt("WinTitleMatchMode", 2); Match any substring in the title, only need this if "WarRock" isn't the full title.

HotKeySet("^!z","Click")
HotKeySet("^!x","Close")

While 1
    Sleep(100)
WEnd

Func Click()
    While 1; ofc you can have anything you like here as long as it doesn't change but "1" is most common for an infinite loop.
    Sleep(100)
    If WinExists("WarRock") Then
        WinActivate("WarRock")
        MouseClick("left",263, 97, 1, 1)
        MouseClick("left",884, 684, 1, 1)
        MouseClick("left",800, 718, 1, 1)
    EndIf
    WEnd
EndFunc;==>Click

Func Close()
    Exit
EndFunc;==>Close

It's also possible that your game blocks AutoIt from using MouseClick, the solution for this is: play fair.

[Exploite]

  Pain said:

Opt("MouseClickDelay", 10); default
Opt("MouseClickDownDelay", 10);default
Opt("WinTitleMatchMode", 2); Match any substring in the title, only need this if "WarRock" isn't the full title.

HotKeySet("^!z","Click")
HotKeySet("^!x","Close")

While 1
    Sleep(100)
WEnd

Func Click()
    While 1; ofc you can have anything you like here as long as it doesn't change but "1" is most common for an infinite loop.
    Sleep(100)
    If WinExists("WarRock") Then
        WinActivate("WarRock")
        MouseClick("left",263, 97, 1, 1)
        MouseClick("left",884, 684, 1, 1)
        MouseClick("left",800, 718, 1, 1)
    EndIf
    WEnd
EndFunc;==>Click

Func Close()
    Exit
EndFunc;==>Close

It's also possible that your game blocks AutoIt from using MouseClick, the solution for this is: play fair.

So this is how the code should look (Yes, WarRock is the full title unless I need to add .exe, it being "WarRock.exe"):

Opt("MouseClickDelay", 10)
Opt("MouseClickDownDelay", 10)

HotKeySet("^!z","Click")
HotKeySet("^!x","Close")

While 1
    Sleep(100)
WEnd

Func Click()
    While 1
    Sleep(100)
    If WinExists("WarRock") Then
        WinActivate("WarRock")
        MouseClick("left",263, 97, 1, 1)
        MouseClick("left",884, 684, 1, 1)
        MouseClick("left",800, 718, 1, 1)
    EndIf
    WEnd
EndFunc

Func Close()
    Exit
EndFunc

If this does not work however, I need to learn how to code an auto-clicker exactly like this, but in VB6, which I fail in...

[Pain]

VB should most likely give you same result as with AutoIt. You need to make your own keyboard driver in a low level language to make it work.

[Exploite]

  Pain said:

VB should most likely give you same result as with AutoIt. You need to make your own keyboard driver in a low level language to make it work.

May you speak noob with me please? I fail at technology.

EDIT: I tested the code, and it works! The only thing is right after I start it, I need to tape my left click button down for it to keep going. Don't know why this si, but it works, so I'm happy!

Thanks to all the help Pain, JSThePatriot, and DBZManiac have given me over the past couple days. My first script will be essential for my task: WarRock Auto-Level Bot.

Edited November 14, 2008 by Exploite

[gauss5546]

The only thing I can think of to make this script better is to add a sleep delay in between the mouse clicks. You could also make the sleep delay random, say maybe between 1 and 3 seconds, so the game server doesn't detect a "bot".

What kind of game is WarRock anyway?

[dbzfanatic]

  Exploite said:

May you speak noob with me please? I fail at technology.

EDIT: I tested the code, and it works! The only thing is right after I start it, I need to tape my left click button down for it to keep going. Don't know why this si, but it works, so I'm happy!

Thanks to all the help Pain, JSThePatriot, and DBZManiac have given me over the past couple days. My first script will be essential for my task: WarRock Auto-Level Bot.

When you say DBZManiac did you mean me?

[Pain]

Maybe this might help?

MouseDown("left")
; code here
MouseUp("left")

[system24]

  gauss5546 said:

The only thing I can think of to make this script better is to add a sleep delay in between the mouse clicks. You could also make the sleep delay random, say maybe between 1 and 3 seconds, so the game server doesn't detect a "bot".

What kind of game is WarRock anyway?

An online FPS game.

http://en.wikipedia.org/wiki/Warrock

[Exploite]

  dbzfanatic said:

When you say DBZManiac did you mean me?

Aah, sorry DBZ. I thought it was fanatic, I shall edit!

And this bot is for leveling up. If you have a 'Player Finder + Player Follow' hack, you can level up very, very fast. I sell the accounts after I've leveled them

Unfortunately, the hacks I am using are now detected, the guy who makes them needs to update. But when he does, I just leave this going from 10 P.M until 3 P.M the next day.