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

@ -20556,9 +20556,9 @@
; 12-06-01-0002 - -
<Menu>
<State> Flag( 12-06-01-0002.Button,$Sum1206010002) </State>
<IdleImage> "ROOT/taobin_project/inter/tha/image/page_drink_n//" </IdleImage>
<PressImage> "ROOT/taobin_project/inter/tha/image/page_drink_press_n//" </PressImage>
<DisableImage> "ROOT/taobin_project/inter/tha/image/page_drink_disable_n2//" </DisableImage>
<IdleImage> "ROOT/taobin_project/inter/tha/image/page_drink_n//-" </IdleImage>
<PressImage> "ROOT/taobin_project/inter/tha/image/page_drink_press_n//-" </PressImage>
<DisableImage> "ROOT/taobin_project/inter/tha/image/page_drink_disable_n2//-" </DisableImage>
<Name>
<LanguageGroup>
<LanguageSlot1>Hongkong Congee</LanguageSlot1>
@ -20650,7 +20650,7 @@
<Value> $Sum1206010002TextValue </Value>
</ConditionalDisable>
<EventOnClick>
Var PictureDrink = "ROOT/taobin_project/inter/tha/image/page_drink_picture2_n/" + ""
Var PictureDrink = "ROOT/taobin_project/inter/tha/image/page_drink_picture2_n/" + "-"
GetInstanceIDMenuTab OpenFromInstMenuTab
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $12-06-01-0002.Price
@ -21003,233 +21003,6 @@
</EventOnClick>
</Menu>
; ==================> Len = 3
; - 12-05-02-0016 -
<Menu>
<State> Flag( 12-05-02-0016.Button,$Sum1205020016) </State>
<IdleImage> "ROOT/taobin_project/inter/tha/image/page_drink_n//bn_water_roomtemp.png" </IdleImage>
<PressImage> "ROOT/taobin_project/inter/tha/image/page_drink_press_n//bn_water_roomtemp.png" </PressImage>
<DisableImage> "ROOT/taobin_project/inter/tha/image/page_drink_disable_n2//bn_water_roomtemp.png" </DisableImage>
<Name>
<LanguageGroup>
<LanguageSlot1>Drinking Water</LanguageSlot1>
<LanguageSlot2>น้ำดื่ม</LanguageSlot2>
<LanguageSlot3>Drinking Water</LanguageSlot3>
<LanguageSlot4>น้ำดื่ม</LanguageSlot4>
<LanguageSlot5>-</LanguageSlot5>
<LanguageSlot6>น้ำดื่ม</LanguageSlot6>
</LanguageGroup>
</Name>
<Description>
<LanguageGroup>
<LanguageSlot1>Water</LanguageSlot1>
<LanguageSlot2>น้ำ</LanguageSlot2>
<LanguageSlot3>Water</LanguageSlot3>
<LanguageSlot4>น้ำ</LanguageSlot4>
<LanguageSlot5>-</LanguageSlot5>
<LanguageSlot6>น้ำ</LanguageSlot6>
</LanguageGroup>
</Description>
<HotState> "Disable2" </HotState>
<IceState> $12-05-02-0016.Button </IceState>
<BlendState> "Disable2" </BlendState>
<HotPrice> eval(
If $##-##-##-####.Price = -1 Then
Var return = "Free"
Else
Var return !assigned StringFmt( $##-##-##-####.Price , DisplayFormat, PreScaleConvertShow)
EndIf
) </HotPrice>
<IcePrice> eval(
If $12-05-02-0016.Price = -1 Then
Var return = "Free"
Else
Var return !assigned StringFmt( $12-05-02-0016.Price , DisplayFormat, PreScaleConvertShow)
EndIf
) </IcePrice>
<BlendPrice> eval(
If $##-##-##-####.Price = -1 Then
Var return = "Free"
Else
Var return !assigned StringFmt( $##-##-##-####.Price , DisplayFormat, PreScaleConvertShow)
EndIf
) </BlendPrice>
<IceProcessingState>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum510201003951020200395102030039 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</IceProcessingState>
<IceProcessingImage> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </IceProcessingImage>
<IceProcessingDisableImage> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </IceProcessingDisableImage>
<ConditionalDisable>
<Script>
If $Sum1205020016 = "Disable" Then
STRCONTAIN "STG=CLOSE" $##-##-##-####.TAG tag1_is_disable
STRCONTAIN "STG=CLOSE" $12-05-02-0016.TAG tag2_is_disable
STRCONTAIN "STG=CLOSE" $##-##-##-####.TAG tag3_is_disable
If tag1_is_disable = "true" Then
Var $Sum1205020016Tag = $##-##-##-####.TAG
EndIf
If tag2_is_disable = "true" Then
Var $Sum1205020016Tag = $12-05-02-0016.TAG
EndIf
If tag3_is_disable = "true" Then
Var $Sum1205020016Tag = $##-##-##-####.TAG
EndIf
Var $Sum1205020016TextValue !assigned GETS($Sum1205020016Tag,"MSG")
Var $Sum1205020016TextID !assigned GETS($Sum1205020016Tag,"TextID")
If $Sum1205020016TextID != "" Then
Var $Sum1205020016TextValue = ""
EndIf
If $Sum1205020016TextValue = "" Then
If $Sum1205020016TextID = "" Then
Var $Sum1205020016TextID = "000013"
EndIf
EndIf
EndIf
</Script>
<ID> $Sum1205020016TextID </ID>
<Value> $Sum1205020016TextValue </Value>
</ConditionalDisable>
<EventOnClick>
Var PictureDrink = "ROOT/taobin_project/inter/tha/image/page_drink_picture2_n/" + "bn_water_roomtemp.png"
GetInstanceIDMenuTab OpenFromInstMenuTab
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $##-##-##-####.Price
Var PriceD2 = $12-05-02-0016.Price
Var PriceD3 = $##-##-##-####.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "12-05-02-0016"
Var PD_CODE3 = "##-##-##-####"
; begin lang
Var aliasName[0] = "Drinking Water"
Var aliasDesc[0] = "Water"
Var aliasName[1] = "น้ำดื่ม"
Var aliasDesc[1] = "น้ำ"
Var aliasName[2] = "水"
Var aliasDesc[2] = "水"
Var aliasName[3] = "-"
Var aliasDesc[3] = "-"
Var aliasName[4] = "-"
Var aliasDesc[4] = "-"
Var aliasName[5] = "သောက်ရေ"
Var aliasDesc[5] = "‌သောက်ရေ"
Var NameLang[0][0] = ""
Var NameLang[0][1] = ""
Var NameLang[0][2] = ""
Var NameLang[0][3] = ""
Var NameLang[0][4] = ""
Var NameLang[0][5] = ""
Var DescLang[0][0] = ""
Var DescLang[0][1] = ""
Var DescLang[0][2] = ""
Var DescLang[0][3] = ""
Var DescLang[0][4] = ""
Var DescLang[0][5] = ""
Var NameLang[1][0] = "ICED Drinking Water"
Var NameLang[1][1] = "น้ำดื่ม"
Var NameLang[1][2] = "饮用水"
Var NameLang[1][3] = "-"
Var NameLang[1][4] = "-"
Var NameLang[1][5] = "ICED သောက်ရေ"
Var DescLang[1][0] = "Water"
Var DescLang[1][1] = "น้ำ"
Var DescLang[1][2] = "水"
Var DescLang[1][3] = "-"
Var DescLang[1][4] = "-"
Var DescLang[1][5] = "ရေ"
Var NameLang[2][0] = ""
Var NameLang[2][1] = ""
Var NameLang[2][2] = ""
Var NameLang[2][3] = ""
Var NameLang[2][4] = ""
Var NameLang[2][5] = ""
Var DescLang[2][0] = ""
Var DescLang[2][1] = ""
Var DescLang[2][2] = ""
Var DescLang[2][3] = ""
Var DescLang[2][4] = ""
Var DescLang[2][5] = ""
; end lang
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = $12-05-02-0016.Button
Var PD_STAGE_3 = "Disable2"
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0016"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "-"
EndIf
EndIf
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_hide.lxml"
Var OpenFromXML = "ROOT/taobin_project/inter/tha/xml/page_catalog_group_other.lxml"
TabMenuVisibleInst 99
DEBUGVAR RedirectToNormalVersion
DEBUGVAR ToppingNewUINewSystem
If RedirectToNormalVersion = 1 Then
Var menu_name_eng_hot = NameLang[0][0]
Var menu_desc_eng_hot = DescLang[0][0]
Var menu_name_eng_cold = NameLang[1][0]
Var menu_desc_eng_cold = DescLang[1][0]
Var menu_name_eng_blender = NameLang[2][0]
Var menu_desc_eng_blender = DescLang[2][0]
Var menu_name_thai_hot = NameLang[0][1]
Var menu_desc_thai_hot = DescLang[0][1]
Var menu_name_thai_cold = NameLang[1][1]
Var menu_desc_thai_cold = DescLang[1][1]
Var menu_name_thai_blender = NameLang[2][1]
Var menu_desc_thai_blender = DescLang[2][1]
DEBUGVAR menu_name_thai_cold
DEBUGVAR menu_desc_thai_cold
Var NameDrink = aliasName[0]
Var DrinkDescription = aliasDesc[0]
Var NameDrinkTH = aliasName[1]
Var DrinkDescriptionTH = aliasDesc[1]
If LanguageShow = "THAI" Then
Var show_eng = "false"
Else
Var show_eng = "true"
EndIf
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_topping_select5.xml"
Else
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/page_topping_select6.lxml"
EndIf
</EventOnClick>
</Menu>

View file

@ -3940,15 +3940,16 @@
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0040"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "12-05-01-0040"
Else
; default topping 3
If PD_STAGE_3 = "Enable" Then
Topping "Load" "12-05-03-0040"
EndIf
EndIf
Else
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0040"
Else
Topping "Load" "12-05-01-0040"
EndIf
EndIf
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_hide.lxml"
Var OpenFromXML = "ROOT/taobin_project/inter/tha/xml/page_catalog_group_other_other.lxml"
@ -4167,15 +4168,16 @@
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0041"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
; default topping 3
If PD_STAGE_3 = "Enable" Then
Topping "Load" "12-05-03-0041"
EndIf
EndIf
Else
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0041"
Else
Topping "Load" "-"
EndIf
EndIf
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_hide.lxml"
Var OpenFromXML = "ROOT/taobin_project/inter/tha/xml/page_catalog_group_other_other.lxml"
@ -4394,15 +4396,16 @@
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0023"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
; default topping 3
If PD_STAGE_3 = "Enable" Then
Topping "Load" "12-05-03-0023"
EndIf
EndIf
Else
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0023"
Else
Topping "Load" "-"
EndIf
EndIf
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_hide.lxml"
Var OpenFromXML = "ROOT/taobin_project/inter/tha/xml/page_catalog_group_other_other.lxml"
@ -15137,233 +15140,6 @@
</EventOnClick>
</Menu>
; ==================> Len = 3
; - 12-05-02-0016 -
<Menu>
<State> Flag( 12-05-02-0016.Button,$Sum1205020016) </State>
<IdleImage> "ROOT/taobin_project/inter/tha/image/page_drink_n//bn_water_roomtemp.png" </IdleImage>
<PressImage> "ROOT/taobin_project/inter/tha/image/page_drink_press_n//bn_water_roomtemp.png" </PressImage>
<DisableImage> "ROOT/taobin_project/inter/tha/image/page_drink_disable_n2//bn_water_roomtemp.png" </DisableImage>
<Name>
<LanguageGroup>
<LanguageSlot1>Drinking Water</LanguageSlot1>
<LanguageSlot2>น้ำดื่ม</LanguageSlot2>
<LanguageSlot3>Drinking Water</LanguageSlot3>
<LanguageSlot4>น้ำดื่ม</LanguageSlot4>
<LanguageSlot5>-</LanguageSlot5>
<LanguageSlot6>น้ำดื่ม</LanguageSlot6>
</LanguageGroup>
</Name>
<Description>
<LanguageGroup>
<LanguageSlot1>Water</LanguageSlot1>
<LanguageSlot2>น้ำ</LanguageSlot2>
<LanguageSlot3>Water</LanguageSlot3>
<LanguageSlot4>น้ำ</LanguageSlot4>
<LanguageSlot5>-</LanguageSlot5>
<LanguageSlot6>น้ำ</LanguageSlot6>
</LanguageGroup>
</Description>
<HotState> "Disable2" </HotState>
<IceState> $12-05-02-0016.Button </IceState>
<BlendState> "Disable2" </BlendState>
<HotPrice> eval(
If $##-##-##-####.Price = -1 Then
Var return = "Free"
Else
Var return !assigned StringFmt( $##-##-##-####.Price , DisplayFormat, PreScaleConvertShow)
EndIf
) </HotPrice>
<IcePrice> eval(
If $12-05-02-0016.Price = -1 Then
Var return = "Free"
Else
Var return !assigned StringFmt( $12-05-02-0016.Price , DisplayFormat, PreScaleConvertShow)
EndIf
) </IcePrice>
<BlendPrice> eval(
If $##-##-##-####.Price = -1 Then
Var return = "Free"
Else
Var return !assigned StringFmt( $##-##-##-####.Price , DisplayFormat, PreScaleConvertShow)
EndIf
) </BlendPrice>
<IceProcessingState>
eval(
If ICE_PROCESS_STATUS = 2 Then
If $Sum510201003951020200395102030039 = "Disable" Then
Var ice_tab_process_show = "Disable"
Else
Var ice_tab_process_show = "Enable"
EndIf
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</IceProcessingState>
<IceProcessingImage> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </IceProcessingImage>
<IceProcessingDisableImage> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </IceProcessingDisableImage>
<ConditionalDisable>
<Script>
If $Sum1205020016 = "Disable" Then
STRCONTAIN "STG=CLOSE" $##-##-##-####.TAG tag1_is_disable
STRCONTAIN "STG=CLOSE" $12-05-02-0016.TAG tag2_is_disable
STRCONTAIN "STG=CLOSE" $##-##-##-####.TAG tag3_is_disable
If tag1_is_disable = "true" Then
Var $Sum1205020016Tag = $##-##-##-####.TAG
EndIf
If tag2_is_disable = "true" Then
Var $Sum1205020016Tag = $12-05-02-0016.TAG
EndIf
If tag3_is_disable = "true" Then
Var $Sum1205020016Tag = $##-##-##-####.TAG
EndIf
Var $Sum1205020016TextValue !assigned GETS($Sum1205020016Tag,"MSG")
Var $Sum1205020016TextID !assigned GETS($Sum1205020016Tag,"TextID")
If $Sum1205020016TextID != "" Then
Var $Sum1205020016TextValue = ""
EndIf
If $Sum1205020016TextValue = "" Then
If $Sum1205020016TextID = "" Then
Var $Sum1205020016TextID = "000013"
EndIf
EndIf
EndIf
</Script>
<ID> $Sum1205020016TextID </ID>
<Value> $Sum1205020016TextValue </Value>
</ConditionalDisable>
<EventOnClick>
Var PictureDrink = "ROOT/taobin_project/inter/tha/image/page_drink_picture2_n/" + "bn_water_roomtemp.png"
GetInstanceIDMenuTab OpenFromInstMenuTab
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $##-##-##-####.Price
Var PriceD2 = $12-05-02-0016.Price
Var PriceD3 = $##-##-##-####.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "12-05-02-0016"
Var PD_CODE3 = "##-##-##-####"
; begin lang
Var aliasName[0] = "Drinking Water"
Var aliasDesc[0] = "Water"
Var aliasName[1] = "น้ำดื่ม"
Var aliasDesc[1] = "น้ำ"
Var aliasName[2] = "水"
Var aliasDesc[2] = "水"
Var aliasName[3] = "-"
Var aliasDesc[3] = "-"
Var aliasName[4] = "-"
Var aliasDesc[4] = "-"
Var aliasName[5] = "သောက်ရေ"
Var aliasDesc[5] = "‌သောက်ရေ"
Var NameLang[0][0] = ""
Var NameLang[0][1] = ""
Var NameLang[0][2] = ""
Var NameLang[0][3] = ""
Var NameLang[0][4] = ""
Var NameLang[0][5] = ""
Var DescLang[0][0] = ""
Var DescLang[0][1] = ""
Var DescLang[0][2] = ""
Var DescLang[0][3] = ""
Var DescLang[0][4] = ""
Var DescLang[0][5] = ""
Var NameLang[1][0] = "ICED Drinking Water"
Var NameLang[1][1] = "น้ำดื่ม"
Var NameLang[1][2] = "饮用水"
Var NameLang[1][3] = "-"
Var NameLang[1][4] = "-"
Var NameLang[1][5] = "ICED သောက်ရေ"
Var DescLang[1][0] = "Water"
Var DescLang[1][1] = "น้ำ"
Var DescLang[1][2] = "水"
Var DescLang[1][3] = "-"
Var DescLang[1][4] = "-"
Var DescLang[1][5] = "ရေ"
Var NameLang[2][0] = ""
Var NameLang[2][1] = ""
Var NameLang[2][2] = ""
Var NameLang[2][3] = ""
Var NameLang[2][4] = ""
Var NameLang[2][5] = ""
Var DescLang[2][0] = ""
Var DescLang[2][1] = ""
Var DescLang[2][2] = ""
Var DescLang[2][3] = ""
Var DescLang[2][4] = ""
Var DescLang[2][5] = ""
; end lang
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = $12-05-02-0016.Button
Var PD_STAGE_3 = "Disable2"
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0016"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "-"
EndIf
EndIf
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_hide.lxml"
Var OpenFromXML = "ROOT/taobin_project/inter/tha/xml/page_catalog_group_other_other.lxml"
TabMenuVisibleInst 99
DEBUGVAR RedirectToNormalVersion
DEBUGVAR ToppingNewUINewSystem
If RedirectToNormalVersion = 1 Then
Var menu_name_eng_hot = NameLang[0][0]
Var menu_desc_eng_hot = DescLang[0][0]
Var menu_name_eng_cold = NameLang[1][0]
Var menu_desc_eng_cold = DescLang[1][0]
Var menu_name_eng_blender = NameLang[2][0]
Var menu_desc_eng_blender = DescLang[2][0]
Var menu_name_thai_hot = NameLang[0][1]
Var menu_desc_thai_hot = DescLang[0][1]
Var menu_name_thai_cold = NameLang[1][1]
Var menu_desc_thai_cold = DescLang[1][1]
Var menu_name_thai_blender = NameLang[2][1]
Var menu_desc_thai_blender = DescLang[2][1]
DEBUGVAR menu_name_thai_cold
DEBUGVAR menu_desc_thai_cold
Var NameDrink = aliasName[0]
Var DrinkDescription = aliasDesc[0]
Var NameDrinkTH = aliasName[1]
Var DrinkDescriptionTH = aliasDesc[1]
If LanguageShow = "THAI" Then
Var show_eng = "false"
Else
Var show_eng = "true"
EndIf
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_topping_select5.xml"
Else
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/page_topping_select6.lxml"
EndIf
</EventOnClick>
</Menu>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,51 @@
; Request
; - Product Code
; - ** topping.
; - TelephoneNumber
; - Market Code
; -
; Set
; - Amount 0 baht
;
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
SAVELOG "======================================= page_payment_pack_and_send.xml ================================"
; On open
Var ProcessCupDebugText = ""
Var TimeOutSmoothiesProcess = 3
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;SAVELOG SoundPlaying
If TimeOutSmoothiesProcess > 0 Then
Var TimeOutSmoothiesProcess = countDownRetrun - 1
EndIf
If TimeOutSmoothiesProcess = 0 Then
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
Refresh
TimerReset
</EventTimeout>

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>