Sign in to follow this  
Followers 0
Exploite

WarRock Autoclicker!

19 posts in this topic

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?

Share this post


Link to post
Share on other sites



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).

Share this post


Link to post
Share on other sites

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

Share this post


Link to post
Share on other sites

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.

Share this post


Link to post
Share on other sites

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!

Share this post


Link to post
Share on other sites

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.

Share this post


Link to post
Share on other sites

#9 ·  Posted (edited)

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 by Exploite

Share this post


Link to post
Share on other sites

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. :mellow:

Share this post


Link to post
Share on other sites

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.

Share this post


Link to post
Share on other sites

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...

Share this post


Link to post
Share on other sites

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.

Share this post


Link to post
Share on other sites

#14 ·  Posted (edited)

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! :mellow:

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 by Exploite

Share this post


Link to post
Share on other sites

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?

Share this post


Link to post
Share on other sites

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?:mellow:

Share this post


Link to post
Share on other sites

Maybe this might help?

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

Share this post


Link to post
Share on other sites

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


[center]It's a question of mind over matter, if I don't mind, it doesn't matter.[/center]

Share this post


Link to post
Share on other sites

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 :mellow:

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.

Share this post


Link to post
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
Sign in to follow this  
Followers 0