1.         左键单击
  2.         延时100毫秒
  3.         左键单击
  4.         延时100毫秒
  5.         左键单击
  6.     否则
  7.     条件结束
  8. 子程序结束,回到调用处
  9. 子程序 人物2
  10.     dim color(2)
  11.     dim s6,x,y
  12.     color(0)="31faff":color(1)="31faff":color(2)="31faff"
  13.     调用外部VBScript子程序 在区域里从中间开始找颜色(0,0,1024,768,color(s),x,y)
  14.     如果表达式 (x>0 and y>0) 为真,则
  15.         鼠标移到 X , Y
  16.         鼠标相对移动 415 , 155
  17.         左键单击
  18.         延时100毫秒
  19.         左键单击
  20.         延时100毫秒
  21.         左键单击
  22.     否则
  23.     条件结束
  24. 子程序结束,回到调用处
  25. 子程序 人物3
  26.     dim color(2)
  27.     dim s7,x,y
  28.     color(0)="31faff":color(1)="31faff":color(2)="31faff"
  29.     调用外部VBScript子程序 在区域里从中间开始找颜色(0,0,1024,768,color(s),x,y)
  30.     如果表达式 (x>0 and y>0) 为真,则
  31.         鼠标移到 X , Y
  32.         鼠标相对移动 515 , 155
  33.         左键单击
  34.         延时100毫秒
  35.         左键单击
  36.         延时100毫秒
  37.         左键单击
  38.     否则
  39.     条件结束
  40. 子程序结束,回到调用处
  41. 子程序 人物4
  42.     dim color(2)
  43.     dim s8,x,y
  44.     color(0)="31faff":color(1)="31faff":color(2)="31faff"
  45.     调用外部VBScript子程序 在区域里从中间开始找颜色(0,0,1024,768,color(s),x,y)
  46.     如果表达式 (x>0 and y>0) 为真,则
  47.         鼠标移到 X , Y
  48.         鼠标相对移动 316 , 280
  49.         左键单击
  50.         延时100毫秒
  51.         左键单击
  52.         延时100毫秒
  53.         左键单击
  54.     否则
  55.     条件结束
  56. 子程序结束,回到调用处
  57. 子程序 人物5
  58.     dim color(2)
  59.     dim s9,x,y
  60.     color(0)="31faff":color(1)="31faff":color(2)="31faff"
  61.     调用外部VBScript子程序 在区域里从中间开始找颜色(0,0,1024,768,color(s),x,y)
  62.     如果表达式 (x>0 and y>0) 为真,则
  63.         鼠标移到 X , Y
  64.         鼠标相对移动 416 , 280
  65.         左键单击
  66.         延时100毫秒
  67.         左键单击
  68.         延时100毫秒
  69.         左键单击
  70.     否则
  71.     条件结束
  72. 子程序结束,回到调用处
  73. 子程序 人物6
  74.     dim color(2)
  75.     dim s10,x,y
  76.     color(0)="31faff":color(1)="31faff":color(2)="31faff"
  77.     调用外部VBScript子程序 在区域里从中间开始找颜色(0,0,1024,768,color(s),x,y)
  78.     如果表达式 (x>0 and y>0) 为真,则
  79.         鼠标移到 X , Y
  80.         鼠标相对移动 516 , 280
  81.         左键单击
  82.         延时100毫秒
  83.         左键单击
  84.         延时100毫秒
  85.         左键单击
  86.     否则
  87.     条件结束
  88. 子程序结束,回到调用处