如何使用内部循环等待函数完成

Question

在下面包含的脚本中，我尝试运行一系列命令。但是当按 F1 运行时，该命令将立即运行两个 SendAndLoopFor() 调用，而无需等待内部循环完成。

我试图通过在函数中添加一个 return "" 来“强制”这个等待，并用它分配一个变量而不是 Foo := SendAndLoopFor()，但即使那样它也不会等待操作。

有没有办法在执行下一个命令之前等待SendAndLoopFor() 命令完成？

#NoEnv
SendMode Input
SetWorkingDir %A_ScriptDir%  
#MaxThreadsPerHotkey 13
#SingleInstance
F1::
Done = 0
Toggle := !Toggle
Loop
{
    If (!Toggle)
        Break
    SendAndLoopFor("4", -13600)
    SendAndLoopFor("5", -13600)
}
return

SendAndLoopFor(TSend="", Timeout=0)
{
    Send %TSend%
    SetTimer, LoopLimit, %Timeout%
    Loop
    {
        If(!Toggle)
            Break
        If(done == 1)
        {
            done = 0
            Break
        }
        MouseClick, left
        sleep 83
    }
}
LoopLimit:
    Done = 1
Return

Answer 1

您的问题似乎源于对 SetTimer 的误解。它是并行化任务的绝佳工具，因为脚本本身不会在继续执行脚本之前等待计时器。

为了说明这一点，简化脚本，您可以观察到相同的效果。

F3::
SetTimer, LoopLimit, -2000
SendInput, This is stuff happening before the timer.{Enter}
return

LoopLimit:
SendInput, This is stuff happening after.

一个简单的解决方案是计算迭代次数并在达到计数器限制后终止循环。

F3::
count = 0

Loop
{
; Do stuff.

count += 1
Sleep, 1000

if (count >= 5)
{
break
}}

您也可以使用various built-in variables 来比较从循环开始到您的截止值的时间，但是使用这些可能会很痛苦，因此我建议您避免使用它们，除非您的脚本在时间敏感的约束下工作.

根据 cmets 进行编辑：

F1::
Done = 0
Toggle := !Toggle
Loop
{
    If (!Toggle)
        Break
    SendAndLoopFor("4", -13600)
    SendAndLoopFor("5", -13600)
    Sleep, 2000
}
return

SendAndLoopFor(TSend="", Timeout=0)
{
    Send %TSend%
    SetTimer, LoopLimit, %Timeout%
    Loop
    {
        If(!Toggle)
        {
            SendInput, This is inside the Toggle.{Enter}
            Break
        }
        If(done == 1)
        {
            SendInput, This is inside the Done.{Enter}
            done = 0
            Break
        }
        SendInput, This is after the If statements.{Enter}
        MouseClick, left
        Sleep, 999999 ; Note how this has no effect due to above break.
    }
}
LoopLimit:
    Done = 1