作者Lumania (小糠榔)
看板EzHotKey
标题[AHK-] 分享以Send指令送中文字串小程式
时间Wed Oct 22 10:15:17 2008
BG5ToAsc(xx)
{
return (NumGet(xx, 0, "UChar") <<8) | NumGet(xx, 1, "UChar")
}
SendBig5(xx)
{
i:=StrLen(xx)
if i=0
return
i//=2
loop, %i%
{
tmp1 := BG5ToAsc(xx)
send, {ASC %tmp1%}
stringtrimleft, xx, xx, 2
}
}
^Numpad0::
keywait, ctrl
winwaitactive, A
SendBig5("检验的一天")
return
大家参考看看
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 210.69.13.1
1F：推 VElysian:好厉害喔~~专业 推推 10/22 18:04
2F：→ Lumania:字串中不能掺英文、数字、英文符号 免得错乱 10/23 13:44