//模似一个挂机打怪的程序 来练习 标记 子程序 退出脚本 重启脚本 停止脚本
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
版权声明
本文仅代表作者观点，不代表百度立场。
本文系作者授权百度百家发表，未经许可，不得转载。
