update something

This commit is contained in:
wanlop run 2025-04-09 14:48:11 +07:00
parent f02028d22a
commit c1a02871d4
30 changed files with 4688 additions and 3838 deletions

View file

@ -53,14 +53,21 @@
Var ProcessCupDebugText = ""
Var TimeOutSmoothiesProcess = 120
Var TextDoorButtonID = 001201
Var SmoothieProcessState = "idle"
Var CountDownCertainConfuse = 5
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;SAVELOG SoundPlaying
DEBUGVAR TimeOutSmoothiesProcess
If TimeOutSmoothiesProcess > 0 Then
Var TimeOutSmoothiesProcess = countDownRetrun - 1
Var TimeOutSmoothiesProcess = TimeOutSmoothiesProcess - 1
EndIf
If TimeOutSmoothiesProcess = 0 Then
@ -68,12 +75,83 @@
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
EndIf
DEBUGVAR TextDoorButtonID
Refresh
TimerReset
</EventTimeout>
;DEBUGVAR Var [CH9992_Status] = RUNNING
<Image>
<X> 0 </X>
@ -134,7 +212,7 @@
<Height> 85 </Height>
<Align> Center </Align>
<Language>
<ID> 001201 </ID>
<ID> 1201 </ID>
</Language>
</Text>
@ -145,11 +223,13 @@
<X> 77 </X>
<Y> 1531 </Y>
<Filename> Var(DirImage + "/bn_main_button.png") </Filename>
<FilenamePress> Var(DirImage + "/pn_main_button.png") </FilenamePress>
<FilenamePress> Var(DirImage + "/bp_main_button.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SmoothieProcessState = "press"
__CMD "UseArm" "2" "-" "-"
Machine InsertCupAndOpen
</EventClick>
</Button>
@ -158,13 +238,14 @@
<Y> 1571 </Y>
<Width> 1080 </Width>
<Height> 85 </Height>
<Align> Center </Align>
<Language>
<ID> 001202 </ID>
<ID> TextDoorButtonID </ID>
</Language>
</Text>
; cancel
<Button>
<X> 337 </X>
<Y> 1743 </Y>
@ -179,11 +260,12 @@
<Text>
<X> 0 </X>
<Y> 1757 </Y>
<Y> 1767 </Y>
<Width> 1080 </Width>
<Height> 85 </Height>
<Align> Center </Align>
<Language>
<ID> 001204 </ID>
<ID> 001210 </ID>
</Language>
</Text>