利用AHK脚本快速发微博

在阅读google reader中订阅的各种内容以及各种网页的时候经常会发现一些不错的内容片段, 并希望通过微博发出去, 这是我的习惯. 因为微博有140个字符的限制, 非常适合用来做这种类似我们上学时候的简短摘抄, 剪报, 也算是作为一种积累和收集.

为了简化这种简单的拷贝粘贴操作,结合新浪微博提供的内容发送接口, 使用AutoHotKey写了一个脚本:

引用

;google来的, 用来对要发送微博内容进行encode编码
UrlEncode(String)
{
   OldFormat := A_FormatInteger
   SetFormat, Integer, H

   Loop, Parse, String
   {
      if A_LoopField is alnum
      {
         Out .= A_LoopField
         continue
      }
      Hex := SubStr( Asc( A_LoopField ), 3 )
      Out .= "%" . ( StrLen( Hex ) = 1 ? "0" . Hex : Hex )
   }
   SetFormat, Integer, %OldFormat%
   return Out
}

#IfWinActive ahk_class MozillaUIWindowClass
^+t:: ;将选中文字发送到微博
InputBox, tag, 标签, 请输入标签, , 300, 150, , , , , via  ;指定标签
title =#%tag%# %Clipboard%
title := UrlEncode(title) ;转换编码
send,^{Left} ;移动到当前tab页前面, 方便发送关闭后回到当前页
send,^t ;新建一个tab页
run,http://v.t.sina.com.cn/share/share.php?title=%title% ;打开新浪微博输入窗口提交
return

!s:: ;alt+s 发送
IfWinExist,转发到微博
{
send,{tab}
send,{enter}
}
return
#IfWinActive

注:我的firefox设置是选中即拷贝, 所以这里直接将选中的内容按shift+ctrl+t就可以发送出去了

另外补发一个chrome的脚本, 稍微有些不一致

引用

#IfWinActive ahk_class Chrome_WidgetWin_0
^+t:: ;将选中文字发送到微博
send,^c
InputBox, tag, 标签, 请输入标签, , 300, 150, , , , , via  ;指定标签
title =#%tag%# %Clipboard%
title := UrlEncode(title) ;转换编码
send,^t ;新建一个tab页
run, C:\Documents and Settings\Administrator\Local Settings\Application Data\Google\Chrome\Application\chrome.exe "-user-data-dir="anywhere"" http://v.t.sina.com.cn/share/share.php?title=%title% ;打开新浪微博输入窗口提交
return

!s::
IfWinExist,转发到微博
{
send,{tab}
send,{enter}
}
return

#IfWinActive