1.                                 延时20毫秒
  2.                                 左键单击
  3.                                 左键单击
  4.                                 延时111毫秒
  5.                                 延时111毫秒
  6.                             条件结束
  7.                         条件结束
  8.                         延时111毫秒
  9.                         延时111毫秒
  10.                         调用外部VBScript子程序 Call 在屏幕区域里查找图形(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y)
  11.                         调用外部VBScript子程序 Call 在屏幕区域里查找图形(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y)
  12.                         如果表达式 (x>=0 and y>=0) 为真,则
  13.                             如果表达式 (x>=0 and y>=0) 为真,则
  14.                                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y)
  15.                                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y)
  16.                                 如果表达式 (x>=0 and y>=0) 为真,则
  17.                                     如果表达式 (x>=0 and y>=0) 为真,则
  18.                                         鼠标移到 x+12 , y+3
  19.                                         鼠标移到 x+12 , y+3
  20.                                         延时20毫秒
  21.                                         延时20毫秒
  22.                                         左键双击
  23.                                         左键双击
  24.                                         延时111毫秒
  25.                                         延时111毫秒
  26.                                     条件结束
  27.                                 条件结束
  28.                             否则
  29.                             否则
  30.                                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y)
  31.                                 调用外部VBScript子程序 Call 在屏幕区域里查找图形(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y)
  32.                                 如果表达式 (x>=0 and y>=0) 为真,则
  33.                                     如果表达式 (x>=0 and y>=0) 为真,则
  34.                                         鼠标移到 x+59 , y+3
  35.                                         鼠标移到 x+59 , y+3
  36.                                         延时20毫秒
  37.                                         延时20毫秒
  38.                                         左键双击
  39.                                         左键双击
  40.                                     条件结束
  41.                                 条件结束
  42.                             条件结束
  43.                         条件结束
  44.                         延时111毫秒
  45.                         延时111毫秒
  46.                     循环结束
  47.                 循环结束
  48.             条件结束
  49.         条件结束
  50.         调用插件命令 WindowEx.SetWindowState(hwnd(i),6)
  51.         调用插件命令 WindowEx.SetWindowState(hwnd(i),6)
  52.         延时222毫秒
  53.         延时222毫秒
  54.     子程序结束,回到调用处
  55. 子程序结束,回到调用处
  56. 子程序 初始化
  57.     子程序 初始化
  58.         如果表达式 (hwnd) 为真,则
  59.             如果表达式 (hwnd) 为真,则
  60.                 （VBScript语句） Gnum=Ubound(hwnd)+1:dt=5
  61.                 （VBScript语句） Gnum=Ubound(hwnd)+1:dt=5
  62.                 如果表达式 (Gnum>0) 为真,则
  63.                     如果表达式 (Gnum>0) 为真,则
  64.                         （VBScript语句） dtGet=dtGet/Gnum:dtRes=dtRes/Gnum
  65.                         （VBScript语句） dtGet=dtGet/Gnum:dtRes=dtRes/Gnum
  66.                     条件结束
  67.                 条件结束
  68.             否则
  69.             否则
  70.                 弹出窗口 "找不到[寻仙]窗口"&chr(13)&"点<确定>退出脚本"
  71.                 弹出窗口 "找不到[寻仙]窗口"&chr(13)&"点<确定>退出脚本"
  72.                 跳转到标记 结束标记
  73.                 跳转到标记 结束标记
  74.             条件结束
  75.         条件结束
  76.         调用插件命令 WindowEx.SetWindowState(hwnd(0),1)
  77.         调用插件命令 WindowEx.SetWindowState(hwnd(0),1)
  78.         调用插件命令 WindowEx.SetWindowState(hwnd(0),7)
  79.         调用插件命令 WindowEx.SetWindowState(hwnd(0),7)
  80.         调用插件命令 WindowEx.MoveWindow(hwnd(0),0,0)
  81.         调用插件命令 WindowEx.MoveWindow(hwnd(0),0,0)
  82.         延时2000毫秒
  83.         延时2000毫秒
  84.         调用外部VBScript子程序 Call 在屏幕区域里查找图形(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y)
  85.         调用外部VBScript子程序 Call 在屏幕区域里查找图形(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y)
  86.         如果表达式 (mx<0 and my<0) 为真,则
  87.             如果表达式 (mx<0 and my<0) 为真,则
  88.                 弹出窗口 "找不到[寻仙]窗口"&chr(13)&"点<确定>退出脚本"
  89.                 弹出窗口 "找不到[寻仙]窗口"&chr(13)&"点<确定>退出脚本"
  90.                 跳转到标记 结束标记
  91.                 跳转到标记 结束标记
  92.             条件结束
  93.         条件结束
  94.         （VBScript语句） dx=(102-mx)
  95.         （VBScript语句） dx=(102-mx)
  96.         （VBScript语句） dy=(40-my)
  97.         （VBScript语句） dy=(40-my)
  98.         调用插件命令 WindowEx.SetWindowState(hwnd(0),6)
  99.         调用插件命令 WindowEx.SetWindowState(hwnd(0),6)
  100.         延时1111毫秒