1. [Script]()
  2. 注释:传入变量youxi
  3. 令 youxi = WindowEx.EnumWindowA(0,0,"《星尘传说》",65536)
  4. 令 i = UBound(youxi)
  5. 注释:设置环境变量key为1
  6. SetEnvironmentVar("Key0","1")
  7. SetEnvironmentVar("Key1","1")
  8. SetEnvironmentVar("Key2","1")
  9. 注释:......上面3条分线程3个环境变量,如果要开跟多可以加//SetEnvironmentVar "Key3","1"等等
  10. 注释:a为数组下标.c为技能使用延时时间
  11. 令 a = 0
  12. 令 cd = 2000 / (i + 1)
  13. 注释:位置可以改变
  14. 循环 i + 1 次
  15.     注释:设置窗口位置
  16.     调用 WindowEx.MoveWindow(youxi(a),876,717)
  17.     令 a = a + 1
  18.     延时 200 毫秒
  19. 循环结束
  20. 注释:---------设置坐标怪HP条最左颜色-----
  21. 令 x = 418
  22. 令 y = 78
  23. 调用 窗口坐标转屏幕坐标()
  24. 令 MLx = x
  25. 令 MLy = y
  26. 注释:怪HP随意一点颜色2点判断
  27. 令 x = 515
  28. 令 y = 105
  29. 调用 窗口坐标转屏幕坐标()
  30. 令 LVx = x
  31. 令 LVy = y
  32. 注释:HP补充位置
  33. 令 x = 1004
  34. 令 y = 796
  35. 调用 窗口坐标转屏幕坐标()
  36. 令 HPx = x
  37. 令 HPy = y
  38. 注释:MP补充位置
  39. 令 x = 994
  40. 令 y = 829
  41. 调用 窗口坐标转屏幕坐标()
  42. 令 MPx = x
  43. 令 MPy = y
  44. 注释:循环内设置坐标颜色
  45. 延时 200 毫秒
  46. 注释:----------------------------主程序----------------------------
  47. 循环当 1 时
  48.     如果 a > i 则
  49.         令 a = 0
  50.     条件结束
  51.     向调试窗口输出:youxi(a)
  52.     注释:窗口是否激活
  53.     调用 是否激活()
  54.     延时 100 毫秒
  55.     注释:获取分线程局部变量值
  56.     循环当 1 时
  57.         注释:分线程状态正在执行,则跳这轮循环
  58.         令 Key0 = GetEnvironmentVar("Key0")
  59.         令 Key1 = GetEnvironmentVar("Key1")
  60.         令 Key2 = GetEnvironmentVar("Key2")
  61.         注释:.....可加,同环境变量
  62.         如果 Key0 = 0 则
  63.             跳转到标记 QMScript_1
  64.         条件结束
  65.         如果 Key1 = 0 则
  66.             跳转到标记 QMScript_1
  67.         条件结束
  68.         如果 Key2 = 0 则
  69.             跳转到标记 QMScript_1
  70.         条件结束
  71.         注释:.....可加,同环境变量
  72.         注释:坐标颜色这里设置
  73.         如果点 (MLx,MLy) 的颜色约等于 "37d861" 则
  74.             如果点 (LVx,LVy) 的颜色等于 "0" 则
  75.                 (键盘)按 2 键, 1次
  76.             条件结束
  77.         否则
  78.             如果点 (HPx,HPy) 的颜色等于 "63f09e" 则
  79.                 如果点 (MPx,MPy) 的颜色等于 "e6ab67" 则
  80.                     (键盘)按 Space 键, 1次
  81.                     延时 100 毫秒
  82.                     (键盘)按 Tab 键, 1次
  83.                     延时 100 毫秒
  84.                     (键盘)按 2 键, 1次
  85.                 条件结束
  86.             否则
  87.                 (语句无法识别,可能有错误): BeginThread "Thread"&a
  88.             条件结束
  89.         条件结束
  90.         标记 QMScript_1
  91.         延时 cd 毫秒
  92.         令 a = a + 1
  93.     循环结束
  94.     注释:---------------------------子程序--------------------
  95.     子程序 是否激活()
  96.         注释:判断窗口是否激活
  97.         令 F = WindowEx.GetWindowState(youxi(a),1)
  98.         向调试窗口输出:F
  99.         循环当 F 时
  100.             跳转到标记 QMScript_1(子程序 是否激活)