//3.2版本
//作者:gosoyoung
//QQ:18093219
VBS dim hong,lan,g1,g2,g3,sj,lo,ci
VBS dim t1,t2,t3,q,e,r,kk
t1=now:t2=now:t3=now
//==================设置==================
UserVar hong=60 按%血量吃红
UserVar lan=50 按%MP量吃蓝(0表示不使用自动加蓝功能)
UserVar g1=1 是否攻击黄怪(是=1,否=0)
UserVar g2=1 是否攻击浅红怪(是=1,否=0)
UserVar g3=1 是否攻击浅黄怪(是=1,否=0)
UserVar r=100 第8键辅助技能的间隔时间(秒),写0表示不使用
UserVar e=100 第9键辅助技能的间隔时间(秒),写0表示不使用
UserVar q=90 第0键辅助技能(的间隔时间(秒),写0表示不使用
UserVar ci=100 循环次内没击倒怪就放弃,随即跑动,重新找怪
sj=0
ax=hong*1.8+64
mx=lan*1.8+61
//=====================================================
//=====================================================
Delay 500
//==================开始==================
Rem 开始
//检查下是否有对话框存在
IfColor 418,697,d4d6d6,0
    KeyPressH 13,1
Else 
EndIf 
//----------------------------------------
//检查下是否要加辅助技能
If r>0
    If datediff("s",t1,now)>=r
        Delay 100
        KeyPressH 56,1
        t1=now
        Goto 寻怪
    EndIf 
EndIf 
If e>0
    If datediff("s",t2,now)>=e
        Delay 100
        KeyPressH 57,1
        t2=now
        Goto 寻怪
    EndIf 
EndIf 
If q>0
    If datediff("s",t3,now)>=q
        Delay 100
        KeyPressH 48,1
        t3=now
        Goto 寻怪
    EndIf 
EndIf 
//----------------------------------------
//开始寻找怪物
Rem 寻怪
If sj=>1
    Gosub 随机移动
EndIf 
//搜索黄怪
If g1=>1
    Gosub 找怪1
EndIf 
//搜索浅红怪
If g2=>1
    Gosub 找怪2
EndIf 
//搜索浅黄怪
If g3=>1
    Gosub 找怪3
EndIf 
Gosub 补血
sj=1
Goto 开始
//----------------------------------------
//=================确认怪=================
Rem 自动打怪
//点到怪就用物理攻击
dx=x
dy=y+30
MoveTo dx+Int((80*Rnd)-40) dy+Int((30*Rnd)-15)
RightClick 2
MoveTo dx+Int((80*Rnd)-40) dy+Int((30*Rnd)-15)
RightClick 2
MoveTo dx+Int((80*Rnd)-40) dy+Int((30*Rnd)-15)
RightClick 2
MoveTo dx+Int((80*Rnd)-40) dy+Int((30*Rnd)-15)
RightClick 2
Rem 技能
Gosub 对话消除
Delay 100
Gosub 补血蓝
IfColor 374,20,a95f8,2
    lo=lo+1
    If lo=>ci
        Delay 100
        KeyPressH 27,1
        Delay 200