關於螺旋運動問題

VBSCall Call GetScreenResolution(fx,fy)
VBS x0=fx/2:n=1:y0=fy/2
While n<20
    VBS x=x0+4*(cos(n)+n*sin(n))
    VBS y=y0+3*(sin(n)-n*cos(n))
    VBSCall Call SetCursorPos(x,y)
    Delay 10
    VBS n=n+0.2
EndFor
這可以讓滑鼠游標作螺旋運動，
但是要怎麼在運動中，加條件進去，
例如：在運動中，游標改變時，就按左鍵，
沒有改變就繼續做動。謝謝

再移動滑鼠前
加一個if來判別是否與前一次座標相同(?)
相同則(?)
不相同則(?)

以上=///=