;選択範囲の全角文字と半角文字の間に半角スペースを挿入
;F1キー
;2016/12/11作成

F1::
Clipboard =
Send, ^x
ClipWait, 1
if ErrorLevel <> 0
{
return
}
a01=%Clipboard%
a01:=RegExReplace(a01, "([!-~])([^ -~\r\n\t])", "$1 $2")
a01:=RegExReplace(a01, "([^ -~\r\n\t])([!-~])", "$1 $2")
Clipboard = %a01%
Send, ^v
return