一些效率工具配置分享

发表于 更新于 分类于 阅读次数： 本文字数： 6k 阅读时长 ≈ 5 分钟

AHK，ImTip，Quicker，Saladict…等等Windows效率小工具的配置清单

ImTip：输入法状态提示工具

imtip.aardio

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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
import fonts.imtip;
import win.ui;
/*DSG{{*/
mainForm = win.form(text="ImTip 导出方案";right=757;bottom=467)
mainForm.add()
/*}}*/

import key.ime.stateBar;
var imeBar = key.ime.stateBar(mainForm);

//输入法状态提示（应先退出 ImTip ，多个提示窗口同时出现会闪烁）
imeBar.imeSkin(/*ImTipConfig{{*/{
argbColor=-1;
border={color=14395508;radius=9;width=0};
offsetX=1;
iconStyle={align="right";font={h=-11;name="imtip";weight=400};padding={top=4;right=2;left=0;bottom=0}};
background=-520110524;
textRenderingHint=3;
openStyle={[1]={argbColor=-1;background=-520110524;border={color=14395508;radius=9;width=0};iconColor=-1};[0]={argbColor=-1;background=-477757441;border={color=14395508;radius=9;width=0};iconColor=-1}};
align="left";
textPadding={top=1;right=0;left=2;bottom=0};
tipChars={fullShape=" ";close=" ";hanja="漢";[1033]=" ";[2052]="";[1041]="あ";katakana="カ";halfShape=" ";[1042]="가";capital=" ";symbol=" "};
width=16;
font={h=-53;name="微软雅黑";weight=400};
iconColor=-1;
foreground=16777215;
height=2;
offsetY=0;
iconTextRenderingHint=3;
valign="center"
}/*}}*/)

//托盘图标
import win.util.tray;
mainForm.tray = win.util.tray(mainForm)  
mainForm.tray.tip = "ImTip 导出方案"

//响应托盘消息
mainForm.onTrayMessage = {
	[0x205/*_WM_RBUTTONUP*/] = function(wParam){ 
	    win.setForeground(mainForm.hwnd);
	    mainForm.popmenu.popup(); 
	}; 
}

//托盘弹出菜单
import win.ui.menu;
mainForm.popmenu = win.ui.popmenu(mainForm); 
mainForm.popmenu.add('临时禁用提示',function(id){ 
	imeBar.imeWatch(!!imeBar.paused);
	mainForm.popmenu.check(1,!!imeBar.paused);
});

mainForm.popmenu.add('退出',function(id){ mainForm.close() });

/*
//输入法状态或目标窗口变更触发此事件
var lastFocus,lastPath,lastClass;
imeBar.onImeStateChange = function(hFocus,x,y,openNative,symbolMode,text,iconText){
	if(lastFocus!=hFocus){
		lastClass = win.getClass(hFocus);
		var tid,pid = win.getThreadProcessId(hFocus);
		lastPath = process.getPath(pid);
	}

	//指定文件名的程序禁止显示提示
	if(lastPath && io.splitpath(lastPath).file == "应用程序名称.exe"){
		return false;
	}
	return true;
}
*/

win.loopMessage();

AHK：自定义热键工具

Version 1.1.34.03

tools.ahk

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
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
#HotkeyInterval 1000
#MaxHotkeysPerInterval 200

CapsLock up::
    Send, ^{Space}
return

~Lshift & WheelDown:: 
Send, {WheelRight}
Return

~Lshift & WheelUp::
Send, {WheelLeft}
Return

!s::  
Send ^c
Send ^c
clipboard := RegExReplace(clipboard, "\s","+")
clipboard := RegExReplace(clipboard, "\s","+")
Browser = C:\Users\THK\AppData\Local\Google\Chrome\Application\chrome.exe
;Browser = C:\Program Files (x86)\Microsoft\Edge\Application\msedge.exe
Run %Browser%  https://cn.bing.com/search?q=%clipboard%
return 

MouseIsOver(WinTitle) {
MouseGetPos,,, Win
return WinExist(WinTitle . " ahk_id " . Win)
}

WheelDown::
If (MouseIsOver("ahk_class Shell_TrayWnd"))
    SoundSet,-2
Else
    MouseClick,WD
Return

WheelUp::
If (MouseIsOver("ahk_class Shell_TrayWnd"))
    SoundSet,+2
Else
    MouseClick,WU
Return

MButton::
If (MouseIsOver("ahk_class Shell_TrayWnd"))
    Send,{Volume_Mute}
Else
    MouseClick,Middle
Return

^+c::
send ^c
send ^c
sleep,1000
clipboard=%clipboard%
tooltip,%clipboard%
sleep,500
tooltip,
return

::yx::myemail@qq.com
::zz::myaddress
::dh::mynumber
::sf::myID

#z::
winset alwaysontop,toggle,A
winget, Transparent, Transparent, A
if (Transparent)
{
    winset Transparent,Off,A
    winset alwaysontop,off,A
}
else
{
    winset Transparent,240,A
    winset alwaysontop,on,A
}
return


;使用说明：
;   ◆右侧shift+滚轮下滑：减少透明度，一次10
;   ◆右侧shift+滚轮上滑：增加透明度，一次20
;   ◆右侧shift+中键按下：恢复透明度至255(完全不透明).
;
~RShift & WheelUp::
; 透明度调整，增加。
WinGet, Transparent, Transparent,A
If (Transparent="")
    Transparent=255
    ;Transparent_New:=Transparent+10
    Transparent_New:=Transparent+20    ;◆透明度增加速度。
    If (Transparent_New > 254)
                    Transparent_New =255
    WinSet,Transparent,%Transparent_New%,A
 
    tooltip now: ▲%Transparent_New%`nmae: __%Transparent%  ;查看当前透明度（操作之后的）。
    ;sleep 1500
    SetTimer, RemoveToolTip_transparent_Lwin__2016.09.20, 1500  ;设置统一的这个格式，label在最后。
return
 
~RShift & WheelDown::
;透明度调整，减少。
WinGet, Transparent, Transparent,A
If (Transparent="")
    Transparent=255
    Transparent_New:=Transparent-10  ;◆透明度减少速度。
    ;msgbox,Transparent_New=%Transparent_New%
            If (Transparent_New < 30)    ;◆最小透明度限制。
                    Transparent_New = 30
    WinSet,Transparent,%Transparent_New%,A
    tooltip now: ▲%Transparent_New%`nmae: __%Transparent%  ;查看当前透明度（操作之后的）。
    ;sleep 1500
    SetTimer, RemoveToolTip_transparent_Lwin__2016.09.20, 1500  ;设置统一的这个格式，label在最后。
return
 
;设置Lwin &Mbutton直接恢复透明度到255。
~Rshift & Mbutton:: 
WinGet, Transparent, Transparent,A
WinSet,Transparent,255,A 
tooltip ▲Restored ;查看当前透明度（操作之后的）。
;sleep 1500
SetTimer, RemoveToolTip_transparent_Lwin__2016.09.20, 1500  ;设置统一的这个格式，label在最后。
return
 
 
removetooltip_transparent_Lwin__2016.09.20:     ;LABEL
tooltip
SetTimer, RemoveToolTip_transparent_Lwin__2016.09.20, Off
return

!c::
run C:\Program Files\Everything\Everything.exe
return

!+t::
run  C:\Users\THK\Documents\Tencent Files\1229194407\FileRecv
return

!+c::
run C:\Users\THK\Downloads
return

!+w::
run C:\Users\THK\Documents\WeChat Files\wxid_wzkvas1xarde21\FileStorage\File
return

!+b::
run D:\BaiduNetdiskDownload
return


!+i::
run D:\IDMdownloads
return

!+e::
run D:\Edge
return

!+j::
run D:\Program Files\JiJiDown\Download
return


!+p::
run D:\PKM
return

;修复微软输入法莫名其妙切换全角bug
+Space::
return

NumpadAdd::#`