diff --git a/inter/uae_dubai/xml/page_collect_point_1.lxml b/inter/uae_dubai/xml/page_collect_point_1.lxml new file mode 100644 index 00000000..4259fcc3 --- /dev/null +++ b/inter/uae_dubai/xml/page_collect_point_1.lxml @@ -0,0 +1,928 @@ + + "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 NotCollectPointPromotion + + DEBUGVAR RobinsonBeautyPro + DEBUGVAR FromRobinsonBeautyPro + DEBUGVAR JemilaPro + DEBUGVAR FromJemilaPro + DEBUGVAR JemilaRewardOutOfStock + + 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 NotCollectPointPromotion = 0 Then + 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 + + If JemilaPro = 1 Then + If FromJemilaPro = 1 Then + If JemilaRewardOutOfStock = 1 Then + SAVELOG "Jemila prize out of stock skip collect promotion point." + Else + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointPromotion = 1 Then + GETACCEXT TelephoneNumber 40 + Open "ROOT/taobin_project/xml/event/jemila/page_collect_point_jemila_2.xml" + EndIf + Else + GETACCEXT TelephoneNumber 40 + Open "ROOT/taobin_project/xml/event/jemila/page_collect_point_jemila_2.xml" + EndIf + EndIf + EndIf + EndIf + EndIf + + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + + 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 + + If NotCollectPointPromotion = 0 Then + 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 + + If JemilaPro = 1 Then + If FromJemilaPro = 1 Then + If JemilaRewardOutOfStock = 1 Then + SAVELOG "Jemila prize out of stock skip collect promotion point." + Else + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointPromotion = 0 Then + GETACCEXT TelephoneNumber 40 + Open "ROOT/taobin_project/xml/event/jemila/page_collect_point_jemila_2.xml" + EndIf + Else + GETACCEXT TelephoneNumber 40 + Open "ROOT/taobin_project/xml/event/jemila/page_collect_point_jemila_2.xml" + EndIf + EndIf + EndIf + EndIf + EndIf + + + GETACCEXT Param1 23 + Open "ROOT/taobin_project/xml/page_collect_point_2.xml" + + 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/xml/open_page_collect_point.ev b/xml/open_page_collect_point.ev index aea3e35a..82b6163f 100644 --- a/xml/open_page_collect_point.ev +++ b/xml/open_page_collect_point.ev @@ -2,12 +2,8 @@ ; default Var PageCollectPoint1 = "ROOT/taobin_project/xml/page_collect_point_1.xml" -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" +If InternationalEnable = 1 Then + Var PageCollectPoint1 = CountryRootPath + "/xml/page_collect_point_1.lxml" EndIf If CountryName = "Singapore" Then