Jump to content

PLease write a simpl script for me :)


Recommended Posts

Well, I don't mind helping you cuz I have too much time on my hands.

Here is a good example:

$Boolean=False
$Sleep=100
HotKeySet("{END}","Quit")
HotKeySet("{F11}","Ac")
HotKeySet("{NUMPADADD}","SleepMinus")
HotKeySet("{NUMPADSUB}","SleepPlus")
While 1
    Sleep(1000)
WEnd
Func Ac()
    $Boolean=Not $Boolean
    While $Boolean=True
        MouseClick("left")
        Sleep($Sleep)
    WEnd
EndFunc
Func SleepPlus()
    $Sleep=$Sleep+50
    If $Sleep>=1000 Then
        $Sleep=1000
    EndIf
EndFunc
Func SleepMinus()
    $Sleep=$Sleep-50
    If $Sleep<=10 Then
        $Sleep=10
    EndIf
EndFunc
Link to comment
Share on other sites

The only way I made the error go away is to remove the line of code, but now my code is like this and is not working.

Here is my code.

I just want the mouse to click superfast.

$Sleep=100
HotKeySet("{NUMPADADD}","SleepMinus")
HotKeySet("{NUMPADSUB}","SleepPlus")
While 1
    Sleep(1)
WEnd
Func Ac()
    $Boolean=Not $Boolean
    While $Boolean=True
        MouseClick("left")
        Sleep($Sleep)
    WEnd
EndFunc
Func SleepPlus()
    $Sleep=$Sleep+50
    If $Sleep>=1000 Then
        $Sleep=1000
    EndIf
EndFunc
Func SleepMinus()
    $Sleep=$Sleep-50
    If $Sleep<=10 Then
        $Sleep=10
    EndIf
EndFunc
Edited by spiderous
Link to comment
Share on other sites

Link to comment
Share on other sites

so then a good code would be this?

It starts paused and I can't unpause it.

$Boolean=False
$Sleep=100
HotKeySet("{END}','Quit")
HotKeySet("{F11}','Ac")
HotKeySet("{NUMPADADD}','SleepMinus")
HotKeySet("{NUMPADSUB}','SleepPlus")
While 1
    Sleep(1000)
WEnd
Func Ac()
    $Boolean=Not $Boolean
    While $Boolean=True
        MouseClick("left")
        Sleep($Sleep)
    WEnd
EndFunc
Func SleepPlus()
    $Sleep=$Sleep+50
    If $Sleep>=1000 Then
        $Sleep=1000
    EndIf
EndFunc
Func SleepMinus()
    $Sleep=$Sleep-50
    If $Sleep<=10 Then
        $Sleep=10
    EndIf
EndFunc

 Func Quit ()
Exit
Endfunc
Link to comment
Share on other sites

Full working 1 is this.

$Boolean=False
$Sleep=100
HotKeySet("{END}","Quit")
HotKeySet("{F11}","Ac")
HotKeySet("{NUMPADADD}","SleepMinus")
HotKeySet("{NUMPADSUB}","SleepPlus")
While 1
    Sleep(1000)
WEnd
Func Ac()
    $Boolean=Not $Boolean
    While $Boolean=True
        MouseClick("left")
        Sleep($Sleep)
    WEnd
EndFunc
Func SleepPlus()
    $Sleep=$Sleep+50
    If $Sleep>=1000 Then
        $Sleep=1000
    EndIf
EndFunc
Func SleepMinus()
    $Sleep=$Sleep-50
    If $Sleep<=10 Then
        $Sleep=10
    EndIf
EndFunc

Func Quit ()
Exit
Endfunc

So you hit F11 to start/pause AC, NumpadAdd to speed up, NumpadSub to slow down, End key to exit.

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...