1. 令 a1 = form1.游戏路径.text
  2. 令 a10 = form1.InputBox1.text
  3. 令 a2 = form1.InputBox2.text
  4. 令 a3 = form1.InputBox3.text
  5. 令 a4 = form1.InputBox4.text
  6. 令 a5 = form1.InputBox5.text
  7. 令 a6 = form1.InputBox6.text
  8. 令 a7 = form1.InputBox7.text
  9. 令 a8 = form1.InputBox8.text
  10. 令 a9 = form1.InputBox9.text
  11. 令 YanShi = form1.InputBox11.text
  12. 令 c = form1.InputBox10.text
  13. 如果 Form1.CheckBox1.Value = 1 则
  14.     调用 运行1()
  15. 否则
  16. 条件结束
  17. 如果 Form1.CheckBox2.Value = 1 则
  18.     调用 运行2()
  19. 否则
  20. 条件结束
  21. 如果 Form1.CheckBox3.Value = 1 则
  22.     调用 运行3()
  23. 否则
  24. 条件结束
  25. 如果 Form1.CheckBox4.Value = 1 则
  26.     调用 运行4()
  27. 否则
  28. 条件结束
  29. 调用 运行1()
  30. 子程序 运行1()
  31.     标记 开始1(子程序 运行1)
  32.     延时 1000 毫秒
  33.     延时 YanShi 毫秒
  34.     (鼠标)移动到 (40, 17)
  35.     延时 YanShi 毫秒
  36.     (鼠标)左键单击, 1次
  37.     延时 50 毫秒
  38.     (键盘)按 "Enter" 键, 1次
  39.     延时 100 毫秒
  40.     延时 YanShi 毫秒
  41.     (鼠标)移动到 (600, 300)
  42.     保存鼠标位置
  43.     令 i = 0
  44.     循环当 i = 0 时
  45.         延时 YanShi 毫秒
  46.         从左上到右下查找颜色 "5ac3ef",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768)
  47.         如果 intx > 0 并且 inty > 0 则
  48.             延时 YanShi 毫秒
  49.             令 i = 1
  50.         条件结束
  51.     循环结束
  52.     令 w1 = Window.Find(0,"大话西游 II ($Revision: 214866 $)")
  53.     延时 50 毫秒
  54.     调用 Window.Active(w1)
  55.     延时 50 毫秒
  56.     调用 Window.Move(w1,1,1)
  57.     延时 YanShi 毫秒
  58.     标记 b1(子程序 运行1)
  59.     如果点 (8,34) 的颜色等于 "2961A5" 则
  60.         延时 YanShi 毫秒
  61.         (鼠标)移动到 (579, 123)
  62.         延时 YanShi 毫秒
  63.         (鼠标)左键单击, 1次
  64.         延时 YanShi 毫秒
  65.     否则
  66.         跳转到标记 b1(子程序 运行1)
  67.     条件结束
  68.     延时 YanShi 毫秒
  69.     标记 b2(子程序 运行1)
  70.     如果点 (52,47) 的颜色等于 "394129" 则
  71.         (鼠标)右键单击, 1次
  72.         延时 YanShi 毫秒
  73.     否则
  74.         跳转到标记 b2(子程序 运行1)
  75.     条件结束
  76.     延时 YanShi 毫秒
  77.     标记 b3(子程序 运行1)
  78.     如果点 (36,45) 的颜色等于 "314129" 则
  79.         延时 YanShi 毫秒
  80.         输入文本 a10
  81.         延时 YanShi 毫秒
  82.     否则
  83.         跳转到标记 b3(子程序 运行1)
  84.     条件结束
  85.     延时 YanShi 毫秒
  86.     如果点 (384,390) 的颜色等于 "31CBFF" 则
  87.         延时 YanShi 毫秒
  88.         (鼠标)移动到 (414, 374)
  89.         延时 YanShi 毫秒
  90.         (鼠标)左键单击, 1次
  91.         延时 YanShi 毫秒
  92.         调用 创建1()
  93.     否则
  94.     条件结束
  95.     延时 500 毫秒
  96.     调用 关闭()
  97.     延时 YanShi 毫秒
  98.     跳转到标记 开始1(子程序 运行1)
  99. 子程序结束
  100. 子程序 运行2()