#NoEnv  
SendMode Input 
SetWorkingDir %A_ScriptDir%  

§::
WinGet,f1, ID, A

;Gui +LastFound +AlwaysOnTop -Caption +ToolWindow 
Gui, Color, 000000

Gui +LastFound -Caption +ToolWindow 
WinSet, TransColor, 000000
WinSet, Transparent, 150
tr:=150
Gui, Show, W500H500 MAximize
WinGet,ba, ID, A
WinSet, Transparent, 150, ahk_class Shell_TrayWnd
WinSet, Transparent, 150, ahk_class Button
WinActivate ahk_id %f1%

NumpadAdd::
tr:=tr-10
if (tr<0) 
	tr:=0
trr:= 255 - tr
WinSet, Transparent, %tr%, ahk_id %ba%
WinSet, Transparent, %trr%, ahk_class Shell_TrayWnd
WinSet, Transparent, %trr%, ahk_class Button
return

NumpadSub::
tr:=tr+10
if (tr>255) 
	tr:=255
trr:= 255 - tr
WinSet, Transparent, %tr%, ahk_id %ba%
WinSet, Transparent, %trr% , ahk_class Shell_TrayWnd
WinSet, Transparent, %trr%, ahk_class Button
return

NumpadEnter::
Gui,Destroy
WinSet, Transparent, 255, ahk_class Shell_TrayWnd
WinSet, Transparent, 255, ahk_class Button
ExitApp