监视状态的程序示例

特权任务等监视任务状态或COBOTTA状态的程序中应考虑监视的频率和CPU的负载。

请在通常负载较轻的监视中使用Wait语句。

通常监视

Sub SurveillanceErr
  Do
    Wait CurErr
    ' 错误发生时的处理
  Loop
End Sub

Sub SurveillanceErr
  Do
    If CurErr Then
    	Set io[128]
    End If
  Loop
End Sub