Sign in to follow this  
Followers 0
Gillboss

Help me please

3 posts in this topic




#2 ·  Posted (edited)

First of all...Rapidshare Sucks!! SendSpace.com!

Second, we know you didn't make this program, and I don't trust it, so, I am not really helpful!

EDIT: Good news for you, it's a old AutoIt version, which means you can decompile it with the old decompiler that comes with AutoIt! I did it for you. Heres it's source.

; <AUT2EXE VERSION: 3.0.102.0>

; ----------------------------------------------------------------------------
; <AUT2EXE INCLUDE-START: C:\Documents and Settings\SSHS4\My Documents\Autoit files\ac3.au3>
; ----------------------------------------------------------------------------

; <AUT2EXE VERSION: 3.0.102.0>


MsgBox(0, "Tacoman14's Autoclicker V3", "AutoClicker Seccessfully Loaded"  & @CRLF & "F8====> AutoBuffer" & @CRLF & "F9====> Left Click" & @CRLF & "F10====> Right Click" & @CRLF & "F11====> Stop Clicks" & @CRLF & " " & @CRLF & "Please Do the Follow Before using the AutoBuff Feature:" & @CRLF & "Set your Defence Buff to #2" & @CRLF & "Set your Attack Buff to #3" & @CRLF & "Set your Heal to #6" & @CRLF & "Set your Game Resolution to 1280x1024" & @CRLF & " " & @CRLF & "Not doing so will result in the autobuff not working...")



HotKeySet("{F9}", "startclick")
HotkeySet("{F11}", "HK_STOP")
Hotkeyset("{F10}",  "Rightclick")
HotKeySet("{F8}",  "Autobuff")

; This is the clicking function
Func startclick()
; Continuous loop that clicks the left mouse button
while(1)
MouseClick("left")
Opt("MouseClickDelay", 20)
WEnd
EndFunc

Func Rightclick()
; Continuous loop that clicks the left mouse button
while(1)
MouseClick("Right")
WEnd
EndFunc

Func Autobuff()
While (1)
Send("2")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,25)
Opt("MouseClickDownDelay", 200)
Send("3")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,25)
Opt("MouseClickDownDelay", 200)
Send("6")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,25)
Opt("MouseClickDownDelay", 700)
Send("2")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,65)
Opt("MouseClickDownDelay", 200)
Send("3")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,65)
Opt("MouseClickDownDelay", 200)
Send("6")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,65)
Opt("MouseClickDownDelay", 700)
Send("2")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,105)
Opt("MouseClickDownDelay", 200)
Send("3")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,105)
Opt("MouseClickDownDelay", 200)
Send("6")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,105)
Opt("MouseClickDownDelay", 700)
Send("2")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,160)
Opt("MouseClickDownDelay", 200)
Send("3")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,160)
Opt("MouseClickDownDelay", 200)
Send("6")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,160)
Opt("MouseClickDownDelay", 700)
Send("2")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,195)
Opt("MouseClickDownDelay", 200)
Send("3")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,195)
Opt("MouseClickDownDelay", 200)
Send("6")
Opt("MouseCoordMode", 1)
MouseClick("Right",1226,195)
Opt("MouseClickDownDelay", 700)

Wend
Endfunc


; Stops the program
Func HK_STOP()
while 1 = 1
  Sleep(1000)
wend
EndFunc

; Need to keep the program running until you press the hotkey
while(1)
sleep(1000)
WEnd



; ----------------------------------------------------------------------------
; <AUT2EXE INCLUDE-END: C:\Documents and Settings\SSHS4\My Documents\Autoit files\ac3.au3>
; ----------------------------------------------------------------------------
Edited by R6V2

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

of course i didnt did it, i just want know how to do it.

and ty :) now i cant learn how do it :)

Edited by Gillboss

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