Pause SmoothieCountdown when helper show

This commit is contained in:
Ittipat Lusuk 2025-05-13 15:52:20 +07:00
parent 4f1a681c9a
commit e6fe0e547e
8 changed files with 16 additions and 223 deletions

View file

@ -39,6 +39,8 @@
Var Problem_Process_State[0] = "Enable"
Var Problem_Process_State[1] = "Enable"
Var CurrHelpCenter = 1
Var Timeout = 0
</EventOpen>
@ -47,9 +49,9 @@
<EventTimeout>
DEBUGVAR Timeout
If Timeout > 120 Then
If Timeout > 70 Then
SAVELOG "Timeout"
Var CurrHelpCenter = 0
If BaseOnPageBoard = 1 Then
Var BaseOnPageBoard = 0
Var LanguageButtonEnable = "Enable"
@ -120,6 +122,7 @@
<Volume> SoundVolume </Volume>
<EventClick>
Var CurrHelpCenter = 0
If BaseOnPageBoard = 1 Then
Var BaseOnPageBoard = 0
Var LanguageButtonEnable = "Enable"

View file

@ -28,7 +28,7 @@
Var Timeout = Timeout + 1
If Timeout > 300 Then
Var CurrHelpCenter = 0
If MachineStage = "remove-cup" Then
OpenInst 2 "ROOT/taobin_project/xml/page_drinkfail3.xml"
Else

View file

@ -7,29 +7,12 @@
RootLayoutVisible 13 "hide"
;OpenInst 0 "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
Var Timeout = 0
Var CurrHelpCenter = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
DEBUGVAR Timeout
If Timeout > 66 Then
SAVELOG "Timeout"
TabMenuVisibleInst 99
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
Var Timeout = Timeout + 1
TimerReset
</EventTimeout>
</Popup>

View file

@ -24,20 +24,6 @@
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/ticket_time_blending.ev"
DEBUGVAR OpenFromPageBoard
If OpenFromPageBoard = 1 Then
Var OpenFromPageBoard = 0
Var langnext1 = "true"
Var langnext2 = "true"
Var langnext3 = "true"
Var langnext4 = "true"
Var langnext5 = "true"
Var langnext6 = "true"
Var langnext7 = "true"
Var langnext8 = "true"
Var langnext9 = "true"
EndIf
Var NextPage = "-"
@ -163,7 +149,11 @@
If Show_btn_process = "Disable" Then
; do not thing
Else
Var TimeOutSmoothiesProcess = TimeOutSmoothiesProcess - 1
If CurrHelpCenter = 1 Then
; do not thing to pause countdown smoothie process
Else
Var TimeOutSmoothiesProcess = TimeOutSmoothiesProcess - 1
EndIf
EndIf
EndIf
If TimeOutSmoothiesProcess = 2 Then

View file

@ -94,99 +94,6 @@
Open "ROOT/taobin_project/inter/tha/xml/page_smoothie_suggest_and_process_3.xml"
EndIf
DEBUGVAR CH9991_Status
DEBUGVAR CH9992_Status
DEBUGVAR CH9993_Status
DEBUGVAR CH9994_Status
DEBUGVAR HaveCup
DEBUGVAR CupOnArm
DEBUGVAR DoorCupPosition
DEBUGVAR CupChecking
DEBUGVAR CupArmMove
DEBUGVAR buttonRemoveCup
DEBUGVAR SmoothieProcessState
DEBUGVAR AnyArmConfuse
DEBUGVAR SensorDoorCupStatus
If CH9992_Status = "READY" Then
If DoorCupPosition = "bottom" Then
If SmoothieProcessState = "idle" Then
Var TextDoorButtonID = 001202
Else
If SmoothieProcessState = "insert" Then
Var TextDoorButtonID = 001203
Else
EndIf
EndIf
Else
If DoorCupPosition = "top" Then
Var TextDoorButtonID = 001204
If SmoothieProcessState = "press" Then
Var SmoothieProcessState = "insert"
EndIf
Else
If SmoothieProcessState = "idle" Then
Else
If SmoothieProcessState = "press" Then
Else
Var TextDoorButtonID = 001205
EndIf
EndIf
EndIf
EndIf
If AnyArmConfuse = 1 Then
If CountDownCertainConfuse > 0 Then
Var CountDownCertainConfuse = CountDownCertainConfuse - 1
If CountDownCertainConfuse = 0 Then
Machine DoorClose
EndIf
EndIf
EndIf
Else
If CH9992_Status = "RUNNING" Then
Var SmoothieProcessState = "blendnow"
EndIf
EndIf
If SmoothieProcessState = "blendnow" Then
Var TextDoorButtonID = 001206
Var SelectDrink = Seeker.selected_a_drink
Var SelectSugarID = ""
Topping "Select" SelectDrink
Var SmoothieProcessState = "blending"
EndIf
If SmoothieProcessState = "blending" Then
Menu "set-name" "Smoothie "
Menu "set-image" Seeker.PictureDrink
Open "ROOT/taobin_project/inter/tha/xml/page_payment_pack_and_send.xml"
EndIf
DEBUGVAR TextDoorButtonID
Refresh
TimerReset
</EventTimeout>

View file

@ -113,23 +113,6 @@
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;SAVELOG SoundPlaying
DEBUGVAR CH9991_Status
DEBUGVAR CH9992_Status
DEBUGVAR CH9993_Status
DEBUGVAR CH9994_Status
DEBUGVAR HaveCup
DEBUGVAR CupOnArm
DEBUGVAR DoorCupPosition
DEBUGVAR CupChecking
DEBUGVAR CupArmMove
DEBUGVAR buttonRemoveCup
DEBUGVAR SmoothieProcessState
DEBUGVAR AnyArmConfuse
DEBUGVAR SensorDoorCupStatus
DEBUGVAR Timeout
@ -138,79 +121,6 @@
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
If CH9992_Status = "READY" Then
If DoorCupPosition = "bottom" Then
If SmoothieProcessState = "idle" Then
Var TextDoorButtonID = 001202
Else
If SmoothieProcessState = "insert" Then
Var TextDoorButtonID = 001203
Else
EndIf
EndIf
Else
If DoorCupPosition = "top" Then
Var TextDoorButtonID = 001204
If SmoothieProcessState = "press" Then
Var SmoothieProcessState = "insert"
EndIf
Else
If SmoothieProcessState = "idle" Then
Else
If SmoothieProcessState = "press" Then
Else
Var TextDoorButtonID = 001205
EndIf
EndIf
EndIf
EndIf
If AnyArmConfuse = 1 Then
If CountDownCertainConfuse > 0 Then
Var CountDownCertainConfuse = CountDownCertainConfuse - 1
If CountDownCertainConfuse = 0 Then
Machine DoorClose
EndIf
EndIf
EndIf
Else
If CH9992_Status = "RUNNING" Then
Var SmoothieProcessState = "blendnow"
EndIf
EndIf
If SmoothieProcessState = "blendnow" Then
Var TextDoorButtonID = 001206
Var SelectDrink = Seeker.selected_a_drink
Var SelectSugarID = ""
Topping "Select" SelectDrink
Var SmoothieProcessState = "blending"
EndIf
If SmoothieProcessState = "blending" Then
Menu "set-name" "Smoothie "
Menu "set-image" Seeker.PictureDrink
;Open "ROOT/taobin_project/inter/tha/xml/page_payment_pack_and_send.xml"
EndIf
Var Timeout = Timeout + 1
Refresh

View file

@ -38,8 +38,6 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CurrHelpCenter = 1
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"