Exploite Posted November 12, 2008 Share Posted November 12, 2008 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? Link to comment Share on other sites More sharing options...
Pain Posted November 12, 2008 Share Posted November 12, 2008 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). Link to comment Share on other sites More sharing options...
Exploite Posted November 12, 2008 Author Share Posted November 12, 2008 What is an 'Opt parameter' exactly? I searched in help but nothing comes up? O.O Link to comment Share on other sites More sharing options...
Pain Posted November 12, 2008 Share Posted November 12, 2008 You may use Opt() as an alternative to AutoItSetOption().http://www.autoitscript.com/autoit3/docs/f...ItSetOption.htm Link to comment Share on other sites More sharing options...
Exploite Posted November 13, 2008 Author Share Posted November 13, 2008 http://www.autoitscript.com/autoit3/docs/f...ItSetOption.htm Where does: AutoItSetOption ( "option" [, param] ) And what do I put in it? Link to comment Share on other sites More sharing options...
Exploite Posted November 13, 2008 Author Share Posted November 13, 2008 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. Link to comment Share on other sites More sharing options...
gauss5546 Posted November 13, 2008 Share Posted November 13, 2008 Try this. CODEHotKeySet("^!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! Link to comment Share on other sites More sharing options...
Exploite Posted November 13, 2008 Author Share Posted November 13, 2008 Try this.CODEHotKeySet("^!z","SuckMe")HotKeySet("^!x","Inmebaby")While 1 Sleep(100)WEndFunc 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 WEndEndFuncFunc Inmebaby() ExitEndFuncYour forgot to specify which mouse button the Auto It clicked!Oh wow thanks, I fail. Link to comment Share on other sites More sharing options...
Exploite Posted November 13, 2008 Author Share Posted November 13, 2008 (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 November 13, 2008 by Exploite Link to comment Share on other sites More sharing options...
Exploite Posted November 13, 2008 Author Share Posted November 13, 2008 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. Link to comment Share on other sites More sharing options...
Pain Posted November 13, 2008 Share Posted November 13, 2008 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. Link to comment Share on other sites More sharing options...
Exploite Posted November 13, 2008 Author Share Posted November 13, 2008 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... Link to comment Share on other sites More sharing options...
Pain Posted November 13, 2008 Share Posted November 13, 2008 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. Link to comment Share on other sites More sharing options...
Exploite Posted November 14, 2008 Author Share Posted November 14, 2008 (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! 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 Link to comment Share on other sites More sharing options...
gauss5546 Posted November 14, 2008 Share Posted November 14, 2008 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? Link to comment Share on other sites More sharing options...
dbzfanatic Posted November 14, 2008 Share Posted November 14, 2008 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? Go to my website. | My Zazzle Page (custom products)Al Bhed Translator | Direct linkScreenRec ProSimple Text Editor (STE) [TUTORIAL]Task Scheduler UDF <--- First ever UDF!_ControlPaste() UDF[quote name='renanzin' post='584064' date='Sep 26 2008, 07:00 AM']whats help ?[/quote] Link to comment Share on other sites More sharing options...
Pain Posted November 14, 2008 Share Posted November 14, 2008 Maybe this might help? MouseDown("left") ; code here MouseUp("left") Link to comment Share on other sites More sharing options...
system24 Posted November 14, 2008 Share Posted November 14, 2008 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] Link to comment Share on other sites More sharing options...
Exploite Posted November 15, 2008 Author Share Posted November 15, 2008 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. Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now