1. Dim hwnd,zijiu,zi,sha,hpb
  2. 用户定义变量 ck=1
  3. 用户定义变量 hpx=176
  4. 用户定义变量 hpy=183
  5. 用户定义变量 mpx=140
  6. 用户定义变量 mpy=195
  7. 用户定义变量 hpkey=55
  8. 用户定义变量 mpkey=56
  9. 用户定义变量 skill1=50
  10. 用户定义变量 skill2=51
  11. 用户定义变量 skill3=52
  12. 用户定义变量 mapx=209
  13. 用户定义变量 mapy=311
  14. 用户定义变量 maprx=630
  15. 用户定义变量 mapry=610
  16. 用户定义变量 isx=308
  17. 用户定义变量 isy=328
  18. 用户定义变量 isrx=487
  19. 用户定义变量 isry=513
  20. 用户定义变量 leftx=114
  21. 用户定义变量 lefty=219
  22. 用户定义变量 leftrx=457
  23. 用户定义变量 leftry=679
  24. 用户定义变量 rightx=442
  25. 用户定义变量 righty=219
  26. 用户定义变量 rightrx=785
  27. 用户定义变量 rightry=675
  28. 用户定义变量 maxx=111
  29. 用户定义变量 maxy=215
  30. 用户定义变量 maxrx=783
  31. 用户定义变量 maxry=675
  32. 用户定义变量 mx=62
  33. 用户定义变量 my=281
  34. zijiu=0
  35. zi=1
  36. sha=0
  37. //Plugin hwnd=Window.Find("IEFrame",0)
  38. //下面这句是得到鼠标指向的窗口句柄
  39. 调用插件命令 hwnd = Window.MousePoint()
  40. //下面这句是得到当前最前面的窗口句柄
  41. //下面这句是移动窗口到(100, 100)位置
  42. //Plugin Bkgnd.LeftClick(句柄,横坐标,纵坐标) //模拟鼠标左键点击
  43. //Plugin Bkgnd.RightClick(句柄,横坐标,纵坐标) //模拟鼠标右键点击
  44. 调用插件命令 s = Window.GetClientRect(hwnd)
  45. hpb=hpx-3
  46. 标记 开始
  47. //千位
  48. 标记 补红
  49. 如果 (hpx,hpy) 的颜色大约等于 #181C42 则
  50.     调用插件命令 Bkgnd.KeyPress(hwnd,hpkey)
  51.     延时1000毫秒
  52. 条件结束
  53. //百位
  54. 标记 补红
  55. 如果 (hpb,hpy) 的颜色大约等于 #181842 则
  56.     调用插件命令 Bkgnd.KeyPress(hwnd,hpkey)
  57.     延时1000毫秒
  58. 条件结束
  59. 标记 补蓝
  60. 如果 (mpx,mpy) 的颜色大约等于 #21204A 则
  61.     调用插件命令 Bkgnd.KeyPress(hwnd,mpkey)
  62.     延时1000毫秒
  63. 条件结束
  64. 标记 找怪
  65. //下面这句按(从中间到四周的顺序找色)模糊查找窗口句柄(变量:hwnd)窗口的指定矩形区域内指定颜色
  66. //下面这句按(从中间到四周的顺序找色)模糊查找窗口句柄(变量:hwnd)窗口的指定矩形区域内指定颜色
  67. 调用插件命令 XY = Bkgnd.FindColorEx(hwnd,isx,isy,isrx,isry,"52FF84",0, ck)
  68. //下面这句用于分割字符串
  69. MyArray = Split(XY, "|")
  70. //下面这句将字符串转换成数值
  71. X = CInt(MyArray(0)): Y = CInt(MyArray(1))
  72. 如果表达式 (X>-1 and Y>-1) 为真,则
  73.     X=X+20
  74.     Y=Y-30
  75.     调用插件命令 Bkgnd.LeftClick(hwnd, X, Y)
  76.     延时2000毫秒
  77.     如果 (mx,my) 的颜色大约等于 #0004D6 则
  78.         延时1000毫秒
  79.         标记 捡取
  80.         如果表达式 (zijiu<zi) 为真,则
  81.             调用插件命令 Bkgnd.KeyPress(hwnd,skill1)
  82.             调用插件命令 Bkgnd.KeyPress(hwnd,skill2)
  83.             调用插件命令 Bkgnd.KeyPress(hwnd,skill3)
  84.             //Delay 1000
  85.             zijiu=zijiu+1
  86.             sha=sha+1
  87.             调用插件命令 Msg.ShowScrTXT(6, 118, 122, 145, "杀怪数"&sha, "0000FF")
  88.         条件结束
  89.         如果 (mx,my) 的颜色大约等于 #21204A 则
  90.             调用插件命令 Bkgnd.KeyPress(hwnd,32)
  91.             调用插件命令 Bkgnd.KeyPress(hwnd,32)
  92.             zijiu=0
  93.             跳转到标记 开始
  94.         否则
  95.             延时1000毫秒
  96.             如果表达式 (zijiu>=zi) 为真,则
  97.                 zijiu=0
  98.                 跳转到标记 开始
  99.             条件结束
  100.             跳转到标记 捡取