[General]
Description=间隔时间自动使用辅助技能脚本
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=0
[Repeat]
Type=0
Number=1
[CallBack]
OnSetup=
[Comment]
Content=【请在这里下拉选择】.
【功能说明】.
此脚本可应用于各种网络游戏  用于间隔时间自动使用辅助技能  可自定义三个自动辅助技能和间隔时间.
.
【使用说明】.
1。可定义辅助技能热键：数字0～9,字母A～Z,F1～F12  设置技能时字母可不分大小写.
2。如果辅助技能是F1～F12，比如技能是F12  自定义变量的输入格式：f12或F12
3。输入间隔时间单位为＂秒＂　比如间隔180秒  自定义变量的输入格式：180
4。如果在设置自定义变量中输入的数据错误　脚本将提示并停止运行.
.
【作者介绍】.
【按键专家团 晨风】.
.
【制作日期】.
<2006-09-15>


[Script]
//---------------------------------------------　[声明和定义变量]
VBS dim jn(2),sj(2),k(2),s(2)
VBS dim i,m,n,r,t1,t2,t3
VBS i=0:m=0:n=0:r=0
VBS t1=now:t2=now:t3=now
//---------------------------------------------　[用户自定义变量]
UserVar jn(0)=A 技能１的键码
Gosub [判断按键]
UserVar jn(1)=2 技能２的键码
Gosub [判断按键]
UserVar jn(2)=F3 技能３的键码
Gosub [判断按键]
UserVar sj(0)=10 技能１间隔时间(秒)
Gosub [判断时间]
UserVar sj(1)=60 技能２间隔时间(秒)
Gosub [判断时间]
UserVar sj(2)=180 技能３间隔时间(秒)
Gosub [判断时间]
//---------------------------------------------　[脚本主程序]
Rem [脚本开始运行]
Delay 10
If DateDiff("s",t1,now)>=s(0)
    //< DateDiff 函数：返回两个日期之间的时间间隔>
    //<"s"：秒> <t1：时间变量> <now：当前系统日期和时间> <s(0)：自定义时间变量> 
    Delay 10
    KeyPress k(0) 1
    //按键 变量k(0) 1次
    VBS t1=now
    //重新定义时间变量
EndIf 
If DateDiff("s",t2,now)>=s(1)
    Delay 10
    KeyPress k(1) 1
    VBS t2=now
EndIf 
If DateDiff("s",t3,now)>=s(2)
    Delay 10
    KeyPress k(2) 1
    VBS t3=now
EndIf 
Goto [脚本开始运行]
//---------------------------------------------　[判断子程序]
Sub [判断按键]
    VBS L=Len(jn(i))
    //< Len 函数：返回字符串内字符的数量>
    If L=1
        VBS k(n)=Asc(UCase(jn(i)))
        //< Asc 函数：返回字符串首字母的ASCII字符代码> < UCase 函数：返回转换为大写字母的字符>
        If k(n)>57 and k(n)<65 or k(n)<48 or k(n)>90
            Goto [脚本结束]
        EndIf 
    ElseIf L>1 and L<4
        If UCase(Left(jn(i),1))="F"
            //判断字符串首字字符  < Left 函数：返回字符串最左边的指定数量的字符>
            VBS k(n)=Asc(UCase(Left(jn(i),1)))+Right(jn(i),L-1)+41
            //< Right 函数：返回字符串最右边的指定数量的字符>
            If k(n)<112 or k(n)>123
                Goto [脚本结束]
            EndIf 
        Else 
            Goto [脚本结束]
        EndIf 
    Else 
        Goto [脚本结束]
    EndIf 
    VBS i=i+1:n=n+1
    //变量递增
Return [判断按键]
Sub [判断时间]
    If IsNumeric(sj(m))=True
        //< IsNumeric 函数：返回 Boolean 值指明表达式的值是否为数字>
        VBS s(r)=CInt(sj(m))
        //< CInt 函数：返回已被转换为整形子类型的变体的表达式>
    Else 
        Goto [脚本结束]
    EndIf 
    VBS m=m+1:r=r+1
Return [判断时间]
//---------------------------------------------　[自定义变量出错结束]
Rem [脚本结束]
MessageBox 自定义变量错误  脚本停止运行
EndScript
