Release 6.35 and 6.42

This commit is contained in:
kong 2022-05-11 15:57:41 +07:00
parent ed9c02b916
commit 381504cd60
5 changed files with 122 additions and 62 deletions

View file

@ -406,10 +406,10 @@
READ_FILE "/mnt/sdcard/new_layout" new_layout
DEBUGVAR JXMLVersionInt
DEBUGVAR XMLPageVersionInt
If JXMLVersionInt > 389 Then
If XMLPageVersionInt > 640 Then
Var new_layout = "true"
EndIf

View file

@ -34,17 +34,21 @@
Var Timeout = Timeout + 1
;If Timeout > 10 Then
If Timeout > 240 Then
If NextOrder = "true" Then
Var NextOrder = "false"
If NextOrder = "true" Then
TransferVar "next" "curr"
Var Seeker = "curr"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
Else
If Timeout > 240 Then
If NextOrder = "true" Then
SAVELOG "TIME OUT 240"
Var NextOrder = "false"
TransferVar "next" "curr"
Var Seeker = "curr"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
EndIf
@ -65,6 +69,8 @@
TransferVar "next" "curr"
Var Seeker = "curr"
SAVELOG "Remove cup"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else
@ -72,6 +78,7 @@
EndIf
EndIf
; must remove cup.
If HaveCup = "true" Then
Else
@ -80,6 +87,8 @@
TransferVar "next" "curr"
Var Seeker = "curr"
SAVELOG "Have Cup"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else

View file

@ -105,61 +105,86 @@
EndIf
If SaveTheWorldCount = 2 Then
If LedLidBlink = "no" Then
Var SaveTheWorldST = "Enable"
EndIf
Var video_id_to_ran = 3
Var video_name_to_play = "taobin_save_world"
Random video_id_to_ran
Var ThankyouST = "Invisible"
Else
Var video_id_to_ran = 2
Var video_name_to_play = "taobin_thank"
Random video_id_to_ran
Var ThankyouST = "Enable"
EndIf
If new_layout = "true" Then
DEBUGVAR video_id_to_ran
Var show_video = 1
Var SaveTheWorldST = "Invisible"
Var video_file_name = "ROOT/taobin_project/video/" + video_name_to_play
Var video_file_name = video_file_name + video_id_to_ran
Var video_file_name = video_file_name + ".mp4"
DEBUGVAR video_file_name
Var VideoFileNameStage = "Enable"
Var TimeoutToNext = 5
Var ThankyouST = "Invisible"
Else
Var show_video = 0
Var VideoFileNameStage = "Invisible"
Var TimeoutToNext = 3
EndIf
DEBUGVAR LastMakeDrinkResult
DEBUGVAR MachineStage
DEBUGVAR NextOrderStatus
; Show text and button for remove CUP.
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/complete_en/"
Else
Var DirImage2 = "ROOT/taobin_project/image/complete/"
EndIf
Var txtDrinkOKState = "Invisible"
Var buttonRemoveCup = "Invisible"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = CountDownBrewing - 1
Var CountDownThankyou = CountDownThankyou - 1
;Var CountDownThankyou = CountDownThankyou - 1
Var Timeout = Timeout + 1
If Timeout = 1 Then
DEBUGVAR MachineStage
DEBUGVAR CupOnArm
DEBUGVAR buttonRemoveCup
DEBUGVAR CART_COUNT
DEBUGVAR HaveCup
DEBUGVAR CHECKCUP
DEBUGVAR CupChecking
DEBUGVAR MaybeHaveCup
DEBUGVAR NextOrder
DEBUGVAR DoorCupPosition
If HaveCup = "true" Then
Var Timeout = 0
Else
If CupOnArm = "true" Then
Var Timeout = 0
Else
If MaybeHaveCup = "true" Then
Var Timeout = 0
Else
Var Timeout = Timeout + 1
EndIf
EndIf
EndIf
; detect cup
If DoorCupPosition = "bottom" Then
If HaveCup = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
EndIf
EndIf
EndIf
If CupOnArm = "true" Then
If MaybeHaveCup = "true" Then
Else
If CupChecking = "true" Then
Else
Var buttonRemoveCup = "Enable"
Var txtDrinkOKState = "Enable"
EndIf
EndIf
EndIf
Else
Var buttonRemoveCup = "Invisible"
EndIf
If Timeout = 2 Then
Var VideoPlayFile = VideoPath
@ -179,6 +204,7 @@
Else
MakeDrinkV1 Seeker.selected_a_drink SelectSugarID
Var CountDownThankyou = 0
EndIf
Else
;Cart "MakeID" CART_INDEX
@ -192,6 +218,7 @@
; run test;
If CountDownThankyou = 0 Then
; reset all var
DEBUGVAR MachineStage
Var CountDownBrewing = BrewTime
@ -252,4 +279,28 @@
</EventChangeStatus>
<Image>
<X> 77 </X>
<Y> 1378 </Y>
<State> txtDrinkOKState </State>
<Filename> Var( DirImage + "/txtDrinkOK.png" ) </Filename>
</Image>
<Button>
<X> 160 </X>
<Y> 1673 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<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>
</Popup>