From fcf35065583dcf85c62fa33cc0856be5223b08b9 Mon Sep 17 00:00:00 2001
From: millionart <millionart@gmail.com>
Date: Sun, 6 May 2018 21:16:59 +0800
Subject: [PATCH] =?UTF-8?q?=E7=BF=BB=E8=AF=91=E5=8A=9F=E8=83=BD=E8=BF=9B?=
 =?UTF-8?q?=E8=A1=8C=E4=BA=86=20URL=20=E7=BC=96=E7=A0=81=EF=BC=8C=E5=8F=AF?=
 =?UTF-8?q?=E4=BB=A5=E4=BF=9D=E6=8C=81=E5=8E=9F=E6=9C=89=E6=A0=BC=E5=BC=8F?=
 =?UTF-8?q?=E4=BA=86?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 WinPopClip.ahk | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/WinPopClip.ahk b/WinPopClip.ahk
index 3e8c650..b5177ff 100644
--- a/WinPopClip.ahk
+++ b/WinPopClip.ahk
@@ -258,12 +258,14 @@ Return
 
 GoogleTranslate:
     Gui, Destroy
-; https%3A%2F%2Ftranslate.google.cn%2F%23auto%2Fzh-CN%2F%25ClipBoard%25
-    Run, https://translate.google.cn/#auto/zh-CN/%selectText%
+    transText:=UriEncode(selectText)
+    Run, https://translate.google.cn/#auto/zh-CN/%transText%
 Return
 
-; working...
-URLEncoding(string)
-{
-    string:=StrReplace(string, SearchText , ReplaceText)
+; from http://the-automator.com/parse-url-parameters/
+UriEncode(Uri, RE="[0-9A-Za-z]"){
+    VarSetCapacity(Var,StrPut(Uri,"UTF-8"),0),StrPut(Uri,&Var,"UTF-8")
+    While Code:=NumGet(Var,A_Index-1,"UChar")
+    Res.=(Chr:=Chr(Code))~=RE?Chr:Format("%{:02X}",Code)
+    Return,Res
 }
\ No newline at end of file