#include <file.au3>
HotKeySet("{Esc}", "End")
FileWriteLine("temp.txt", "Line1")
While 1
Local $aArray
Local $result = 0
$hWnd = DllCall("user32.dll", "hwnd", "GetForegroundWindow")
$text = DllCall("user32.dll", "int", "GetWindowText", "hwnd", $hWnd[0], "str", "lpString", "int", 30)
_FileReadToArray ("temp.txt", $aArray)
For $j=1 To $aArray[0] Step 1
If $aArray[$j] = $text[2] Then
$result = $result + 1
EndIf
Next
If $result = 0 Then
FileWriteLine("temp.txt", $text[2])
EndIf
For $i = 255 To 0 Step -5
WinSetTrans($text[2], "", $i)
Sleep(100)
If $i = 0 Then
WinSetState($text[2], "", @SW_HIDE )
EndIf
Next
Wend
Func End()
Local $aArray
_FileReadToArray ("temp.txt", $aArray)
For $j = 1 To $aArray[0] Step 1
WinSetTrans(WinGetTitle($aArray[$j]), "", 255)
WinSetState(WinGetTitle($aArray[$j]), "", @SW_SHOW)
Next
FileRecycle("temp.txt")
ProcessClose("explorer.exe")
ProcessWaitClose("explorer.exe")
Run("explorer.exe")
ProcessClose("AutoIt3.exe")
EndFunc