DUBAI: update Pepsi theme

This commit is contained in:
Pakin 2024-11-18 11:06:00 +07:00
parent 45312d6ead
commit 77a21f1e57
112 changed files with 9344 additions and 4958 deletions

View file

@ -7,6 +7,14 @@
<Background> "0xEAE6E1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
If UsePepsiTheme = 1 Then
Var ShowErrorPage = CountryRootPath + "/xml/page_show_error.lxml"
Open ShowErrorPage
EndIf
Var countClick = 0
Var countClick2 = 0
@ -37,13 +45,13 @@
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var EmergencyStop = "-"
If EmergencyStop = "true" Then
If DoorCupPosition = "bottom" Then
; It normal
; It normal
Var EmergencyStop = "false"
Else
Var MachineErrorDetailAll = "Emergency stop!"
@ -68,7 +76,7 @@
Var MachineErrorDetailAll = MachineErrorDetailAll + " [ | ]"
EndIf
Var textStep = textStep + 1
Var textStep = textStep + 1
;DEBUGVAR MachineErrorDetailAll
;DEBUGVAR textStep
@ -76,12 +84,12 @@
If NETCORE_LOST_CNT > 0 Then
Else
DEBUGVAR NCIC07_EVENT_CNT
DEBUGVAR NETCORE_EVENT_CNT_TMP
If NCIC07_EVENT_CNT = NETCORE_EVENT_CNT_TMP Then
If NCIC07_EVENT_CNT = NETCORE_EVENT_CNT_TMP Then
Var NETCORE_LOST_COUNT_UP = NETCORE_LOST_COUNT_UP + 1
DEBUGVAR NETCORE_LOST_COUNT_UP
@ -101,7 +109,7 @@
EndIf
Else
If stop_now_from_netcore_event = 1 Then
Var stop_now = "false"
SAVELOG "stop_now_from_netcore_event is set"
@ -115,19 +123,19 @@
EndIf
If MachineStage = "" Then
Var LEDSet = "false"
Open "ROOT/taobin_project/xml/page_board.xml"
EndIf
If MachineStage = "show-menu" Then
Var LEDSet = "false"
Open "ROOT/taobin_project/xml/page_board.xml"
EndIf
If MachineStage = "remove-cup" Then
Var LEDSet = "false"
Open "ROOT/taobin_project/xml/page_remove_cup.xml"
@ -143,7 +151,7 @@
If FirstOpen = 1 Then
Var FirstOpen = 0
If MachineStage = "close-maintenance" Then
Var LEDSet = "true"
;Open "ROOT/taobin_project/xml/page_show_error.xml"
Refresh
@ -153,7 +161,7 @@
EndIf
EndIf
EndIf
@ -183,7 +191,7 @@
Var LanguageButtonEnable = "Enable"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 648
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 640
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
@ -198,7 +206,7 @@
DEBUGVAR stop_now
Var DirImage = "ROOT/taobin_project/image/vending_error_en"
If MachineStage = "mcu-upgrade" Then
If LanguageShow = "THAI" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
@ -219,7 +227,7 @@
EndIf
If NeedUpgrade = "true" Then
If LanguageShow = "THAI" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
@ -240,11 +248,11 @@
EndIf
DEBUGVAR MachineStage
If MachineStage = "close-maintenance" Then
DEBUGVAR stop_now
If stop_now = "true" Then
If LanguageShow = "THAI" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
@ -265,8 +273,8 @@
Else
Var show_error_normal = "Enable"
Var show_error_sp1 = "Invisible"
If LanguageShow = "THAI" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/close_th"
EndIf
If LanguageShow = "ENG" Then
@ -291,7 +299,7 @@
If MachineStage = "drink-failed" Then
If stop_now = "true" Then
If LanguageShow = "THAI" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
@ -309,7 +317,7 @@
Else
Var show_error_normal = "Enable"
Var show_error_sp1 = "Invisible"
If LanguageShow = "THAI" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/close_th"
EndIf
If LanguageShow = "ENG" Then
@ -326,9 +334,9 @@
EndIf
EndIf
EndIf
If NETCORE_LOST_CNT > 0 Then
If LanguageShow = "THAI" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
@ -347,7 +355,7 @@
If NETCORE_EVENT_CNT_X >= 30 Then
Var NETCORE_EVENT_CNT_X = 0
If LanguageShow = "THAI" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
@ -429,10 +437,10 @@
<Height> 50 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var countClick = countClick + 1
If countClick = 3 Then
EndIf
If countClick = 10 Then
@ -452,8 +460,8 @@
<Height> 50 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
</EventClick>
</Button>
@ -470,4 +478,4 @@
</Text>
</Page>
</Page>