1.         循环结束
  2.         txX = 386-13
  3.         txX = 386-13
  4.         txY = 722-267
  5.         txY = 722-267
  6.         调用子程序 坐标转换
  7.         调用子程序 坐标转换
  8.         鼠标移到 txX , txY
  9.         鼠标移到 txX , txY
  10.         延时100毫秒
  11.         延时100毫秒
  12.         左键单击
  13.         左键单击
  14.         延时100毫秒
  15.         延时100毫秒
  16.     子程序结束,回到调用处
  17. 子程序结束,回到调用处
  18. 子程序 打开网站
  19.     子程序 打开网站
  20.         如果表达式 (key=116) 为真,则
  21.             如果表达式 (key=116) 为真,则
  22.                 key=-1
  23.                 key=-1
  24.                 调用外部VBScript子程序 在屏幕区域里查找图形(x1,y1,x2,y2,"shiqu.bmp",0.9,intX,intY)
  25.                 调用外部VBScript子程序 在屏幕区域里查找图形(x1,y1,x2,y2,"shiqu.bmp",0.9,intX,intY)
  26.             条件结束
  27.         条件结束
  28.         如果表达式 (key=117) 为真,则
  29.             如果表达式 (key=117) 为真,则
  30.                 key=-1
  31.                 key=-1
  32.                 调用外部VBScript子程序 在屏幕区域里查找图形(x1,y1,x2,y2,"shiqu.bmp",0.9,intX,intY)
  33.                 调用外部VBScript子程序 在屏幕区域里查找图形(x1,y1,x2,y2,"shiqu.bmp",0.9,intX,intY)
  34.             条件结束
  35.         条件结束
  36.         如果表达式 (key=118) 为真,则
  37.             如果表达式 (key=118) 为真,则
  38.                 key=-1
  39.                 key=-1
  40.                 调用外部VBScript子程序 在屏幕区域里查找图形(x1,y1,x2,y2,"shiqu.bmp",0.9,intX,intY)
  41.                 调用外部VBScript子程序 在屏幕区域里查找图形(x1,y1,x2,y2,"shiqu.bmp",0.9,intX,intY)
  42.             条件结束
  43.         条件结束
  44.         如果表达式 (key=119) 为真,则
  45.             如果表达式 (key=119) 为真,则
  46.                 key=-1
  47.                 key=-1
  48.                 调用外部VBScript子程序 在屏幕区域里查找图形(x1,y1,x2,y2,"shiqu.bmp",0.9,intX,intY)
  49.                 调用外部VBScript子程序 在屏幕区域里查找图形(x1,y1,x2,y2,"shiqu.bmp",0.9,intX,intY)
  50.             条件结束
  51.         条件结束
  52.     子程序结束,回到调用处
  53. 子程序结束,回到调用处