add iamge

This commit is contained in:
wanlop run 2024-09-13 17:27:41 +07:00
commit 12b8c06fd1
38 changed files with 14184 additions and 1114 deletions

View file

@ -6504,7 +6504,7 @@
SAVELOG PriceDrinkTmp
If RoadShow = "true" Then
Var PriceDrinkTmp = 0
Var PriceDrinkTmpShow = "Free"
DEBUGVAR SelectDrink2

View file

@ -133,7 +133,8 @@ Var FromRobinsonBeautyPro = 0
Var JemilaPro = 0
Var NewCollectPoint = 1
Var ShouldCollectPromotionPoint = 0
Var PayMentCodeShouldCollectPromotionPoint = 0
Var NotCollectPointPromotion = 0
Var NewFlowPaymentCode = 0
Var New_Payment = 0

View file

@ -697,6 +697,10 @@
Var UseSlideShowVideo = 1
EndIf
If BoxID = 210011 Then
Var UseSlideShowVideo = 1
EndIf
If BoxID = 200002 Then
Var UseSlideShowVideo = 1
EndIf
@ -958,6 +962,8 @@
Var PriceUnitText = "Price in DH"
Var cups_sold_text = "Cups Sold Worldwide"
Var MemberButtonFileName = "ROOT/taobin_project/image/main_page_en/bp_main_page_member.png"
Var show_eng_button_stage = "Invisible"
@ -981,7 +987,6 @@
Var MinPhoneNumber = 9
Var MaxPhoneNumber = 9
Var UsePepsiTheme = 1
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/sold_cup_count.xml"
EndIf

View file

@ -125,17 +125,10 @@
EndIf
EndIf
DEBUGVAR PepweenCollectPoint
DEBUGVAR NotCollectPointPromotion
DEBUGVAR ProBadValentineEnable
DEBUGVAR FromBadValentinePro
DEBUGVAR LipitPro
DEBUGVAR FromLipitPro
DEBUGVAR FruityRayaEnable
DEBUGVAR FromFruityRaya
DEBUGVAR ProThaiTeaEnable
DEBUGVAR FromProThaiTea
DEBUGVAR FromProYuzu
DEBUGVAR RobinsonBeautyPro
DEBUGVAR FromRobinsonBeautyPro
If Seeker.TNumberTaobinCredit = "" Then
@ -179,101 +172,18 @@
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
If MyMintEnable = 1 Then
If FromMyMintPro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
EndIf
EndIf
DEBUGVAR FruityRayaEnable
DEBUGVAR FromFruityRaya
If FruityRayaEnable = 1 Then
If FromFruityRaya = 1 Then
Open "ROOT/taobin_project/inter/mys/xml/event/fruit_raya/page_get_free_1_fruit_raya.lxml"
EndIf
EndIf
DEBUGVAR ProThaiTeaEnable
DEBUGVAR FromProThaiTea
If ProThaiTeaEnable = 1 Then
If FromProThaiTea = 1 Then
Open "ROOT/taobin_project/inter/mys/xml/event/thai_tea/page_get_free_1_thai_tea.lxml"
EndIf
EndIf
DEBUGVAR ProYuzuEnable
DEBUGVAR FromProYuzu
If ProYuzuEnable = 1 Then
If FromProYuzu = 1 Then
Open "ROOT/taobin_project/inter/mys/xml/event/yuzu/page_get_free_1_yuzu.lxml"
EndIf
EndIf
If PepweenEnable = 1 Then
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
EndIf
EndIf
If ProBadValentineEnable = 1 Then
If FromBadValentinePro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_2.xml"
EndIf
EndIf
If LipitPro = 1 Then
If FromLipitPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
If LipitRewardOutOfStock = 0 Then
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/lipit/page_collect_point_pro_lipit_2.xml"
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml"
EndIf
EndIf
Else
If LipitRewardOutOfStock = 0 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_2.xml"
EndIf
EndIf
EndIf
EndIf
DEBUGVAR NamHomCoconutPro
DEBUGVAR FromNamHomCoconutPro
DEBUGVAR Seeker.CodeChannel
If NamHomCoconutPro = 1 Then
If FromNamHomCoconutPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
If NamHomCoconutRewardOutOfStock = 0 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml"
EndIf
EndIf
Else
If NamHomCoconutRewardOutOfStock = 0 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml"
EndIf
EndIf
EndIf
EndIf
If RobinsonBeautyPro = 1 Then
If FromRobinsonBeautyPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
Else
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
@ -313,98 +223,18 @@
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
DEBUGVAR MyMintEnable
DEBUGVAR FromMyMintPro
DEBUGVAR LipitPro
DEBUGVAR FromLipitPro
If MyMintEnable = 1 Then
If FromMyMintPro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
EndIf
EndIf
DEBUGVAR FruityRayaEnable
DEBUGVAR FromFruityRaya
If FruityRayaEnable = 1 Then
If FromFruityRaya = 1 Then
Open "ROOT/taobin_project/inter/mys/xml/event/fruit_raya/page_get_free_1_fruit_raya.lxml"
EndIf
EndIf
DEBUGVAR ProThaiTeaEnable
DEBUGVAR FromProThaiTea
If ProThaiTeaEnable = 1 Then
If FromProThaiTea = 1 Then
Open "ROOT/taobin_project/inter/mys/xml/event/thai_tea/page_get_free_1_thai_tea.lxml"
EndIf
EndIf
DEBUGVAR ProYuzuEnable
DEBUGVAR FromProYuzu
If ProYuzuEnable = 1 Then
If FromProYuzu = 1 Then
Open "ROOT/taobin_project/inter/mys/xml/event/yuzu/page_get_free_1_yuzu.lxml"
EndIf
EndIf
If ProBadValentineEnable = 1 Then
If FromBadValentinePro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/bad_valentine/page_collect_point_pro_bad_valentine_2.xml"
EndIf
EndIf
If LipitPro = 1 Then
If FromLipitPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
If LipitRewardOutOfStock = 0 Then
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/lipit/page_collect_point_pro_lipit_2.xml"
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml"
EndIf
EndIf
Else
If LipitRewardOutOfStock = 0 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_2.xml"
EndIf
EndIf
EndIf
EndIf
DEBUGVAR NamHomCoconutPro
DEBUGVAR FromNamHomCoconutPro
DEBUGVAR Seeker.CodeChannel
If NamHomCoconutPro = 1 Then
If FromNamHomCoconutPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
If NamHomCoconutRewardOutOfStock = 0 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml"
EndIf
EndIf
Else
If NamHomCoconutRewardOutOfStock = 0 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml"
EndIf
EndIf
EndIf
EndIf
If RobinsonBeautyPro = 1 Then
If FromRobinsonBeautyPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
Else
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

View file

@ -78,6 +78,11 @@
Var imgGetChange = "/imgGetChange-HKG.png"
EndIf
;inter-image
If CountryName = "UnitedArabEmirates Dubai" Then
Var imgGetChange = "/imgGetChange-UAE_DUBAI.png"
EndIf
;INT StoreCreditAmount
Var StoreCreditAmountStr !assigned StringFmt( StoreCreditAmount, DisplayFormat, PreScaleConvertShow )

View file

@ -232,7 +232,7 @@
If ShouldCollectPoint = 1 Then
Var Seeker.CollectPointMain = 1
If ShouldCollectPromotionPoint = 1 Then
If PayMentCodeShouldCollectPromotionPoint = 1 Then
Var Seeker.CollectPointPromotion = 1
EndIf
EndIf
@ -278,7 +278,7 @@
Var Seeker.CollectPointMain = 1
EndIf
If ShouldCollectPromotionPoint = 1 Then
If PayMentCodeShouldCollectPromotionPoint = 1 Then
Var Seeker.CollectPointPromotion = 1
EndIf
EndIf

View file

@ -4000,7 +4000,7 @@
SAVELOG PriceDrinkTmp
If RoadShow = "true" Then
Var PriceDrinkTmp = 0
Var PriceDrinkTmpShow = "Free"
DEBUGVAR SelectDrink2

View file

@ -4216,7 +4216,7 @@
SAVELOG PriceDrinkTmp
If RoadShow = "true" Then
Var PriceDrinkTmp = 0
Var PriceDrinkTmpShow = "Free"
DEBUGVAR SelectDrink2

View file

@ -7679,7 +7679,7 @@
SAVELOG PriceDrinkTmp
If RoadShow = "true" Then
Var PriceDrinkTmp = 0
Var PriceDrinkTmpShow = "Free"
DEBUGVAR SelectDrink2

View file

@ -4750,7 +4750,7 @@
SAVELOG PriceDrinkTmp
If RoadShow = "true" Then
Var PriceDrinkTmp = 0
Var PriceDrinkTmpShow = "Free"
DEBUGVAR SelectDrink2

View file

@ -5720,7 +5720,7 @@
SAVELOG PriceDrinkTmp
If RoadShow = "true" Then
Var PriceDrinkTmp = 0
Var PriceDrinkTmpShow = "Free"
DEBUGVAR SelectDrink2

View file

@ -29,7 +29,7 @@
Var Timeout = Timeout + 1
If Timeout > 300 Then
If Timeout > 60 Then
StatusLog "exit"
Open "ROOT/taobin_project/xml/page_board.xml"
EndIf
@ -39,7 +39,7 @@
Var Text1_9 = Text1_9 + " "
Var Text1_9 = Text1_9 + SystemDate
Var BackToMainTime = 300 - Timeout
Var BackToMainTime = 60 - Timeout
DEBUGVAR tmpPassPhrase

View file

@ -18,6 +18,9 @@
If BoxID = 210037 Then
Open "ROOT/taobin_project/xml/sold_cup_count.xml"
EndIf
If BoxID = 210011 Then
Open "ROOT/taobin_project/xml/sold_cup_count.xml"
EndIf
EndIf