#Requires AutoHotkey v2.0
#SingleInstance force
Persistent
/*------某文本--------
fh //用符号作为热字串
"双引号"
(小括号)
[中括号]
{大括号}
re//re开头的片语
return
refund
热水器
惹人怜爱的花
...
------------------*/
txt := "fh //用符号作为热字串" ;用loop 得到一堆这样的文本
hs0 := StrSplit(txt, "`t")
x0 := hs0[1];截取热字串fh
;然後 loop 得到以 fh 命名的菜单项,像这样格式的:
%x0% := Menu()
%x0%.Add("`"双引号`"", symbPasteSelected)
%x0%.Add("(小括号)", symbPasteSelected)
%x0%.Add("[中括号]", symbPasteSelected)
%x0%.Add("{大括号}", symbPasteSelected)
%x0%.Add("%百份号%", symbPasteSelected)
symbPasteSelected(x0, *) {
;Send "^c"
sleep 500
;A_Clipboard := SubStr(x0, 1, 1) . A_Clipboard . SubStr(x0, -1)
A_Clipboard := x0
sleep 20
Send "^v"
}
showMenu(M0) {
CaretGetPos(&x0, &y0)
x0 := x0 - 15
y0 += 50
sleep 500
%M0%.Show(x0, y0)
}
;------------然后得到一堆这样的东东------------
;目标是输入fh,然後显示菜单,选择各符号选择,执行功能
:?X:fh::showMenu("fh")
:?X:re::showMenu("re")
;...
刚开始学V2,好像 :?X:fh::showMenu("fh")里的fh是string,而调用function里的%M0%.Show(x0, y0)里,M0是menu,分得很清,以前一对 %百分号% 走天下貌似不行了,哪位大神帮改一下,谢谢...
#SingleInstance force
Persistent
/*------某文本--------
fh //用符号作为热字串
"双引号"
(小括号)
[中括号]
{大括号}
re//re开头的片语
return
refund
热水器
惹人怜爱的花
...
------------------*/
txt := "fh //用符号作为热字串" ;用loop 得到一堆这样的文本
hs0 := StrSplit(txt, "`t")
x0 := hs0[1];截取热字串fh
;然後 loop 得到以 fh 命名的菜单项,像这样格式的:
%x0% := Menu()
%x0%.Add("`"双引号`"", symbPasteSelected)
%x0%.Add("(小括号)", symbPasteSelected)
%x0%.Add("[中括号]", symbPasteSelected)
%x0%.Add("{大括号}", symbPasteSelected)
%x0%.Add("%百份号%", symbPasteSelected)
symbPasteSelected(x0, *) {
;Send "^c"
sleep 500
;A_Clipboard := SubStr(x0, 1, 1) . A_Clipboard . SubStr(x0, -1)
A_Clipboard := x0
sleep 20
Send "^v"
}
showMenu(M0) {
CaretGetPos(&x0, &y0)
x0 := x0 - 15
y0 += 50
sleep 500
%M0%.Show(x0, y0)
}
;------------然后得到一堆这样的东东------------
;目标是输入fh,然後显示菜单,选择各符号选择,执行功能
:?X:fh::showMenu("fh")
:?X:re::showMenu("re")
;...
刚开始学V2,好像 :?X:fh::showMenu("fh")里的fh是string,而调用function里的%M0%.Show(x0, y0)里,M0是menu,分得很清,以前一对 %百分号% 走天下貌似不行了,哪位大神帮改一下,谢谢...