; Thailand ;DEBUGVAR SystemDateMonthInt ;DEBUGVAR SystemDateDayInt ; Reset flag away. Var ChildrenFree = 0 Var OreoDueEnable = 0 Var OreoForFreeEnable = 0 Var SoundBackToSchoolEnable = 0 Var PromotionIDOreoBuyTwoSaveMore = 0 Var BackToSchoolForFreeEnable = 0 Var PepsiProEnable = 0 Var PepsiPromoteVideo = 0 Var PepsiProCodeEnable = 0 Var SoundBackToSchoolType = 0 ; End Var MysteryProEnable = 0 Var OreoWelcomeDrinkEnable = 0 Var Anniversary3VideoEnable = 0 Var MomDayEnable = 0 ; September / Oct ; Enable app game Var GameEnableFromTrickerEv = 0 ; Enable pro Pepween Var PepweenEnable = 0 ; Enable pro Tamatian. 16-30 Sep Var TamatianEnable = 0 ; September 9 - 16 Var MayDayRunEnable = 0 ; Enable Milk Choice Vegan Var MilkChoiceVeganEnable = 0 ; Enable pro 15 THB, November 1 - 30 Var pro15THBEnable = 0 Var From15THBPro = 0 ; Enable pro My Mint My Moment, December 1 - 31 Var MyMintEnable = 0 Var FromMyMintPro = 0 ; Enable pro Rerun, Jan 22-26/29-31 Var RerunProEnable = 0 Var FromRerunPro = 0 ; Enable pro Peach, Feb 1 - 13 Var ProPeachEnable = 0 ; Enable Bad valentine, Feb 14 - 29 Var ProBadValentineEnable = 0 Var FromBadValentinePro = 0 ; Enable Pepsi Second Cup 30, Mar 1 - 17, but get discount code only 4-8 and 11-15 Mar Var PepsiSecondCup30Enable = 0 Var PepsiSecondCup30DiscountEnable = 0 Var FromPepsiSecondCup30 = 0 ; Enable Lipit Promotion, 18 Mar - 5 Apr Var LipitPro = 0 Var FromLipitPro = 0 Var LipitRewardOutOfStock = 0 ; Enable Monday Banana Promotion, every Monday start 11 Mar - 19 Apr Var MondayBananaPro = 0 Var FromMondayBananaPro = 0 ; Enable Free Energy Drink, 18 Mar - 30 Apr Var FreeEnergyDrink = 0 Var FromPowerUpPro = 0 Var FreePowerup = "Invisible" ; Enable Tea Time, 13 - 30 Apr Var TeaTimePro = 0 Var FromTeaTimePro = 0 ; Enable Free Fire, 1 - 30 Apr Var FreeFirePro = 0 ; Enable Energy Drink 1 Bath, 1 May - 31 May Var EnergyDrink1BathPro = 0 Var FromEnergyDrink1BathPro = 0 ; Enable Coffee Drink 1 Bath, 1 May - 31 May Var CoffeeDrink1BathPro = 0 Var FromCoffeeDrink1BathPro = 0 ; Enable Wednesday melon, 15, 22, 29 May - 5, 12 June Var WednesdayMelonPro = 0 Var FromWednesdayMelonPro = 0 Var NewCollectPoint = 1 Var NewFlowPaymentCode = 0 Var XMLLiveInfoEnable = 0 If SystemDateMonthInt = 10 Then If SystemDateDayInt > 15 Then Var PepweenEnable = 1 EndIf If SystemDateDayInt >= 13 Then If SystemDateDayInt <= 24 Then Var MilkChoiceVeganEnable = 1 EndIf EndIf EndIf If SystemDateMonthInt = 11 Then Var PepweenEnable = 0 Var pro15THBEnable = 1 EndIf If SystemDateMonthInt = 12 Then Var MyMintEnable = 1 EndIf If SystemDateMonthInt = 1 Then If SystemDateDayInt < 15 Then Var MyMintEnable = 1 EndIf If SystemDateDayInt >= 22 Then If SystemDateDayInt <= 26 Then Var RerunProEnable = 1 Else If SystemDateDayInt >= 29 Then If SystemDateDayInt <= 31 Then Var RerunProEnable = 1 EndIf EndIf EndIf EndIf EndIf If SystemDateMonthInt = 2 Then If SystemDateDayInt >= 1 Then If SystemDateDayInt <= 13 Then Var ProPeachEnable = 1 EndIf EndIf If SystemDateDayInt >= 14 Then Var ProBadValentineEnable = 1 EndIf EndIf If SystemDateMonthInt = 3 Then If SystemDateDayInt >= 1 Then If SystemDateDayInt <= 17 Then Var PepsiSecondCup30Enable = 1 If SystemDateDayInt >= 4 Then If SystemDateDayInt <= 8 Then Var PepsiSecondCup30DiscountEnable = 1 EndIf EndIf If SystemDateDayInt >= 11 Then If SystemDateDayInt <= 15 Then Var PepsiSecondCup30DiscountEnable = 1 EndIf EndIf EndIf EndIf If SystemDateDayInt = 11 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt = 18 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt = 25 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt >= 13 Then Var FreeEnergyDrink = 1 EndIf If SystemDateDayInt >= 18 Then Var LipitPro = 1 EndIf EndIf If SystemDateMonthInt = 4 Then Var FreeEnergyDrink = 1 Var FreeFirePro = 1 If SystemDateDayInt = 1 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt = 8 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt = 15 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt = 22 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt = 29 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt <= 5 Then Var LipitPro = 1 EndIf If SystemDateDayInt >= 8 Then Var TeaTimePro = 1 EndIf EndIf If SystemDateMonthInt = 5 Then If SystemDateDayInt <= 10 Then Var TeaTimePro = 1 EndIf STRCONTAIN "TaoBin_1_Baht_coffee" XMLProfile TaoBin_1_Baht_coffee If TaoBin_1_Baht_coffee = "true" Then Var CoffeeDrink1BathPro = 1 EndIf STRCONTAIN "TaoBin_1_Baht_Energy" XMLProfile TaoBin_1_Baht_Energy If TaoBin_1_Baht_Energy = "true" Then Var EnergyDrink1BathPro = 1 EndIf If SystemDateDayInt = 15 Then Var WednesdayMelonPro = 1 EndIf If SystemDateDayInt = 22 Then Var WednesdayMelonPro = 1 EndIf If SystemDateDayInt = 29 Then Var WednesdayMelonPro = 1 EndIf If SystemDateDayInt = 13 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt = 20 Then Var MondayBananaPro = 1 EndIf If SystemDateDayInt = 27 Then Var MondayBananaPro = 1 EndIf EndIf If SystemDateMonthInt = 6 Then If SystemDateDayInt = 5 Then Var WednesdayMelonPro = 1 EndIf If SystemDateDayInt = 12 Then Var WednesdayMelonPro = 1 EndIf EndIf If BoxID = 173149 Then Var ProBadValentineEnable = 0 Var PepsiSecondCup30Enable = 1 Var PepsiSecondCup30DiscountEnable = 1 Var NewFlowPaymentCode = 1 ;Var EnableFreeEnergyDrink = "true" Var WednesdayMelonPro = 1 EndIf If BoxID = 172644 Then Var NewFlowPaymentCode = 1 Var LipitPro = 0 Var TeaTimePro = 1 EndIf If BoxID = 201316 Then Var ProPeachEnable = 1 Var NewFlowPaymentCode = 1 EndIf If BoxID = 105005 Then Var NewFlowPaymentCode = 1 EndIf If BoxID = 173149 Then Var ProBadValentineEnable = 0 Var PepsiSecondCup30Enable = 0 Var LipitPro = 0 Var TeaTimePro = 1 EndIf If BoxID = 174758 Then Var ProBadValentineEnable = 0 Var PepsiSecondCup30Enable = 0 Var PepsiSecondCup30DiscountEnable = 0 Var NewFlowPaymentCode = 0 EndIf Var XMLLiveInfoEnable = 1 If BoxID = 172053 Then Var ProBadValentineEnable = 0 Var PepsiSecondCup30Enable = 0 Var PepsiSecondCup30DiscountEnable = 0 Var NewFlowPaymentCode = 0 Var MondayBananaPro = 0 Var LipitPro = 0 Var FreeFirePro = 1 Var TeaTimePro = 1 Var FreeEnergyDrink = 0 EndIf ; Exclusive Box Var GameEnableFromTrickerEv = 1 Var MayDayRunEnable = 0 If BoxID = 33170 Then Var PepsiProEnable = 0 Var PepsiPromoteVideo = 0 Var PepsiProCodeEnable = 0 Var MysteryProEnable = 0 Var OreoWelcomeDrinkEnable = 0 Var RerunProEnable = 0 EndIf ; This var for overide video play when brew Var adver_brewing_video_full_file_name = "" If InternationalEnable = 1 Then Var MilkChoiceVeganEnable = 0 Var GameEnableFromTrickerEv = 0 Var TamatianEnable = 0 Var MayDayRunEnable = 0 Var MomDayEnable = 0 Var PepsiProEnable = 0 Var PepsiPromoteVideo = 0 Var PepsiProCodeEnable = 0 Var MysteryProEnable = 0 Var PepweenEnable = 0 Var RerunProEnable = 0 Var ProPeachEnable = 0 Var ProBadValentineEnable = 0 Var FreeEnergyDrink = 0 Var WednesdayMelonPro = 0 EndIf STRCONTAIN "taobin_nopro" XMLProfile taobin_nopro If taobin_nopro = "true" Then Var MilkChoiceVeganEnable = 0 Var GameEnableFromTrickerEv = 0 Var TamatianEnable = 0 Var MayDayRunEnable = 0 Var MomDayEnable = 0 Var PepsiProEnable = 0 Var PepsiPromoteVideo = 0 Var PepsiProCodeEnable = 0 Var MysteryProEnable = 0 Var PepweenEnable = 0 Var RerunProEnable = 0 Var ProPeachEnable = 0 Var ProBadValentineEnable = 0 Var FreeEnergyDrink = 0 Var MondayBananaPro = 0 Var FreeFirePro = 0 Var TeaTimePro = 0 Var EnergyDrink1BathPro = 0 Var CoffeeDrink1BathPro = 0 Var PepsiSecondCup30Enable = 0 Var PepsiSecondCup30DiscountEnable = 0 Var FromPepsiSecondCup30 = 0 Var LipitPro = 0 Var WednesdayMelonPro = 0 Var AdvertiseProfile = "00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00/00" EndIf If MelonSyrupEnable = "true" Then Else Var WednesdayMelonPro = 0 EndIf If BananaSyrupEnable = "true" Then Else Var ProBadValentineEnable = 0 Var MondayBananaPro = 0 EndIf If PeachSyrupEnable = "true" Then Else Var ProPeachEnable = 0 EndIf If EnergyDrinkEnable = "true" Then Else Var EnergyDrink1BathPro = 0 Var FreeEnergyDrink = 0 EndIf If FreeFirePro = 1 Then Var FreeFireMenuState1 = $12-99-03-0026.Button Var FreeFireMenuState2 = $12-99-03-0067.Button Var FreeFireMenuState3 = $12-99-03-0066.Button Else Var FreeFireMenuState1 = "Invisible" Var FreeFireMenuState2 = "Invisible" Var FreeFireMenuState3 = "Invisible" EndIf If LipitPro = 1 Then READ_FILE "/mnt/sdcard/lipit_reward_out_of_stock" lipitOutOfStock STRCONTAIN "1" lipitOutOfStock LipitOutOfStockContain If LipitOutOfStockContain = "true" Then Var LipitRewardOutOfStock = 1 EndIf Var VideoMainPage = "ROOT/taobin_project/video/main_page_event_pro1.mp4" Var CountDownShowButton = 0 ;Var MainPageEventWithTimeout = 25 Var ShowButtonClickFull = "Invisible" Var img_rest_main_page = "ROOT/taobin_project/image/main_page/bn_main_page_start.png" Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page/bn_main_page_member.png" Var img_reset_topup = "ROOT/taobin_project/image/main_page/bn_main_page_topup.png" Var WebAppShow = "Invisible" EndIf Var CurrentMainVideoTemp = 0 If TeaTimePro = 1 Then Var VideoMainPage = "ROOT/taobin_project/video/main_page_event_pro1.mp4" Var CurrentMainVideoTemp = 1 Var CountDownShowButton = 0 ;Var MainPageEventWithTimeout = 25 Var ShowButtonClickFull = "Invisible" Var img_rest_main_page = "ROOT/taobin_project/image/main_page/bn_main_page_start.png" Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page/bn_main_page_member.png" Var img_reset_topup = "ROOT/taobin_project/image/main_page/bn_main_page_topup.png" Var WebAppShow = "Invisible" Else If EnergyDrink1BathPro = 1 Then Var CurrentMainVideo = 1 Var CountDownShowButton = 0 ;Var MainPageEventWithTimeout = 25 Var ShowButtonClickFull = "Invisible" Var img_rest_main_page = "ROOT/taobin_project/image/main_page/bn_main_page_start.png" Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page/bn_main_page_member.png" Var img_reset_topup = "ROOT/taobin_project/image/main_page/bn_main_page_topup.png" Var WebAppShow = "Invisible" EndIf If CoffeeDrink1BathPro = 1 Then Var CurrentMainVideo = 1 Var CountDownShowButton = 0 ;Var MainPageEventWithTimeout = 25 Var ShowButtonClickFull = "Invisible" Var img_rest_main_page = "ROOT/taobin_project/image/main_page/bn_main_page_start.png" Var MemberButtonFileNameRest = "ROOT/taobin_project/image/main_page/bn_main_page_member.png" Var img_reset_topup = "ROOT/taobin_project/image/main_page/bn_main_page_topup.png" Var WebAppShow = "Invisible" EndIf EndIf DEBUGVAR FreePowerup