幸好我的百度网盘里还有exe程序, 我下载回来后, 反编译了一下. 代码你自己改.
Menu, Tray, Icon, Shell32.dll, 174
Gui, Add, Button, x132 y130 w40 h80 , Enter
Gui, Add, Text,x12 y255 w165 h40, 在激活窗口按 Win+K 获取焦点
Gui, Font, s14, Arial
Gui, Add, Button, x12 y10 w40 h40 , =
Gui, Add, Button, x52 y10 w40 h40 , /
Gui, Add, Button, x92 y10 w40 h40 , *
Gui, Add, Button, x132 y10 w40 h40 , -
Gui, Add, Button, x12 y50 w40 h40 , 7
Gui, Add, Button, x52 y50 w40 h40 , 8
Gui, Add, Button, x92 y50 w40 h40 , 9
Gui, Add, Button, x12 y90 w40 h40 , 4
Gui, Add, Button, x52 y90 w40 h40 , 5
Gui, Add, Button, x92 y90 w40 h40 , 6
Gui, Add, Button, x12 y130 w40 h40 , 1
Gui, Add, Button, x52 y130 w40 h40 , 2
Gui, Add, Button, x92 y130 w40 h40 , 3
Gui, Add, Button, x92 y170 w40 h40 , .
Gui, Add, Button, x132 y50 w40 h80 , +
Gui, Add, Button, x12 y170 w80 h40 , 0
Gui, Add, Button, x12 y210 w80 h40 , (
Gui, Add, Button, x92 y210 w80 h40 , )
id := WinExist("A")
Gui, Show,NoActivate x606 y300 h280 w185, NumPad
Gui, +AlwaysOnTop
return
IfWinNotActive,Numpad
id := WinExist("A")
trayTip NumPad by 小恐龙, 获取输入焦点%id%
return
SetKeyDelay, -1, 0
ButtonEnter:
ControlSend ,,{Enter},ahk_id %id%
return
Button=:
ControlSend ,,=,ahk_id %id%
return
Button/:
ControlSend ,,/,ahk_id %id%
return
button*:
ControlSend ,,{U+002a},ahk_id %id%
return
button+:
ControlSend ,,{U+002b},ahk_id %id%
return
button-:
ControlSend ,,-,ahk_id %id%
return
button1:
ControlSend ,,1,ahk_id %id%
return
button2:
ControlSend ,,2,ahk_id %id%
return
button3:
ControlSend ,,3,ahk_id %id%
return
button4:
ControlSend ,,4,ahk_id %id%
return
button5:
ControlSend ,,5,ahk_id %id%
return
button6:
ControlSend ,,6,ahk_id %id%
return
button7:
ControlSend ,,7,ahk_id %id%
return
button8:
ControlSend ,,8,ahk_id %id%
return
button9:
ControlSend ,,9,ahk_id %id%
return
button0:
ControlSend ,,0,ahk_id %id%
return
button.:
ControlSend ,,.,ahk_id %id%
return
Button(:
ControlSend ,,{U+0028},ahk_id %id%
return
Button):
ControlSend ,,{U+0029},ahk_id %id%
return
#K::
id := WinExist("A")
Gui, Show,NoActivate
trayTip,NumPad by 小恐龙, 获取输入焦点%id%
return
GuiClose:
trayTip,NumPad by 小恐龙, 快捷键Win+K显示小键盘
Gui, Cancel
return