1.         PianYiY = PianYiY + YiDongY
  2.         延时YiDongSuDu毫秒
  3.         跳转到标记 YiDong
  4.     条件结束
  5. 子程序结束,回到调用处
  6. //常用：提示信息，过3秒自动关闭窗口的方式
  7. 子程序 TiShi
  8.     Call TiShiObj.Popup(TiShiXinXi,3,"3秒后窗口自动关闭",0)
  9. 子程序结束,回到调用处
  10. //常用：获取A点和B点的坐标，A点是当前坐标点，B点是目的坐标点
  11. 子程序 GetABPoint
  12.     //获取A点坐标信息
  13.     Call GetCursorPos(ax,ay)
  14.     //获取B点坐标信息，B点坐标 ＝ 窗口坐标 ＋ 相对坐标
  15.     调用插件命令 hWnd=Window.Foreground()
  16.     调用插件命令 winRect=Window.GetWindowRect(hWnd)
  17.     // MessageBox(winRect)
  18.     winPoint = Split(winRect, "|", -1, 1)
  19.     bx = CInt(winPoint(0)) + bxOpp
  20.     by = CInt(winPoint(1)) + byOpp
  21. 子程序结束,回到调用处
  22. //常用：把鼠标移动到屏幕正中
  23. 子程序 YiDaoZhongJian
  24.     Call GetScreenResolution(intX,intY)
  25.     鼠标移到 intX/2 , intY/2
  26. 子程序结束,回到调用处
  27. //常用：屏幕上画圆
  28. 子程序 画圆
  29.     r=300:x0=512:y0=384:x=0:y=0:n=0
  30.     如果表达式 (n<3.1415926*2) 为真,则循环执行
  31.         x=x0+r*cos(n)
  32.         y=y0-r*sin(n)
  33.         鼠标移到 x , y
  34.         延时10毫秒
  35.         n=n+0.03
  36.     循环结束
  37. 子程序结束,回到调用处