Help with creating a loop

[BALA]

Func Play()
    For $n = 1 to $click
        MouseClick("left", $x, $y, 1)
    Next
EndFunc

When $n = $click I want the For-Next loop to start all over again. How can I do that?

[Valuater]

Place this above your function

While 1

Play()

Sleep(10)

Wend

8)

[BALA]

Place this above your function

While 1

Play()

Sleep(10)

Wend

8)

Do I put my function within that While-WEnd?

[Jos]

Do I put my function within that While-WEnd?

What do you think ?

[herewasplato]

Place this above your function...

[BALA]

Well I wasn't sure if that was a mistake or something.

In addition, how could I have the loop stop when I press a key for example.

Edited December 12, 2006 by BALA

[herewasplato]

Well I wasn't sure if that was a mistake or something.

try it - it is pretty safe code - it is not like it said format.... :-)

While 1
    Play()
    Sleep(10)
WEnd

Func Play()
    For $n = 1 To $click
        MouseClick("left", $x, $y, 1)
    Next
EndFunc   ;==>Play

[BALA]

Oh, wait I made a mistake, the function only goes when the F3 key is pressed, so the code is actually:

HotKeySet("{F3}", "Play")

Func Play()
    For $n = 1 to $click
        MouseClick("left", $x, $y, 1)
    Next
EndFunc

So how could I make the For-Next start over when $n = $click? Same way?

Edited December 12, 2006 by BALA

[herewasplato]

Press the F3 key again???

I do not understand your question...

[BALA]

When I pressed the F3 key I want the For-Next to continuously loop by itself until another key is pressed.

Edited December 12, 2006 by BALA

[herewasplato]

When I pressed the F3 key I want the For-Next to continuously loop by itself until another key is pressed.

; Press Esc to terminate script, Pause/Break to "pause"

Global $Paused
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")
HotKeySet("+!d", "ShowMessage")  ;Shift-Alt-d

;;;; Body of program would go here ;;;;
While 1
    For $n = 1 To $click
        MouseClick("left", $x, $y, 1)
    Next
    Sleep(100)
WEnd
;;;;;;;;

Func TogglePause()
    $Paused = Not $Paused
    While $Paused
        Sleep(100)
        ToolTip('Script is "Paused"', 0, 0)
    WEnd
    ToolTip("")
EndFunc   ;==>TogglePause

Func Terminate()
    Exit 0
EndFunc   ;==>Terminate

Func ShowMessage()
    MsgBox(4096, "", "This is a message.")
EndFunc   ;==>ShowMessage

[Valuater]

take a look at "HotKeySet()" in help

at the bottom is a GREAT example

8)

NVM - plato was good enough to do it for you

Edited December 12, 2006 by Valuater

[BALA]

Again my ignorance has made a fool of me

[BALA]

Ya, could someone explain what the example does....

[herewasplato]

Ya, could someone explain what the example does....

here is a simpler version that does what you asked for... but you have to add your code for $click, $x and $y

HotKeySet("{ESC}", "Terminate")
HotKeySet("{F3}", "Play")
Global $trigger = 0

While 1
    If $trigger = 1 Then
        For $n = 1 To $click
            MouseClick("left", $x, $y, 1)
        Next
    EndIf
    Sleep(100)
WEnd

Func Terminate()
    Exit 0
EndFunc   ;==>Terminate

Func Play()
    $trigger = 1
EndFunc   ;==>Play

Which line do you not understand? Edited December 13, 2006 by herewasplato

[BALA]

Okay I get now, thanks for baring with me