近頃の、とあるR。

googleデスクトップのCTRLダブルクリックのあれのその後。いろいろ微調整中。今後もまた調整するかも。

• AutoHotKeyでURLエンコードしてみるからパクり、URLエンコードを追加してみました。
• CTRL２度押しのコードも、Launchy の起動方法を Alt+Space から素早く Shift ２回押しにするから拝借。
• 再度CTRLを２度押しした場合に窓が消えるように

Gui, Add, Edit, vValue x12 y11 w220 h20 ,
Gui, Add, Button, Default x242 y11 w30 h20 , GO
GUI, Hide

URLEncode(str)
{
	ret =
	tmp = 0
	ini = %A_ScriptDir%\sjis2utf8E.ini
	Loop, parse, str
	{
		num := Asc(A_LoopField)
		if tmp <> 0
		{
			tmp += %num%
			IniRead, val, %ini%, zenkaku, %tmp%
			ret = %ret%%val%
			tmp = 0
		}
		else if A_LoopField in 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,0,1,2,3,4,5,6,7,8,9,-,_,!,~,*,.,(,)
		{
			ret = %ret%%A_LoopField%
		}
		else if num < 128
		{
			IniRead, val, %ini%, ascii, %num%
			ret = %ret%%val%
		}
		else if(num > 160 && num < 224)
		{
			IniRead, val, %ini%, hankana, %num%
			ret = %ret%%val%
		}
		else
		{
			tmp := num * 256
		}
	}
	return ret
}

~Control up::
if(A_PriorHotKey = A_ThisHotKey and A_TimeSincePriorHotkey < 180)
	GuiControlGet, Gui_mode, Visible, Value
	if (!Gui_mode) {
		Gui, Show, x204 y145 h41 w286, 検索してね-AHK
		GuiControl, Focus, Value
	} else {
		Gui, Hide
	}
return

~Esc::
	GUI, Hide
	GuiControl,,Value
return

ButtonGO:
	Gui,submit
	Gui, Hide
	GuiControl,,Value
	search_str := URLEncode(Value)
	Run,http://www.google.co.jp/search?q=%search_str%
return

その後

↑だと、ctrl３回押しが２度押し×２回になっちゃいます(ノ∀｀)
CTRL二度押しに関しては新・なまず日記の方が期待通りに動くようです。