Gui, +hwndhGui
Gui, Font, s12 q5, Calibri
Gui, Add, Text,, Кнопка на панели задач мигнёт 3 раза`nпотом будет подсвечена`nпока не пройдёт 5 секунд`nили пока окно не станет активным
Gui, Show, NA w300 h200

FlashTaskBarButton(hGui, 3)
Sleep, 5000
FlashTaskBarButton(hGui,, 1)
Return

GuiClose:
   ExitApp

FlashTaskBarButton(hGui, count := 0, stop := 0)  {
   static FLASHW_TRAY := 0x2, FLASHW_TIMERNOFG := 0xC
   VarSetCapacity(FLASHWINFO, size := A_PtrSize*3 + 4*2, 0)
   NumPut(size, FLASHWINFO)
   NumPut(hGui, FLASHWINFO, A_PtrSize)
   NumPut(stop ? 0 : FLASHW_TRAY|(count ? 0 : FLASHW_TIMERNOFG), FLASHWINFO, A_PtrSize*2)
   NumPut(count, FLASHWINFO, A_PtrSize*2 + 4)
   DllCall("FlashWindowEx", Ptr, &FLASHWINFO)
}

FlashTaskBarButton(hGui)
sleep 3000
FlashTaskBarButton(hGui,0,0,0)
Return

FlashTaskBarButton(hGui, count := 0, FLASHW_TRAY := 0x2, FLASHW_TIMERNOFG := 0xC)  {

   VarSetCapacity(FLASHWINFO, size := A_PtrSize*3 + 4*2, 0)
   NumPut(count, NumPut(FLASHW_TRAY|(count ? 0 : FLASHW_TIMERNOFG), NumPut(hGui, NumPut(size, FLASHWINFO)), "UInt"))
   DllCall("FlashWindowEx", Ptr, &FLASHWINFO)
}

VarSetCapacity(FLASHWINFO, size := A_PtrSize*2 + 4*4, 0)

VarSetCapacity(FLASHWINFO, size := A_PtrSize*3 + 4*2, 0)

#SingleInstance Force
#Persistent
#NoEnv

text := ""
WinGet, id, list,,, Program Manager
Loop % id
{
	this_id := id%A_Index%
	WinGetClass, this_class, ahk_id %this_id%
	WinGet, pid, PID, ahk_id %this_id%
	text .= this_class "`n" pid "`n" this_id "`n`n"
	FlashTaskBarButton(this_id)
}
msgbox % text
Return

FlashTaskBarButton(hGui, count := 0)  {
   static FLASHW_TRAY := 0x2, FLASHW_TIMERNOFG := 0xC
   VarSetCapacity(FLASHWINFO, size := A_PtrSize*2 + 4*4, 0)
   NumPut(count, NumPut(FLASHW_TRAY|(count ? 0 : FLASHW_TIMERNOFG), NumPut(hGui, NumPut(size, FLASHWINFO)), "UInt"))
   DllCall("FlashWindowEx", Ptr, &FLASHWINFO)
}