pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

doing

Browse source
This commit is contained in:
wanlop run 2024-11-11 11:56:46 +07:00
commit 7c91ed9c22
9 changed files with 492 additions and 194 deletions
Download patch file Download diff file Expand all files Collapse all files

75
xml/page_drinkok.xml
View file

@ -243,6 +243,10 @@
Var TextDoorJamStage = "Invisible"
Var CountUpDoorJamAlert = 0
Var BlinkUpDoorJamAlert = 0
Var EnableDoorJamAlert = 1
</EventOpen>
<Timeout> 500 </Timeout>
@ -413,37 +417,54 @@
;Var TextBottomShow = "Enable"
EndIf
If DOOR_CUP_OPEN_ERROR = "true" Then
Var CountUpDoorJamAlert = CountUpDoorJamAlert + 1
EndIf
If DOOR_CUP_CLOSE_ERROR = "true" Then
Var CountUpDoorJamAlert = CountUpDoorJamAlert + 1
EndIf
If CountUpDoorJamAlert > 0 Then
DEBUGVAR CountUpDoorJamAlert
EndIf
If EnableDoorJamAlert = 1 Then
Var BlinkUpDoorJamAlert = BlinkUpDoorJamAlert + 1
If CountUpDoorJamAlert > 8 Then
DEBUGVAR DOOR_CUP_OPEN_ERROR
DEBUGVAR DOOR_CUP_CLOSE_ERROR
Var TextBottomShow = "Invisible"
Var TextDoorJamStage = "Enable"
EndIf
If DOOR_CUP_OPEN_ERROR = "true" Then
Var CountUpDoorJamAlert = CountUpDoorJamAlert + 1
EndIf
If DOOR_CUP_CLOSE_ERROR = "true" Then
Var CountUpDoorJamAlert = CountUpDoorJamAlert + 1
EndIf
If CountUpDoorJamAlert > 0 Then
DEBUGVAR CountUpDoorJamAlert
EndIf
If CountUpDoorJamAlert > 8 Then
DEBUGVAR DOOR_CUP_OPEN_ERROR
DEBUGVAR DOOR_CUP_CLOSE_ERROR
Var TextBottomShow = "Invisible"
;Var TextDoorJamStage = "Enable"
If BlinkUpDoorJamAlert > 1 Then
Var TextDoorJamStage = "Enable"
Var BlinkUpDoorJamAlert = 0
Else
Var TextDoorJamStage = "Invisible"
EndIf
EndIf
If CountUpDoorJamAlert > 50 Then
Var CountUpDoorJamAlert = 1
Var TextBottomShow = "Enable"
Var TextDoorJamStage = "Invisible"
EndIf
If show_eng = "true" Then
Var TextDoorJamString = " Door Error. "
Else
Var TextDoorJamString = " ประตูมีปัญหา "
EndIf
If CountUpDoorJamAlert > 50 Then
Var CountUpDoorJamAlert = 1
Var TextBottomShow = "Enable"
Var TextDoorJamStage = "Invisible"
EndIf
If show_eng = "true" Then
Var TextDoorJamString = " Door Error. "
Else
Var TextDoorJamString = " ประตูมีปัญหา "
EndIf
TimerReset
Refresh
@ -522,7 +543,7 @@
<Y> 1418 </Y>
<Size> 87 </Size>
<Align> Center </Align>
<Color> 0xff0303 </Color>
<Color> 0xEF4D2C </Color>
<Font> KanitLightTTF </Font>
<State> TextDoorJamStage </State>
<Value> TextDoorJamString </Value>