- 条件结束
- 如果表达式 (i=1) 为真,则
- 调用插件命令 BGKM5.LClick(hwnd,435-main_win_left,170-main_win_top)
- 条件结束
- 如果表达式 (i=2) 为真,则
- 调用插件命令 BGKM5.LClick(hwnd,464-main_win_left,180-main_win_top)
- 条件结束
- 如果表达式 (i=3) 为真,则
- 调用插件命令 BGKM5.LClick(hwnd,495-main_win_left,170-main_win_top)
- 条件结束
- 延时500毫秒
- //是否滚动地图, 如果4次切换都找不到,则下次进入滚动地图,每个地图滚动过后不再滚动
- //上 878 213 下 878 480
- 如果表达式 (rollmap=1 and j mod 8 >4) 为真,则
- 如果表达式 (i=0 or i=3) 为真,则
- 循环 5 遍
- //Delay mindly
- 调用插件命令 BGKM5.LClick(hwnd,878-main_win_left,213-main_win_top)
- 循环结束
- 条件结束
- 如果表达式 (i=1 or i=2) 为真,则
- 循环 5 遍
- //Delay mindly
- 调用插件命令 BGKM5.LClick(hwnd,878-main_win_left,480-main_win_top)
- 循环结束
- 条件结束
- 延时mindly毫秒
- 条件结束
- 条件结束
- //除错:找不到任何怪超时自动点击狩猎,这里设置的将近2分钟
- 如果表达式 (j>=outtimes) 为真,则
- 调用插件命令 BGKM5.MMove(hwnd,650-main_win_left,78-main_win_top)
- 延时500毫秒
- 调用插件命令 BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
- 调用插件命令 BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
- //Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
- 延时maxdly毫秒
- 条件结束
- //找怪
- 调用插件命令 bcxy=Bkgnd.FindColor(hwnd,left-main_win_left,top-main_win_top,right-main_win_left,bottom-main_win_top,c)
- monsterxy=split(bcxy,"|",-1,1)
- x=monsterxy(0)*1
- y=monsterxy(1)*1
- 如果表达式 (bcxy<>"-1|-1") 为真,则
- //与游戏兼容性团队打怪标记
- 如果表达式 (term<>2) 为真,则
- 调用插件命令 bcxy=Bkgnd.FindColor(hwnd,x-20,y-80,x+20,y,c1)
- termxy=split(bcxy,"|",-1,1)
- x1=termxy(0)*1
- y1=termxy(1)*1
- 如果表达式 (bcxy<>"-1|-1") 为真,则
- //避免打别人正在打的怪
- 如果表达式 (term=0 and j<maxerr-125) 为真,则
- 延时mindly毫秒
- 跳转到标记 rr
- 条件结束
- 否则
- //组队情况下,如果怪没有人打则不去打,高级怪哦!
- 如果表达式 (term=1 and j<maxerr-125) 为真,则
- 延时mindly毫秒
- 跳转到标记 rr
- 条件结束
- 条件结束
- 条件结束
- //与游戏兼容性是否有需要避开的怪存在,小心被那些JY怪给阉了!
- 调用插件命令 bcxy=Bkgnd.FindColor(hwnd,x-50,y-50,x+50,y+50,dagc)
- dagxy=split(bcxy,"|",-1,1)
- x1=dagxy(0)*1
- y1=dagxy(1)*1
- 如果表达式 (bcxy<>"-1|-1" and dagc<>"") 为真,则
- 延时mindly毫秒
- 跳转到标记 rr
- 条件结束
- 调用插件命令 BGKM5.Lclick(hwnd,x+15,y-25)
- //Plugin BGKM5.Lclick(hwnd,x+15,y-25)
- 调用插件命令 BGKM5.Lclick(hwnd,284-main_win_left,178-main_win_top)
- 延时100毫秒
- j=0:x=-1:y=-1
- 延时maxdly毫秒
- 条件结束
- //与游戏兼容性是否战斗状态
- 调用插件命令 bcxy=Bkgnd.FindColor(hwnd,300-main_win_left,360-main_win_top,320-main_win_left,380-main_win_top,"FCFCFC")
- btlxy=split(bcxy,"|",-1,1)
- btlx=btlxy(0)*1
- btly=btlxy(1)*1
- 如果表达式 (btlx>=0 and btly>=0) 为真,则
- gameinfotext="[" & time & "]开始打怪:" & toltimes & vbcrlf & gameinfotext
- 调用子程序 renewDrgGameInf2
- 如果表达式 (1) 为真,则循环执行
- //判断画面是否出现战斗提示,是则按照攻击顺序表攻击
- 调用插件命令 bcxy=Bkgnd.FindColor(hwnd,300-main_win_left,360-main_win_top,320-main_win_left,380-main_win_top,"FCFCFC")
- 延时100毫秒
- 如果表达式 (bcxy<>"-1|-1") 为真,则
- 如果表达式 (rndatk=1) 为真,则
- //这段用来自动探索组合招式
- rndid=int(rnd*3)
- 调用插件命令 BGKM5.Lclick(hwnd,atkdirx(rndid)-main_win_left,atkdiry(rndid)-main_win_top)
- 调用插件命令 BGKM5.Lclick(hwnd,atkdirx(rndid)-main_win_left,atkdiry(rndid)-main_win_top)
- 否则
- //按照剑谱出招呵呵!