[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ɶ帨ȼ09,ĸAZ,F1F12  üʱĸɲִСд.
2F1F12缼F12  Զʽf12F12
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
