1.         调用子程序 补红蓝
  2.         调用插件命令 Bkgnd.KeyPress(Hwnd, 82)
  3.         延时ys毫秒
  4.         调用插件命令 Bkgnd.KeyPress(Hwnd, jineng)
  5.         延时ys毫秒
  6.         如果 (4+Ux,70+Uy) 的颜色大约等于 #072BA1 则
  7.         否则
  8.             跳转到标记 选怪
  9.         条件结束
  10.     条件结束
  11. 条件结束
  12. 调用插件命令 Bkgnd.KeyPress(Hwnd, jineng1)
  13. 延时ys毫秒
  14. 标记 检查组对
  15. 调用外部VBScript子程序 MessageBox("*/. . . * ."&vbcr&" .\* . [] * __"&vbcr&" */ . ./\~~~~~~~~~~~~'\. |◆"&vbcr&" \* ,/,..,\,...........,\.◆"&vbcr&" || ..▎# ▎田 田 ▎ | ▎◆"&vbcr&" || &&▎ ▎ ▎'|'▎ o"&vbcr&" || ##■■■■■■■■■■〓"&vbcr&""&vbcr&""&vbcr&" 游戏没有运行,脚本停止"&vbcr&""&vbcr&"请重新运行游戏,再启动脚本")
  16. 如果表达式 (KX+Ux>0 and KY+Uy>0) 为真,则
  17.     调用子程序 组队
  18. 条件结束
  19. 标记 决斗
  20. 调用外部VBScript子程序 MessageBox("*/. . . * ."&vbcr&" .\* . [] * __"&vbcr&" */ . ./\~~~~~~~~~~~~'\. |◆"&vbcr&" \* ,/,..,\,...........,\.◆"&vbcr&" || ..▎# ▎田 田 ▎ | ▎◆"&vbcr&" || &&▎ ▎ ▎'|'▎ o"&vbcr&" || ##■■■■■■■■■■〓"&vbcr&""&vbcr&""&vbcr&" 游戏没有运行,脚本停止"&vbcr&""&vbcr&"请重新运行游戏,再启动脚本")
  21. 如果表达式 (abbX+Ux>0 and abbY+Uy>0) 为真,则
  22.     调用子程序 组队
  23. 条件结束
  24. 调用插件命令 Bkgnd.KeyPress(Hwnd, jineng2)
  25. 延时ys毫秒
  26. 如果 (4+Ux,70+Uy) 的颜色大约等于 #072BA1 则
  27. 否则
  28.     跳转到标记 选怪
  29. 条件结束
  30. 调用插件命令 Bkgnd.KeyPress(Hwnd, jineng3)
  31. 延时ys毫秒
  32. 调用插件命令 Bkgnd.KeyPress(Hwnd, jineng4)
  33. 延时ys毫秒
  34. 如果 (4+Ux,70+Uy) 的颜色大约等于 #072BA1 则
  35.     跳转到标记 技能
  36. 否则
  37.     跳转到标记 选怪
  38. 条件结束
  39. 跳转到标记 开始
  40. 子程序 补红蓝
  41.     如果 (hong/100*(167+Ux-4+Ux)+4+Ux,28+Uy) 的颜色大约等于 #0C0F0C 则
  42.         //下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：56)按键
  43.         调用插件命令 Bkgnd.KeyPress(Hwnd, chihong)
  44.         延时hongT毫秒
  45.     条件结束
  46.     如果 (lan/100*(167+Ux-4+Ux)+4+Ux,45+Uy) 的颜色大约等于 #1F1E1A 则
  47.         //下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：57)按键
  48.         调用插件命令 Bkgnd.KeyPress(Hwnd, chilan)
  49.         延时lanT毫秒
  50.     条件结束
  51. 子程序结束,回到调用处
  52. 子程序 辅助技能
  53.     如果表达式 (fuzu=0) 为真,则
  54.         跳转到标记 1
  55.     条件结束
  56.     调用插件命令 Bkgnd.KeyPress(Hwnd, fuzu)
  57.     延时2500毫秒
  58.     标记 1
  59.     如果表达式 (fuzu1=0) 为真,则
  60.         跳转到标记 2
  61.     条件结束
  62.     调用插件命令 Bkgnd.KeyPress(Hwnd, fuzu1)
  63.     延时2500毫秒
  64.     标记 2
  65.     如果表达式 (fuzu2=0) 为真,则
  66.         跳转到标记 3
  67.     条件结束
  68.     调用插件命令 Bkgnd.KeyPress(Hwnd, fuzu2)
  69.     延时2500毫秒
  70.     标记 3
  71.     如果表达式 (fuzu3=0) 为真,则
  72.         跳转到标记 4
  73.     条件结束
  74.     调用插件命令 Bkgnd.KeyPress(Hwnd, fuzu3
  75.     延时2500毫秒
  76.     如果表达式 (fuzu4=0) 为真,则
  77.     否则
  78.         标记 4
  79.         调用插件命令 Bkgnd.KeyPress(Hwnd, fuzu4)
  80.         延时200毫秒
  81.     条件结束
  82. 子程序结束,回到调用处
  83. 子程序 组队
  84.     如果表达式 (zd=1) 为真,则
  85.         调用插件命令 Bkgnd.LeftClick(Hwnd, 493+Ux, 420+Uy)
  86.         延时200毫秒
  87.         调用插件命令 Bkgnd.LeftClick(Hwnd, 109+Ux, 740+Uy)
  88.         调用插件命令 Bkgnd.SendString(Hwnd, "密传后台挂机脚本防传送,１１０,ＧＭ形象＝々闲→情 ‰＝制作，挂机中")
  89.         延时100毫秒
  90.         调用插件命令 Bkgnd.KeyPress(Hwnd, 13)
  91.     否则如果(zd=2)为真,则
  92.         调用插件命令 Bkgnd.LeftClick(Hwnd, 593+Ux, 421+Uy)
  93.         延时200毫秒
  94.         调用插件命令 Bkgnd.LeftClick(Hwnd, 109+Ux, 740+Uy)
  95.         调用插件命令 Bkgnd.SendString(Hwnd, "对不起，挂机中，不是我不想组,而是人不在,挂机中不能组")
  96.         延时100毫秒
  97.         调用插件命令 Bkgnd.KeyPress(Hwnd, 13)
  98.     条件结束
  99. 子程序结束,回到调用处
  100. 子程序 决斗