"Enable" 1080 1920
; "0xeae6e1" SoundVolume
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
Var UserSeletedSugar = 0
SAVELOG "Event Open Select 8"
If NoWaitMachineEnable = 1 Then
Var ConfirmDrinkButtonState = "Enable"
Else
Var ConfirmDrinkButtonState = "Invisible"
EndIf
Var y_topping_bg = 912
Var CHECK_EventOpen_Double = CHECK_EventOpen_Double + 1
If CHECK_EventOpen_Double > 1 Then
WRITE_FILE "/mnt/sdcard/xml_alert_bug" "double called"
EndIf
WEB "DISABLE"
DEBUGVAR Seeker
Var BGSugarNew = "Invisible"
DEBUGVAR video_menu_0
DEBUGVAR SelectDrink
DEBUGVAR PictureDrink
Var SaveProductCodeSelect = "-"
Var UserSelectProductCode = "-"
Var showText4 = "Invisible"
Var showText7 = "Invisible"
DEBUGVAR UserSelectProductCode
Var blendedState = "Enable"
Var DisableUsingCode = "false"
Var ShowLidStraw = "Invisible"
Var ShowLidOnly = "Invisible"
Var ShowCollagenOnly = "Invisible"
Var blendedStateShow = "Invisible"
Var ShotCoffeeBG = "Invisible"
Var showShotEnable = "Invisible"
Var ShowLidStraw = "Invisible"
Var ShowStrawOnly = "Invisible"
Var ShowLidOnly = "Invisible"
; On open
Var lidAndStrawOldPageIgnore = "true"
Var SugarState1 = "Invisible"
Var SugarState2 = "Invisible"
Var SugarState3 = "Invisible"
Var SugarState4 = "Invisible"
Var SugarState5 = "Invisible"
Var SugarState6 = "Invisible"
Var AddShotEnable = "Invisible"
Var BGSugar = "Invisible"
Var ShotCoffeeBG = "Invisible"
Var showShotEnable = "Invisible"
Var ShotCoffeePremium = "Invisible"
Var showOreoAddEnable = "Invisible"
Var showCustomCoffee = "Invisible"
; Customer Coffee
Var CustomCoffeeEnable = "False"
Var EnableLightRoast = "Disable"
Var showCoffeeWater = "Invisible"
Var showCoffeeQuantity = "Invisible"
Var showCoffeeLevel = "Invisible"
Var showCoffeeTamping = "Invisible"
; States
Var CustomCoffeeWaterState[0] = "Enable"
Var CustomCoffeeWaterState[1] = "Enable"
Var CustomCoffeeWaterState[2] = "Enable"
Var CustomCoffeeWaterState[3] = "Enable"
Var CustomCoffeeWaterState[4] = "Enable"
Var CustomCoffeeQuantityState[0] = "Enable"
Var CustomCoffeeQuantityState[1] = "Enable"
Var CustomCoffeeQuantityState[2] = "Enable"
Var CustomCoffeeLevelState[0] = "Enable"
Var CustomCoffeeLevelState[1] = "Enable"
Var CustomCoffeeLevelState[2] = "Enable"
Var CustomCoffeeLevelState[3] = "Enable"
Var CustomCoffeeTampingState[0] = "Enable"
Var CustomCoffeeTampingState[1] = "Enable"
Var CustomCoffeeTampingState[2] = "Enable"
; Texts
Var CustomCoffeeTextY = 47
Var custom_coffee_offset_text_x = 0
Var CustomCoffeeWaterText[0] = "20ml"
Var CustomCoffeeWaterText[1] = "30ml"
Var CustomCoffeeWaterText[2] = "40ml"
Var CustomCoffeeWaterText[3] = "50ml"
Var CustomCoffeeWaterText[4] = "60ml"
Var CustomCoffeeQuantityText[0] = "10g"
Var CustomCoffeeQuantityText[1] = "13g"
Var CustomCoffeeQuantityText[2] = "16g"
; End Customer Coffee
Var BGSugarHotHealthy = "Invisible"
Var BGSugarColdHealthy = "Invisible"
Var showText8 = "Invisible"
;Var showShotEnable = "Enable"
;Var ShotCoffeePremium = "Enable"
;Var showOreoAddEnable = "Enable"
;Var showCustomCoffee = "Enable"
Var CerealMilkToppingEnable = "Invisible"
Var ExtraTopping = "Invisible"
; On open
Var LidState = Lid1Status
;SAVELOG PreviseXMLFileName2
Var MenuReady = "-"
Var topping1 = "1"
Var topping2 = "31"
Var topping3 = "31"
Var BugFlag = 0
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/topping2_en"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var showname = NameDrink
Var showdesc = DrinkDescription
Var text_show_thai = "Invisible"
Var text_show_eng = "Enable"
Var topping_shot_price_x = 630
Var text_x_add_oreo_price = 430
Var text_show_normal_x = 408
Var text_x_free_adjust = 100
If PromotionOreoToppingFreeEnable = 0 Then
Var text_x_free_adjust = text_x_free_adjust + 5
EndIf
Var CustomCoffeeLevelText[0] = "Medium"
Var CustomCoffeeLevelText[1] = "Just Right"
Var CustomCoffeeLevelText[2] = "Dark"
Var CustomCoffeeLevelText[3] = "Darker"
Var CustomCoffeeTampingText[0] = "Light"
Var CustomCoffeeTampingText[1] = "Medium"
Var CustomCoffeeTampingText[2] = "Hight"
Var custom_coffee_level_medium_text_x = 540
Var custom_coffee_level_medium_price_x = 600
Var custom_coffee_level_darker_text_x = 880
Var custom_coffee_level_dark_text_x = 785
Else
Var DirImage = "ROOT/taobin_project/image/topping2"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var showname = NameDrinkTH
Var showdesc = DrinkDescriptionTH
Var text_show_thai = "Enable"
Var text_show_eng = "Invisible"
Var topping_shot_price_x = 600
Var text_x_add_oreo_price = 420
Var text_show_normal_x = 386
Var text_x_free_adjust = 70
If PromotionOreoToppingFreeEnable = 0 Then
Var text_x_free_adjust = text_x_free_adjust + 30
EndIf
Var CustomCoffeeLevelText[0] = "กลาง"
Var CustomCoffeeLevelText[1] = "กำลังพอดี"
Var CustomCoffeeLevelText[2] = "เข้ม"
Var CustomCoffeeLevelText[3] = "เข้มกว่า"
Var CustomCoffeeTampingText[0] = "เบา"
Var CustomCoffeeTampingText[1] = "ปานกลาง"
Var CustomCoffeeTampingText[2] = "เน้น"
Var custom_coffee_level_medium_text_x = 560
Var custom_coffee_level_medium_price_x = 600
Var custom_coffee_level_darker_text_x = 880
Var custom_coffee_level_dark_text_x = 790
EndIf
Var text_x_free_topping = text_x_add_oreo_price + text_x_free_adjust
Var bg_strawlid = DirImage + "/bg_strawlid.png"
Var bg_straw_only = DirImage + "/bg_straw_only.png"
Var bg_lid_only = DirImage + "/bg_lid_only.png"
Var backGroundAddExtra = DirImage + "/bg_add_shot_coffee_only.png"
Var backGroundAddExtra2 = DirImage + "/bg_add_shot_coffee_only.png"
Var backGroundAddShotPremium = DirImage + "/bg_add_shot_coffee2_only.png"
Var backGroundAddShotPremiumWith = DirImage + "/bg_add_shot_coffee_only.png"
;Var blendedState = "Enable"
;Var ShotCoffeeBG = "Enable"
;Var showShotEnable = "Enable"
;Var ShowLidStraw = "Enable"
;Var ShowStrawOnly = "Enable"
;Var ShowLidOnly = "Enable"
Var ShiftSugarStep = 1
CRLFToSpace showname
CRLFToSpace showdesc
;- Begin
Var PriceDrinkNoTop = PriceDrink
Var PriceDrinkTmp = PriceDrink
Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
Var Timeout = 0
;SAVELOG PriceDrinkTmp
;- End
If RoadShow = "true" Then
Var PriceDrinkTmp = "Free"
Var SaveSelectDrinkRoadShow = SelectDrink
EndIf
DEBUGVAR SaveSelectDrinkRoadShow
If ShowPrice = "Invisible" Then
Var PriceDrinkTmpShow = "Free"
EndIf
Var StateImgKeto = "Invisible"
Var ToppingGotoPayment = "true"
DEBUGVAR backGroundAddExtra
DEBUGVAR backGroundAddShotPremium
DEBUGVAR MultiPayEnable
DEBUGVAR CART_COUNT
Var btnAddCart = "Invisible"
If MultiPayEnable = "true" Then
Var btnAddCart = "Enable"
If CART_COUNT = 3 Then
Var btnAddCart = "Invisible"
EndIf
EndIf
Var LidDeactiveButton = "Invisible"
Var StrawDeactiveButton = "Invisible"
Machine DoorClose
Machine DoorLidClose
Var ButtonNext = "false"
Var NEW_MULTI = "Invisible"
Var high_light_drink_type = "Invisible"
Var text_hot_color = "0x84776F"
Var text_cold_color = "0x84776F"
Var text_blender_color = "0x84776F"
If new_layout = "true" Then
Var PriceDrinkTmpShow = "---"
Var show_select_type = "Enable"
Var hot_button_state = PD_STAGE_1
Var cold_button_state = PD_STAGE_2
Var blend_button_state = PD_STAGE_3
; Protect have product-code but menu disable or invalid.
If hot_button_state = "Invisible" Then
Var hot_button_state = "Disable2"
EndIf
If cold_button_state = "Invisible" Then
Var cold_button_state = "Disable2"
EndIf
If blend_button_state = "Invisible" Then
Var blend_button_state = "Disable2"
EndIf
Function 2
Else
Var show_select_type = "Invisible"
; assume auto select
Var SelectDrinkType = 1
EndIf
DEBUGVAR show_select_type
DEBUGVAR PriceD1
DEBUGVAR PriceD2
DEBUGVAR PriceD3
If hot_button_state = "Disable2" Then
Var text_price_d1 = ""
Else
Var text_price_d1 !assigned StringFmt( PriceD1 , DisplayFormat, PreScaleConvertShow)
EndIf
If cold_button_state = "Disable2" Then
Var text_price_d2 = ""
Else
Var text_price_d2 !assigned StringFmt( PriceD2 , DisplayFormat, PreScaleConvertShow)
EndIf
If blend_button_state = "Disable2" Then
Var text_price_d3 = ""
Else
Var text_price_d3 !assigned StringFmt( PriceD3 , DisplayFormat, PreScaleConvertShow)
EndIf
DEBUGVAR PD_CODE1
DEBUGVAR PD_CODE2
DEBUGVAR PD_CODE3
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var img_cold = "/bt_cold_no.png"
Var img_cold_sel = "/bt_cold_selected_no.png"
Var img_cold_dis = "/bt_cold_disable_no.png"
Var img_cold_dis2 = "/bt_cold_disable2_no.png"
Var img_smth = "/bt_smoothie_no.png"
Var img_smth_sel = "/bt_smoothie_selected_no.png"
Var img_smth_dis = "/bt_smoothie_disable_no.png"
Var img_smth_dis2 = "/bt_smoothie_disable2_no.png"
Var CerealMilkEnable = "Enable"
Var topping_price_refresh = 1
Var StrawState = "Enable"
Var LidState = "Enable"
Var MAT_ID_9701 = StrawState
Var SubMenuGroupIDSlot6_1 = 0
Var bg_lidProblem_ST = "Invisible"
Var GetLidButtonState = "Invisible"
Var PromotionIDCurrentOrder = 0
DEBUGVAR PromotionIDCurrentOrder
Var DiscountWithIdentifyState = "Invisible"
Var WelcomeDrinkButtonState = "Invisible"
DEBUGVAR Price5Active
DEBUGVAR EnableLiveness
DEBUGVAR DiscountWithIdentifyState
DEBUGVAR WelcomeDrinkEnable
If OreoWelcomeDrinkFromClick = 1 Then
Var OreoWelcomeDrinkFromClick = 0
Var WelcomeDrinkButtonState = "Enable"
EndIf
DEBUGVAR WelcomeDrinkButtonState
If EnableLiveness = "true" Then
If CameraCount = 1 Then
; echo -n true > /mnt/sdcard/enable_discount_price5
READ_FILE "/mnt/sdcard/enable_discount_price5" EnableDiscountPrice5
DEBUGVAR EnableDiscountPrice5
If EnableDiscountPrice5 = "true" Then
Var EnableDiscountWithIdentify = 1
Var DiscountWithIdentifyState = "Enable"
EndIf
EndIf
EndIf
If show_eng = "true" Then
Var CerealMilkX = 400
Else
Var CerealMilkX = 270
EndIf
1000
DEBUGVAR Timeout
DEBUGVAR MenuReady
DEBUGVAR CupRemain
DEBUGVAR FreePowerup
If SelectDrinkType = 1 Then
If MenuReady = "YES" Then
; echo -n true > /mnt/sdcard/coffeevending/menu_blend_free
READ_FILE "/mnt/sdcard/coffeevending/menu_blend_free" menu_blend_free
DEBUGVAR menu_blend_free
DEBUGVAR blend_button_state
If menu_blend_free = "true" Then
If blend_button_state = "PressForever" Then
Var PriceDrinkNoTop = 0
Var PriceDrink = 0
Var PriceDrinkTmpShow = "Free"
EndIf
EndIf
If Seeker = "next" Then
If CupRemain > 0 Then
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf
Else
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf
EndIf
EndIf
Var Timeout = Timeout + 1
If Timeout > 40 Then
Var Timeout = 0
If Seeker = "next" Then
If ChildrenFree = 1 Then
Var ChildrenFree = 0
Var Cid = 33
Var PointCrm = "0"
Var GetScore = "1"
AddData Cid TelNumPromotion IDNum PointCrm GetScore
EndIf
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
If ChildrenFree = 1 Then
Var ChildrenFree = 0
Var Cid = 33
Var PointCrm = "0"
Var GetScore = "1"
AddData Cid TelNumPromotion IDNum PointCrm GetScore
EndIf
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
EndIf
If MultiPayEnable = "true" Then
If NEW_MULTI = "Invisible" Then
Var NEW_MULTI = "Enable"
Else
Var NEW_MULTI = "Invisible"
EndIf
EndIf
If Seeker = "curr" Then
If DoorCupPosition = "bottom" Then
; It normal
Var EmergencyStop = "false"
Else
Var EmergencyStop = "true"
EndIf
EndIf
If NoWaitMachineEnable = 1 Then
DEBUGVAR MachineStage
DEBUGVAR ConfirmDrinkButtonState
If MachineStage = "close-maintenance" Then
Var ConfirmDrinkButtonState = "Enable"
If stop_now = "true" Then
Open "ROOT/taobin_project/xml/page_back_to_error.xml"
EndIf
Else
Var ConfirmDrinkButtonState = "Invisible"
EndIf
Else
EndIf
If show_eng = "true" Then
If MACHINE_SELF_TEST_COUNT_DOWN > 0 Then
Var ShowTextSelfTestCountDown = "Please wait a moment (" + MACHINE_SELF_TEST_COUNT_DOWN
Var ShowTextSelfTestCountDown = ShowTextSelfTestCountDown + ")"
Else
Var ShowTextSelfTestCountDown = "Please wait a moment"
EndIf
Else
If MACHINE_SELF_TEST_COUNT_DOWN > 0 Then
Var ShowTextSelfTestCountDown ="กรุณารอสักครู่ (" + MACHINE_SELF_TEST_COUNT_DOWN
Var ShowTextSelfTestCountDown = ShowTextSelfTestCountDown + ")"
Else
Var ShowTextSelfTestCountDown ="กรุณารอสักครู่"
EndIf
EndIf
Refresh
TimerReset
0 380 1080 1540 "0xeae6e1"
;include="ROOT/taobin_project/inc/video.inc"
; back
DEBUGVAR MAT_ID_9701
DEBUGVAR MAT_ID_9601
DEBUGVAR SubMenuProductCode1
DEBUGVAR SubMenuName11
DEBUGVAR SubMenuPrice1
DEBUGVAR SubMenuProductCode2
DEBUGVAR SubMenuName12
DEBUGVAR TOPPING1
DEBUGVAR TOPPING1_EXT_2
DEBUGVAR TOPPING2
DEBUGVAR TOPPING3
DEBUGVAR TOPPING4
DEBUGVAR TOPPING5
DEBUGVAR TOPPING6
DEBUGVAR TOPPING7
DEBUGVAR TOPPING8
DEBUGVAR TOPPING9
DEBUGVAR TOPPING10
DEBUGVAR toppingID1index1
DEBUGVAR toppingID1index2
DEBUGVAR toppingID1index3
DEBUGVAR toppingID1index4
DEBUGVAR toppingID1index5
DEBUGVAR toppingID1index6
DEBUGVAR toppingID1index7
DEBUGVAR toppingID1index8
DEBUGVAR toppingID1index9
DEBUGVAR toppingID2index1
DEBUGVAR toppingID2index2
DEBUGVAR toppingID2index3
DEBUGVAR toppingID2index4
DEBUGVAR toppingID2index5
DEBUGVAR toppingID7index1
DEBUGVAR toppingID7index2
DEBUGVAR toppingID7index3
DEBUGVAR toppingID7index4
DEBUGVAR toppingID7index5
DEBUGVAR toppingID8index1
DEBUGVAR toppingID8index2
DEBUGVAR toppingID8index3
DEBUGVAR toppingID9index1
DEBUGVAR toppingID9index2
DEBUGVAR toppingID9index3
DEBUGVAR toppingID9index4
DEBUGVAR toppingID10index1
DEBUGVAR toppingID10index2
DEBUGVAR toppingID10index3
If toppingID1index5 > 0 Then
SAVELOG "toppingID1index5 not set"
EndIf
DEBUGVAR toppingID1Default
DEBUGVAR toppingID2Default
DEBUGVAR toppingID3Default
DEBUGVAR toppingID7Default
DEBUGVAR toppingID8Default
DEBUGVAR toppingID9Default
DEBUGVAR toppingID10Default
DEBUGVAR MenuCodeName1
DEBUGVAR MenuCodeName2
DEBUGVAR SubMenuOnTop1
DEBUGVAR SubMenuOnTop2
DEBUGVAR SubMenuOnTop3
DEBUGVAR SubMenuProductCode1
DEBUGVAR SubMenuProductCode2
DEBUGVAR SubMenuProductCode3
DEBUGVAR toppingID2price1
DEBUGVAR toppingID2price2
DEBUGVAR toppingID2price3
DEBUGVAR toppingID2price4
DEBUGVAR toppingID3price2
DEBUGVAR toppingID6price2
DEBUGVAR toppingID8price1
DEBUGVAR toppingID8price2
DEBUGVAR toppingID8price3
DEBUGVAR toppingID9price1
DEBUGVAR toppingID9price2
DEBUGVAR toppingID9price3
DEBUGVAR toppingID9price4
DEBUGVAR BrewParam
DEBUGVAR UserSeletedSugar
If BugFlag = 1 Then
Else
If TOPPING6 = "Topping-Volcano" Then
If toppingID6price2 > 0 Then
DEBUGVAR toppingID6price2
DEBUGVAR DisplayFormat
Var toppingID6price2Conv !assigned StringFmt( toppingID6price2 , DisplayFormat, PreScaleConvertShow)
DEBUGVAR toppingID6price2Conv
Var text_price_6 = ""
Var text_price_6 = toppingID6price2Conv + ")"
Var text_price_6 = "(+" + text_price_6
DEBUGVAR text_price_6
Else
Var text_price_6 = ""
EndIf
If blend_button_state = "PressForever" Then
Var showOreoAddEnable = "Enable"
Var showText8 = "Invisible"
; Var showCustomCoffee = "Enable"
; Var showCoffeeWater = "Enable"
; Var showCoffeeQuantity = "Enable"
; Var showCoffeeLevel = "Enable"
; Var showCoffeeTamping = "Enable"
Else
Var showOreoAddEnable = "Disable"
Var showText8 = "Enable"
; Var showCustomCoffee = "Invisible"
; Var showCoffeeWater = "Invisible"
; Var showCoffeeQuantity = "Invisible"
; Var showCoffeeLevel = "Invisible"
; Var showCoffeeTamping = "Invisible"
EndIf
Var ExtraTopping = "Enable"
If blend_button_state = "Disable2" Then
If hot_button_state = "Disable2" Then
If cold_button_state = "PressForever" Then
Var showOreoAddEnable = "Enable"
Var showText8 = "Invisible"
EndIf
EndIf
EndIf
EndIf
DEBUGVAR SubMenuGroupIDSlot6_1
Var PriceCustomCoffeeFormat = "%.0f฿"
If TOPPING7 = "water-level" Then
Var CustomCoffeeEnable = "True"
Var showCustomCoffee = "Enable"
Var showCoffeeWater = "Enable"
If toppingID7Default = "" Then
Var CustomCoffeeWaterState[0] = "PressForever"
Else
If toppingID7index1 = toppingID7Default Then
Var CurrentCoffeeWaterId = toppingID7index1
Var CustomCoffeeWaterState[0] = "PressForever"
Var CustomCoffeeWaterState[1] = "Enable"
Var CustomCoffeeWaterState[2] = "Enable"
Var CustomCoffeeWaterState[3] = "Enable"
Var CustomCoffeeWaterState[4] = "Enable"
EndIf
If toppingID7index2 = toppingID7Default Then
Var CurrentCoffeeWaterId = toppingID7index2
Var CustomCoffeeWaterState[0] = "Enable"
Var CustomCoffeeWaterState[1] = "PressForever"
Var CustomCoffeeWaterState[2] = "Enable"
Var CustomCoffeeWaterState[3] = "Enable"
Var CustomCoffeeWaterState[4] = "Enable"
EndIf
If toppingID7index3 = toppingID7Default Then
Var CurrentCoffeeWaterId = toppingID7index3
Var CustomCoffeeWaterState[0] = "Enable"
Var CustomCoffeeWaterState[1] = "Enable"
Var CustomCoffeeWaterState[2] = "PressForever"
Var CustomCoffeeWaterState[3] = "Enable"
Var CustomCoffeeWaterState[4] = "Enable"
EndIf
If toppingID7index4 = toppingID7Default Then
Var CurrentCoffeeWaterId = toppingID7index4
Var CustomCoffeeWaterState[0] = "Enable"
Var CustomCoffeeWaterState[1] = "Enable"
Var CustomCoffeeWaterState[2] = "Enable"
Var CustomCoffeeWaterState[3] = "PressForever"
Var CustomCoffeeWaterState[4] = "Enable"
EndIf
If toppingID7index5 = toppingID7Default Then
Var CurrentCoffeeWaterId = toppingID7index5
Var CustomCoffeeWaterState[0] = "Enable"
Var CustomCoffeeWaterState[1] = "Enable"
Var CustomCoffeeWaterState[2] = "Enable"
Var CustomCoffeeWaterState[3] = "Enable"
Var CustomCoffeeWaterState[4] = "PressForever"
EndIf
EndIf
EndIf
If TOPPING9 = "single-shot-espv2" Then
Var CustomCoffeeEnable = "True"
Var showCustomCoffee = "Enable"
var showCoffeeLevel = "Enable"
If toppingID9Default = "" Then
Var CustomCoffeeLevelState[1] = "PressForever"
Else
If toppingID9index1 = toppingID9Default Then
Var CurrentCoffeeLevelId = toppingID9index1
Var CustomCoffeeLevelState[0] = "PressForever"
Var CustomCoffeeLevelState[1] = "Enable"
Var CustomCoffeeLevelState[2] = "Enable"
Var CustomCoffeeLevelState[3] = "Enable"
EndIf
If toppingID9index2 = toppingID9Default Then
Var CurrentCoffeeLevelId = toppingID9index2
Var CustomCoffeeLevelState[0] = "Enable"
Var CustomCoffeeLevelState[1] = "PressForever"
Var CustomCoffeeLevelState[2] = "Enable"
Var CustomCoffeeLevelState[3] = "Enable"
EndIf
If toppingID9index3 = toppingID9Default Then
Var CurrentCoffeeLevelId = toppingID9index3
Var CustomCoffeeLevelState[0] = "Enable"
Var CustomCoffeeLevelState[1] = "Enable"
Var CustomCoffeeLevelState[2] = "PressForever"
Var CustomCoffeeLevelState[3] = "Enable"
EndIf
If toppingID9index4 = toppingID9Default Then
Var CurrentCoffeeLevelId = toppingID9index4
Var CustomCoffeeLevelState[0] = "Enable"
Var CustomCoffeeLevelState[1] = "Enable"
Var CustomCoffeeLevelState[2] = "Enable"
Var CustomCoffeeLevelState[3] = "PressForever"
EndIf
EndIf
If toppingID9price1 > 0 Then
Var priceFormated !assigned StringFmt( toppingID9price1 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeLevelAdditionalPrice[0] = "(+" + priceFormated
Var CustomCoffeeLevelAdditionalPrice[0] = CustomCoffeeLevelAdditionalPrice[0] + ")"
Else
Var CustomCoffeeLevelAdditionalPrice[0] = ""
EndIf
If toppingID9price2 > 0 Then
Var priceFormated !assigned StringFmt( toppingID9price2 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeLevelAdditionalPrice[1] = "(+" + priceFormated
Var CustomCoffeeLevelAdditionalPrice[1] = CustomCoffeeLevelAdditionalPrice[1] + ")"
Else
Var CustomCoffeeLevelAdditionalPrice[1] = ""
EndIf
If toppingID9price3 > 0 Then
Var priceFormated !assigned StringFmt( toppingID9price3 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeLevelAdditionalPrice[2] = "(+" + priceFormated
Var CustomCoffeeLevelAdditionalPrice[2] = CustomCoffeeLevelAdditionalPrice[2] + ")"
Else
Var CustomCoffeeLevelAdditionalPrice[2] = ""
EndIf
If toppingID9price4 > 0 Then
Var priceFormated !assigned StringFmt( toppingID9price4 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeLevelAdditionalPrice[3] = "(+" + priceFormated
Var CustomCoffeeLevelAdditionalPrice[3] = CustomCoffeeLevelAdditionalPrice[3] + ")"
Else
Var CustomCoffeeLevelAdditionalPrice[3] = ""
EndIf
EndIf
If TOPPING9 = "double-shot-espv2" Then
Var CustomCoffeeEnable = "True"
Var showCustomCoffee = "Enable"
var showCoffeeLevel = "Enable"
If toppingID9Default = "" Then
Var CustomCoffeeLevelState[1] = "PressForever"
Else
If toppingID9index1 = toppingID9Default Then
Var CurrentCoffeeLevelId = toppingID9index1
Var CustomCoffeeLevelState[0] = "PressForever"
Var CustomCoffeeLevelState[1] = "Enable"
Var CustomCoffeeLevelState[2] = "Enable"
Var CustomCoffeeLevelState[3] = "Enable"
EndIf
If toppingID9index2 = toppingID9Default Then
Var CurrentCoffeeLevelId = toppingID9index2
Var CustomCoffeeLevelState[0] = "Enable"
Var CustomCoffeeLevelState[1] = "PressForever"
Var CustomCoffeeLevelState[2] = "Enable"
Var CustomCoffeeLevelState[3] = "Enable"
EndIf
If toppingID9index3 = toppingID9Default Then
Var CurrentCoffeeLevelId = toppingID9index3
Var CustomCoffeeLevelState[0] = "Enable"
Var CustomCoffeeLevelState[1] = "Enable"
Var CustomCoffeeLevelState[2] = "PressForever"
Var CustomCoffeeLevelState[3] = "Enable"
EndIf
If toppingID9index4 = toppingID9Default Then
Var CurrentCoffeeLevelId = toppingID9index4
Var CustomCoffeeLevelState[0] = "Enable"
Var CustomCoffeeLevelState[1] = "Enable"
Var CustomCoffeeLevelState[2] = "Enable"
Var CustomCoffeeLevelState[3] = "PressForever"
EndIf
EndIf
If toppingID9price1 > 0 Then
Var priceFormated !assigned StringFmt( toppingID9price1 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeLevelAdditionalPrice[0] = "(+" + priceFormated
Var CustomCoffeeLevelAdditionalPrice[0] = CustomCoffeeLevelAdditionalPrice[0] + ")"
Else
Var CustomCoffeeLevelAdditionalPrice[0] = ""
EndIf
If toppingID9price2 > 0 Then
Var priceFormated !assigned StringFmt( toppingID9price2 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeLevelAdditionalPrice[1] = "(+" + priceFormated
Var CustomCoffeeLevelAdditionalPrice[1] = CustomCoffeeLevelAdditionalPrice[1] + ")"
Else
Var CustomCoffeeLevelAdditionalPrice[1] = ""
EndIf
If toppingID9price3 > 0 Then
Var priceFormated !assigned StringFmt( toppingID9price3 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeLevelAdditionalPrice[2] = "(+" + priceFormated
Var CustomCoffeeLevelAdditionalPrice[2] = CustomCoffeeLevelAdditionalPrice[2] + ")"
Else
Var CustomCoffeeLevelAdditionalPrice[2] = ""
EndIf
If toppingID9price4 > 0 Then
Var priceFormated !assigned StringFmt( toppingID9price4 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeLevelAdditionalPrice[3] = "(+" + priceFormated
Var CustomCoffeeLevelAdditionalPrice[3] = CustomCoffeeLevelAdditionalPrice[3] + ")"
Else
Var CustomCoffeeLevelAdditionalPrice[3] = ""
EndIf
EndIf
If TOPPING8 = "tampping-espv2" Then
Var CustomCoffeeEnable = "True"
Var showCustomCoffee = "Enable"
var showCoffeeTamping = "Enable"
If toppingID8Default = "" Then
Var CustomCoffeeTampingState[1] = "PressForever"
Else
If toppingID8index1 = toppingID8Default Then
Var CurrentCoffeeTampingId = toppingID8index1
Var CustomCoffeeTampingState[0] = "PressForever"
Var CustomCoffeeTampingState[1] = "Enable"
Var CustomCoffeeTampingState[2] = "Enable"
EndIf
If toppingID8index2 = toppingID8Default Then
Var CurrentCoffeeTampingId = toppingID8index2
Var CustomCoffeeTampingState[0] = "Enable"
Var CustomCoffeeTampingState[1] = "PressForever"
Var CustomCoffeeTampingState[2] = "Enable"
EndIf
If toppingID8index3 = toppingID8Default Then
Var CurrentCoffeeTampingId = toppingID8index3
Var CustomCoffeeTampingState[0] = "Enable"
Var CustomCoffeeTampingState[1] = "Enable"
Var CustomCoffeeTampingState[2] = "PressForever"
EndIf
EndIf
EndIf
; i f Hot menu disable away
If hot_button_state = "PressForever" Then
If showOreoAddEnable = "Enable" Then
Var showOreoAddEnable = "Disable"
EndIf
If showOreoAddEnable = "Press" Then
Var showOreoAddEnable = "Disable"
EndIf
EndIf
; first time.
If blend_button_state = "PressForever" Then
Else
If SubMenuGroupIDSlot6_1 = 300 Then
Var showOreoAddEnable = "Disable"
Var showText8 = "Enable"
Var ExtraTopping = "Enable"
EndIf
EndIf
STRCONTAIN "9701" BrewParam IgnoreLidStraw
DEBUGVAR BrewParam
DEBUGVAR IgnoreLidStraw
Var h_block_of_sugar = 210
If IgnoreLidStraw = "true" Then
Var IgnoreLidStraw = "false"
Var ShowLidStraw = "Invisible"
Var ShowLidOnly = "Invisible"
Var ShowStrawOnly = "Invisible"
Else
Var ShowLidStraw = "Enable"
If StrawState = "Enable" Then
If MAT_ID_9701 = "Enable" Then
Var StrawState = MAT_ID_9701
Else
Var StrawState = MAT_ID_9701
EndIf
EndIf
DEBUGVAR MAT_ID_9701
DEBUGVAR StrawState
If StrawState = "Press" Then
Var Seeker.thankStrawFlag = 1
Else
Var Seeker.thankStrawFlag = 0
EndIf
If LidState = "Enable" Then
If MAT_ID_9601 = "Enable" Then
Var LidState = "Enable"
Else
Var LidState = "Enable"
EndIf
EndIf
EndIf
; Override all
If Service_LidStraw = "Disable" Then
Var ShowLidStraw = "Enable"
;Var ShowLidOnly = "Invisible"
;Var ShowStawOnly = "Invisible"
;Var StrawState = "Disable"
;Var LidState = "Disable"
EndIf
If StrawState = "Enable" Then
Var StrawDeactiveButton = "Invisible"
Else
If StrawState = "Press" Then
Var StrawDeactiveButton = "Invisible"
Else
Var StrawDeactiveButton = "Enable"
EndIf
EndIf
If LidState = "Enable" Then
Var LidDeactiveButton = "Invisible"
Else
If LidState = "Press" Then
Var LidDeactiveButton = "Invisible"
Else
Var LidDeactiveButton = "Enable"
EndIf
EndIf
If UserSeletedSugar = 0 Then
If SugarModeUpdateWhenChangeDrinkType = 1 Then
Var SugarModeUpdateWhenChangeDrinkType = 0
RefreshAll
Else
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
Var SugarState5 = "Enable"
Var SugarState6 = "Enable"
EndIf
Var sugar_default_flag = 0
; Suger 4 step cold
If TOPPING1 = "Suger 4 step cold" Then
Var BGSugar = "Invisible"
Var ShiftSugarStep = 1
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState1 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState1 = "PressForever"
EndIf
EndIf
; Suger 4 step hot
If TOPPING1 = "Suger 4 step hot" Then
Var BGSugar = "Invisible"
Var ShiftSugarStep = 1
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState1 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState1 = "PressForever"
EndIf
EndIf
DEBUGVAR RecipeTag2
;
If TOPPING1 = "Sugar" Then
If RecipeTag2 = "Topping6Step" Then
Var BGSugar = "Invisible"
Var BGSugarNew = "Enable"
Else
Var BGSugar = "Enable"
EndIf
Var ShiftSugarStep = 1
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
Var SugarState5 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState1 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index5 = toppingID1Default Then
Var SugarState5 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState1 = "PressForever"
EndIf
EndIf
If TOPPING1 = "Powder Sugar for Hot" Then
If RecipeTag2 = "Topping6Step" Then
Var BGSugar = "Invisible"
Var BGSugarNew = "Enable"
Else
Var BGSugar = "Enable"
EndIf
Var ShiftSugarStep = 1
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
Var SugarState5 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState1 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index5 = toppingID1Default Then
Var SugarState5 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState1 = "PressForever"
EndIf
EndIf
If TOPPING1 = "Powder Sugar" Then
If RecipeTag2 = "Topping6Step" Then
Var BGSugar = "Invisible"
Var BGSugarNew = "Enable"
Else
Var BGSugar = "Enable"
EndIf
Var ShiftSugarStep = 1
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
Var SugarState5 = "Enable"
Var SugarState6 = "Enable"
DEBUGVAR "set default Powder Sugar"
If toppingID1index1 = toppingID1Default Then
Var SugarState1 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index5 = toppingID1Default Then
Var SugarState5 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState1 = "PressForever"
EndIf
DEBUGVAR toppingID1Default
DEBUGVAR SugarState1
EndIf
If TOPPING1 = "Sugar Premix 25" Then
If RecipeTag2 = "Topping6Step" Then
Var BGSugar = "Invisible"
Var BGSugarNew = "Enable"
Else
Var BGSugar = "Enable"
EndIf
Var ShiftSugarStep = 2
Var SugarState1 = "Disable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
Var SugarState5 = "Enable"
Var SugarState6 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState5 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState2 = "PressForever"
EndIf
EndIf
If TOPPING1 = "Powder Sugar Premix 50" Then
If RecipeTag2 = "Topping6Step" Then
Var BGSugar = "Invisible"
Var BGSugarNew = "Enable"
Else
Var BGSugar = "Enable"
EndIf
Var ShiftSugarStep = 3
Var SugarState1 = "Disable"
Var SugarState2 = "Disable"
If RecipeTag2 = "Topping6Step" Then
Var SugarState3 = "Disable"
Else
Var SugarState3 = "Enable"
EndIf
Var SugarState4 = "Enable"
Var SugarState5 = "Enable"
Var SugarState6 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState5 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState3 = "PressForever"
EndIf
EndIf
If TOPPING1 = "Powder Sugar Premix 25" Then
If RecipeTag2 = "Topping6Step" Then
Var BGSugar = "Invisible"
Var BGSugarNew = "Enable"
Else
Var BGSugar = "Enable"
EndIf
Var ShiftSugarStep = 2
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
Var SugarState5 = "Enable"
If toppingID1index1 = toppingID1Default Then
Var SugarState2 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index2 = toppingID1Default Then
Var SugarState3 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index3 = toppingID1Default Then
Var SugarState4 = "PressForever"
Var sugar_default_flag = 1
EndIf
If toppingID1index4 = toppingID1Default Then
Var SugarState5 = "PressForever"
Var sugar_default_flag = 1
EndIf
If sugar_default_flag = 0 Then
Var SugarState2 = "PressForever"
EndIf
EndIf
Var SugarModeUpdateWhenChangeDrinkType = 0
If TOPPING1 = "Suger 4 step cold" Then
Var BGSugarColdHealthy = "Enable"
Var BGSugarHotHealthy = "Invisible"
Var ShiftSugarStep = 1
Var SugarModeUpdateWhenChangeDrinkType = 1
EndIf
If TOPPING1 = "Suger 4 step hot" Then
Var BGSugarHotHealthy = "Enable"
Var BGSugarColdHealthy = "Invisible"
Var ShiftSugarStep = 1
Var SugarModeUpdateWhenChangeDrinkType = 1
EndIf
Var ShowCollagenOnly = "Enable"
Var BugFlag = 1
Var topping1 = toppingID1Default
Var ToppingGotoPayment = "false"
If BGSugar = "Enable" Then
If SelectDrinkType = 1 Then
If show_eng = "true" Then
Play "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Sweet.mp3"
Else
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/select_level.mp3"
; Play Sound #zone
If SoundBackToSchoolEnable = 1 Then
If SoundBackToSchoolType = 1 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/boy/"
EndIf
If SoundBackToSchoolType = 2 Then
Var RootPathSoundBackToSchool = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/girl/"
EndIf
Var PlaySoundLag = RootPathSoundBackToSchool + "select_level.wav"
EndIf
Play PlaySoundLag
EndIf
EndIf
EndIf
DEBUGVAR SelectDrinkType
If SelectDrinkType = 0 Then
Var SugarState1 = "Enable"
Var SugarState2 = "Enable"
Var SugarState3 = "Enable"
Var SugarState4 = "Enable"
Var SugarState5 = "Enable"
EndIf
Else
EndIf
; End of UserSeletedSugar = 0
Refresh
Var collagenShow = "true"
;-BEGIN shot layout
If topping_price_refresh = 1 Then
Var topping_price_refresh = 0
Var topping3 = toppingID3Default
Var shot_h_layout = 218
If TOPPING2 = "shot coffee" Then
Var ShotCoffeeBG = "Enable"
Var showShotEnable = "Enable"
Var ExtraTopping = "Enable"
Var toppingID2price2Conv !assigned StringFmt( toppingID2price2 , DisplayFormat, PreScaleConvertShow)
DEBUGVAR toppingID2price2Conv
Var text_shot_normal_add = toppingID2price2Conv + ")"
Var text_shot_normal_add = "(+" + text_shot_normal_add
Refresh
EndIf
If TOPPING2 = "shot coffee termtem" Then
Var ShotCoffeeBG = "Enable"
Var showShotEnable = "Enable"
Var ExtraTopping = "Enable"
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "shot coffee 1003" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "shot coffee 1007" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "shot coffee 1008" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1009" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1101" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1102" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1103" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1104" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1105" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1106" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1107" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If TOPPING2 = "add-show-1108" Then
If toppingID2index3 = "" Then
Var ShotCoffeePremium = "Enable"
Var showShotEnable = "Invisible"
Var ExtraTopping = "Enable"
Else
Var EnableLightRoast = "Enable"
EndIf
DEBUGVAR TOPPING2
Refresh
EndIf
If ShotCoffeePremium = "Enable" Then
Var toppingID2price2Conv !assigned StringFmt( toppingID2price2 , DisplayFormat, PreScaleConvertShow)
DEBUGVAR toppingID2price2Conv
Var text_price_topping = toppingID2price2Conv + ")"
Var text_price_topping = "(+" + text_price_topping
EndIf
If EnableLightRoast = "Enable" Then
Var CustomCoffeeEnable = "True"
Var showCustomCoffee = "Enable"
var showCoffeeQuantity = "Enable"
If toppingID2Default = "" Then
Var CustomCoffeeQuantityState[1] = "PressForever"
Else
If toppingID2index1 = toppingID2Default Then
Var CurrentCoffeeLevelId = toppingID2index1
Var CustomCoffeeQuantityState[0] = "PressForever"
Var CustomCoffeeQuantityState[1] = "Enable"
Var CustomCoffeeQuantityState[2] = "Enable"
EndIf
If toppingID2index2 = toppingID2Default Then
Var CurrentCoffeeLevelId = toppingID2index2
Var CustomCoffeeQuantityState[0] = "Enable"
Var CustomCoffeeQuantityState[1] = "PressForever"
Var CustomCoffeeQuantityState[2] = "Enable"
EndIf
If toppingID2index3 = toppingID2Default Then
Var CurrentCoffeeLevelId = toppingID2index3
Var CustomCoffeeQuantityState[0] = "Enable"
Var CustomCoffeeQuantityState[1] = "Enable"
Var CustomCoffeeQuantityState[2] = "PressForever"
EndIf
EndIf
If toppingID2price1 > 0 Then
Var priceFormated !assigned StringFmt( toppingID2price1 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeQuantityAdditionalPrice[0] = "(+" + priceFormated
Var CustomCoffeeQuantityAdditionalPrice[0] = CustomCoffeeQuantityAdditionalPrice[0] + ")"
Else
Var CustomCoffeeQuantityAdditionalPrice[0] = ""
EndIf
If toppingID2price2 > 0 Then
Var priceFormated !assigned StringFmt( toppingID2price2 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeQuantityAdditionalPrice[1] = "(+" + priceFormated
Var CustomCoffeeQuantityAdditionalPrice[1] = CustomCoffeeQuantityAdditionalPrice[1] + ")"
Else
Var CustomCoffeeQuantityAdditionalPrice[1] = ""
EndIf
If toppingID2price3 > 0 Then
Var priceFormated !assigned StringFmt( toppingID2price3 , PriceCustomCoffeeFormat, PreScaleConvertShow)
Var CustomCoffeeQuantityAdditionalPrice[2] = "(+" + priceFormated
Var CustomCoffeeQuantityAdditionalPrice[2] = CustomCoffeeQuantityAdditionalPrice[2] + ")"
Else
Var CustomCoffeeQuantityAdditionalPrice[2] = ""
EndIf
EndIf
;-END
If TOPPING3 = "Collagen" Then
Var CollagenState = "Enable"
Else
Var CollagenState = "Invisible"
Var ShowCollagenOnly = "Invisible"
EndIf
EndIf
;topping_price_refresh = 0
If MenuCodeName1 = "Cereal-Milk" Then
Var CerealMilkToppingEnable = "Enable"
Var CerealMilkPrice = SubMenuPrice1
Var ExtraTopping = "Enable"
EndIf
SAVELOG ToppingGotoPayment
If ToppingGotoPayment = "true" Then
Topping "Select" SelectDrink
; Pack
Topping "Pack" ExtendDataCurr
Var Seeker.ExtendDataCurr = ExtendDataCurr
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_payment.xml"
EndIf
If RoadShow = "true" Then
Var PriceShowValue = "Free"
Var ModeFreeEnable = 1
Else
Var ModeFreeEnable = 0
EndIf
DEBUGVAR showShotEnable
DEBUGVAR showOreoAddEnable
DEBUGVAR ShotCoffeePremium
DEBUGVAR toppingID2price1
DEBUGVAR toppingID2price2
DEBUGVAR toppingID2price3
Function 2
EndIf
;Var BugFlag = 1
If CartUpdate = "true" Then
Var CartUpdate = "-"
If CART_COUNT = 3 Then
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
Else
If ButtonNext = "true" Then
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
Else
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
EndIf
EndIf
; same
374 382 331 436 PictureDrink 374 399 eval(
If IsSmoRet = "true" Then
Var return = "Enable"
Else
Var return = "Invisible"
EndIf
)
"ROOT/taobin_project/image/topping2/blender_icon.png"
; same
0 752 1080 Center 68
KanitMediumTTF
0x513C2F showname
; same
0 836 1080 Center 24
KanitLightTTF
0x6F5F51 showdesc
;
;
;
;
;
;
;
;
;
;
;
;
;- FRAME SCORELLL
; zone scroll
52 881 1080 880 880 "Vertical" 1
; show_select_type
988 162 20 show_select_type Var( DirImage + "/drink_select_type.png" ) 552 85
KanitRegularTTF
23 text_hot_color text_price_d1 710 85
KanitRegularTTF
23 text_cold_color text_price_d2 852 85
KanitRegularTTF
23 text_show_thai text_blender_color text_price_d3 872 85
KanitRegularTTF
text_show_eng 23 text_blender_color text_price_d3
;-END
;
;
;
;
;
;
;
;
;
;- Begin topping1
988 156 20 BGSugar
; sugar layout
BGSugar Var( DirImage + "/bg_sugar.png" )
;
; sugar1
; sugar2
; sugar3
; sugar4
; sugar5
;- END topping1
;
;
;
;
;
;
;
;
;
;
;- Begin topping new
988 156 20 BGSugarNew
; sugar layout
"Enable" Var( DirImage + "/bg_sugar_bank_button.png" )
;
; sugar1
; sugar2
; sugar3
; sugar4
; sugar5
; sugar6
;- END topping1
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;- Begin topping2
988 156 20 BGSugarHotHealthy
; sugar layout
BGSugarHotHealthy Var( DirImage + "/bg_sugar_bank_button.png" )
;
; sugar1
; sugar2
; sugar3
; sugar4
;- END topping2
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;- Begin topping3
988 156 20 BGSugarColdHealthy
; sugar layout
BGSugarColdHealthy Var( DirImage + "/bg_sugar_bank_button.png" )
;
; sugar1
; sugar2
; sugar3
; sugar4
;- END topping2
;
;
;
;
;
;
;
;
;
; Extra topping.
;
;
;
;
;
;
;-BEGIN shot layout
ExtraTopping 1080 "auto" 20 986 "auto" "vertical" ExtraTopping
;
986 64 ExtraTopping Var( DirImage + "/bg_top.png" )
;
;
;
986 "auto" CerealMilkToppingEnable
;
0 0 Var( DirImage + "/bg_top_milk.png")
;
CerealMilkX 2
KanitRegularTTF
CerealMilkEnable 36 0x84776F CerealMilkPrice
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
986 "auto" ShotCoffeePremium
;
0 0 Var( DirImage + "/bg_top_b3shot.png")
;
topping_shot_price_x 2
KanitRegularTTF
"ShotCoffeePremium" 36 0x84776F text_price_topping
;
;
;
;-BEGIN shot layout "showShotEnable"
986 "auto" showShotEnable
;
0 0 Var( DirImage + "/bg_top_shot2.png")
;
;
showText4 602 4 Var( DirImage + "/text4.png" ) text_show_normal_x 4
KanitRegularTTF
"Enable" 36 0x84776F text_shot_normal_add
;
;
;
;
;
986 "auto" showOreoAddEnable
;
0 0 Var( DirImage + "/bg_top_oreo2.png")
;
;
showText8 600 6 Var( DirImage + "/text8.png" ) text_x_add_oreo_price 12
KanitRegularTTF
"Enable" 36 0x84776F text_price_6
;
;
;
;
;
;
"Enable" 986 27 -5 ExtraTopping "ROOT/taobin_project/image/topping2/bg_bottom.png"
;
;
;
;
;
;
;
;
;
;
;
;
;
;
; TEST - BEGIN Custom coffee
showCustomCoffee 1080 "auto" 20 986 "auto" "vertical" showCustomCoffee
;
;
;
;
;
986 64 showCustomCoffee Var( DirImage + "/bg_top_custom_coffee.png" )
;
;
; Customer Coffee Water Level
986 "auto" showCoffeeWater 0 0 Var( DirImage + "/bg_custom_coffee_water_level.png" ) 472 CustomCoffeeTextY
KanitRegularTTF
showCoffeeWater 16 0x513C2F CustomCoffeeWaterText[0] 583 CustomCoffeeTextY
KanitRegularTTF
showCoffeeWater 16 0x513C2F CustomCoffeeWaterText[1] 694 CustomCoffeeTextY
KanitRegularTTF
showCoffeeWater 16 0x513C2F CustomCoffeeWaterText[2] 805 CustomCoffeeTextY
KanitRegularTTF
showCoffeeWater 16 0x513C2F CustomCoffeeWaterText[3] 916 CustomCoffeeTextY
KanitRegularTTF
showCoffeeWater 16 0x513C2F CustomCoffeeWaterText[4] 986 "auto" showCoffeeQuantity 0 0 Var( DirImage + "/bg_custom_coffee_bean_quantity.png" ) 694 CustomCoffeeTextY
KanitRegularTTF
showCoffeeQuantity 16 0x513C2F CustomCoffeeQuantityText[0] 784 CustomCoffeeTextY
KanitRegularTTF
showCoffeeQuantity 16 0x513C2F CustomCoffeeQuantityText[1] 892 CustomCoffeeTextY
KanitRegularTTF
showCoffeeQuantity 16 0x513C2F CustomCoffeeQuantityText[2]
; Additional Price
810 CustomCoffeeTextY
KanitRegularTTF
showCoffeeQuantity 16 0x84776F CustomCoffeeQuantityAdditionalPrice[1] 918 CustomCoffeeTextY
KanitRegularTTF
showCoffeeQuantity 16 0x84776F CustomCoffeeQuantityAdditionalPrice[2] 986 "auto" showCoffeeLevel 0 0 Var( DirImage + "/bg_custom_coffee_level.png" ) custom_coffee_level_medium_text_x CustomCoffeeTextY
KanitRegularTTF
showCoffeeLevel 16 0x513C2F CustomCoffeeLevelText[0] 676 CustomCoffeeTextY
KanitRegularTTF
showCoffeeLevel 16 0x513C2F CustomCoffeeLevelText[1] custom_coffee_level_dark_text_x CustomCoffeeTextY
KanitRegularTTF
showCoffeeLevel 16 0x513C2F CustomCoffeeLevelText[2] custom_coffee_level_darker_text_x CustomCoffeeTextY
KanitRegularTTF
showCoffeeLevel 16 0x513C2F CustomCoffeeLevelText[3]
; Additional Price
custom_coffee_level_medium_price_x CustomCoffeeTextY
KanitRegularTTF
showCoffeeLevel 16 0x84776F CustomCoffeeLevelAdditionalPrice[0] 720 CustomCoffeeTextY
KanitRegularTTF
showCoffeeLevel 16 0x84776F CustomCoffeeLevelAdditionalPrice[1] 820 CustomCoffeeTextY
KanitRegularTTF
showCoffeeLevel 16 0x84776F CustomCoffeeLevelAdditionalPrice[2] 930 CustomCoffeeTextY
KanitRegularTTF
showCoffeeLevel 16 0x84776F CustomCoffeeLevelAdditionalPrice[3] 986 "auto" showCoffeeTamping 0 0 Var( DirImage + "/bg_custom_coffee_tamping_pressure.png" ) 696 CustomCoffeeTextY
KanitRegularTTF
showCoffeeTamping 16 0x513C2F CustomCoffeeTampingText[0] 790 CustomCoffeeTextY
KanitRegularTTF
showCoffeeTamping 16 0x513C2F CustomCoffeeTampingText[1] 920 CustomCoffeeTextY
KanitRegularTTF
showCoffeeTamping 16 0x513C2F CustomCoffeeTampingText[2]
;
;
;
showCustomCoffee 986 27 -5 showCustomCoffee "ROOT/taobin_project/image/topping2/bg_bottom.png"
;
;
;
;
;
;
;
;
;
;
;-BEGIN
;
;-BEGIN Lid straw
986 240 20 ShowLidStraw bg_strawlid
; straw left
; LID left
StrawDeactiveButton 602 64 Var( DirImage + "/text20.png" ) LidDeactiveButton 602 150 Var( DirImage + "/text21.png" )
;-END
;
;
;
;
;
;
;
;
;
;
;
Open "/media/bt/xml/security_alarm.xml"
; back
; add cart
; liveness + camera + IDcard
; next
Var img_cold_no_flag = 0
Var img_smth_no_flag = 0
If hot_button_state = "Disable2" Then
If blend_button_state = "Disable2" Then
Var img_cold_no_flag = 1
Else
Var img_cold_no_flag = 1
Var img_smth_no_flag = 2
EndIf
EndIf
If PriceD1 = PriceD2 Then
Var img_cold_no_flag = 1
EndIf
If hot_button_state = "Disable2" Then
If cold_button_state = "Disable2" Then
Var img_smth_no_flag = 1
EndIf
EndIf
If img_cold_no_flag = 1 Then
SAVELOG "Cold Image change."
Var img_cold = "/bt_cold_no.png"
Var img_cold_sel = "/bt_cold_selected_no.png"
Var img_cold_dis = "/bt_cold_disable_no.png"
Var img_cold_dis2 = "/bt_cold_disable2_no.png"
Else
Var img_cold = "/bt_cold.png"
Var img_cold_sel = "/bt_cold_selected.png"
Var img_cold_dis = "/bt_cold_disable.png"
Var img_cold_dis2 = "/bt_cold_disable2.png"
EndIf
If img_smth_no_flag = 1 Then
SAVELOG "Smoothies change img. 1"
Var img_smth = "/bt_smoothie_no.png"
Var img_smth_sel = "/bt_smoothie_selected_no.png"
Var img_smth_dis = "/bt_smoothie_disable_no.png"
Var img_smth_dis2 = "/bt_smoothie_disable2_no.png"
Else
If img_smth_no_flag = 2 Then
SAVELOG "Smoothies change img. 2"
Var img_smth = "/bt_smoothie_sub2.png"
Var img_smth_sel = "/bt_smoothie_selected_sub2.png"
Var img_smth_dis = "/bt_smoothie_disable_sub2.png"
Var img_smth_dis2 = "/bt_smoothie_disable2_sub2.png"
Else
Var img_smth = "/bt_smoothie.png"
Var img_smth_sel = "/bt_smoothie_selected.png"
Var img_smth_dis = "/bt_smoothie_disable.png"
Var img_smth_dis2 = "/bt_smoothie_disable2.png"
EndIf
EndIf
Var img_cold = "/bt_cold_no.png"
Var img_cold_sel = "/bt_cold_selected_no.png"
Var img_cold_dis = "/bt_cold_disable_no.png"
Var img_cold_dis2 = "/bt_cold_disable2_no.png"
Var img_smth = "/bt_smoothie_no.png"
Var img_smth_sel = "/bt_smoothie_selected_no.png"
Var img_smth_dis = "/bt_smoothie_disable_no.png"
Var img_smth_dis2 = "/bt_smoothie_disable2_no.png"
DEBUGVAR menu_name_thai_cold
SAVELOG "FUNCTION2"
Var TOPPING_PRICE = 0
Var SelectDrinkType = 0
; Set default
If SelectCountDrinkType = 1 Then
If DefaultDrinkType = 1 Then
Var hot_button_state = "PressForever"
EndIf
If DefaultDrinkType = 2 Then
Var cold_button_state = "PressForever"
EndIf
If DefaultDrinkType = 3 Then
Var blend_button_state = "PressForever"
EndIf
EndIf
If hot_button_state = "PressForever" Then
Var PriceDrinkNoTop = PriceD1
Var UserSelectProductCode = PD_CODE1
If showShotEnable = "Disable" Then
If CustomCoffeeEnable = "False" Then
Var showShotEnable = "Enable"
EndIf
EndIf
If showCustomCoffee = "Invisible" Then
If CustomCoffeeEnable = "True" Then
Var showCustomCoffee = "Enable"
EndIf
EndIf
Var showText4 = "Invisible"
If show_eng = "true" Then
Var showname = menu_name_eng_hot
Var showdesc = menu_desc_eng_hot
Else
Var showname = menu_name_thai_hot
Var showdesc = menu_desc_thai_hot
EndIf
Var text_hot_color = "0xFFFFFF"
Var text_cold_color = "0x84776F"
Var text_blender_color = "0x84776F"
Var SelectDrinkType = 1
Machine PreparCup
EndIf
If cold_button_state = "PressForever" Then
Var PriceDrinkNoTop = PriceD2
Var UserSelectProductCode = PD_CODE2
If showShotEnable = "Disable" Then
If CustomCoffeeEnable = "False" Then
Var showShotEnable = "Enable"
EndIf
EndIf
If showCustomCoffee = "Invisible" Then
If CustomCoffeeEnable = "True" Then
Var showCustomCoffee = "Enable"
EndIf
EndIf
Var showText4 = "Invisible"
If show_eng = "true" Then
Var showname = menu_name_eng_cold
Var showdesc = menu_desc_eng_cold
Else
Var showname = menu_name_thai_cold
Var showdesc = menu_desc_thai_cold
EndIf
Var text_hot_color = "0x84776F"
Var text_cold_color = "0xFFFFFF"
Var text_blender_color = "0x84776F"
Var SelectDrinkType = 1
Machine PreparCup
EndIf
If blend_button_state = "PressForever" Then
Var PriceDrinkNoTop = PriceD3
Var UserSelectProductCode = PD_CODE3
If showShotEnable = "Invisible" Then
Else
Var showShotEnable = "Disable"
EndIf
If CustomCoffeeEnable = "True" Then
Var showCustomCoffee = "Enable"
EndIf
Var showText4 = "Enable"
If show_eng = "true" Then
Var showname = menu_name_eng_blender
Var showdesc = menu_desc_eng_blender
Else
Var showname = menu_name_thai_blender
Var showdesc = menu_desc_thai_blender
EndIf
Var text_hot_color = "0x84776F"
Var text_cold_color = "0x84776F"
Var text_blender_color = "0xFFFFFF"
Var SelectDrinkType = 1
Machine PreparCup
EndIf
Var CerealMilkAddAmount = SubMenuPrice1 - PriceDrinkNoTop
If CerealMilkAddAmount = 0 Then
Var CerealMilkPrice = "(+฿10)"
Else
Var CerealMilkPrice = "(+฿" + CerealMilkAddAmount
Var CerealMilkPrice = CerealMilkPrice + ")"
Var CerealMilkPrice = "(+฿10)"
EndIf
DEBUGVAR SubMenuPrice1
DEBUGVAR CerealMilkAddAmount
DEBUGVAR PriceDrinkNoTop
DEBUGVAR PriceDiff
DEBUGVAR showShotEnable
Var TOPPING_PRICE = 0
If ShotCoffeePremium = "Press" Then
If blendedState = "Press" Then
Var PriceDrinkTmp = PriceDrinkNoTop
EndIf
Var blendedState = "Disable"
Var TOPPING_PRICE = 0
Var TOPPING_PRICE = TOPPING_PRICE + toppingID2price2
Var topping2 = toppingID2index2
Var DisableUsingCode = "true"
Var showText7 = "Enable"
SAVELOG "Select premi normal shot"
Else
If showShotEnable = "Press" Then
If blendedState = "Press" Then
Var PriceDrinkTmp = PriceDrinkNoTop
EndIf
Var blendedState = "Disable"
Var TOPPING_PRICE = 0
;Var PriceDrinkTmp = PriceDrinkNoTop + toppingID2price2
Var TOPPING_PRICE = TOPPING_PRICE + toppingID2price2
Var topping2 = toppingID2index2
Var DisableUsingCode = "true"
Var showText7 = "Enable"
SAVELOG "Select add normal shot"
Else
If blendedState = "Disable" Then
Var blendedState = "Enable"
EndIf
Var PriceDrinkTmp = PriceDrinkNoTop
Var topping2 = toppingID2index1
Var DisableUsingCode = "false"
SAVELOG "Deselect add normal shot"
Var showText7 = "Invisible"
EndIf
EndIf
DEBUGVAR showOreoAddEnable
DEBUGVAR TOPPING_PRICE
If showOreoAddEnable = "Press" Then
Var TOPPING_PRICE = TOPPING_PRICE + toppingID6price2
Var topping6 = toppingID6index2
Var DisableUsingCode = "true"
Else
;Var PriceDrinkTmp = PriceDrinkNoTop
Var topping6 = toppingID6index1
Var DisableUsingCode = "false"
EndIf
If CerealMilkEnable = "Press" Then
If MenuCodeName1 = "Cereal-Milk" Then
Var TOPPING_PRICE = TOPPING_PRICE + CerealMilkAddAmount
Var DisableUsingCode = "true"
Var UserSelectProductCode = SubMenuProductCode1
EndIf
Else
EndIf
Var CustomCoffeeDefault = "true"
DEBUGVAR showCustomCoffee
DEBUGVAR CustomCoffeeDefault
If showShotEnable = "Press" Then
; Invisible showCustomCoffee
Var showCustomCoffee = "Invisible"
Else
If CustomCoffeeEnable = "True" Then
Var showCustomCoffee = "Enable"
EndIf
EndIf
If showCustomCoffee = "Enable" Then
If showCoffeeWater = "Enable" Then
If CurrentCoffeeWaterId = toppingID7Default Then
Else
Var CustomCoffeeDefault = "false"
EndIf
EndIf
If showCoffeeQuantity = "Enable" Then
If CurrentCoffeeQuantityId = toppingID2Default Then
Else
Var CustomCoffeeDefault = "false"
EndIf
EndIf
If showCoffeeLevel = "Enable" Then
If CurrentCoffeeLevelId = toppingID9Default Then
Else
Var CustomCoffeeDefault = "false"
EndIf
EndIf
If showCoffeeTamping = "Enable" Then
If CurrentCoffeeTampingId = toppingID8Default Then
Else
Var CustomCoffeeDefault = "false"
EndIf
EndIf
DEBUGVAR CustomCoffeeDefault
If CustomCoffeeDefault = "false" Then
If showShotEnable = "Enable" Then
;Var showShotEnable = "Disable"
EndIf
Else
If showShotEnable = "Invisible" Then
Else
If blend_button_state = "PressForever" Then
Else
Var showShotEnable = "Enable"
EndIf
EndIf
EndIf
If CustomCoffeeQuantityState[0] = "PressForever" Then
Var TOPPING_PRICE = TOPPING_PRICE + toppingID2price1
EndIf
If CustomCoffeeQuantityState[1] = "PressForever" Then
Var TOPPING_PRICE = TOPPING_PRICE + toppingID2price2
EndIf
If CustomCoffeeQuantityState[2] = "PressForever" Then
Var TOPPING_PRICE = TOPPING_PRICE + toppingID2price3
EndIf
If CustomCoffeeLevelState[0] = "PressForever" Then
Var TOPPING_PRICE = TOPPING_PRICE + toppingID9price1
EndIf
If CustomCoffeeLevelState[1] = "PressForever" Then
Var TOPPING_PRICE = TOPPING_PRICE + toppingID9price2
EndIf
If CustomCoffeeLevelState[2] = "PressForever" Then
Var TOPPING_PRICE = TOPPING_PRICE + toppingID9price3
EndIf
If CustomCoffeeLevelState[3] = "PressForever" Then
Var TOPPING_PRICE = TOPPING_PRICE + toppingID9price4
EndIf
EndIf
DEBUGVAR SelectDrinkType
DEBUGVAR showShotEnable
DEBUGVAR PriceDrinkTmpShow
If Price5Active = 1 Then
Var PriceDrinkNoTop = 5
If blend_button_state = "PressForever" Then
Var PriceDrinkNoTop = 10
EndIf
EndIf
Var PriceDrinkTmp = PriceDrinkNoTop + TOPPING_PRICE
Var PriceDrinkTmpShow = charOfBaht + PriceDrinkTmp
If SelectDrinkType = 0 Then
Var PriceDrinkTmpShow = "---"
Else
Var PriceDrinkTmpShow !assigned StringFmt( PriceDrinkTmp , DisplayFormat, PreScaleConvertShow)
EndIf
SAVELOG PriceDrinkTmp
If RoadShow = "true" Then
Var PriceDrinkTmp = 0
Var PriceDrinkTmpShow = "Free"
DEBUGVAR SelectDrink2
DEBUGVAR PriceDrinkTmpShow
EndIf
; echo -n true > /mnt/sdcard/coffeevending/menu_blend_free
READ_FILE "/mnt/sdcard/coffeevending/menu_blend_free" menu_blend_free
DEBUGVAR menu_blend_free
DEBUGVAR blend_button_state
If menu_blend_free = "true" Then
If blend_button_state = "PressForever" Then
Var PriceDrinkNoTop = 0
Var PriceDrinkTmpShow = "Free"
EndIf
EndIf
BackslashNToEnter showname
BackslashNToEnter showdesc
CRLFToSpace showname
CRLFToSpace showdesc
DEBUGVAR showname
DEBUGVAR showdesc
Var Timeout = 0
RefreshAll
924 1804
KanitTTF
36 1080 0xFFFFFF "OnValueChange" PriceDrinkTmpShow
; next2 button Protect
; zone
; free oreo
; free energy drink
0 380 1080 1540 high_light_drink_type "ROOT/taobin_project/image/topping2_en/topping_en/high_light_drink_type.png" 543 920 high_light_drink_type
KanitTTF
36 1080 0xFF0000 eval(
If show_eng = "true" Then
Var return = "Please choose drink type"
Else
Var return ="โปรดเลือกประเภทเครื่องดื่ม"
EndIf
) 1 1
KanitTTF
22 1080 end 0xFF0000 "#8"
;
Var PromotionOreoToppingFreeEnable = 1
DEBUGVAR PromotionOreoToppingFreeEnable
Var PromotionOreoToppingFreeEnable = 0
DEBUGVAR PromotionOreoToppingFreeEnable