标记 退出脚本停止脚本重启脚本关于多线程

//模似一个挂机打怪的程序 来练习 标记 子程序 退出脚本 重启脚本 停止脚本
Call 整个程序()
BeginThread 脚本开关()
If 时间 > 0 Then 
    
End If
 
Sub 整个程序

Rem 走路
If 时间>6 Then 
    ExitScript //如果用了6小时就结束脚本
End If
i=1
Do
    TracePrint "正在走路"
    i=i+1
    TracePrint "正在走路"
    i=i+1
    TracePrint "正在走路"
    i=i+1
    If i > 2 Then 
        Call 打怪()
    End if
Loop
End sub
Sub 打怪()
    For 2
        TracePrint "正在打怪"
    Next
    TracePrint "怪物以死"
    If 打怪个数 = 10 Then  //程序打死怪个数退出1号脚本 
        时间 = 时间 + 1
        TracePrint "已经用时" & 计时器 & "小时打死" & 打怪个数 & "小怪"
        计时器=时间
        计时器 = 计时器 + 1
        EndScript 
    End If
    打怪个数=打怪个数+1
    Call 整个程序()
End Sub
Sub 脚本开关()
    Do
    s=WaitKey
    If s = 32 Then 
    RestartScript    
    End If
   
        
           
            
        
        Delay 200
    Loop
End Sub