pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

I sard กกต

Browse source
This commit is contained in:
kong 2023-07-12 22:17:28 +07:00
parent 80ccab2571
commit 40bd35a369
29 changed files with 1034 additions and 264 deletions
Download patch file Download diff file Expand all files Collapse all files

173
xml/event/promotion_mystery_cup_35.xml
View file

@ -8962,18 +8962,24 @@ LIMENADE SODA" </Value>
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Random2 0 IndexOfRateupOreoMilk ResultRandomIndex
Var ProductCodeRandom = ListOfOreoMilk[ResultRandomIndex]
DEBUGVAR ListOfOreoMilk[ResultRandomIndex]
Var IndexOfMilk = IndexOfMilk - 1
Random2 0 IndexOfMilk ResultRandomIndex
Var ProductCodeRandom = ListOfMilk[ResultRandomIndex]
DEBUGVAR ListOfMilk[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Random2 0 IndexOfMilk ResultRandomIndex
Var ProductCodeRandom = ListOfMilk[ResultRandomIndex]
DEBUGVAR ListOfMilk[ResultRandomIndex]
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk - 1
Random2 0 IndexOfRateupOreoMilk ResultRandomIndex
Var ProductCodeRandom = ListOfOreoMilk[ResultRandomIndex]
DEBUGVAR ListOfOreoMilk[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
@ -9013,19 +9019,29 @@ LIMENADE SODA" </Value>
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
DEBUGVAR IndexOfTea
DEBUGVAR IndexOfRateupOreoTea
If OreoGuarantee > 4 Then
Random2 0 IndexOfRateupOreoTea ResultRandomIndex
Var ProductCodeRandom = ListOfOreoTea[ResultRandomIndex]
DEBUGVAR ListOfOreoTea[ResultRandomIndex]
Var IndexOfTea = IndexOfTea - 1
Random2 0 IndexOfTea ResultRandomIndex
Var ProductCodeRandom = ListOfTea[ResultRandomIndex]
DEBUGVAR ListOfTea[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Random2 0 IndexOfTea ResultRandomIndex
Var ProductCodeRandom = ListOfTea[ResultRandomIndex]
DEBUGVAR ListOfTea[ResultRandomIndex]
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea - 1
Random2 0 IndexOfRateupOreoTea ResultRandomIndex
Var ProductCodeRandom = ListOfOreoTea[ResultRandomIndex]
DEBUGVAR ListOfOreoTea[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
@ -9067,23 +9083,30 @@ Var OreoGuarantee = OreoGuarantee + 1
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
DEBUGVAR IndexOfCoffee
DEBUGVAR IndexOfRateupOreoCoffee
If OreoGuarantee > 4 Then
Var IndexOfCoffee = IndexOfCoffee - 1
Random2 0 IndexOfCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfCoffee[ResultRandomIndex]
DEBUGVAR ListOfCoffee[ResultRandomIndex]
Random2 0 IndexOfRateupOreoCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfOreoCoffee[ResultRandomIndex]
DEBUGVAR ListOfOreoCoffee[ResultRandomIndex]
Var OreoGuarantee = 0
Var OreoGuarantee = 0
Else
Else
Var IndexOfRateupOreoCoffee = IndexOfRateupOreoCoffee - 1
Random2 0 IndexOfRateupOreoCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfOreoCoffee[ResultRandomIndex]
DEBUGVAR ListOfOreoCoffee[ResultRandomIndex]
Random2 0 IndexOfCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfCoffee[ResultRandomIndex]
DEBUGVAR ListOfCoffee[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
EndIf
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
@ -9123,20 +9146,24 @@ EndIf
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Random2 0 IndexOfRateupOreoAll ResultRandomIndex
Var ProductCodeRandom = ListOfOreoAll[ResultRandomIndex]
DEBUGVAR ListOfOreoAll[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Random2 0 IndexOfAllRandom ResultRandomIndex
Var ProductCodeRandom = ListOfAllRandom[ResultRandomIndex]
DEBUGVAR ListOfAllRandom[ResultRandomIndex]
EndIf
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Var IndexOfAllRandom = IndexOfAllRandom - 1
Random2 0 IndexOfAllRandom ResultRandomIndex
Var ProductCodeRandom = ListOfAllRandom[ResultRandomIndex]
DEBUGVAR ListOfAllRandom[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll - 1
Random2 0 IndexOfRateupOreoAll ResultRandomIndex
Var ProductCodeRandom = ListOfOreoAll[ResultRandomIndex]
DEBUGVAR ListOfOreoAll[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
@ -9286,7 +9313,7 @@ EndIf
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0023"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0023"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
@ -9299,7 +9326,7 @@ EndIf
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0024"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0024"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea + 1
EndIf
@ -9312,7 +9339,7 @@ EndIf
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0025"
Var ListOfOreoCoffee[IndexOfRateupOreoCoffee] = "12-99-03-0025"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoCoffee = IndexOfRateupOreoCoffee + 1
EndIf
@ -9325,7 +9352,7 @@ EndIf
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0026"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0026"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
@ -9338,7 +9365,7 @@ EndIf
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0027"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0027"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
@ -9351,12 +9378,12 @@ EndIf
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0028"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0028"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Hojicha oreo volcano
If $12-99-03-0029.Button = "Enable" Then
If $12-99-03-0028.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0029"
Var ListOfTea[IndexOfTea] = "12-99-03-0029"
Var IndexOfAllRandom = IndexOfAllRandom + 1
@ -9392,6 +9419,28 @@ EndIf
Var IndexOfTea = IndexOfTea + 1
EndIf
; THAI MILK TEA OREO SMOOTHIE
If $12-99-03-0040.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0040"
Var ListOfTea[IndexOfTea] = "12-99-03-0040"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0040"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0040"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea + 1
EndIf
; THAI MILK TEA SMOOTHIE
If $12-99-03-0041.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0041"
Var ListOfTea[IndexOfTea] = "12-99-03-0041"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; Tokyo bana^2 milk smoothie
If $12-99-03-0033.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0033"
@ -9448,11 +9497,17 @@ EndIf
Var IndexOfCoffee = IndexOfCoffee + 1
EndIf
DEBUGVAR IndexOfAllRandom
DEBUGVAR IndexOfCoffee
DEBUGVAR IndexOfMilk
DEBUGVAR IndexOfTea
DEBUGVAR IndexOfRateupOreoAll
DEBUGVAR IndexOfRateupOreoCoffee
DEBUGVAR IndexOfRateupOreoMilk
DEBUGVAR IndexOfRateupOreoTea
If IndexOfAllRandom = 0 Then
Var SubRandAllButtonEnable = "Disable"
EndIf
@ -9467,11 +9522,29 @@ EndIf
Var SubRandTeaButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoAll = 0 Then
Var SubRandAllButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoCoffee = 0 Then
Var SubRandCoffButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoMilk = 0 Then
Var SubRandMilkButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoTea = 0 Then
Var SubRandTeaButtonEnable = "Disable"
EndIf
Var ResultRandomIndex = 0
Refresh
</EventOnClick>
</Button>

117
xml/event/promotion_onclick1.inc
View file

@ -1,61 +1,62 @@
Var NameDrink = "OREO SMOOTHIE VOLCANO"
Var NameDrinkTH = "โอริโอ้ปั่นภูเขาไฟ"
Var DrinkDescriptionTH = "นม น้ำตาล โอริโอ้ "
Var DrinkDescription = "Milk, Sugar, Oreo, Ice"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_smoothie_oreo.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
Var PriceD3 = $12-03-03-0009.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "##-##-##-####"
Var PD_CODE3 = "12-03-03-0009"
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = "Disable2"
Var PD_STAGE_3 = $12-03-03-0009.Button
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "-"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "12-03-03-0009"
EndIf
EndIf
Var menu_name_eng_hot = $##-##-##-####.NameE
Var menu_desc_eng_hot = $##-##-##-####.descriptionE
Var menu_name_thai_hot = $##-##-##-####.Name
Var menu_desc_thai_hot = $##-##-##-####.description
Var menu_name_eng_cold = $##-##-##-####.NameE
Var menu_desc_eng_cold = $##-##-##-####.descriptionE
Var menu_name_thai_cold = $##-##-##-####.Name
Var menu_desc_thai_cold = $##-##-##-####.description
Var menu_name_eng_blender = $12-03-03-0009.NameE
Var menu_desc_eng_blender = $12-03-03-0009.descriptionE
Var menu_name_thai_blender = $12-03-03-0009.Name
Var menu_desc_thai_blender = $12-03-03-0009.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var NameDrink = "SUPER OREO VOLCANO"
Var NameDrinkTH = "ซูเปอร์โอริภูเขาไฟ"
Var DrinkDescriptionTH = "นม น้ำตาล โอริโอ้ "
Var DrinkDescription = "Milk, Sugar, Oreo"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_super_oreo_volcano.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
Var PriceD3 = $12-03-03-0032.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "##-##-##-####"
Var PD_CODE3 = "12-03-03-0032"
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = "Disable2"
Var PD_STAGE_3 = $12-03-03-0032.Button
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "-"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "12-03-03-0032"
EndIf
EndIf
Var menu_name_eng_hot = $##-##-##-####.NameE
Var menu_desc_eng_hot = $##-##-##-####.descriptionE
Var menu_name_thai_hot = $##-##-##-####.Name
Var menu_desc_thai_hot = $##-##-##-####.description
Var menu_name_eng_cold = $##-##-##-####.NameE
Var menu_desc_eng_cold = $##-##-##-####.descriptionE
Var menu_name_thai_cold = $##-##-##-####.Name
Var menu_desc_thai_cold = $##-##-##-####.description
Var menu_name_eng_blender = $12-03-03-0032.NameE
Var menu_desc_eng_blender = $12-03-03-0032.descriptionE
Var menu_name_thai_blender = $12-03-03-0032.Name
Var menu_desc_thai_blender = $12-03-03-0032.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var OreoWelcomeDrinkFromClick = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"

53
xml/event/promotion_onclick3.inc
View file

@ -165,7 +165,7 @@ Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0029"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0029"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
@ -193,6 +193,28 @@ Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; THAI MILK TEA OREO SMOOTHIE
If $12-99-03-0040.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0040"
Var ListOfTea[IndexOfTea] = "12-99-03-0040"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0040"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0040"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea + 1
EndIf
; THAI MILK TEA SMOOTHIE
If $12-99-03-0041.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0041"
Var ListOfTea[IndexOfTea] = "12-99-03-0041"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; Tokyo bana^2 milk smoothie
If $12-99-03-0033.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0033"
@ -249,11 +271,17 @@ Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfCoffee = IndexOfCoffee + 1
EndIf
DEBUGVAR IndexOfAllRandom
DEBUGVAR IndexOfCoffee
DEBUGVAR IndexOfMilk
DEBUGVAR IndexOfTea
DEBUGVAR IndexOfRateupOreoAll
DEBUGVAR IndexOfRateupOreoCoffee
DEBUGVAR IndexOfRateupOreoMilk
DEBUGVAR IndexOfRateupOreoTea
If IndexOfAllRandom = 0 Then
Var SubRandAllButtonEnable = "Disable"
EndIf
@ -268,4 +296,25 @@ Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var SubRandTeaButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoAll = 0 Then
Var SubRandAllButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoCoffee = 0 Then
Var SubRandCoffButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoMilk = 0 Then
Var SubRandMilkButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoTea = 0 Then
Var SubRandTeaButtonEnable = "Disable"
EndIf
Var ResultRandomIndex = 0
Refresh

117
xml/event/promotion_oreo_welcome_drink.xml
View file

@ -8966,64 +8966,65 @@ LIMENADE SODA" </Value>
</FilenameDisable>
<EventOnClick>
Var NameDrink = "OREO SMOOTHIE VOLCANO"
Var NameDrinkTH = "โอริโอ้ปั่นภูเขาไฟ"
Var DrinkDescriptionTH = "นม น้ำตาล โอริโอ้ "
Var DrinkDescription = "Milk, Sugar, Oreo, Ice"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_smoothie_oreo.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
Var PriceD3 = $12-03-03-0009.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "##-##-##-####"
Var PD_CODE3 = "12-03-03-0009"
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = "Disable2"
Var PD_STAGE_3 = $12-03-03-0009.Button
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "-"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "12-03-03-0009"
EndIf
EndIf
Var menu_name_eng_hot = $##-##-##-####.NameE
Var menu_desc_eng_hot = $##-##-##-####.descriptionE
Var menu_name_thai_hot = $##-##-##-####.Name
Var menu_desc_thai_hot = $##-##-##-####.description
Var menu_name_eng_cold = $##-##-##-####.NameE
Var menu_desc_eng_cold = $##-##-##-####.descriptionE
Var menu_name_thai_cold = $##-##-##-####.Name
Var menu_desc_thai_cold = $##-##-##-####.description
Var menu_name_eng_blender = $12-03-03-0009.NameE
Var menu_desc_eng_blender = $12-03-03-0009.descriptionE
Var menu_name_thai_blender = $12-03-03-0009.Name
Var menu_desc_thai_blender = $12-03-03-0009.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var NameDrink = "SUPER OREO VOLCANO"
Var NameDrinkTH = "ซูเปอร์โอริภูเขาไฟ"
Var DrinkDescriptionTH = "นม น้ำตาล โอริโอ้ "
Var DrinkDescription = "Milk, Sugar, Oreo"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_super_oreo_volcano.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
Var PriceD3 = $12-03-03-0032.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "##-##-##-####"
Var PD_CODE3 = "12-03-03-0032"
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = "Disable2"
Var PD_STAGE_3 = $12-03-03-0032.Button
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "-"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "12-03-03-0032"
EndIf
EndIf
Var menu_name_eng_hot = $##-##-##-####.NameE
Var menu_desc_eng_hot = $##-##-##-####.descriptionE
Var menu_name_thai_hot = $##-##-##-####.Name
Var menu_desc_thai_hot = $##-##-##-####.description
Var menu_name_eng_cold = $##-##-##-####.NameE
Var menu_desc_eng_cold = $##-##-##-####.descriptionE
Var menu_name_thai_cold = $##-##-##-####.Name
Var menu_desc_thai_cold = $##-##-##-####.description
Var menu_name_eng_blender = $12-03-03-0032.NameE
Var menu_desc_eng_blender = $12-03-03-0032.descriptionE
Var menu_name_thai_blender = $12-03-03-0032.Name
Var menu_desc_thai_blender = $12-03-03-0032.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var OreoWelcomeDrinkFromClick = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"

105
xml/event/promotion_template3.inc
View file

@ -29,18 +29,24 @@
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Random2 0 IndexOfRateupOreoMilk ResultRandomIndex
Var ProductCodeRandom = ListOfOreoMilk[ResultRandomIndex]
DEBUGVAR ListOfOreoMilk[ResultRandomIndex]
Var IndexOfMilk = IndexOfMilk - 1
Random2 0 IndexOfMilk ResultRandomIndex
Var ProductCodeRandom = ListOfMilk[ResultRandomIndex]
DEBUGVAR ListOfMilk[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Random2 0 IndexOfMilk ResultRandomIndex
Var ProductCodeRandom = ListOfMilk[ResultRandomIndex]
DEBUGVAR ListOfMilk[ResultRandomIndex]
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk - 1
Random2 0 IndexOfRateupOreoMilk ResultRandomIndex
Var ProductCodeRandom = ListOfOreoMilk[ResultRandomIndex]
DEBUGVAR ListOfOreoMilk[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
@ -80,19 +86,29 @@
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
DEBUGVAR IndexOfTea
DEBUGVAR IndexOfRateupOreoTea
If OreoGuarantee > 4 Then
Random2 0 IndexOfRateupOreoTea ResultRandomIndex
Var ProductCodeRandom = ListOfOreoTea[ResultRandomIndex]
DEBUGVAR ListOfOreoTea[ResultRandomIndex]
Var IndexOfTea = IndexOfTea - 1
Random2 0 IndexOfTea ResultRandomIndex
Var ProductCodeRandom = ListOfTea[ResultRandomIndex]
DEBUGVAR ListOfTea[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Random2 0 IndexOfTea ResultRandomIndex
Var ProductCodeRandom = ListOfTea[ResultRandomIndex]
DEBUGVAR ListOfTea[ResultRandomIndex]
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea - 1
Random2 0 IndexOfRateupOreoTea ResultRandomIndex
Var ProductCodeRandom = ListOfOreoTea[ResultRandomIndex]
DEBUGVAR ListOfOreoTea[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
@ -134,23 +150,30 @@ Var OreoGuarantee = OreoGuarantee + 1
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
DEBUGVAR IndexOfCoffee
DEBUGVAR IndexOfRateupOreoCoffee
If OreoGuarantee > 4 Then
Var IndexOfCoffee = IndexOfCoffee - 1
Random2 0 IndexOfCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfCoffee[ResultRandomIndex]
DEBUGVAR ListOfCoffee[ResultRandomIndex]
Random2 0 IndexOfRateupOreoCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfOreoCoffee[ResultRandomIndex]
DEBUGVAR ListOfOreoCoffee[ResultRandomIndex]
Var OreoGuarantee = 0
Var OreoGuarantee = 0
Else
Else
Var IndexOfRateupOreoCoffee = IndexOfRateupOreoCoffee - 1
Random2 0 IndexOfRateupOreoCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfOreoCoffee[ResultRandomIndex]
DEBUGVAR ListOfOreoCoffee[ResultRandomIndex]
Random2 0 IndexOfCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfCoffee[ResultRandomIndex]
DEBUGVAR ListOfCoffee[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
EndIf
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
@ -190,20 +213,24 @@ EndIf
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Random2 0 IndexOfRateupOreoAll ResultRandomIndex
Var ProductCodeRandom = ListOfOreoAll[ResultRandomIndex]
DEBUGVAR ListOfOreoAll[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Random2 0 IndexOfAllRandom ResultRandomIndex
Var ProductCodeRandom = ListOfAllRandom[ResultRandomIndex]
DEBUGVAR ListOfAllRandom[ResultRandomIndex]
EndIf
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Var IndexOfAllRandom = IndexOfAllRandom - 1
Random2 0 IndexOfAllRandom ResultRandomIndex
Var ProductCodeRandom = ListOfAllRandom[ResultRandomIndex]
DEBUGVAR ListOfAllRandom[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll - 1
Random2 0 IndexOfRateupOreoAll ResultRandomIndex
Var ProductCodeRandom = ListOfOreoAll[ResultRandomIndex]
DEBUGVAR ListOfOreoAll[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"

21
xml/event/tricker.ev
View file

@ -15,11 +15,13 @@ Var PepsiProEnable = 0
Var PepsiPromoteVideo = 0
Var PepsiProCodeEnable = 0
Var SoundBackToSchoolType = 0
; End
Var MysteryProEnable = 0
Var OreoWelcomeDrinkEnable = 0
Var Anniversary3VideoEnable = 0
If SystemDateMonthInt = 7 Then
If SystemDateDayInt = 3 Then
@ -106,23 +108,32 @@ If SystemDateMonthInt = 7 Then
EndIf
If SystemDateMonthInt = 7 Then
If SystemDateDayInt > 19 Then
If SystemDateDayInt < 30 Then
Var Anniversary3VideoEnable = 1
EndIf
If SystemDateDayInt = 30 Then
Var Anniversary3VideoEnable = 1
EndIf
EndIf
EndIf
If BoxID = 173149 Then
Var MysteryProEnable = 1
Var MysteryProEnable = 0
Var OreoWelcomeDrinkEnable = 1
EndIf
If BoxID = 172053 Then
Var MysteryProEnable = 1
;Var OreoWelcomeDrinkEnable = 1
Var OreoWelcomeDrinkEnable = 0
EndIf
If BoxID = 201092 Then
Var MysteryProEnable = 1
EndIf
If BoxID = 172527 Then
Var MysteryProEnable = 1
EndIf
If BoxID = 176757 Then
Var MysteryProEnable = 1