Trying to loop in my script

[nykoman]

Hello,

I have a script:

CODE

; Audio copy laden

Run("c:\eac\eac1\EAC.exe")

; Haal informatie uit freedb

WinWaitActive("Exact Audio Copy")

Send("!g")

WinWaitActive("Waarschuwing")

Send("!j")

WinWaitActive("Exact Audio Copy")

Send("{F5}")

WinWaitActive("Uitlezen Audio Data", "OK")

Send("{ENTER}")

WinWaitActive("Status en Foutmeldingen", "OK")

Send("{ENTER}")

Sleep(20000)

After last line: "Sleep(20000) I want the script to repeat from the line that says: WinWaitActive("Exact Audio Copy")

Send("!g")

How can i achieve this?

Thanks!

Nico

[stampy]

Need to put it into a loop. Look into Do/Until, For/Next, While/Wend

Those are the basic looping functions.

[nykoman]

Thanks,

Like this?

CODE

; Audio copy laden

Run("c:\eac\eac1\EAC.exe")

; Haal informatie uit freedb

WinWaitActive("Exact Audio Copy")

Send("!g")

WinWaitActive("Waarschuwing")

Send("!j")

WinWaitActive("Exact Audio Copy")

While 1

Send("{F5}")

WinWaitActive("Uitlezen Audio Data", "OK")

Send("{ENTER}")

WinWaitActive("Status en Foutmeldingen", "OK")

Send("{ENTER}")

Sleep(20000)

WEnd

Nico

[SpookMeister]

That may work, if you intend to keep doing

Send("{F5}")
WinWaitActive("Uitlezen Audio Data", "OK")
Send("{ENTER}")
WinWaitActive("Status en Foutmeldingen", "OK")
Send("{ENTER}")
Sleep(20000)

over and over again forever. Otherwise you will want to look at implementing some way to exit your loop. like:

; Audio copy laden
Run("c:\eac\eac1\EAC.exe")
; Haal informatie uit freedb
WinWaitActive("Exact Audio Copy")
Send("!g")
WinWaitActive("Waarschuwing")
Send("!j")
WinWaitActive("Exact Audio Copy")
$count = 0
While 1
    $count += 1 ; increment $count by 1
    Send("{F5}")
    WinWaitActive("Uitlezen Audio Data", "OK")
    Send("{ENTER}")
    WinWaitActive("Status en Foutmeldingen", "OK")
    Send("{ENTER}")
    Sleep(20000)
    If $count = 5 Then ExitLoop ; Quit when you have done it 5 times
WEnd

[nykoman]

Thanks guys!

That may work, if you intend to keep doing

Send("{F5}")
WinWaitActive("Uitlezen Audio Data", "OK")
Send("{ENTER}")
WinWaitActive("Status en Foutmeldingen", "OK")
Send("{ENTER}")
Sleep(20000)

over and over again forever. Otherwise you will want to look at implementing some way to exit your loop. like:

; Audio copy laden
Run("c:\eac\eac1\EAC.exe")
; Haal informatie uit freedb
WinWaitActive("Exact Audio Copy")
Send("!g")
WinWaitActive("Waarschuwing")
Send("!j")
WinWaitActive("Exact Audio Copy")
$count = 0
While 1
    $count += 1 ; increment $count by 1
    Send("{F5}")
    WinWaitActive("Uitlezen Audio Data", "OK")
    Send("{ENTER}")
    WinWaitActive("Status en Foutmeldingen", "OK")
    Send("{ENTER}")
    Sleep(20000)
    If $count = 5 Then ExitLoop ; Quit when you have done it 5 times
WEnd