脚本翻译autohotkey快捷

快捷翻译百家姓的autohotkey脚本

网络资讯 2024-11-21 11:02:56 1

导读

每次总是要去找翻译百家姓的网站……

每次总是要去找翻译百家姓的网站,实在是麻烦,于是写了脚本来处理。

准备:

1. 找到你的启动器(你不会还没有启动器吧)

2. 设置使用autohotkey 1.x版本运行以下脚本(你也可以自行编译成一个exe, Ahk2Exe.exe 里点点点就好了)

使用:

1. 选中百家姓文本

2. 根据你的启动器的设置来启动脚本 (比如我是右键按住上滑,在弹出的工具轮上的百家姓图标上放开)

3. 会弹出对话框显示翻译的结果,可进行修改(一般没啥好改的)。然后点确定,结果就在剪贴板里。如果点取消,剪贴板就回滚到原来的内容。

#NoEnv

backup_clipboard := ClipboardAll

ClipBoard =

; check if any text selected

Sleep, 100

SendInput, ^c

Clipwait, 0.1

If ErrorLevel

{

MsgBox, Select BaiJiaXing text first

return

}

nameMap :=

(Join

{

"赵": "0", "钱": "1", "孙": "2", "李": "3", "周": "4", "吴": "5", "郑": "6", "王": "7", "冯": "8", "陈": "9",

"褚": "a", "卫": "b", "蒋": "c", "沈": "d", "韩": "e", "杨": "f", "朱": "g", "秦": "h", "尤": "i", "许": "j",

"何": "k", "吕": "l", "施": "m", "张": "n", "孔": "o", "曹": "p", "严": "q", "华": "r", "金": "s", "魏": "t",

"陶": "u", "姜": "v", "戚": "w", "谢": "x", "邹": "y", "喻": "z", "福": "A", "水": "B", "窦": "C", "章": "D",

"云": "E", "苏": "F", "潘": "G", "葛": "H", "奚": "I", "范": "J", "彭": "K", "郎": "L", "鲁": "M", "韦": "N",

"昌": "O", "马": "P", "苗": "Q", "凤": "R", "花": "S", "方": "T", "俞": "U", "任": "V", "袁": "W", "柳": "X",

"唐": "Y", "罗": "Z", "薛": ".", "伍": "", "余": "_", "米": "+", "贝": "=", "姚": "/", "孟": "?", "顾": "#",

"尹": "%", "江": "&", "钟": "*", "竺": ":"

}

)

str := Clipboard

str := Trim(str, OmitChars = " `t")

is_magnet := 0

if (SubStr(str, 1, 20) = "magnet:?xt=urn:btih:") {

; Extract the remaining content using SubStr

str := SubStr(str, 21)

is_magnet := 1

}

; Iterate over the array of characters and convert each character to its corresponding code.

code := ""

Loop, Parse, str

code .= nameMap[A_LoopField]

if (is_magnet) {

code := "magnet:?xt=urn:btih:" . code

}

InputBox, code, BaiJiaXing to Code, From: %Clipboard%,,1000,,,,,, %code%

if ErrorLevel

ClipBoard := backup_clipboard

else

ClipBoard := code

复制代码