t
While 1
    UserVar Ys=20 设置喊话延时(单位:秒)
    Gosub 喊话1
    Delay 10
EndWhile 
EndScript 
Sub 喊话1
    UserVar say1=0 设置喊话内容1
    If say1<>0
        Delay 10
        KeyPressS 13,1
        Delay 100
        SayString say1
        Delay 200
        KeyPressS 13,1
        Delay Ys*1000
        Gosub 喊话2
    Else 
        Gosub 喊话2
    EndIf 
Return 
Sub 喊话2
    UserVar say2=0 设置喊话内容2
    If say2<>0
        Delay 10
        KeyPressS 13,1
        Delay 100
        SayString say2
        Delay 200
        KeyPressS 13,1
        Delay Ys*1000
        Gosub 喊话3
    Else 
        Gosub 喊话3
    EndIf 
Return 
Sub 喊话3
    UserVar say3=0 设置喊话内容3
    If say3<>0
        Delay 10
        KeyPressS 13,1
        Delay 100
        SayString say3
        Delay 200
        KeyPressS 13,1
        Delay Ys*1000
        Gosub 喊话4
    Else 
        Gosub 喊话4
    EndIf 
Return 
Sub 喊话4
    UserVar say4=0 设置喊话内容4
    If say4<>0
        Delay 10
        KeyPressS 13,1
        Delay 100
        SayString say4
        Delay 200
        KeyPressS 13,1
        Delay Ys*1000
        Gosub 喊话5
    Else 
        Gosub 喊话5
    EndIf 
Return 
Sub 喊话5
    UserVar say5=0 设置喊话内容5
    If say5<>0
        Delay 10
        KeyPressS 13,1
        Delay 100
        SayString say5
        Delay 200
        KeyPressS 13,1
        Delay Ys*1000
        Goto Start
    Else 
        Goto Start
    EndIf 
Return