//<"s":秒> <t1:时间变量> <now:当前系统日期和时间> <s(0):自定义时间变量>
KeyPressH 50 1
//按键2
Delay 100
t(1)=now
//重新定义时间变量
EndIf
If DateDiff("s",t(2),now)>=s(1)
KeyPressH 51 1
//按键3
Delay 100
t(2)=now
EndIf
If DateDiff("s",t(3),now)>=s(2)
KeyPressH 112,1
//按键 F1
Delay 100
t(3)=now
EndIf
If DateDiff("s",t(4),now)>=s(3)
KeyPressH 113 1
//按键F2
Delay 100
t(4)=now
EndIf
If DateDiff("s",t(5),now)>=s(4)
KeyPressH 114 1
//按键F3
Delay 100
t(5)=now
EndIf
Return 时间技能
//*******************************************************
// 复活并回到挂机点
//*******************************************************
Sub 复活
Delay 10
t(10)=now
//初始化
VBSCall FindPic(0,0,1023,767,"死亡回城.BMP",0.8,x2,y2)
If x2>0 and y2>0
//检测死亡回城键
Delay 1000
MoveTo x2+45,y2+9
Delay 1000
LeftDoubleClick 1
Delay 5000
i=i+1
//复活次数累加
If i>=FH
Goto 脚本结束
EndIf
//------------------------
Gosub 挂机点
//跑回挂机点
EndIf
Return 复活
Sub 挂机点
Delay 10
//-------------------
Gosub 死亡检测
//------------------
VBSCall FindPic(x-32,y-29,x+167,y+189,"Attachment:\标记位置.BMP",0.9,x6,y6)
If x6>0 and y6>0
Delay 10
MoveTo x6+4,y6+4
Delay 500
LeftClick 1
//打开标记位置
Delay 500
VBSCall FindPic(0,0,1023,767,"Attachment:\目标地点.BMP",0.8,x3,y3)
If x3>0 and y3>0
//挂机点检测
MoveTo x3+28,y3-73
Delay 500
LeftClick 1
Delay 800
IfColor x3+28,y3-73,B49881,2
//判断有没有设置挂机点,如有则回到挂机点
Rem 跑路时间
MoveTo x3+28,y3-73
Delay 500
RightClick 2
Delay 500
IfColor 50/100*((x-616)-(x-733))+(x-733),y+11,color(0),2
//在跑回挂机点的过程中判断是否要加血
Delay 10
Else
KeyPressH 53,1
//补红小红
Delay 200
IfColor 30/100*((x-616)-(x-733))+(x-733),y+11,color(0),2
//血少于30%检测
Delay 10
Else
KeyPressH 118,1
//加大红保护
Delay 200
EndIf
EndIf