1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
| #NoEnv
SendMode Input
SetWorkingDir %A_ScriptDir%
TLevel = 180
#^Esc::
WinGet, CurrentTLevel, Transparent, A
If (CurrentTLevel = OFF) {
WinSet, Transparent, %TLevel%, A
}
Else {
WinSet, Transparent, OFF, A
}
return
SetTransparency:
WinGet, CurrentTLevel, Transparent, A
WinSet, Transparent, %TLevel%, A
return
#^=::
TLevel += 10
If TLevel >= 255 {
TLevel = 255
}
Gosub, SetTransparency
return
#^-::
TLevel -= 10
If TLevel <= 0 {
TLevel = 0
}
Gosub, SetTransparency
return
bkpm_This_and_next_line_added_by_Ahk2Exe:
Exit
|