//    技能时间判断

//******************************************************

Sub [判断时间]

    Delay 10

    If IsNumeric(sj(m))=True

        //< IsNumeric 函数：返回 Boolean 值指明表达式的值是否为数字>

        VBS s(r)=CInt(sj(m))

        //< CInt 函数：返回已被转换为整形子类型的变体的表达式>

    Else 

        Goto 时间

    EndIf 

    VBS m=m+1:r=r+1

    Rem 时间

Return [判断时间]

//*******************************************

//   放时间技能

//********************************************

Sub 时间技能

    Delay 10

    If DateDiff("s",t1,now)>=s(0)

        //< DateDiff 函数：返回两个日期之间的时间间隔>

        //<"s"：秒> <t1：时间变量> <now：当前系统日期和时间> <s(0)：自定义时间变量>

        KeyPressH 50 1

        //按键2

        Delay 100

        VBS t1=now

        //重新定义时间变量

    EndIf 

    If DateDiff("s",t2,now)>=s(1)

        KeyPressH 51 1

        //按键3

        Delay 100

        VBS t2=now

    EndIf 

    If DateDiff("s",t3,now)>=s(2)

        KeyPressH 52,1

        //按键 F1

        Delay 100

        VBS t3=now

    EndIf 

    If DateDiff("s",t4,now)>=s(3)

        KeyPressH 53 1

        //按键F2

        Delay 100

        VBS t4=now

    EndIf 

    If DateDiff("s",t5,now)>=s(4)

        KeyPressH 54 1

        //按键F3

        Delay 100