[转] 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