For test intention there is anoter two scripts, for "notepad" and "calc" windows flashing, that you must to execute

Execute first the "main code", then run these two scripts, and you see...

Flashing Notepad

Opt("WinTitleMatchMode", 2) ;1=start, 2=subStr, 3=exact, 4=advanced
If NOT WinExists("- Bloc de notas") Then
Run("Notepad.exe", "", @SW_MINIMIZE)
EndIf
While NOT WinExists("- Bloc de notas")
Wend
; flashes the window 4 times with a break in between each one of 1/2 second
WinFlash('- Bloc de notas',"", 4, 500)

Flashing Calculator

Opt("WinTitleMatchMode", 2) ;1=start, 2=subStr, 3=exact, 4=advanced
If NOT WinExists("Calculadora") Then
RunWait("Calc.exe", "", @SW_MINIMIZE)
WinSetState("Calculadora", "", @SW_MINIMIZE)
EndIf
; flashes the window 4 times with a break in between each one of 1/2 second
WinFlash("Calculadora","", 4, 500)