- Dim hwnd,zijiu,zi,sha,hpb
- 用户定义变量 ck=1
- 用户定义变量 hpx=176
- 用户定义变量 hpy=183
- 用户定义变量 mpx=140
- 用户定义变量 mpy=195
- 用户定义变量 hpkey=55
- 用户定义变量 mpkey=56
- 用户定义变量 skill1=50
- 用户定义变量 skill2=51
- 用户定义变量 skill3=52
- 用户定义变量 mapx=209
- 用户定义变量 mapy=311
- 用户定义变量 maprx=630
- 用户定义变量 mapry=610
- 用户定义变量 isx=308
- 用户定义变量 isy=328
- 用户定义变量 isrx=487
- 用户定义变量 isry=513
- 用户定义变量 leftx=114
- 用户定义变量 lefty=219
- 用户定义变量 leftrx=457
- 用户定义变量 leftry=679
- 用户定义变量 rightx=442
- 用户定义变量 righty=219
- 用户定义变量 rightrx=785
- 用户定义变量 rightry=675
- 用户定义变量 maxx=111
- 用户定义变量 maxy=215
- 用户定义变量 maxrx=783
- 用户定义变量 maxry=675
- 用户定义变量 mx=62
- 用户定义变量 my=281
- zijiu=0
- zi=1
- sha=0
- //Plugin hwnd=Window.Find("IEFrame",0)
- //下面这句是得到鼠标指向的窗口句柄
- 调用插件命令 hwnd = Window.MousePoint()
- //下面这句是得到当前最前面的窗口句柄
- //下面这句是移动窗口到(100, 100)位置
- //Plugin Bkgnd.LeftClick(句柄,横坐标,纵坐标) //模拟鼠标左键点击
- //Plugin Bkgnd.RightClick(句柄,横坐标,纵坐标) //模拟鼠标右键点击
- 调用插件命令 s = Window.GetClientRect(hwnd)
- hpb=hpx-3
- 标记 开始
- //千位
- 标记 补红
- 如果 (hpx,hpy) 的颜色大约等于 #181C42 则
- 调用插件命令 Bkgnd.KeyPress(hwnd,hpkey)
- 延时1000毫秒
- 条件结束
- //百位
- 标记 补红
- 如果 (hpb,hpy) 的颜色大约等于 #181842 则
- 调用插件命令 Bkgnd.KeyPress(hwnd,hpkey)
- 延时1000毫秒
- 条件结束
- 标记 补蓝
- 如果 (mpx,mpy) 的颜色大约等于 #21204A 则
- 调用插件命令 Bkgnd.KeyPress(hwnd,mpkey)
- 延时1000毫秒
- 条件结束
- 标记 找怪
- //下面这句按(从中间到四周的顺序找色)模糊查找窗口句柄(变量:hwnd)窗口的指定矩形区域内指定颜色
- //下面这句按(从中间到四周的顺序找色)模糊查找窗口句柄(变量:hwnd)窗口的指定矩形区域内指定颜色
- 调用插件命令 XY = Bkgnd.FindColorEx(hwnd,isx,isy,isrx,isry,"52FF84",0, ck)
- //下面这句用于分割字符串
- MyArray = Split(XY, "|")
- //下面这句将字符串转换成数值
- X = CInt(MyArray(0)): Y = CInt(MyArray(1))
- 如果表达式 (X>-1 and Y>-1) 为真,则
- X=X+20
- Y=Y-30
- 调用插件命令 Bkgnd.LeftClick(hwnd, X, Y)
- 延时2000毫秒
- 如果 (mx,my) 的颜色大约等于 #0004D6 则
- 延时1000毫秒
- 标记 捡取
- 如果表达式 (zijiu<zi) 为真,则
- 调用插件命令 Bkgnd.KeyPress(hwnd,skill1)
- 调用插件命令 Bkgnd.KeyPress(hwnd,skill2)
- 调用插件命令 Bkgnd.KeyPress(hwnd,skill3)
- //Delay 1000
- zijiu=zijiu+1
- sha=sha+1
- 调用插件命令 Msg.ShowScrTXT(6, 118, 122, 145, "杀怪数"&sha, "0000FF")
- 条件结束
- 如果 (mx,my) 的颜色大约等于 #21204A 则
- 调用插件命令 Bkgnd.KeyPress(hwnd,32)
- 调用插件命令 Bkgnd.KeyPress(hwnd,32)
- zijiu=0
- 跳转到标记 开始
- 否则
- 延时1000毫秒
- 如果表达式 (zijiu>=zi) 为真,则
- zijiu=0
- 跳转到标记 开始
- 条件结束
- 跳转到标记 捡取