taobin_project/xml/event/tricker.ev
2024-10-10 15:07:46 +07:00

498 lines
9.1 KiB
Text

; 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 - 25 Oct
Var JemilaPro = 0
Var FromJemilaPro = 0
Var JemilaRewardOutOfStock = 0
; Halloween promotion, 21 Oct - 3 Nov
Var HalloweenPro = 0
Var FromHalloweenPro = 0
Var NewCollectPoint = 1
Var PayMentCodeShouldCollectPromotionPoint = 0
Var NotCollectPointPromotion = 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 <= 25 Then
Var JemilaPro = 1
EndIf
If SystemDateDayInt >= 21 Then
Var HalloweenPro = 1
EndIf
EndIf
If SystemDateMonthInt = 11 Then
If SystemDateDayInt <= 3 Then
Var HalloweenPro = 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 = 0
Var JemilaPro = 1
Var HalloweenPro = 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
If BoxID = 176121 Then
Var MomCocoaPro = 0
Var MomCocoaProDiscountEnable = 0
Var RobinsonBeautyPro = 0
Var JemilaPro = 1
EndIf
If BoxID = 201729 Then
Var MomCocoaPro = 0
Var MomCocoaProDiscountEnable = 0
Var RobinsonBeautyPro = 0
Var JemilaPro = 1
Var HalloweenPro = 1
EndIf
If BoxID = 201714 Then
Var MomCocoaPro = 0
Var MomCocoaProDiscountEnable = 0
Var RobinsonBeautyPro = 0
Var JemilaPro = 1
Var HalloweenPro = 1
EndIf
If BoxID = 173149 Then
Var MomCocoaPro = 0
Var MomCocoaProDiscountEnable = 0
Var RobinsonBeautyPro = 0
Var JemilaPro = 1
Var HalloweenPro = 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 HalloweenPro = 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
If PepsiHighYSyrupEnable = "true" Then
Else
Var HalloweenPro = 0
EndIf
EndIf
If MintSyrupEnable = "true" Then
Else
Var PassionMintPro = 0
EndIf
If CollagenPowderEnable = "true" Then
Else
Var JemilaPro = 0
EndIf
Var CurrentMainVideoTemp = 0
; Check reward out of stock
READ_FILE "/mnt/sdcard/coffeevending/jemila_reward_out_of_stock" JemilaRewardOutOfStock
DEBUGVAR JemilaRewardOutOfStock
; Control collect promotion point behavior
Var New_Payment = 0
Var NewFlowPaymentCode = 0
If BoxID = 105005 Then
Var New_Payment = 1
Var NewFlowPaymentCode = 1
EndIf
If BoxID = 173149 Then
Var New_Payment = 1
Var NewFlowPaymentCode = 1
EndIf
If BoxID = 173249 Then
Var New_Payment = 1
Var NewFlowPaymentCode = 1
EndIf
If BoxID = 172053 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 = 176757 Then
Var New_Payment = 1
Var NewFlowPaymentCode = 1
EndIf
;
If BoxID > 200000 Then
If BoxID < 201000 Then
Var New_Payment = 1
Var NewFlowPaymentCode = 1
EndIf
EndIf
Var SaveOrderNameAndPictureEnable = 0
If BoxID = 176757 Then
Var SaveOrderNameAndPictureEnable = 1
EndIf
; Check POS machine flag
Var ConnectWithPOSMachine = 0
READ_FILE "/mnt/sdcard/coffeevending/POS_MACHINE" POSMachineFlag
If POSMachineFlag = 1 Then
Var ConnectWithPOSMachine = 1
EndIf