//1红 2蓝 3攻击 456攻击技能 780辅助技能(或卷轴) 9治愈 -回城卷 =捡东西 dim hp,mp dim n,m dim XuanZhuanZhaoGuai,XueShaoXiuXi,WuGuaiXiuXi dim WuHongHuiCheng,WuLanHuiCheng dim Time1,Time2 dim a,b,i,h dim jn(5) dim t1,t2,t3,t4,t5,t6 dim l,B,Y UserVar hp=35 hp<%多少时,补红 UserVar mp=20 mp<%多少时,补蓝 UserVar jn(0)=5 技能1的冷却时间(秒) UserVar jn(1)=7 技能2的冷却时间(秒) UserVar jn(2)=5 技能3的冷却时间(秒) UserVar jn(3)=50 辅助技能(或卷轴)1的持续时间(分) UserVar jn(4)=55 辅助技能(或卷轴)2的持续时间(分) UserVar jn(5)=60 辅助技能(或卷轴)3的持续时间(分) UserVar l=3 解咒卷轴携带数量 UserVar XuanZhuanZhaoGuai=1 1开启旋转找怪 0关闭旋转找怪 UserVar XueShaoXiuXi=0 1开启血少休息 0关闭血少休息 UserVar WuGuaiXiuXi=0 1开启无怪休息 0关闭无怪休息 UserVar WuHongHuiCheng=1 1开启无红回城 0关闭无红回城 UserVar WuLanHuiCheng=0 1开启无蓝回城 0关闭无蓝回城 n=0:m=0 Time1=0:Time2=0 a="50":b="51":i=3:h=0 t1=now:t2=now:t3=now:t4=now:t5=now:t6=now B=0:Y=0 //开始 Rem s KeyPress 187,3 Gosub 选怪 Gosub 防PK Gosub 旋转找怪 Gosub 攻击 Gosub 辅助技能 Gosub 补红 Gosub 补蓝 Gosub 解咒 Gosub 技能补红 Gosub 血少休息 Gosub 无怪休息 Gosub 无红回城 Gosub 无蓝回城 Delay 32 Goto s EndScript Sub 选怪 VBSCall FindColorEx(498,28,500,30,"fffbef",1,0.8,x,y) If x<0 and y<0 KeyPress 9,1 KeyPress 187,3 EndIf Return Sub 防PK VBSCall FindColorEx(524,17,544,19,"ffffff",1,0.8,x,y) If x>0 and y>0 KeyPress 9,1 EndIf Return Sub 旋转找怪 If XuanZhuanZhaoGuai=1 Delay 125 h=h+1 If h>=2 MoveTo (a),125 RightDown 1 Delay 32 a=a+i MoveTo (b),125 Delay 32 b=b+i RightUp 1 h=0 Gosub 初始化变量 Delay 125 EndIf EndIf Return Sub 初始化变量 If a>=150 a="50" EndIf If b>=151 b="51" Delay 32 EndIf Return Sub 攻击 VBSCall FindColorEx(498,28,500,30,"fffbef",1,0.8,x,y) If x>=0 and y>=0 n=0 KeyPress 51,1 Gosub 技能 EndIf EndIf Return Sub 技能 If DateDiff("s",t1,now)>=jn(0)