diff --git a/inter/mys/xml/page_collect_point_1.lxml b/inter/mys/xml/page_collect_point_1.lxml new file mode 100644 index 00000000..b0b7616a --- /dev/null +++ b/inter/mys/xml/page_collect_point_1.lxml @@ -0,0 +1,1092 @@ + + "Enable" + 1080 + 1920 + "0xeae6e1" + SoundVolume +; "Partial" + + ; On open + + ; jump + If IgnoreCollectPointByMe = 1 Then + Var IgnoreCollectPointByMe = 0 + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointMain = 0 Then + SAVELOG "Seeker.CollectPointMain = 0 Jump!!!" + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + EndIf + + If SettingIgnoreCollectPoint = 1 Then + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + + Var ShowErrorText = "Invisible" + + Var Tel_Confirm_State = "Invisible" + Var ShowTextNumber = "Enable" + Var Timeout = 0 + Var TelephoneNumber = "" + Var TelephoneNumberX = "" + + Var TimeOutPlay = 0 + + If show_eng = "true" Then + Var DirImage = "ROOT/taobin_project/image/collect_point1_en" + ;Play "ROOT/taobin_project/sound_eng/Reward_final.mp3" + + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png" + Else + Var DirImage = "ROOT/taobin_project/image/collect_point1" + ;Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3" + + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png" + EndIf + + If InternationalEnable = 1 Then + If LanguageShow = "UAE_DUBAI" Then + Var IMG_CNT = CountryRootPath + "/image/page_doing/img2.png" + EndIf + EndIf + + SAVELOG "collect_point1" + SAVELOG Seeker.TNumberTaobinCredit + SAVELOG TelephoneNumber + SAVELOG "collect_point1_" + + Var Seeker.FromConsent = 0 + + + Var ParamCP = "" + Var ParamCP = ParamCP + Seeker.CampaignPPrice + Var ParamCP = ParamCP + "/" + Var ParamCP = ParamCP + Seeker.CampaignPCode + Var ParamCP = ParamCP + "/" + Var ParamCP = ParamCP + Seeker.CampaignPayChanel + Var ParamCP = ParamCP + "/" + + Var CampaingRef = "" + GenHashWithTimeStamp CampaingRef + + Var CampaingRef1 = "" + Var CampaingRef2 = "" + + + SUBSTRING CampaingRef 0 6 CampaingRef1 + SUBSTRING CampaingRef 12 18 CampaingRef2 + + Var CampaingRef1 = CampaingRef1 + CampaingRef2 + Var ParamCP = ParamCP + CampaingRef1 + + Var PepweenCollectPoint = 1 + If PepweenEnable = 1 Then + If Seeker.selected_a_drink = "12-99-05-0053" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0054" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0055" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0057" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0058" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0059" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0060" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0061" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0062" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0064" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0065" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-05-0056" Then + Var PepweenCollectPoint = 0 + EndIf + If Seeker.selected_a_drink = "12-99-03-0066" Then + Var PepweenCollectPoint = 0 + EndIf + EndIf + + DEBUGVAR PepweenCollectPoint + + DEBUGVAR ProBadValentineEnable + DEBUGVAR FromBadValentinePro + DEBUGVAR LipitPro + DEBUGVAR FromLipitPro + DEBUGVAR FruityRayaEnable + DEBUGVAR FromFruityRaya + DEBUGVAR ProThaiTeaEnable + DEBUGVAR FromProThaiTea + DEBUGVAR FromProYuzu + + If Seeker.TNumberTaobinCredit = "" Then + + + If web_telnumOK = "" Then + + If show_eng = "true" Then + Play "ROOT/taobin_project/sound_eng/Reward_final.mp3" + Else + Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3" + EndIf + + Else + Var TelephoneNumber = web_telnumOK + Var StepGetPoint = 1 + + Var PdpaAsk = 0 + + Var OperatorTemp = "" + Var CreditAmount = 0 + Var OperatorStatus = "" + Var AccountType = "" + + SAVELOG "collect_point1-p52." + + + Var TelephoneNumberX = TelephoneNumber + DEBUGVAR TelephoneNumber + + If FromTeaTimePro = 1 Then + Var TelPhoneNum = TelephoneNumber + Var drink_price = PriceFromCatalog + Var param2 = "" + Var param3 = "" + AddData 45 TelPhoneNum drink_price param2 param3 + EndIf + + + + ;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc + Var Param1 = TelephoneNumber + "/" + Var Param1 = Param1 + ParamCP + + If MyMintEnable = 1 Then + If FromMyMintPro = 1 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml" + EndIf + EndIf + + DEBUGVAR FruityRayaEnable + DEBUGVAR FromFruityRaya + If FruityRayaEnable = 1 Then + If FromFruityRaya = 1 Then + Open "ROOT/taobin_project/inter/mys/xml/event/fruit_raya/page_get_free_1_fruit_raya.lxml" + EndIf + + EndIf + + DEBUGVAR ProThaiTeaEnable + DEBUGVAR FromProThaiTea + If ProThaiTeaEnable = 1 Then + If FromProThaiTea = 1 Then + Open "ROOT/taobin_project/inter/mys/xml/event/thai_tea/page_get_free_1_thai_tea.lxml" + EndIf + EndIf + + DEBUGVAR ProYuzuEnable + DEBUGVAR FromProYuzu + If ProYuzuEnable = 1 Then + If FromProYuzu = 1 Then + Open "ROOT/taobin_project/inter/mys/xml/event/yuzu/page_get_free_1_yuzu.lxml" + EndIf + EndIf + + If PepweenEnable = 1 Then + If PepweenCollectPoint = 0 Then + GETACCEXT TelephoneNumber 31 + Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml" + EndIf + EndIf + + If ProBadValentineEnable = 1 Then + If FromBadValentinePro = 1 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_2.xml" + EndIf + EndIf + + If LipitPro = 1 Then + If FromLipitPro = 1 Then + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointPromotion = 1 Then + If LipitRewardOutOfStock = 0 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_2.xml" + EndIf + EndIf + Else + If LipitRewardOutOfStock = 0 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_2.xml" + EndIf + EndIf + EndIf + EndIf + + DEBUGVAR NamHomCoconutPro + DEBUGVAR FromNamHomCoconutPro + DEBUGVAR Seeker.CodeChannel + If NamHomCoconutPro = 1 Then + If FromNamHomCoconutPro = 1 Then + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointPromotion = 1 Then + If NamHomCoconutRewardOutOfStock = 0 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml" + EndIf + EndIf + Else + If NamHomCoconutRewardOutOfStock = 0 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml" + EndIf + EndIf + EndIf + EndIf + + If RobinsonBeautyPro = 1 Then + If FromRobinsonBeautyPro = 1 Then + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointPromotion = 1 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml" + EndIf + Else + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml" + EndIf + EndIf + EndIf + + GETACCEXT Param1 23 + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_2.lxml" + + EndIf + Else + + Var TelephoneNumber = Seeker.TNumberTaobinCredit + + If FromTeaTimePro = 1 Then + Var TelPhoneNum = TelephoneNumber + Var drink_price = PriceFromCatalog + Var param2 = "" + Var param3 = "" + AddData 45 TelPhoneNum drink_price param2 param3 + EndIf + + Var StepGetPoint = 1 + + Var PdpaAsk = 0 + + Var OperatorTemp = "" + Var CreditAmount = 0 + Var OperatorStatus = "" + Var AccountType = "" + + SAVELOG "collect_point1-p71." + Var TelephoneNumberX = TelephoneNumber + DEBUGVAR TelephoneNumber + DEBUGVAR PepweenCollectPoint + + + ;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc + Var Param1 = TelephoneNumber + "/" + Var Param1 = Param1 + ParamCP + + DEBUGVAR MyMintEnable + DEBUGVAR FromMyMintPro + DEBUGVAR LipitPro + DEBUGVAR FromLipitPro + If MyMintEnable = 1 Then + If FromMyMintPro = 1 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml" + EndIf + EndIf + + DEBUGVAR FruityRayaEnable + DEBUGVAR FromFruityRaya + If FruityRayaEnable = 1 Then + If FromFruityRaya = 1 Then + Open "ROOT/taobin_project/inter/mys/xml/event/fruit_raya/page_get_free_1_fruit_raya.lxml" + EndIf + + EndIf + + DEBUGVAR ProThaiTeaEnable + DEBUGVAR FromProThaiTea + If ProThaiTeaEnable = 1 Then + If FromProThaiTea = 1 Then + Open "ROOT/taobin_project/inter/mys/xml/event/thai_tea/page_get_free_1_thai_tea.lxml" + EndIf + EndIf + + DEBUGVAR ProYuzuEnable + DEBUGVAR FromProYuzu + If ProYuzuEnable = 1 Then + If FromProYuzu = 1 Then + Open "ROOT/taobin_project/inter/mys/xml/event/yuzu/page_get_free_1_yuzu.lxml" + EndIf + EndIf + + If ProBadValentineEnable = 1 Then + If FromBadValentinePro = 1 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_2.xml" + EndIf + EndIf + + If LipitPro = 1 Then + If FromLipitPro = 1 Then + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointPromotion = 1 Then + If LipitRewardOutOfStock = 0 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_2.xml" + EndIf + EndIf + Else + If LipitRewardOutOfStock = 0 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_2.xml" + EndIf + EndIf + EndIf + EndIf + + DEBUGVAR NamHomCoconutPro + DEBUGVAR FromNamHomCoconutPro + DEBUGVAR Seeker.CodeChannel + If NamHomCoconutPro = 1 Then + If FromNamHomCoconutPro = 1 Then + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointPromotion = 1 Then + If NamHomCoconutRewardOutOfStock = 0 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml" + EndIf + EndIf + Else + If NamHomCoconutRewardOutOfStock = 0 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml" + EndIf + EndIf + EndIf + EndIf + + If RobinsonBeautyPro = 1 Then + If FromRobinsonBeautyPro = 1 Then + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointPromotion = 1 Then + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml" + EndIf + Else + GETACCEXT TelephoneNumber 32 + Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml" + EndIf + EndIf + EndIf + + + GETACCEXT Param1 23 + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_2.lxml" + + EndIf + + Var Tel_Confirm_Flag = 1 + + + 1000 + + + Var CountDownBrewing = BREW_CNT + + + Var ShowCountDownBrewing = CountDownBrewing + + + StrLen TelephoneNumber TelNumLen + If TelNumLen > 0 Then + Var ShowTextNumber = "Invisible" + + Else + ; Add + Var TimeOutPlay = TimeOutPlay + 1 + If TimeOutPlay > 10 Then + Var TimeOutPlay = 0 + If show_eng = "true" Then + Play "ROOT/taobin_project/sound_eng/Reward_final.mp3" + Else + Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3" + EndIf + EndIf + ; + + EndIf + + DEBUGVAR Timeout + + Var Timeout = Timeout + 1 + If Timeout > 30 Then + + SAVELOG "collect_point1-p107." + ;Open "ROOT/taobin_project/xml/page_catalog.xml" + + + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + + If Timeout = 18 Then + Var date_time_str = "" + STRDATETIME date_time_str + Var date_time_str = "/mnt/sdcard/scn_" + date_time_str + Var date_time_str = date_time_str + ".png" + DEBUGVAR date_time_str + SCREEN_CAP date_time_str + EndIf + + If Timeout = 9 Then + ;RefreshAll + EndIf + + Refresh + TimerReset + + + + + + 0 + 380 + "ROOT/taobin_project/image/collectiing/alpha.png" + + + + + + + 158 + 665 + "ROOT/taobin_project/image/collectiing/img_popup1.png" + + + + + + + + + + + + + + + + + + + + + + + + + + + 0 + 873 + 1080 + Center + 62 + RobotoBlack + 0x513C2F + TelephoneNumber + Telnum-mask-1 + + + + + + + +; Border Edit + + 217 + 866 + "ROOT/taobin_project/image/collect_point1/img3.png" + + + + 157 + 868 + ShowTextNumber + Var( DirImage + "/text_edit.png") + + + + + 236 + 699 + eval( + If FromProThaiTea = 1 Then + Var return = "Invisible" + Else + If FromProYuzu = 1 Then + Var return = "Invisible" + Else + Var return = "Enable" + EndIf + EndIf +) + Var( DirImage + "/text_2.png") + + + + 236 + 699 + eval( + If FromProThaiTea = 1 Then + Var return = "Enable" + Else + If FromProYuzu = 1 Then + Var return = "Invisible" + Else + Var return = "Enable" + EndIf + EndIf +) + Var( DirImage + "/edit.png") + + +;include="ROOT/taobin_project/inc/video.inc" + + + + + + + + +; + + 751 + 413 + IMG_CNT + +; + + XPosiShowCountDownBrew + 470 + End + 153 + 88 + RobotoBold + 0x513C2F + ShowCountDownBrewing + + + + + 152 + 955 + ShowErrorText + text_show_error + + + + + + Open "/media/bt/xml/security_alarm.xml" + + + If MachineStage = "drink-success" Then + Var MachineState_Result = 1 + EndIf + + If MachineStage = "drink-failed" Then + Var MachineState_Result = 2 + EndIf + + + + + + \ No newline at end of file diff --git a/inter/mys/xml/page_collect_point_2.lxml b/inter/mys/xml/page_collect_point_2.lxml new file mode 100644 index 00000000..7062630f --- /dev/null +++ b/inter/mys/xml/page_collect_point_2.lxml @@ -0,0 +1,363 @@ + + "Enable" + 1080 + 1920 + "0xeae6e1" + SoundVolume + + + ; On open + + Var Timeout = 0 + SAVELOG UnitTestType + + If UnitTestType = "1" Then + Var CoffeePoint = 10 + Open "ROOT/taobin_project/xml/page_show_consent.xml" + EndIf + + Var TaobinLevel = 0 + Var Point2X = 0 + + Var Seeker.IsLineMember = 0 + Var Seeker.TaobinErrorNetwork = 0 + + + If show_eng = "true" Then + Var DirImage = "ROOT/taobin_project/image/collectiing_en" + + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png" + + + Else + Var DirImage = "ROOT/taobin_project/image/collectiing" + + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png" + EndIf + + If PayOfflineMode = 1 Then + Var Seeker.TaobinErrorNetwork = 1 + Var Seeker.PointTaobinStr = ParamCP + Var TelephoneNumber = TelephoneNumberX + Var Seeker.TNumberTaobinMember= TelephoneNumber + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_error.lxml" + + EndIf + + Var GetLuckyDraw = 0 + + + 1000 + + Var CountDownBrewing = BREW_CNT + + Var ShowCountDownBrewing = CountDownBrewing + + + Var Timeout = Timeout + 1 + If Timeout > 30 Then + + + Var TaobinLevel = 0 + Var CoffeePoint = 1 + + Var Seeker.TaobinErrorNetwork = 1 + Var Seeker.PointTaobinStr = ParamCP + + Var TelephoneNumber = TelephoneNumberX + + Var Seeker.TNumberTaobinMember= TelephoneNumber + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_error.lxml" + + + EndIf + + TimerReset + Refresh + + + + + + + + Open "/media/bt/xml/security_alarm.xml" + + + + + If StepGetPoint = 0 Then + If PdpaAsk = 0 Then + Open "ROOT/taobin_project/xml/page_show_consent.xml" + Else + Var StepGetPoint = 1 + + Var TelephoneNumber = TelephoneNumberX + + GETACCEXT TelephoneNumber 14 + Var Ext1a = "" + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_2.xml" + EndIf + Else + + + + + If Ext1a = "" Then + + Var Seeker.TaobinErrorNetwork = 1 + Var Seeker.PointTaobinStr = ParamCP + Var TelephoneNumber = TelephoneNumberX + Var Seeker.TNumberTaobinMember = TelephoneNumber + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_error.lxml" + + Else + + If GetLuckyDraw = 1 Then + If Ext1a = "ok" Then + DEBUGVAR Ext1h + DEBUGVAR Ext1i + Var luckyDrawTicket = Ext1h + INT luckyDrawTicket + Var luckyDrawAlredyGotReward = Ext1i + If luckyDrawAlredyGotReward = 1 Then + Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml" + Else + Open "ROOT/taobin_project/xml/page_collect_point_3_28_lucky_draw_campaign.xml" + EndIf + Else + + Var Seeker.TaobinErrorNetwork = 1 + + Var Seeker.PointTaobinStr = ParamCP + Var TelephoneNumber = TelephoneNumberX + Var Seeker.TNumberTaobinMember = TelephoneNumber + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_error.lxml" + EndIf + EndIf + + + If GetLuckyDraw = 0 Then + If Ext1a = "ok" Then + + Var TaobinName = Ext1d + Var TaobinCoupons = Ext1g + Var TaobinExpire = Ext1f + Var TaobinLevel = Ext1e + Var TaobinPDPA = Ext1h + + Var TaobinPromoX = Ext1j + + DEBUGVAR TaobinPDPA + + Var PointTaobinTmp = Ext1i + + DEBUGVAR PointTaobinTmp + INT PointTaobinTmp + + INT TaobinPDPA + + If TaobinName = "-" Then + Var Seeker.IsLineMember = 0 + Else + Var Seeker.IsLineMember = 1 + EndIf + + + Var TelephoneNumber = TelephoneNumberX + Var TNumberTaobinMemberXXX = TelephoneNumber + + ;Var PointTaobinTmp = 4 + + Var PointTaobin = PointTaobinTmp + Var pTaobin = PointTaobin + + DEBUGVAR TaobinLevel + + If TaobinLevel = "1" Then + Var pTaobin = PayAmount / 20 + Else + Var pTaobin = PayAmount / 15 + EndIf + + If pTaobin > 0 Then + Var pTaobinX = PointTaobin / pTaobin + If pTaobinX >= 2 Then + Var Point2X = 1 + EndIf + EndIf + + + Var Seeker.PointTaobinStr = ParamCP + Var Seeker.TNumberTaobinMember = TelephoneNumberX + + + Var CoffeePointRank = Ext1b + INT CoffeePointRank + + Var CoffeePoint1 = Ext1c + INT CoffeePoint1 + + Var CoffeePoint = PointTaobin + CoffeePoint1 + Var CoffeePointOld = CoffeePoint1 + + If TaobinLevel = 1 Then + Var CoffeePointRank = CoffeePointRank + 0 + Else + Var CoffeePointRank = CoffeePointRank + PointTaobin + EndIf + + Var CoffeePointRankTmp = CoffeePointRank + + + DEBUGVAR Seeker.PointTaobinStr + DEBUGVAR Seeker.TNumberTaobinMember + If TaobinPDPA = 0 Then + + ;inter-xml-open + If CountryName = "Malaysia" Then + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_3.xml" + EndIf + + ;inter-xml-open + If CountryName = "Indonesia" Then + Open "ROOT/taobin_project/xml/page_collect_point_3.xml" + EndIf + + ;inter-xml-open + If CountryName = "Australia" Then + + If NewCollectPointFlag = 1 Then + Var pageCollectPoint = CountryRootPath + "/xml/page_collect_point_3.lxml" + Open pageCollectPoint + Else + Open "ROOT/taobin_project/xml/page_collect_point_3.lxml" + EndIf + + EndIf + + ;inter-xml-open + If CountryName = "Singapore" Then + Open "ROOT/taobin_project/xml/page_collect_point_3.xml" + EndIf + + Open "ROOT/taobin_project/xml/page_show_consent.xml" + EndIf + + If PayAmount >= 20 Then + + If TaobinPromoX = "p2.no_otp" Then + Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml" + EndIf + + If TaobinPromoX = "p2.unused" Then + Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml" + EndIf + + EndIf + + If NewCollectPoint = 1 Then + If LuckyDrawCampaign = 1 Then + Var GetLuckyDraw = 1 + GETACCEXT TelephoneNumber 14 + Else + Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml" + EndIf + Else + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_3.lxml" + EndIf + + + Else + + Var Seeker.TaobinErrorNetwork = 1 + + Var Seeker.PointTaobinStr = ParamCP + Var TelephoneNumber = TelephoneNumberX + Var Seeker.TNumberTaobinMember = TelephoneNumber + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_error.lxml" + EndIf + EndIf + + EndIf + EndIf + + + + + + + + + Var Seeker.TaobinErrorNetwork = 1 + + Var Seeker.PointTaobinStr = ParamCP + Var TelephoneNumber = TelephoneNumberX + Var Seeker.TNumberTaobinMember= TelephoneNumber + Open "ROOT/taobin_project/inter/mys/xml/page_collect_point_error.lxml" + + + + + + If MachineStage = "drink-success" Then + Var MachineState_Result = 1 + EndIf + + If MachineStage = "drink-failed" Then + Var MachineState_Result = 2 + EndIf + + + + + + 178 + 680 + Var( DirImage + "/text20.png" ) + + + +;include="ROOT/taobin_project/inc/video.inc" + + + + + + + + + + 0 + 873 + 1080 + Center + 62 + RobotoBlack + 0x513C2F + TelephoneNumber + Telnum-mask-1 + + + +; + + 751 + 413 + IMG_CNT + +; + + XPosiShowCountDownBrew + 470 + End + 153 + 88 + RobotoBold + 0x513C2F + ShowCountDownBrewing + + + + + \ No newline at end of file diff --git a/inter/mys/xml/page_collect_point_3.lxml b/inter/mys/xml/page_collect_point_3.lxml new file mode 100644 index 00000000..826f74ec --- /dev/null +++ b/inter/mys/xml/page_collect_point_3.lxml @@ -0,0 +1,1256 @@ + + "Enable" + 1080 + 1920 + "0xeae6e1" + SoundVolume + + + ; On open + + Var Timeout = 0 + ;CoffeePoint + ;Var CoffeePoint = 30 + Var BmiYear = "0/0/0/0/0/0/0/0/0/1" + Var PointCrm = "pdpa1" + Var GetScore = "" + Var TelephoneNumber = TelephoneNumberX + Var Seeker.TNumberTaobinMember = TelephoneNumber + ;AddData 4 TelephoneNumber BmiYear PointCrm GetScore + ;Add after pay + + Var PointMaskState = "Invisible" + + Var CoffeePointStr = CoffeePoint + + DEBUGVAR TelephoneNumber + DEBUGVAR TelephoneNumberX + + If show_eng = "true" Then + Var DirImage = "ROOT/taobin_project/image/display_point_en" + Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png" + + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png" + + Else + Var DirImage = "ROOT/taobin_project/image/display_point" + Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png" + + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png" + EndIf + + Var CoffeePointTmp = CoffeePoint + + If CoffeePoint > 29 Then + Var Timeout = 18 + Var CoffeePointTmp = 30 + EndIf + + + + Var pImage = CoffeePointTmp * 20 + Var pImage = pImage / 30 + Var pImageStr = "/taobinPoint.png" + + Var pImageStr = "ROOT/taobin_project/image/display_point" + pImageStr + + Var pointStr = "" + Var pointStr = pointStr + CoffeePointTmp + Var pointStr = pointStr + "/" + Var pointStr = pointStr + "30" + + + ;Var PointDiff = 150 - CoffeePointRank + Var PointDiff = 0 + + + + + + + + Var TaobinExpireDay = "" + Var TaobinExpireMonth = "" + Var TaobinExpireMonthX = "" + Var TaobinExpireYear = "" + + + + SPLIT TaobinExpire "/" 1 TaobinExpireDay + SPLIT TaobinExpire "/" 2 TaobinExpireMonth + SPLIT TaobinExpire "/" 3 TaobinExpireYear + + + If show_eng = "true" Then + + If TaobinExpireMonth = "01" Then + Var TaobinExpireMonth = "Jan" + Var TaobinExpireMonthX = "January" + EndIf + + If TaobinExpireMonth = "02" Then + Var TaobinExpireMonth = "Feb" + Var TaobinExpireMonthX = "February" + EndIf + + If TaobinExpireMonth = "03" Then + Var TaobinExpireMonth = "Mar" + Var TaobinExpireMonthX = "March" + EndIf + + If TaobinExpireMonth = "04" Then + Var TaobinExpireMonth = "Apr" + Var TaobinExpireMonthX = "April" + EndIf + + If TaobinExpireMonth = "05" Then + Var TaobinExpireMonth = "May" + Var TaobinExpireMonthX = "May" + EndIf + + If TaobinExpireMonth = "06" Then + Var TaobinExpireMonth = "Jun" + Var TaobinExpireMonthX = "June" + EndIf + + If TaobinExpireMonth = "07" Then + Var TaobinExpireMonth = "Jul" + Var TaobinExpireMonthX = "July" + EndIf + + If TaobinExpireMonth = "08" Then + Var TaobinExpireMonth = "Aug" + Var TaobinExpireMonthX = "August" + EndIf + + If TaobinExpireMonth = "09" Then + Var TaobinExpireMonth = "Sep" + Var TaobinExpireMonthX = "September" + EndIf + + If TaobinExpireMonth = "10" Then + Var TaobinExpireMonth = "Oct" + Var TaobinExpireMonthX = "October" + EndIf + + If TaobinExpireMonth = "11" Then + Var TaobinExpireMonth = "Nov" + Var TaobinExpireMonthX = "November" + EndIf + + If TaobinExpireMonth = "12" Then + Var TaobinExpireMonth = "Dec" + Var TaobinExpireMonthX = "December" + EndIf + + INT TaobinExpireYear + INT TaobinExpireDay + + Var TaobinExpireYear = TaobinExpireYear + 0 + + Else + + If TaobinExpireMonth = "01" Then + Var TaobinExpireMonth = "ม.ค." + Var TaobinExpireMonthX = "มกราคม" + EndIf + + If TaobinExpireMonth = "02" Then + Var TaobinExpireMonth = "ก.พ." + Var TaobinExpireMonthX = "กุมภาพันธ์" + EndIf + + If TaobinExpireMonth = "03" Then + Var TaobinExpireMonth = "มี.ค." + Var TaobinExpireMonthX = "มีนาคม" + EndIf + + If TaobinExpireMonth = "04" Then + Var TaobinExpireMonth = "เม.ย." + Var TaobinExpireMonthX = "เมษายน" + EndIf + + If TaobinExpireMonth = "05" Then + Var TaobinExpireMonth = "พ.ค." + Var TaobinExpireMonthX = "พฤษภาคม" + EndIf + + If TaobinExpireMonth = "06" Then + Var TaobinExpireMonth = "มิ.ย." + Var TaobinExpireMonthX = "มิถุนายน" + EndIf + + If TaobinExpireMonth = "07" Then + Var TaobinExpireMonth = "ก.ค." + Var TaobinExpireMonthX = "กรกฎาคม" + EndIf + + If TaobinExpireMonth = "08" Then + Var TaobinExpireMonth = "ส.ค." + Var TaobinExpireMonthX = "สิงหาคม" + EndIf + + If TaobinExpireMonth = "09" Then + Var TaobinExpireMonth = "ก.ย." + Var TaobinExpireMonthX = "กันยายน" + EndIf + + If TaobinExpireMonth = "10" Then + Var TaobinExpireMonth = "ต.ค." + Var TaobinExpireMonthX = "ตุลาคม" + EndIf + + If TaobinExpireMonth = "11" Then + Var TaobinExpireMonth = "พ.ย." + Var TaobinExpireMonthX = "พฤศจิกายน" + EndIf + + If TaobinExpireMonth = "12" Then + Var TaobinExpireMonth = "ธ.ค." + Var TaobinExpireMonthX = "ธันวาคม" + EndIf + + INT TaobinExpireYear + INT TaobinExpireDay + + Var TaobinExpireYear = TaobinExpireYear + 543 + + EndIf + + + Var ExpireStrTmp = "" + Var ExpireStrTmp = ExpireStrTmp + TaobinExpireDay + Var ExpireStrTmp = ExpireStrTmp + " " + Var ExpireStrTmp = ExpireStrTmp + TaobinExpireMonth + Var ExpireStrTmp = ExpireStrTmp + " " + Var ExpireStrTmp = ExpireStrTmp + TaobinExpireYear + + + + + If TaobinLevel = "1" Then + Var PointMaskState = "Enable" + EndIf + + + + + If show_eng = "true" Then + + Var TaobinLevelDesc3 = "You have coupons " + Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons + Var TaobinLevelDesc3 = TaobinLevelDesc3 + " numbers" + + If TaobinLevel = "1" Then + Var TaobinLevelDesc1 = "Shy turtle level" + Var TaobinLevelDesc2 = "" + + Var TaobinLeveImg = "/taoLevel1.png" + EndIf + + If TaobinLevel = "2" Then + Var TaobinLevelDesc1 = "Walking turtle level" + Var PointDiff = 150 - CoffeePointRank + Var TaobinLevelDesc2 = "Earn " + PointDiff + Var TaobinLevelDesc2 = TaobinLevelDesc2 + " shells " + Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Flying turtle level" + + Var TaobinLeveImg = "/taoLevel2.png" + + If CoffeePointRank > 149 Then + ;Var TaobinLeveImg = "/taoLevel3.png" + + ;Var TaobinLevelDesc1 = "Flying turtle level " + Var TaobinLevelDesc2 = "" + ;Var CoffeePointRank = CoffeePointRank - 150 + + EndIf + + EndIf + + If TaobinLevel = "3" Then + Var TaobinLevelDesc1 = "Flying turtle level until " + ExpireStrTmp + + Var PointDiff = 200 - CoffeePointRank + Var TaobinLevelDesc2 = "Earn " + PointDiff + Var TaobinLevelDesc2 = TaobinLevelDesc2 + " shells " + Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Master turtle level" + + Var TaobinLeveImg = "/taoLevel3.png" + + If CoffeePointRank > 199 Then + ;Var TaobinLeveImg = "/taoLevel4.png" + + ;Var TaobinLevelDesc1 = "Master turtle level " + Var TaobinLevelDesc2 = "" + ;Var CoffeePointRank = CoffeePointRank - 350 + + EndIf + + EndIf + + If TaobinLevel = "4" Then + Var TaobinLevelDesc1 = "Master turtle level until " + ExpireStrTmp + + Var TaobinLevelDesc2 = "" + + Var TaobinLeveImg = "/taoLevel4.png" + EndIf + + + + Else + + Var TaobinLevelDesc3 = "ตอนนี้คุณมีคูปองแลกเครื่องดื่มฟรีเหลืออยู่ " + Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons + Var TaobinLevelDesc3 = TaobinLevelDesc3 + " ใบ" + + If TaobinLevel = "1" Then + Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าขี้อาย" + Var TaobinLevelDesc2 = "" + + Var TaobinLeveImg = "/taoLevel1.png" + EndIf + + If TaobinLevel = "2" Then + Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าเตาะแตะ" + Var PointDiff = 150 - CoffeePointRank + Var TaobinLevelDesc2 = "สะสมกระดองอีก " + PointDiff + Var TaobinLevelDesc2 = TaobinLevelDesc2 + " กระดอง " + Var TaobinLevelDesc2 = TaobinLevelDesc2 + "เพื่อเลื่อนขั้นเป็นเต่าติดปีก" + + Var TaobinLeveImg = "/taoLevel2.png" + + If CoffeePointRank > 149 Then + ;Var TaobinLeveImg = "/taoLevel3.png" + + ;Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก " + Var TaobinLevelDesc2 = "" + ;Var CoffeePointRank = CoffeePointRank - 150 + + EndIf + + EndIf + + If TaobinLevel = "3" Then + Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก จนถึง " + ExpireStrTmp + + Var PointDiff = 200 - CoffeePointRank + Var TaobinLevelDesc2 = "สะสมกระดองอีก " + PointDiff + Var TaobinLevelDesc2 = TaobinLevelDesc2 + " กระดอง " + Var TaobinLevelDesc2 = TaobinLevelDesc2 + "เพื่อเลื่อนขั้นเป็นผู้เฒ่าเต่า" + + Var TaobinLeveImg = "/taoLevel3.png" + + If CoffeePointRank > 199 Then + ;Var TaobinLeveImg = "/taoLevel4.png" + + ;Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า " + Var TaobinLevelDesc2 = "" + ;Var CoffeePointRank = CoffeePointRank - 350 + + EndIf + + EndIf + + If TaobinLevel = "4" Then + Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า จนถึง " + ExpireStrTmp + + Var TaobinLevelDesc2 = "" + + Var TaobinLeveImg = "/taoLevel4.png" + EndIf + + + EndIf + + + + + Var CheckCoupons = 0 + Var MakeDrinkState = 0 + + + Var taobinP1 = "Invisible" + Var taobinP2 = "Invisible" + Var taobinP3 = "Invisible" + Var taobinP4 = "Invisible" + Var taobinP5 = "Invisible" + Var taobinP6 = "Invisible" + Var taobinP7 = "Invisible" + Var taobinP8 = "Invisible" + Var taobinP9 = "Invisible" + Var taobinP10 = "Invisible" + Var taobinP11 = "Invisible" + Var taobinP12 = "Invisible" + Var taobinP13 = "Invisible" + Var taobinP14 = "Invisible" + Var taobinP15 = "Invisible" + Var taobinP16 = "Invisible" + Var taobinP17 = "Invisible" + Var taobinP18 = "Invisible" + Var taobinP19 = "Invisible" + Var taobinP20 = "Invisible" + Var taobinP21 = "Invisible" + Var taobinP22 = "Invisible" + Var taobinP23 = "Invisible" + Var taobinP24 = "Invisible" + Var taobinP25 = "Invisible" + Var taobinP26 = "Invisible" + Var taobinP27 = "Invisible" + Var taobinP28 = "Invisible" + Var taobinP29 = "Invisible" + Var taobinP30 = "Invisible" + + Var taobinImgP1 = "/taobinPN.png" + Var taobinImgP2 = "/taobinPN.png" + Var taobinImgP3 = "/taobinPN.png" + Var taobinImgP4 = "/taobinPN.png" + Var taobinImgP5 = "/taobinPN.png" + Var taobinImgP6 = "/taobinPN.png" + Var taobinImgP7 = "/taobinPN.png" + Var taobinImgP8 = "/taobinPN.png" + Var taobinImgP9 = "/taobinPN.png" + Var taobinImgP10 = "/taobinPN.png" + Var taobinImgP11 = "/taobinPN.png" + Var taobinImgP12 = "/taobinPN.png" + Var taobinImgP13 = "/taobinPN.png" + Var taobinImgP14 = "/taobinPN.png" + Var taobinImgP15 = "/taobinPN.png" + Var taobinImgP16 = "/taobinPN.png" + Var taobinImgP17 = "/taobinPN.png" + Var taobinImgP18 = "/taobinPN.png" + Var taobinImgP19 = "/taobinPN.png" + Var taobinImgP20 = "/taobinPN.png" + Var taobinImgP21 = "/taobinPN.png" + Var taobinImgP22 = "/taobinPN.png" + Var taobinImgP23 = "/taobinPN.png" + Var taobinImgP24 = "/taobinPN.png" + Var taobinImgP25 = "/taobinPN.png" + Var taobinImgP26 = "/taobinPN.png" + Var taobinImgP27 = "/taobinPN.png" + Var taobinImgP28 = "/taobinPN.png" + Var taobinImgP29 = "/taobinPN.png" + Var taobinImgP30 = "/taobinPN.png" + + + If CoffeePointOld >= 1 Then + Var taobinImgP1 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 2 Then + Var taobinImgP2 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 3 Then + Var taobinImgP3 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 4 Then + Var taobinImgP4 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 5 Then + Var taobinImgP5 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 6 Then + Var taobinImgP6 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 7 Then + Var taobinImgP7 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 8 Then + Var taobinImgP8 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 9 Then + Var taobinImgP9 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 10 Then + Var taobinImgP10 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 11 Then + Var taobinImgP11 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 12 Then + Var taobinImgP12 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 13 Then + Var taobinImgP13 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 14 Then + Var taobinImgP14 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 15 Then + Var taobinImgP15 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 16 Then + Var taobinImgP16 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 17 Then + Var taobinImgP17 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 18 Then + Var taobinImgP18 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 19 Then + Var taobinImgP19 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 20 Then + Var taobinImgP20 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 21 Then + Var taobinImgP21 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 22 Then + Var taobinImgP22 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 23 Then + Var taobinImgP23 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 24 Then + Var taobinImgP24 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 25 Then + Var taobinImgP25 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 26 Then + Var taobinImgP26 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 27 Then + Var taobinImgP27 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 28 Then + Var taobinImgP28 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 29 Then + Var taobinImgP29 = "/taobinPO.png" + EndIf + If CoffeePointOld >= 30 Then + Var taobinImgP30 = "/taobinPO.png" + EndIf + + If CoffeePoint >= 1 Then + Var taobinP1 = "Enable" + EndIf + If CoffeePoint >= 2 Then + Var taobinP2 = "Enable" + EndIf + If CoffeePoint >= 3 Then + Var taobinP3 = "Enable" + EndIf + If CoffeePoint >= 4 Then + Var taobinP4 = "Enable" + EndIf + If CoffeePoint >= 5 Then + Var taobinP5 = "Enable" + EndIf + If CoffeePoint >= 6 Then + Var taobinP6 = "Enable" + EndIf + If CoffeePoint >= 7 Then + Var taobinP7 = "Enable" + EndIf + If CoffeePoint >= 8 Then + Var taobinP8 = "Enable" + EndIf + If CoffeePoint >= 9 Then + Var taobinP9 = "Enable" + EndIf + If CoffeePoint >= 10 Then + Var taobinP10 = "Enable" + EndIf + If CoffeePoint >= 11 Then + Var taobinP11 = "Enable" + EndIf + If CoffeePoint >= 12 Then + Var taobinP12 = "Enable" + EndIf + If CoffeePoint >= 13 Then + Var taobinP13 = "Enable" + EndIf + If CoffeePoint >= 14 Then + Var taobinP14 = "Enable" + EndIf + If CoffeePoint >= 15 Then + Var taobinP15 = "Enable" + EndIf + If CoffeePoint >= 16 Then + Var taobinP16 = "Enable" + EndIf + If CoffeePoint >= 17 Then + Var taobinP17 = "Enable" + EndIf + If CoffeePoint >= 18 Then + Var taobinP18 = "Enable" + EndIf + If CoffeePoint >= 19 Then + Var taobinP19 = "Enable" + EndIf + If CoffeePoint >= 20 Then + Var taobinP20 = "Enable" + EndIf + If CoffeePoint >= 21 Then + Var taobinP21 = "Enable" + EndIf + If CoffeePoint >= 22 Then + Var taobinP22 = "Enable" + EndIf + If CoffeePoint >= 23 Then + Var taobinP23 = "Enable" + EndIf + If CoffeePoint >= 24 Then + Var taobinP24 = "Enable" + EndIf + If CoffeePoint >= 25 Then + Var taobinP25 = "Enable" + EndIf + If CoffeePoint >= 26 Then + Var taobinP26 = "Enable" + EndIf + If CoffeePoint >= 27 Then + Var taobinP27 = "Enable" + EndIf + If CoffeePoint >= 28 Then + Var taobinP28 = "Enable" + EndIf + If CoffeePoint >= 29 Then + Var taobinP29 = "Enable" + EndIf + If CoffeePoint >= 30 Then + Var taobinP30 = "Enable" + EndIf + + If Seeker = "curr" Then + Var CheckCouponState = "Enable" + Else + Var CheckCouponState = "Disable" + EndIf + + + Var PointEndDate = "" + GetDateEndOfMonth PointEndDate + DEBUGVAR PointEndDate + Var xPointEndDate = 570 + + If show_eng = "true" Then + Var xPointEndDate = 618 + EndIf + + Var Point2XState = "Invisible" + Var Point2XImage = "" + If Point2X = 1 Then + Var Point2XState = "Enable" + If Seeker.CampaignPayChanel = "kbank" Then + Var Point2XImage = "/text9.png" + EndIf + If Seeker.CampaignPayChanel = "true" Then + Var Point2XImage = "/text10.png" + EndIf + If Seeker.CampaignPayChanel = "dolfin" Then + Var Point2XImage = "/text11.png" + EndIf + + EndIf + + ;inter-from-consent + If CountryName = "Malaysia" Then + Var Seeker.FromConsent = 0 + EndIf + + ;inter-from-consent + If CountryName = "Indonesia" Then + Var Seeker.FromConsent = 0 + EndIf + + ;inter-from-consent + If CountryName = "Australia" Then + Var Seeker.FromConsent = 0 + EndIf + + ;inter-from-consent + If CountryName = "Singapore" Then + Var Seeker.FromConsent = 0 + EndIf + + + + + 1000 + + + Var CountDownBrewing = BREW_CNT + + Var ShowCountDownBrewing = CountDownBrewing + + + + Var Timeout = Timeout + 1 + If Timeout > 5 Then + + ; goto lid straw + If CoffeePoint > 29 Then + Open "ROOT/taobin_project/xml/page_display_get_free.xml" + Else + If Seeker.FromConsent = 1 Then + Open "ROOT/taobin_project/xml/page_display_get_free.xml" + Else + + + + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + + EndIf + EndIf + + + + TimerReset + Refresh + + + + + + + + Open "/media/bt/xml/security_alarm.xml" + + + + If CheckCoupons = 1 Then + Var MakeDrinkState = 1 + Var CouponPage = 1 + Var CouponInfo1 = Ext1a + Var CouponInfo2 = Ext1b + Var CouponInfo3 = Ext1c + Var CouponInfo4 = Ext1d + Var CouponInfo5 = Ext1e + Var CouponInfo6 = Ext1f + Var CouponInfo7 = Ext1g + Var CouponInfo8 = Ext1h + Var CouponInfo9 = Ext1i + Var CouponInfo10 = Ext1j + + Var TelephoneNumber = TelephoneNumberX + GETACCEXT TelephoneNumber 13 + Var CheckCoupons = 2 + + Else + + If CheckCoupons = 2 Then + + Var TaobinCredit = Ext1b + + If InternationalEnable = 1 Then + Var ChackMemberPage = CountryRootPath + "xml/page_check_member2.lxml" + + If CountryName = "Malaysia" Then + Open ChackMemberPage + EndIf + + If CountryName = "UnitedArabEmirates Dubai" Then + Open ChackMemberPage + EndIf + + + Else + Open "ROOT/taobin_project/xml/page_check_member2.xml" + EndIf + + + EndIf + + EndIf + + + + + + + If MachineStage = "drink-success" Then + Var MachineState_Result = 1 + EndIf + + If MachineStage = "drink-failed" Then + Var MachineState_Result = 2 + EndIf + + + + +;include="ROOT/taobin_project/inc/video.inc" + + + + + + + + + + 0 + 380 + "ROOT/taobin_project/image/display_point/alpha.png" + + + +; + + + + + 158 + 665 + Var( DirImage + "/img_popup1.png" ) + + + + 158 + 665 + Var( DirImage + "/img_popup3.png" ) + + + + + 243 + 722 + Var( DirImage + "/text7.png" ) + + + + + 243 + 860 + Var( DirImage + "/text4.png" ) + + + + + + + 625 + 734 + Var( DirImage + TaobinLeveImg ) + +; + + + + 240 + 1161 + pImageStr + + + + + + + + + +; +; 420 +; 638 +; 56 +; KanitBoldTTF +; 0x513C2F +; TelephoneNumber +; Telnum +; +; +; +; +; 323 +; 865 +; 434 +; Center +; 64 +; KanitSemiBoldTTF +; 0xDE794E +; CoffeePoint +; + +; +; 250 +; 1241 +; 434 +; 64 +; KanitSemiBoldTTF +; 0xDE794E +; pointStr +; + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 250 + 745 + 35 + 1000 + KanitRegularTTF + 0x513C2F + TaobinName + + + + 250 + 790 + 20 + 1000 + KanitRegularTTF + 0x746253 + TNumberTaobinMemberXXX + Telnum-mask-1 + + + + 250 + 890 + 50 + 120 + KanitRegularTTF + 0xDE794E + CoffeePointRank + + + + + + 250 + 990 + 25 + 1000 + KanitRegularTTF + 0xDE794E + TaobinLevelDesc1 + + + + 250 + 1020 + 20 + 1000 + KanitRegularTTF + 0x746253 + TaobinLevelDesc2 + + + + 172 + 1570 + Var( DirImage + "/text8.png" ) + + + + xPointEndDate + 1576 + 25 + 500 + KanitRegularTTF + 0xDE794E + PointEndDate + + + + 310 + 1621 + 25 + 1000 + KanitRegularTTF + 0x746253 + TaobinLevelDesc3 + + + + + + +; + + 751 + 413 + IMG_CNT + +; + + XPosiShowCountDownBrew + 470 + End + 153 + 88 + RobotoBold + 0x513C2F + ShowCountDownBrewing + + + + + + + \ No newline at end of file diff --git a/inter/mys/xml/page_collect_point_error.lxml b/inter/mys/xml/page_collect_point_error.lxml new file mode 100644 index 00000000..05be6c3e --- /dev/null +++ b/inter/mys/xml/page_collect_point_error.lxml @@ -0,0 +1,112 @@ + + "Enable" + 1080 + 1920 + "0xeae6e1" + SoundVolume + + + ; On open + + + Var Timeout = 0 + SAVELOG show_eng + + If show_eng = "true" Then + Var DirImage = "ROOT/taobin_project/image/display_get_free_en/" + Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png" + Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png" + + Else + Var DirImage = "ROOT/taobin_project/image/display_get_free/" + Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png" + Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png" + EndIf + + 1000 + + + Var Timeout = Timeout + 1 + If Timeout > 5 Then + ; goto lid straw + + + + Open "ROOT/taobin_project/xml/page_lid_straw.xml" + EndIf + + TimerReset + Refresh + + + + If MachineStage = "drink-success" Then + Var MachineState_Result = 1 + EndIf + + If MachineStage = "drink-failed" Then + Var MachineState_Result = 2 + EndIf + + + + + + 0 + 380 + "ROOT/taobin_project/image/collectiing/alpha.png" + + + + + + + + + 158 + 665 + Var( DirImage + "/img_popup4.png" ) + + + + + + + +;include="ROOT/taobin_project/inc/video.inc" + + + + + + + + + + + + + + + + + + Open "/media/bt/xml/security_alarm.xml" + + + + \ No newline at end of file diff --git a/xml/open_page_collect_point.ev b/xml/open_page_collect_point.ev index 88d4cab3..aea3e35a 100644 --- a/xml/open_page_collect_point.ev +++ b/xml/open_page_collect_point.ev @@ -6,6 +6,10 @@ If CountryName = "Australia" Then Var PageCollectPoint1 = "ROOT/taobin_project/inter/aus/xml/page_collect_point_1.lxml" EndIf +If CountryName = "Malaysia" Then + Var PageCollectPoint1 = "ROOT/taobin_project/inter/mys/xml/page_collect_point_1.lxml" +EndIf + If CountryName = "Singapore" Then ; ask-if-member-yet Var MemberPrompt = CountryRootPath + "xml/page_member_prompt.lxml" diff --git a/xml/page_payment_cash-MYR.xml b/xml/page_payment_cash-MYR.xml index cd86f4a4..abdac254 100644 --- a/xml/page_payment_cash-MYR.xml +++ b/xml/page_payment_cash-MYR.xml @@ -523,7 +523,6 @@ EndIf - WRITE_FILE "/mnt/sdcard/app_run_flag" "1" @@ -1718,6 +1717,7 @@ If alphaState = "Invisible" Then DEBUGVAR VendingCashless Var ReqPayInfoFromCashOther = 2 + WRITE_FILE "/mnt/sdcard/app_run_flag" "1" EndIf EndIf diff --git a/xml/verify_number.ev b/xml/verify_number.ev index 297048ec..21f5a607 100644 --- a/xml/verify_number.ev +++ b/xml/verify_number.ev @@ -17,4 +17,10 @@ EndIf If Tel2D = "09" Then Var Tel2DFlag = 1 +EndIf + +If InternationalEnable = 1 Then + Var VerifyFile = CountryRootPath + "/xml/verify_number.ev" + + TRY VerifyFile EndIf \ No newline at end of file