Release 6.49

This commit is contained in:
kong 2022-06-10 10:54:24 +07:00
parent 22ad7101ba
commit 439ec72e41
14 changed files with 4026 additions and 3428 deletions

View file

@ -18,6 +18,8 @@
DEBUGVAR SelectDrink
DEBUGVAR PictureDrink
DEBUGVAR new_layout
If new_layout = "true" Then
@ -149,8 +151,11 @@
If RoadShow = "true" Then
Var PriceDrinkTmp = "Free"
Var SaveSelectDrinkRoadShow = SelectDrink
EndIf
DEBUGVAR SaveSelectDrinkRoadShow
If ShowPrice = "Invisible" Then
Var PriceDrinkTmpShow = "Free"
EndIf
@ -268,6 +273,9 @@
Var topping_price_refresh = 1
Var StrawState = "Enable"
Var LidState = "Enable"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
@ -540,17 +548,20 @@
Else
Var ShowLidStraw = "Enable"
If MAT_ID_9701 = "Enable" Then
Var StrawState = MAT_ID_9701
Else
Var StrawState = MAT_ID_9701
If StrawState = "Enable" Then
If MAT_ID_9701 = "Enable" Then
Var StrawState = MAT_ID_9701
Else
Var StrawState = MAT_ID_9701
EndIf
EndIf
If MAT_ID_9601 = "Enable" Then
Var LidState = MAT_ID_9601
Else
Var LidState = MAT_ID_9601
If LidState = "Enable" Then
If MAT_ID_9601 = "Enable" Then
Var LidState = MAT_ID_9601
Else
Var LidState = MAT_ID_9601
EndIf
EndIf
EndIf
@ -570,14 +581,22 @@
If StrawState = "Enable" Then
Var StrawDeactiveButton = "Invisible"
Else
Var StrawDeactiveButton = "Enable"
If StrawState = "Press" Then
Var StrawDeactiveButton = "Invisible"
Else
Var StrawDeactiveButton = "Enable"
EndIf
EndIf
If LidState = "Enable" Then
Var LidDeactiveButton = "Invisible"
Else
Var LidDeactiveButton = "Enable"
If LidState = "Press" Then
Var LidDeactiveButton = "Invisible"
Else
Var LidDeactiveButton = "Enable"
EndIf
EndIf
@ -2240,27 +2259,30 @@
DEBUGVAR LidState
DEBUGVAR StrawState
DEBUGVAR UserSelectProductCode
DEBUGVAR HAVE_UV_DOOR_LID
; DEBUGVAR HAVE_UV_DOOR_LID obsolete.
If HAVE_UV_DOOR_LID = "true" Then
If StrawState = "Press" Then
Machine StrawOrder
Var LedLidBlink = "true"
EndIf
If LidState = "Press" Then
Machine LidOrder
Var LedLidBlink = "true"
EndIf
Var StrawState = "Enable"
Var LidState = "Enable"
;
If StrawState = "Press" Then
Machine StrawOrder
Var LedLidBlink = "true"
EndIf
Var SelectDrink = UserSelectProductCode
If LidState = "Press" Then
Machine LidOrder
Var LedLidBlink = "true"
EndIf
Var StrawState = "Enable"
Var LidState = "Enable"
;
If RoadShow = "true" Then
Var SelectDrink = SaveSelectDrinkRoadShow
Else
Var SelectDrink = UserSelectProductCode
EndIf
Var Seeker.selected_a_drink = UserSelectProductCode
DEBUGVAR Seeker.selected_a_drink
@ -2362,6 +2384,11 @@
EndIf
EndIf
If RoadShow = "true" Then
Var PriceDrinkTmp = "Free"
Var SaveSelectDrinkRoadShow = UserSelectProductCode
EndIf
DEBUGVAR UserSelectProductCode