DrawGui(myGui, "343D46", 0, GuiBlinkTransColor, 22, 10, "343D46")

;; @ Draw GUI 繪製視窗
DrawGui(myGui, BGColor, delay, Func, params*)
{
    myGui.Opt("-Caption +AlwaysOnTop")
    myGui.BackColor := BGColor

    if CaretGetPos(&x, &y)
        myGui.Show("AutoSize NA x" x " y" y)
    else
        myGui.Show("AutoSize NA")

    Func(params*)

    Sleep(delay)
    myGui.Destroy
}

GuiBlinkTransColor(count, step, BGcolor)
{
    opacity := count * step
    id_AhkGui := WinGetID("ahk_class AutoHotkeyGUI")
    WinSetTransColor(BGcolor " " opacity, "ahk_id " id_AhkGui)

    Loop count
    {
        If GetKeyState("Alt") or GetKeyState("Ctrl") or GetKeyState("RButton", "P")
            Break

        opacity -= step
        WinSetTransColor(BGcolor " " opacity, "ahk_id " id_AhkGui)
        Sleep(50)
    }
}