; 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 ; Enable Nam Hom Coconut, 3 - 21 June Var NamHomCoconutPro = 0 Var FromNamHomCoconutPro = 0 Var NamHomCoconutRewardOutOfStock = 0 ; Enable Cocoa 7.7 promotion, 7 - 9 July Var Cocoa77Pro = 0 Var FromCocoa77Pro = 0 ; Enable Passion Mint promotion, 15 - 17 Jul Var PassionMintPro = 0 Var FromPassionMintPro = 0 ; Enable 7UpLuckyDrawX2 promotion, 22 Jul - 9 Aug Var 7UpLuckyDrawX2Pro = 0 ; Enable Mom Cocoa promotion, 10 Aug - 16 Aug Var MomCocoaPro = 0 Var MomCocoaProDiscountEnable = 0 Var FromMomCocoaPro = 0 Var Seeker.BuyMomCocoaProFlag = 0 ; Enable Robinson Beauty promotion, 9 - 30 Sep Var RobinsonBeautyPro = 0 Var FromRobinsonBeautyPro = 0 ; Enable Jemila promotion, 1 - 18 Oct Var JemilaPro = 0 Var NewCollectPoint = 1 Var ShouldCollectPromotionPoint = 0 Var NewFlowPaymentCode = 0 Var New_Payment = 0 Var XMLLiveInfoEnable = 0 Var LuckyDrawCampaign = 0 If SystemDateMonthInt = 1 Then Var LuckyDrawCampaign = 1 EndIf If SystemDateMonthInt = 7 Then If SystemDateDayInt <= 10 Then Var NamHomCoconutPro = 1 EndIf If SystemDateDayInt >= 7 Then If SystemDateDayInt <= 9 Then Var Cocoa77Pro = 1 EndIf EndIf If SystemDateDayInt >= 15 Then If SystemDateDayInt <= 17 Then Var PassionMintPro = 1 EndIf EndIf If SystemDateDayInt >= 22 Then Var 7UpLuckyDrawX2Pro = 1 EndIf EndIf If SystemDateMonthInt >= 7 Then Var LuckyDrawCampaign = 1 EndIf If SystemDateMonthInt = 8 Then If SystemDateDayInt <= 9 Then Var 7UpLuckyDrawX2Pro = 1 EndIf If SystemDateDayInt >= 10 Then Var MomCocoaPro = 1 If SystemDateDayInt >= 12 Then Var MomCocoaProDiscountEnable = 1 EndIf EndIf EndIf If SystemDateMonthInt = 9 Then If SystemDateDayInt <= 6 Then Var MomCocoaPro = 1 EndIf If SystemDateDayInt >= 9 Then Var RobinsonBeautyPro = 1 EndIf EndIf If SystemDateMonthInt = 10 Then If SystemDateDayInt <= 18 Then Var JemilaPro = 1 EndIf EndIf If BoxID = 105005 Then Var NewFlowPaymentCode = 1 Var New_Payment = 1 Var NamHomCoconutPro = 0 Var Cocoa77Pro = 0 Var 7UpLuckyDrawX2Pro = 0 Var PassionMintPro = 0 Var MomCocoaPro = 0 Var MomCocoaProDiscountEnable = 0 Var RobinsonBeautyPro = 1 EndIf If BoxID = 172331 Then Var MomCocoaPro = 0 Var MomCocoaProDiscountEnable = 0 Var RobinsonBeautyPro = 0 Var JemilaPro = 1 EndIf If BoxID = 172232 Then Var MomCocoaPro = 0 Var MomCocoaProDiscountEnable = 0 Var RobinsonBeautyPro = 0 Var JemilaPro = 1 EndIf If BoxID = 172053 Then Var MomCocoaPro = 0 Var MomCocoaProDiscountEnable = 0 Var RobinsonBeautyPro = 0 Var JemilaPro = 1 EndIf Var XMLLiveInfoEnable = 1 ; Exclusive Box Var GameEnableFromTrickerEv = 1 Var MayDayRunEnable = 0 ; 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 Var NamHomCoconutPro = 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 NamHomCoconutPro = 0 Var Cocoa77Pro = 0 Var 7UpLuckyDrawX2Pro = 0 Var PassionMintPro = 0 Var MomCocoaPro = 0 Var RobinsonBeautyPro = 0 Var JemilaPro = 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 CoconutSyrupEnable = "true" Then Else If BananaSyrupEnable = "true" Then Else Var NamHomCoconutPro = 0 EndIf EndIf If MelonSyrupEnable = "true" Then Else Var WednesdayMelonPro = 0 EndIf If CocoaPowderEnable = "true" Then Else Var Cocoa77Pro = 0 Var MomCocoaPro = 0 EndIf If 7UpSyrupEnable = "true" Then Else Var 7UpLuckyDrawX2Pro = 0 EndIf If MintSyrupEnable = "true" Then Else Var PassionMintPro = 0 EndIf Var CurrentMainVideoTemp = 0 DEBUGVAR FreePowerup ; Control collect promotion point behavior Var New_Payment = 0 Var NewFlowPaymentCode = 0 If BoxID = 173149 Then Var New_Payment = 1 Var NewFlowPaymentCode = 1 EndIf If BoxID = 200001 Then Var New_Payment = 1 Var NewFlowPaymentCode = 1 EndIf If BoxID = 175689 Then Var New_Payment = 1 Var NewFlowPaymentCode = 1 EndIf If BoxID = 201729 Then Var New_Payment = 1 Var NewFlowPaymentCode = 1 EndIf If BoxID = 200000 Then Var New_Payment = 1 Var NewFlowPaymentCode = 1 EndIf ; If BoxID > 200000 Then If BoxID < 200120 Then Var New_Payment = 1 Var NewFlowPaymentCode = 1 EndIf EndIf