Reagieren Auf Die Zustandsänderungen Der Leds Des Panel Control - Siemens SIMATIC A5E00083614-01 Benutzerhandbuch

Panel Control
Reagieren auf die Zustandsänderungen der LEDs des Panel Control
Tabelle C-5 zeigt ein Beispiel für ein Unterprogramm, das den Zustand der LED für
den Betriebszustand RUN liest und die Farbe der LED ermittelt sowie feststellt, ob
die LED ständig leuchtet oder blinkt. Die Konstanten, die für das Unterprogramm
deklariert sind, sind die Masken für die Werte der Eigenschaften der LED:
CpuBusf1, CpuBusf2, CpuExtF, CpuFrce, CpuIntF, CpuRun und CpuStop.
Tabelle C-5 Reagieren auf Zustandsänderungen der LEDs des Panel Control
Visual Basic Code
Private Sub S7Panel_UpdateState()
'Diese Konstanten sind die Masken für die LED-Eigenschaften:
Const LED_GREEN = &H2
Const LED_3SEC = &H100
Const LED_ON = &H200
Const LED_05HZ = &H300
Const LED_20HZ = &H400
'In diesem Beispiel sind RunLedColorTxt und RunLedStateTxt Textfelder:
'RunLedColorTxt zeigt eine Meldung über die Farbe der LED für den
'Betriebszustand RUN
'RunLedStateTxt zeigt eine Meldung über den Zustand (ständig ein oder blinkend)
'der LED für den Betriebszustand RUN
If S7Panel.CpuRun = 0 Then
RunLedColorTxt.Caption = "Farbe der LED für den Betriebszustand RUN ist grau"
RunLedStateTxt.Caption = "RunLED ist aus"
End If
If ((S7Panel.CpuRun And LED_GREEN) = LED_GREEN) Then
RunLedColorTxt.Caption = "Farbe der LED für den Betriebszustand RUN ist grün"
End If
If ((S7Panel.CpuRun And LED_ON) = LED_ON) Then
RunLedColorTxt.Caption = "LED für den Betriebszustand RUN ist eingeschaltet
(und blinkt nicht)"
End If
If ((S7Panel.CpuRun And LED_3SEC) = LED_3SEC) Then
RunLedColorTxt.Caption = "LED für den Betriebszustand RUN blinkt 3 Sekunden
lang"
End If
If ((S7Panel.CpuRun And LED_05SEC) = LED_05HZ) Then
RunLedColorTxt.Caption = "LED für den Betriebszustand RUN blinkt mit Intervallen
von 5 Hz"
End If
If ((S7Panel.CpuRun And LED_20SEC) = LED_20HZ) Then
RunLedColorTxt.Caption = "LED für den Betriebszustand RUN blinkt mit Intervallen
von 20 Hz"
End If
End Sub
C-10
Windows Logic Controller (WinLC RTX) – Übersicht
A5E00083614-01