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

DO

Browse source
This commit is contained in:
kong 2022-05-01 10:57:47 +07:00
parent 6dc2c89b7a
commit dbb7254a47
56 changed files with 5604 additions and 580 deletions
Download patch file Download diff file Expand all files Collapse all files

111
xml/page_drinkok.xml
View file

@ -9,7 +9,8 @@
DEBUGVAR StarwState
DEBUGVAR LidState
Var buttonRemoveCup = "Invisible"
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/topping2_en"
Else
@ -172,6 +173,8 @@
Var DelayButton = 0
</EventOpen>
<Timeout> 500 </Timeout>
<EventTimeout>
@ -183,6 +186,14 @@
DEBUGVAR buttonRemoveCup
DEBUGVAR CART_COUNT
DEBUGVAR HaveCup
DEBUGVAR CHECKCUP
DEBUGVAR CupChecking
DEBUGVAR MaybeHaveCup
DEBUGVAR NextOrder
DEBUGVAR DoorCupPosition
Var Timeout = Timeout + 1
If Timeout > 30 Then
@ -245,12 +256,6 @@
EndIf
EndIf
DEBUGVAR HaveCup
DEBUGVAR CHECKCUP
DEBUGVAR CupChecking
DEBUGVAR MaybeHaveCup
DEBUGVAR NextOrder
DEBUGVAR DoorCupPosition
; Do not change
;
@ -269,16 +274,32 @@
EndIf
Else
If HaveCup = "true" Then
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
If DoorCupPosition = "bottom" Then
If HaveCup = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
EndIf
EndIf
EndIf
EndIf
If CupOnArm = "true" Then
Var buttonRemoveCup = "Enable"
If CupOnArm = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
EndIf
EndIf
EndIf
Else
Var buttonRemoveCup = "Invisible"
EndIf
EndIf
@ -286,18 +307,33 @@
Else
If sendPayMultiFlag = 1 Then
Var buttonRemoveCup = "Invisible"
If HaveCup = "true" Then
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
If DoorCupPosition = "bottom" Then
If HaveCup = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
EndIf
EndIf
EndIf
EndIf
If CupOnArm = "true" Then
Var buttonRemoveCup = "Enable"
If CupOnArm = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
EndIf
EndIf
EndIf
Else
Var buttonRemoveCup = "Invisible"
EndIf
Var Seeker.TNumberTaobinMember = ""
@ -308,7 +344,6 @@
If NextOrder = "true" Then
; next order set. Havecup and checkup value must false. Certain cup not on any arm.
If HaveCup = "false" Then
If MaybeHaveCup = "true" Then
@ -320,16 +355,17 @@
If CupOnArm = "false" Then
If DoorCupPosition = "bottom" Then
; BEGIN
Var NextOrder = "false"
TransferVar "next" "curr"
Var Seeker = "curr"
SAVELOG "Make next order by take-cup"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
; END
Else
Machine DoorLidClose
Machine DoorClose
EndIf
EndIf
EndIf
@ -386,11 +422,6 @@
EndIf
EndIf
If CupChecking = "true" Then
Var DelayButton = DelayButton + 1
EndIf
If MachineStage = "close-maintenance" Then
@ -410,15 +441,7 @@
EndIf
EndIf
If DelayButton > 1 Then
Var DelayButton = DelayButton + 1
If DelayButton > 8 Then
Var buttonRemoveCup = "Enable"
EndIf
EndIf
TimerReset
Refresh
@ -551,8 +574,10 @@
<Filename> Var( DirImage + "/bn_open_door.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_open_door.png" ) </FilenamePress>
<EventClick>
Var buttonRemoveCup = "Invisible"
Machine RemoveCup
Machine DoorLidOpen
Refresh
</EventClick>
</Button>