[转] 16行AHK代码实现鼠标手势！

刚刚在AHK官方论坛上偶然看到下面这段仅16行(当然，第17行不算实现部分)实现的鼠标手势，把实现技术的基本要素展现出来了，算是个教材式的脚本。

脚本主要是演示实现，用法跟傲游的鼠标手势一样，按住鼠标右键移动鼠标，在松开鼠标右键的时候会弹出对话框显示移动轨迹，u=上，d=下，l=左，r=右。

在这段脚本的基础上，只要稍作修改就可以做很多好玩的事情了。

另外还发现这个帖子里的实现也不错：http://www.autohotkey.com/forum/viewtopic.php?t=25330

rbutton::
mousegetpos xpos1,ypos1
settimer,gtrack,1
return
rbutton up::
settimer,gtrack,off
msgbox,,,%gtrack%,1
gtrack=
return
gtrack:
mousegetpos xpos2,ypos2
track:=(abs(ypos1-ypos2)>=abs(xpos1-xpos2)) ? (ypos1>ypos2 ? "u" : "d") : (xpos1>xpos2 ? "l" : "r")
if (track<>SubStr(gtrack, 0, 1)) and (abs(ypos1-ypos2)>4 or abs(xpos1-xpos2)>4)
gtrack.=track
xpos1:=xpos2,ypos1:=ypos2
return
esc::exitapp