Sign in to follow this  
Followers 0
juliobrazil

Clean this for me?

2 posts in this topic

#1 ·  Posted (edited)

Hi! well, this is pretty much is a script request, can anyone please clean this script out and fix a couple of things?. What I really want.

>No random stuff, Just UP DOWN sent to my game.

>And to send a right click in WoW to the MIDDLE of the screen every 4 minutes.

(I read something about ControlClick but could not understand it)

Thanks for reading my post! :whistle:

; ---------------------------------------------------------------------------- 
; 
; AutoIt Version:        3.2.0 
; Author:                The-Chad <chadscrib@gmail.com> 
; Website:              OnlineGameHacker <www.OnlineGameHacker.com> 
; Script Function:      Anti Afk 
; 
; ---------------------------------------------------------------------------- 


HotKeySet("{F9}", "hide") 
HotKeySet("{F10}", "show") 
AutoItSetOption("WinTitleMatchMode", 4) 
While 1 
   Sleep(1000) 
WEnd 

Func hide() 
   Global $Show = 0 
   Global $handle = WinGetHandle("classname=GxWindowClassD3d") 
   WinSetState($handle, "", @SW_MINIMIZE) 
   WinSetState($handle, "", @SW_HIDE) 
   If @error Then 
      MsgBox(0, "error", "couldnt find WoW") 
   Else 
      While 1 
         $unique = Random(1, 4, 1) 
         If $unique = 1 Then 
            ControlSend($handle, "", "", "{UP DOWN}") 
            Sleep(100 + Random(1, 50, 1)) 
            ControlSend($handle, "", "", "{UP UP}") 
            ControlSend($handle, "", "", "{DOWN DOWN}") 
            Sleep(100 + Random(1, 50, 1)) 
            ControlSend($handle, "", "", "{DOWN UP}") 
            Sleep(200000 + Random(5000, 15000, 1)) 
         ElseIf $unique = 2 Then 
            ControlSend($handle, "", "", "{RIGHT DOWN}") 
            Sleep(100 + Random(1, 50, 1)) 
            ControlSend($handle, "", "", "{RIGHT UP}") 
            ControlSend($handle, "", "", "{LEFT DOWN}") 
            Sleep(100 + Random(1, 50, 1)) 
            ControlSend($handle, "", "", "{LEFT UP}") 
            Sleep(200000 + Random(5000, 15000, 1)) 
         ElseIf $unique = 3 Then 
            ControlSend($handle, "", "", "{DOWN DOWN}") 
            Sleep(100 + Random(1, 50, 1)) 
            ControlSend($handle, "", "", "{DOWN UP}") 
            ControlSend($handle, "", "", "{UP DOWN}") 
            Sleep(100 + Random(1, 50, 1)) 
            ControlSend($handle, "", "", "{UP UP}") 
            Sleep(200000 + Random(5000, 15000, 1)) 
         ElseIf $unique = 4 Then 
            ControlSend($handle, "", "", "{LEFT DOWN}") 
            Sleep(100 + Random(1, 50, 1)) 
            ControlSend($handle, "", "", "{LEFT UP}") 
            ControlSend($handle, "", "", "{RIGHT DOWN}") 
            Sleep(100 + Random(1, 50, 1)) 
            ControlSend($handle, "", "", "{RIGHT UP}") 
            Sleep(200000 + Random(5000, 15000, 1)) 
         EndIf 
         If $Show > 0 Then ExitLoop 
      WEnd 
   EndIf 
EndFunc  ;==>hide 

Func show() 
   Global $Show = 1 
   WinSetState("World of Warcraft", "", @SW_SHOW) 
   WinSetState("World of Warcraft", "", @SW_MAXIMIZE) 
   WinActivate($handle, "") 
EndFunc  ;==>show
Edited by juliobrazil

Share this post


Link to post
Share on other sites




[center]Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.[/center]

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