Uniplay List Box Function Example - Alarm Listing Example
CODE EXAMPLE:
ALARM (program)
'Alarm message triggered by changing "alarm_number" value.
'Other logic to be done to facilitate this.
DIM clock_alarm1 AS STRING(64)
DIM clock_alarm2 AS STRING(64)
DIM clock_alarm3 AS STRING(64)
DIM clock_alarm4 AS STRING(64)
DIM clock_alarm5 AS STRING(64)
DIM alarm_number AS INTEGER
alarm_number = 0
WHILE TRUE
DIM alarm AS INTEGER
WAIT UNTIL alarm_number <> 0
alarm = alarm_number ' minimize the chance to lose an alarm while processing
alarm_number = 0
IF alarm = -1 THEN
' clear the alarms
clock_alarm1 = ""
clock_alarm2 = ""
clock_alarm3 = ""
clock_alarm4 = ""
clock_alarm5 = ""
ELSEIF alarm = 1 THEN
clock_alarm1 = TIME$ + " 001: Safety Not Ready"
ELSEIF alarm = 2 THEN
clock_alarm2 = TIME$ + " 002: Drive Error"
ELSEIF alarm = 3 THEN
clock_alarm3 = TIME$ + " 003: EtherCat Error"
ELSEIF alarm = 4 THEN
clock_alarm4 = TIME$ + " 004: Product Low"
ELSEIF alarm = 5 THEN
clock_alarm5 = TIME$ + " 005: Feeder Jammed"
ENDIF
WEND