Mouse Scroll over winow caption but not active

[ken gray]

SHoot....this seems to only work for some windows (most notably QM).  anyone have an idea as to why?

Function Trans_Lower
Trigger #Dh2 0x1     

Code:

Copy      Help

int hwnd=win(mouse)
int col flags
byte alpha
int z
GetLayeredWindowAttributes hwnd &col &alpha &flags
out "alpha %i" alpha
z=18
if alpha=0
,alpha=255
else
,alpha-z
out "alpha %i %i" alpha hwnd
if alpha<24
,Transparent(hwnd 25)
,3
,end
Transparent(hwnd alpha)