中文数字转数字的操作

eme群看到这个需求简单写了这个实例

函数来自ra作者老哥的text插件,直接套来用了

源码如下

F2:: ; cn to d
SendInput, ^c
ClipWait, 1, 1
Clipboard:=c2n(Clipboard)
ToolTip,%Clipboard%
SetTimer,removetootip,1000
Return
removetootip:
ToolTip
Return
c2n(c){
	static a:={"零":0,一:1,二:2,两:2,三:3,四:4,五:5
		,六:6,七:7,八:8,九:9,十:10,百:100,千:1000
		,万:10000,亿:10**8,兆:10**12,京:10**16,垓:10**20}
	c:=RegExReplace(c,"[[:ascii:]]")
	c:=SubStr(c,1,1)="十" ? "一" c:c
	r:=StrSplit(c), q:=w:=bak:=1, n:=0
	Loop, % i:=r.MaxIndex()
		if (v:=Round(a[r[i--]]))>1000
			w*=(v>bak ? v//bak : v), bak:=v, q:=1
		else if (v>=10)
			q:=v
		else n+=v*q*w
	return, n
}