1. 用户定义变量 ZH=0 "输入帐号"
  2. 用户定义变量 MM=0 "输入密码"
  3. 用户定义变量 SJ=800 "时间间隔"
  4. 用户定义变量 JGMC=3 "几个魔宠"
  5. 用户定义变量 MMS=DropList{"不买随机":"0"|"随机":"8"}=0 "自动买随机"
  6. 用户定义变量 XPWZ=DropList{"选项1":"1"|"选项2":"2"|"选项3":"3"}=1 "XP位置"
  7. 延时 1500 毫秒
  8. 令 Hwnd = Window.Foreground()
  9. 调用 Window.Move(Hwnd,0,0)
  10. 标记 KS
  11. 调用 ZDDL()
  12. 调用 ZTJC()
  13. 调用 MSJ()
  14. 调用 CZ()
  15. 调用 XP()
  16. 循环 30 次
  17.     调用 ZG()
  18. 循环结束
  19. 调用 FH()
  20. 跳转到标记 KS
  21. 子程序 ZG()
  22.     延时 500 毫秒
  23.     从中心到四周查找颜色 "0303B8",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768)
  24.     如果 intX > 0 并且 intY > 75 并且 intX < 990 并且 intY < 590 则
  25.         如果 A < 2 则
  26.             (鼠标)移动到 (intX + 25, intY + 25)
  27.             (鼠标)左键单击, 1次
  28.             令 A = 2
  29.         否则如果 A > 1 则
  30.             (鼠标)移动到 (intX - 25, intY + 25)
  31.             (鼠标)左键单击, 1次
  32.             令 A = 1
  33.         条件结束
  34.         (键盘)按 "F2" 键, 1次
  35.         延时 250 毫秒
  36.         (键盘)按 "F2" 键, 1次
  37.         (键盘)按 "F1" 键, 1次
  38.         (鼠标)右键单击, 1次
  39.         令 DGLJ = DGLJ + 1
  40.         如果 DGLJ > 50 则
  41.             (键盘)按 "1" 键, 1次
  42.             令 DGLJ = 0
  43.         条件结束
  44.     否则
  45.         (键盘)按 "1" 键, 1次
  46.         令 DGLJ = 0
  47.     条件结束
  48. 子程序结束
  49. 子程序 MSJ()
  50.     如果点 (33,738) 的颜色约等于 "638631" 则
  51.     否则
  52.         (鼠标)移动到 (579, 679)
  53.         (鼠标)左键单击, 1次
  54.         延时 SJ 毫秒
  55.         延时 SJ + 200 毫秒
  56.         令 I = 0
  57.         循环当 i < 8 时
  58.             从中心到四周查找颜色 "638631",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768)
  59.             如果 intX > 0 并且 intY > 0 则
  60.                 (鼠标)移动到 (intX, intY)
  61.                 (鼠标)右键单击, 1次
  62.                 延时 SJ 毫秒
  63.                 (鼠标)移动到 (558, 585)
  64.                 (鼠标)左键单击, 1次
  65.                 延时 SJ 毫秒
  66.                 (鼠标)移动到 (428, 650)
  67.                 (鼠标)左键单击, 1次
  68.                 延时 SJ + 300 毫秒
  69.                 从中心到四周查找颜色 "638631",把找到的坐标保存到 (intX, intY),指定区域(左:641 上:491 右:996 下:629)
  70.                 如果 intX > 0 并且 intY > 0 则
  71.                     (鼠标)移动到 (intX, intY)
  72.                     (鼠标)左键单击, 1次
  73.                     延时 SJ 毫秒
  74.                     (鼠标)移动到 (32, 734)
  75.                     (鼠标)左键单击, 1次
  76.                     延时 SJ 毫秒
  77.                     令 i = 10
  78.                 条件结束
  79.             否则
  80.                 如果 MMS = 8 则
  81.                     (鼠标)移动到 (449, 506)
  82.                     (鼠标)左键单击, 1次
  83.                     延时 SJ 毫秒
  84.                 否则
  85.                     令 i = 10
  86.                 条件结束
  87.                 令 i = I + 1
  88.             条件结束
  89.         循环结束
  90.         (键盘)按 "Esc" 键, 1次
  91.     条件结束
  92. 子程序结束
  93. 子程序 ZDDL()
  94.     延时 SJ 毫秒
  95.     如果点 (377,349) 的颜色等于 "C0D8DE" 则
  96.         如果点 (371,361) 的颜色等于 "C4D3D6" 则
  97.             如果点 (364,361) 的颜色等于 "D1DCE4" 则
  98.                 (鼠标)移动到 (470, 354)
  99.                 (鼠标)左键单击, 1次
  100.                 延时 100 毫秒