Tabla de contenido
Publicidad
Panel de control
Reacción a los cambios de estado de los LEDs del panel de control
La tabla C-5 muestra un ejemplo de subprograma que lee el estado del LED para el estado
operativo RUN, determina el color del LED de estado y precisa si el LED debe estar
iluminado de forma continuada o intermitente. Las constantes declaradas para el
subprograma son las máscaras para los valores de las propiedades del LED: CpuBusf1,
CpuBusf2, CpuExtF, CpuFrce, CpuIntF, CpuRun y CpuStop.
Tabla C-5
Reacción a los cambios de estado de los LEDs de estado del panel de control
Visual Basic Code
Private Sub S7Panel_UpdateState()
'Estas constantes son las máscaras para las propiedades del LED:
Const LED_GREEN = &H2
Const LED_3SEC = &H100
Const LED_ON = &H200
Const LED_05HZ = &H300
Const LED_20HZ = &H400
'En este ejemplo, RunLedColorTxt y RunLedStateTxt son campos de texto:
'RunLedColorTxt muestra un mensaje sobre el color del LED para el
'estado operativo RUN
'RunLedStateTxt muestra un mensaje sobre el estado (encendido de forma continua o
intermitente)
'del LED para el estado operativo RUN
If S7Panel.CpuRun = 0 Then
RunLedColorTxt.Caption = "El color del LED para el estado operativo RUN es gris"
RunLedStateTxt.Caption = "LED de Run está apagado"
End If
If ((S7Panel.CpuRun And LED_GREEN) = LED_GREEN) Then
RunLedColorTxt.Caption = "El color del LED para el estado operativo RUN es verde"
End If
If ((S7Panel.CpuRun And LED_ON) = LED_ON) Then
RunLedColorTxt.Caption = "El LED para el estado operativo RUN está encendio"
(y no parpadea)"
End If
If ((S7Panel.CpuRun And LED_3SEC) = LED_3SEC) Then
RunLedColorTxt.Caption = "El LED para el estado operativo RUN parpadea 3 segundos"
End If
If ((S7Panel.CpuRun And LED_05SEC) = LED_05HZ) Then
RunLedColorTxt.Caption = "El LED para el estado operativo RUN parpadea en intervalos
de 5 Hz"
End If
If ((S7Panel.CpuRun And LED_20SEC) = LED_20HZ) Then
RunLedColorTxt.Caption = "El LED para el estado operativo RUN parpadea en intervalos
de 20 Hz"
End If
End Sub
C-10
Windows Logic Controller (WinLC RTX) Descripción del producto
A5E00165593-02
Publicidad
Tabla de contenido
