鼠标下透明

#`::   ;置顶并透明化护眼色背景
	if(agreen:=!agreen){
	WinGetActiveTitle, Title
	WinSet AlwaysOnTop, ON, %Title%
	WinSet TransColor, CCE8CF, %Title%
}else{
	WinSet AlwaysOnTop, Off, A
	WinSet TransColor, Off, A
}
return

^#0::   ;让鼠标光标下的颜色透明.
	if(atransparent:=!atransparent){
	MouseGetPos, MouseX, MouseY, MouseWin
	PixelGetColor, MouseRGB, %MouseX%, %MouseY%, RGB        ; 似乎有必要首先关闭任何现有的透明度:
	WinSet, TransColor, Off, ahk_id %MouseWin%
	WinSet, TransColor, %MouseRGB% 150, ahk_id %MouseWin%
}else{ ;让鼠标光标下的颜色不透明.
	;WinSet, TransColor, Off , WinTitle
	MouseGetPos, MouseX, MouseY, MouseWin
	WinSet, TransColor, Off, ahk_id %MouseWin%
}
return

RWin & LWin::   ;隐藏当前活动窗口(不限数量)
WinID:=WinExist("A")
if WinID
{
	WinHide, ahk_id %WinID%
	IDs=%WinID%`;%IDs%
}
return
LWin & RWin::   ;显示所有隐藏的窗口
loop, Parse, IDs, `;
	WinShow, ahk_id %A_LoopField%
IDs=   ;清空窗口名称缓存
return