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

do page_catalog.lxml

Browse source
This commit is contained in:
wanlop run 2025-01-27 10:01:54 +07:00
commit af3bda2620
101 changed files with 1645 additions and 1143 deletions
Download patch file Download diff file Expand all files Collapse all files

64
xml/page_NewBrewing3.xml
View file

@ -119,6 +119,36 @@
Var XStraw = 142
EndIf
If LanguageShow = "MYANMAR" Then
Play "ROOT/taobin_project/sound_eng/Wait_a_moment.mp3"
Var bnGetMoreStrawFileName = "ROOT/taobin_project/image/page_doing/bn_get_more_straw.png"
Var bpGetMoreStrawFileName = "ROOT/taobin_project/image/page_doing/bp_get_more_straw.png"
Var bnStrawProblemReport = DirImageDoing + "/bn_send_report_straw_mmr.png"
Var bpStrawProblemReport = DirImageDoing + "/bp_send_report_straw_mmr.png"
Var bnLidProblemReport = DirImageDoing + "/bn_send_report_lid_mmr.png"
Var bpLidProblemReport = DirImageDoing + "/bp_send_report_lid_mmr.png"
Var bn_get_lid_image = "ROOT/taobin_project/image/page_doing/bn_get_lid.png"
Var bp_get_lid_image = "ROOT/taobin_project/image/page_doing/bp_get_lid.png"
; wait for myanmar
Var brew_txt2 = "ROOT/taobin_project/video/brewing_txt_adv3_en.png"
Var brew_txt1 = "ROOT/taobin_project/video/brewing_txt_adv1_en.png"
;Var XStraw = 274
Var XStraw = 142
EndIf
If LanguageObjectShow = "Enable" Then
Var DirImageDoingInter = "ROOT/taobin_project/image/page_doing_inter/"
Var IMG_CNT = DirImageDoingInter + "/bg_show_time_remaining.png"
EndIf
Var waitAckPay = 0
Var VendingTSIDTmp = ""
Var VendingTSIDProblem = ""
@ -164,7 +194,10 @@
Var DirImage2 = "ROOT/taobin_project/image/topping2"
EndIf
DEBUGVAR show_eng
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_mmr/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/topping_mmr"
EndIf
Var next_pic_bn = DirImage + "/bn_add_order.png"
Var next_pic_bp = DirImage + "/bp_add_order.png"
@ -389,6 +422,10 @@
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
If LanguageShow = "MYANMAR" Then
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
Var BoxIDString !assigned SprintFmt("BOX_ID: &#34%s&#34\r\n", BoxID)
; reset
@ -415,6 +452,10 @@
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
If LanguageShow = "MYANMAR" Then
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
Var BoxIDString !assigned SprintFmt("BOX_ID: &#34%s&#34\r\n", BoxID)
; reset
@ -691,6 +732,9 @@
PlayLong PlaySoundLag
EndIf
If LanguageShow = "MYANMAR" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/next_drink.mp3"
EndIf
EndIf
If Timeout = 9 Then
If OpenFromCollectPoint3 = 0 Then
@ -1402,6 +1446,24 @@
<Value> ShowCountDownBrewing </Value>
</Text>
<Text>
<X> 816 </X>
<Y> 429 </Y>
<State> LanguageObjectShow </State>
<Language>
<ID> 000405 </ID>
</Language>
</Text>
<Text>
<X> 941 </X>
<Y> 518 </Y>
<State> LanguageObjectShow </State>
<Language>
<ID> 000406 </ID>
</Language>
</Text>
<EventUnitTest1>

28
xml/page_NewBrewing3Conti.xml
View file

@ -19,6 +19,16 @@
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_mmr/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/topping_mmr"
EndIf
If LanguageObjectShow = "Enable" Then
Var DirImageDoingInter = "ROOT/taobin_project/image/page_doing_inter/"
Var IMG_CNT = DirImageDoingInter + "/bg_show_time_remaining.png"
EndIf
Var next_pic_bn = DirImage + "/bn_add_order.png"
Var next_pic_bp = DirImage + "/bp_add_order.png"
Var text_next_order = DirImage + "/text_next_order.png"
@ -779,6 +789,24 @@
<Value> ShowCountDownBrewing </Value>
</Text>
<Text>
<X> 816 </X>
<Y> 429 </Y>
<State> LanguageObjectShow </State>
<Language>
<ID> 000405 </ID>
</Language>
</Text>
<Text>
<X> 941 </X>
<Y> 518 </Y>
<State> LanguageObjectShow </State>
<Language>
<ID> 000406 </ID>
</Language>
</Text>
<Button>
<X> 792 </X>
<Y> 1787 </Y>

12
xml/page_brewing3.xml
View file

@ -305,7 +305,7 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_mmr/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/topping2_mmr"
Var DirImage2 = "ROOT/taobin_project/image/topping_mmr"
EndIf
DEBUGVAR show_eng
@ -527,6 +527,10 @@
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
If LanguageShow = "MYANMAR" Then
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
Var BoxIDString !assigned SprintFmt("BOX_ID: &#34%s&#34\r\n", BoxID)
; reset
@ -552,6 +556,9 @@
Else
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
If LanguageShow = "MYANMAR" Then
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
Var BoxIDString !assigned SprintFmt("BOX_ID: &#34%s&#34\r\n", BoxID)
@ -847,6 +854,9 @@
PlayLong PlaySoundLag
EndIf
If LanguageShow = "MYANMAR" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/next_drink.mp3"
EndIf
EndIf
If Timeout = 9 Then
If OpenFromCollectPoint3 = 0 Then

2
xml/page_brewing3Conti.xml
View file

@ -49,7 +49,7 @@
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_mmr/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/topping2_mmr"
Var DirImage2 = "ROOT/taobin_project/image/topping_mmr"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing_mmr/img2_mmr.png"
EndIf

1
xml/page_catalog.lxml
View file

@ -14,6 +14,7 @@
If CountryName = "Thailand" Then
If InternationalEnable = 1 Then
If EnableMultiInstance = "true" Then
Var OpenFromPageBoard = 1
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/inter/tha/xml/multi/page_catalog.lxml"
EndIf

515
xml/page_check_member2.xml
View file

@ -586,7 +586,7 @@
Var CouponExireB_M = "December"
EndIf
Var CouponExpireB = ""
Var CouponExpireB = CouponExpireB + CouponExireB_D
Var CouponExpireB = CouponExpireB + " "
Var CouponExpireB = CouponExpireB + CouponExireB_M
@ -960,7 +960,7 @@
Var CouponExireB_M = "ธันวาคม"
EndIf
Var CouponExpireB = ""
Var CouponExpireB = CouponExpireB + CouponExireB_D
Var CouponExpireB = CouponExpireB + " "
Var CouponExpireB = CouponExpireB + CouponExireB_M
@ -1045,30 +1045,26 @@
Var TaobinExpireYear = TaobinExpireYear + 0
;Var TaobinLevelDesc3 = "သင့်တွင် ကူပွန်များရှိသည်။ "
;Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
;Var TaobinLevelDesc3 = TaobinLevelDesc3 + " နံပါတ်များ"
If TaobinLevel = "1" Then
Var TaobinLevelDesc1 = "ရှက်လိပ်အဆင့်"
Var TaobinLevelDesc1 = "ရှက်နေသောလိပ်အဆင့်"
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel1.png"
EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "လမ်းလျှောက်လိပ်အဆင့်"
Var TaobinLevelDesc1 = "လမ်းလျှောက်နေသောလိပ်အဆင့်"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " အခွံများ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "Flying turtle အဆင့်သို့ ရွှေ့ရန်"
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ပျံသန်းသောလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel2.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
;Var TaobinLevelDesc1 = "လိပ်အဆင့် "
;Var TaobinLevelDesc1 = "ပျံသန်းနေသောလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
@ -1077,19 +1073,19 @@
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "လိပ်ပျံအဆင့်အထိ " + ExpireStrTmp
Var TaobinLevelDesc1 = "ပျံသန်းသောလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var PointDiff = 200 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " အခွံများ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "Master လိပ်အဆင့်သို့ ပြောင်းရွှေ့ရန်"
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ဆရာလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel3.png"
If CoffeePointRank > 199 Then
;Var TaobinLeveImg = "/taoLevel4.png"
;Var TaobinLevelDesc1 = "သခင်လိပ်အဆင့် "
;Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
@ -1098,7 +1094,7 @@
EndIf
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "မာစတာလိပ်အဆင့်အထိ " + ExpireStrTmp
Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
@ -1108,251 +1104,248 @@
If CouponIDA = "" Then
Else
Var CouponSTA = "Enable"
Var CouponExireA_D = ""
Var CouponExireA_M = ""
Var CouponExireA_Y = ""
Var CouponTypeA = ""
Var CouponNameA = ""
SPLIT CouponInfoA "/" 2 CouponTypeA
SPLIT CouponInfoA "/" 4 CouponExireA_D
SPLIT CouponInfoA "/" 5 CouponExireA_M
SPLIT CouponInfoA "/" 6 CouponExireA_Y
If CouponTypeA = "100" Then
Var CouponNameA = "/imgCouponC33.png"
EndIf
If CouponTypeA = "101" Then
Var CouponNameA = "/imgCouponC44.png"
EndIf
If CouponTypeA = "102" Then
Var CouponNameA = "/imgCouponC39.png"
EndIf
If CouponTypeA = "103" Then
Var CouponNameA = "/imgCouponC40.png"
EndIf
If CouponTypeA = "105" Then
Var CouponNameA = "/imgCouponC38.png"
EndIf
If CouponTypeA = "106" Then
Var CouponNameA = "/imgCouponC41.png"
EndIf
If CouponTypeA = "107" Then
Var CouponNameA = "/imgCouponC42.png"
EndIf
If CouponTypeA = "109" Then
Var CouponNameA = "/imgCouponC33.png"
EndIf
If CouponTypeA = "112" Then
Var CouponNameA = "/imgCoupon112.png"
EndIf
If CouponTypeA = "113" Then
Var CouponNameA = "/imgCoupon113.png"
EndIf
If CouponTypeA = "120" Then
Var CouponNameA = "/imgCoupon120.png"
EndIf
If CouponTypeA = "121" Then
Var CouponNameA = "/imgCoupon121.png"
EndIf
If CouponTypeA = "135" Then
Var CouponNameA = "/imgCouponMKP1.png"
EndIf
INT CouponExireA_D
INT CouponExireA_Y
Var CouponExireA_Y = CouponExireA_Y + 543
If CouponExireA_M = "01" Then
Var CouponExireA_M = "ဇန္နဝါရီလ"
EndIf
If CouponExireA_M = "02" Then
Var CouponExireA_M = "ေဖေဖာ္ဝါရီလ"
EndIf
If CouponExireA_M = "03" Then
Var CouponExireA_M = "မတ္လ"
EndIf
If CouponExireA_M = "04" Then
Var CouponExireA_M = "ဧျပီလ"
EndIf
If CouponExireA_M = "05" Then
Var CouponExireA_M = "ေမလ"
EndIf
If CouponExireA_M = "06" Then
Var CouponExireA_M = "ဇြန္လ"
EndIf
If CouponExireA_M = "07" Then
Var CouponExireA_M = "ဇူလိုင္လ"
EndIf
If CouponExireA_M = "08" Then
Var CouponExireA_M = "ၾသဂုတ္လ"
EndIf
If CouponExireA_M = "09" Then
Var CouponExireA_M = "စက္တင္ဘာလ"
EndIf
If CouponExireA_M = "10" Then
Var CouponExireA_M = "ေအာက္တိုဘာလ"
EndIf
If CouponExireA_M = "11" Then
Var CouponExireA_M = "ႏိုဝင္ဘာလ"
EndIf
If CouponExireA_M = "12" Then
Var CouponExireA_M = "ဒီဇင္ဘာလ"
EndIf
Var CouponExpireA = ""
Var CouponExpireA = CouponExpireA + CouponExireA_D
Var CouponExpireA = CouponExpireA + " "
Var CouponExpireA = CouponExpireA + CouponExireA_M
Var CouponExpireA = CouponExpireA + " "
Var CouponExpireA = CouponExpireA + CouponExireA_Y
Var CouponExpireA = "သက်တမ်းကုန် " + CouponExpireA
Var CouponExpireAPosittion = 1400
EndIf
If CouponIDB = "" Then
Else
Var CouponSTB = "Enable"
Var CouponExireB_D = ""
Var CouponExireB_M = ""
Var CouponExireB_Y = ""
Var CouponTypeB = ""
Var CouponNameB = ""
SPLIT CouponInfoB "/" 2 CouponTypeB
SPLIT CouponInfoB "/" 4 CouponExireB_D
SPLIT CouponInfoB "/" 5 CouponExireB_M
SPLIT CouponInfoB "/" 6 CouponExireB_Y
If CouponTypeB = "100" Then
Var CouponNameB = "/imgCouponC33.png"
EndIf
If CouponTypeB = "101" Then
Var CouponNameB = "/imgCouponC44.png"
EndIf
If CouponTypeB = "102" Then
Var CouponNameB = "/imgCouponC39.png"
EndIf
If CouponTypeB = "103" Then
Var CouponNameB = "/imgCouponC40.png"
EndIf
If CouponTypeB = "105" Then
Var CouponNameB = "/imgCouponC38.png"
EndIf
If CouponTypeB = "106" Then
Var CouponNameB = "/imgCouponC41.png"
EndIf
If CouponTypeB = "107" Then
Var CouponNameB = "/imgCouponC42.png"
EndIf
If CouponTypeB = "109" Then
Var CouponNameB = "/imgCouponC33.png"
EndIf
If CouponTypeB = "112" Then
Var CouponNameB = "/imgCoupon112.png"
EndIf
If CouponTypeB = "113" Then
Var CouponNameB = "/imgCoupon113.png"
EndIf
If CouponTypeB = "120" Then
Var CouponNameB = "/imgCoupon120.png"
EndIf
If CouponTypeB = "121" Then
Var CouponNameB = "/imgCoupon121.png"
EndIf
If CouponTypeB = "135" Then
Var CouponNameB = "/imgCouponMKP1.png"
EndIf
INT CouponExireB_D
INT CouponExireB_Y
Var CouponExireB_Y = CouponExireB_Y + 0
If CouponExireB_M = "01" Then
Var CouponExireB_M = "ဇန္နဝါရီလ"
EndIf
If CouponExireB_M = "02" Then
Var CouponExireB_M = "ေဖေဖာ္ဝါရီလ"
EndIf
If CouponExireB_M = "03" Then
Var CouponExireB_M = "မတ္လ"
EndIf
If CouponExireB_M = "04" Then
Var CouponExireB_M = "ဧျပီလ"
EndIf
If CouponExireB_M = "05" Then
Var CouponExireB_M = "ေမလ"
EndIf
If CouponExireB_M = "06" Then
Var CouponExireB_M = "ဇြန္လ"
EndIf
If CouponExireB_M = "07" Then
Var CouponExireB_M = "ဇူလိုင္လ"
EndIf
If CouponExireB_M = "08" Then
Var CouponExireB_M = "ၾသဂုတ္လ"
EndIf
If CouponExireB_M = "09" Then
Var CouponExireB_M = "စက္တင္ဘာလ"
EndIf
If CouponExireB_M = "10" Then
Var CouponExireB_M = "ေအာက္တိုဘာလ"
EndIf
If CouponExireB_M = "11" Then
Var CouponExireB_M = "ႏိုဝင္ဘာလ"
EndIf
If CouponExireB_M = "12" Then
Var CouponExireB_M = "ဒီဇင္ဘာလ"
EndIf
Var CouponExpireB = CouponExpireB + CouponExireB_D
Var CouponExpireB = CouponExpireB + " "
Var CouponExpireB = CouponExpireB + CouponExireB_M
Var CouponExpireB = CouponExpireB + " "
Var CouponExpireB = CouponExpireB + CouponExireB_Y
Var CouponExpireB = "သက်တမ်းကုန် " + CouponExpireB
EndIf
Var CouponText = "ကူပွန်စုဆောင်းခြင်း။ (" + CouponNum
Var CouponText = CouponText + ")"
Var CouponSTA = "Enable"
Var CouponExireA_D = ""
Var CouponExireA_M = ""
Var CouponExireA_Y = ""
Var CouponTypeA = ""
Var CouponNameA = ""
SPLIT CouponInfoA "/" 2 CouponTypeA
SPLIT CouponInfoA "/" 4 CouponExireA_D
SPLIT CouponInfoA "/" 5 CouponExireA_M
SPLIT CouponInfoA "/" 6 CouponExireA_Y
If CouponTypeA = "100" Then
Var CouponNameA = "/imgCouponC33.png"
EndIf
If CouponTypeA = "101" Then
Var CouponNameA = "/imgCouponC44.png"
EndIf
If CouponTypeA = "102" Then
Var CouponNameA = "/imgCouponC39.png"
EndIf
If CouponTypeA = "103" Then
Var CouponNameA = "/imgCouponC40.png"
EndIf
If CouponTypeA = "105" Then
Var CouponNameA = "/imgCouponC38.png"
EndIf
If CouponTypeA = "106" Then
Var CouponNameA = "/imgCouponC41.png"
EndIf
If CouponTypeA = "107" Then
Var CouponNameA = "/imgCouponC42.png"
EndIf
If CouponTypeA = "109" Then
Var CouponNameA = "/imgCouponC33.png"
EndIf
If CouponTypeA = "112" Then
Var CouponNameA = "/imgCoupon112.png"
EndIf
If CouponTypeA = "113" Then
Var CouponNameA = "/imgCoupon113.png"
EndIf
If CouponTypeA = "120" Then
Var CouponNameA = "/imgCoupon120.png"
EndIf
If CouponTypeA = "121" Then
Var CouponNameA = "/imgCoupon121.png"
EndIf
If CouponTypeA = "135" Then
Var CouponNameA = "/imgCouponMKP1.png"
EndIf
INT CouponExireA_D
INT CouponExireA_Y
Var CouponExireA_Y = CouponExireA_Y + 543
If CouponExireA_M = "01" Then
Var CouponExireA_M = "ဇန္နဝါရီလ"
EndIf
If CouponExireA_M = "02" Then
Var CouponExireA_M = "ေဖေဖာ္ဝါရီလ"
EndIf
If CouponExireA_M = "03" Then
Var CouponExireA_M = "မတ္လ"
EndIf
If CouponExireA_M = "04" Then
Var CouponExireA_M = "ဧျပီလ"
EndIf
If CouponExireA_M = "05" Then
Var CouponExireA_M = "ေမလ"
EndIf
If CouponExireA_M = "06" Then
Var CouponExireA_M = "ဇြန္လ"
EndIf
If CouponExireA_M = "07" Then
Var CouponExireA_M = "ဇူလိုင္လ"
EndIf
If CouponExireA_M = "08" Then
Var CouponExireA_M = "ၾသဂုတ္လ"
EndIf
If CouponExireA_M = "09" Then
Var CouponExireA_M = "စက္တင္ဘာလ"
EndIf
If CouponExireA_M = "10" Then
Var CouponExireA_M = "ေအာက္တိုဘာလ"
EndIf
If CouponExireA_M = "11" Then
Var CouponExireA_M = "ႏိုဝင္ဘာလ"
EndIf
If CouponExireA_M = "12" Then
Var CouponExireA_M = "ဒီဇင္ဘာလ"
EndIf
Var CouponExpireA = ""
Var CouponExpireA = CouponExpireA + CouponExireA_D
Var CouponExpireA = CouponExpireA + " "
Var CouponExpireA = CouponExpireA + CouponExireA_M
Var CouponExpireA = CouponExpireA + " "
Var CouponExpireA = CouponExpireA + CouponExireA_Y
Var CouponExpireA = "သက်တမ်းကုန် " + CouponExpireA
Var CouponExpireAPosittion = 1400
EndIf
If CouponIDB = "" Then
Else
Var CouponSTB = "Enable"
Var CouponExireB_D = ""
Var CouponExireB_M = ""
Var CouponExireB_Y = ""
Var CouponTypeB = ""
Var CouponNameB = ""
SPLIT CouponInfoB "/" 2 CouponTypeB
SPLIT CouponInfoB "/" 4 CouponExireB_D
SPLIT CouponInfoB "/" 5 CouponExireB_M
SPLIT CouponInfoB "/" 6 CouponExireB_Y
If CouponTypeB = "100" Then
Var CouponNameB = "/imgCouponC33.png"
EndIf
If CouponTypeB = "101" Then
Var CouponNameB = "/imgCouponC44.png"
EndIf
If CouponTypeB = "102" Then
Var CouponNameB = "/imgCouponC39.png"
EndIf
If CouponTypeB = "103" Then
Var CouponNameB = "/imgCouponC40.png"
EndIf
If CouponTypeB = "105" Then
Var CouponNameB = "/imgCouponC38.png"
EndIf
If CouponTypeB = "106" Then
Var CouponNameB = "/imgCouponC41.png"
EndIf
If CouponTypeB = "107" Then
Var CouponNameB = "/imgCouponC42.png"
EndIf
If CouponTypeB = "109" Then
Var CouponNameB = "/imgCouponC33.png"
EndIf
If CouponTypeB = "112" Then
Var CouponNameB = "/imgCoupon112.png"
EndIf
If CouponTypeB = "113" Then
Var CouponNameB = "/imgCoupon113.png"
EndIf
If CouponTypeB = "120" Then
Var CouponNameB = "/imgCoupon120.png"
EndIf
If CouponTypeB = "121" Then
Var CouponNameB = "/imgCoupon121.png"
EndIf
If CouponTypeB = "135" Then
Var CouponNameB = "/imgCouponMKP1.png"
EndIf
INT CouponExireB_D
INT CouponExireB_Y
Var CouponExireB_Y = CouponExireB_Y + 0
If CouponExireB_M = "01" Then
Var CouponExireB_M = "ဇန္နဝါရီလ"
EndIf
If CouponExireB_M = "02" Then
Var CouponExireB_M = "ေဖေဖာ္ဝါရီလ"
EndIf
If CouponExireB_M = "03" Then
Var CouponExireB_M = "မတ္လ"
EndIf
If CouponExireB_M = "04" Then
Var CouponExireB_M = "ဧျပီလ"
EndIf
If CouponExireB_M = "05" Then
Var CouponExireB_M = "ေမလ"
EndIf
If CouponExireB_M = "06" Then
Var CouponExireB_M = "ဇြန္လ"
EndIf
If CouponExireB_M = "07" Then
Var CouponExireB_M = "ဇူလိုင္လ"
EndIf
If CouponExireB_M = "08" Then
Var CouponExireB_M = "ၾသဂုတ္လ"
EndIf
If CouponExireB_M = "09" Then
Var CouponExireB_M = "စက္တင္ဘာလ"
EndIf
If CouponExireB_M = "10" Then
Var CouponExireB_M = "ေအာက္တိုဘာလ"
EndIf
If CouponExireB_M = "11" Then
Var CouponExireB_M = "ႏိုဝင္ဘာလ"
EndIf
If CouponExireB_M = "12" Then
Var CouponExireB_M = "ဒီဇင္ဘာလ"
EndIf
Var CouponExpireB = ""
Var CouponExpireB = CouponExpireB + CouponExireB_D
Var CouponExpireB = CouponExpireB + " "
Var CouponExpireB = CouponExpireB + CouponExireB_M
Var CouponExpireB = CouponExpireB + " "
Var CouponExpireB = CouponExpireB + CouponExireB_Y
Var CouponExpireB = "သက်တမ်းကုန် " + CouponExpireB
EndIf
Var CouponText = "ကူပွန်စုဆောင်းခြင်း။ (" + CouponNum
Var CouponText = CouponText + ")"
EndIf
SAVELOG "EventLanguageOnChange menu -list"

54
xml/page_check_member2_campaign.xml
View file

@ -806,58 +806,58 @@ page_check_member2_campaign
Var TaobinExpireYear = TaobinExpireYear + 0
If TaobinLevel = "1" Then
Var TaobinLevelDesc1 = "ရှက်လိပ်အဆင့်"
Var TaobinLevelDesc1 = "ရှက်နေသောလိပ်အဆင့်"
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel1.png"
EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "လမ်းလျှောက်လိပ်အဆင့်"
Var TaobinLevelDesc1 = "လမ်းလျှောက်နေသောလိပ်အဆင့်"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " အခွံများ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "Flying turtle အဆင့်သို့ ရွှေ့ရန်"
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ပျံသန်းသောလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel2.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
;Var TaobinLevelDesc1 = "လိပ်အဆင့် "
;Var TaobinLevelDesc1 = "ပျံသန်းနေသောလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
EndIf
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "လိပ်ပျံအဆင့်အထိ " + ExpireStrTmp
Var TaobinLevelDesc1 = "ပျံသန်းသောလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var PointDiff = 200 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " အခွံများ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "Master လိပ်အဆင့်သို့ ပြောင်းရွှေ့ရန်"
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ဆရာလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel3.png"
If CoffeePointRank > 199 Then
;Var TaobinLeveImg = "/taoLevel4.png"
;Var TaobinLevelDesc1 = "သခင်လိပ်အဆင့် "
;Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
EndIf
EndIf
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "မာစတာလိပ်အဆင့်အထိ " + ExpireStrTmp
Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel4.png"
EndIf

27
xml/page_check_member_point.xml
View file

@ -429,28 +429,27 @@
If LanguageShow = "MYANMAR" Then
Var TaobinLevelDesc3 = "သင့်တွင် ကူပွန်များရှိသည်။ "
Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
Var TaobinLevelDesc3 = TaobinLevelDesc3 + " နံပါတ်များ"
If TaobinLevel = "1" Then
Var TaobinLevelDesc1 = "ရှက်လိပ်အဆင့်"
Var TaobinLevelDesc1 = "ရှက်နေသောလိပ်အဆင့်"
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel1.png"
EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "လမ်းလျှောက်လိပ်အဆင့်"
Var TaobinLevelDesc1 = "လမ်းလျှောက်နေသောလိပ်အဆင့်"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " အခွံများ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "Flying turtle အဆင့်သို့ ရွှေ့ရန်"
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ပျံသန်းသောလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel2.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
;Var TaobinLevelDesc1 = "လိပ်အဆင့် "
;Var TaobinLevelDesc1 = "ပျံသန်းနေသောလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
@ -459,19 +458,19 @@
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "လိပ်ပျံအဆင့်အထိ " + ExpireStrTmp
Var TaobinLevelDesc1 = "ပျံသန်းသောလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var PointDiff = 200 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " အခွံများ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "Master လိပ်အဆင့်သို့ ပြောင်းရွှေ့ရန်"
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ဆရာလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel3.png"
If CoffeePointRank > 199 Then
;Var TaobinLeveImg = "/taoLevel4.png"
;Var TaobinLevelDesc1 = "သခင်လိပ်အဆင့် "
;Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
@ -480,13 +479,13 @@
EndIf
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "မာစတာလိပ်အဆင့်အထိ " + ExpireStrTmp
Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel4.png"
EndIf
EndIf
EndIf
Var taobinP1 = "Invisible"

97
xml/page_collect_point_3.xml
View file

@ -40,6 +40,7 @@
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var TaobinLevelDesc3X = 380
Var TextEndDateY = 1570
Else
@ -47,11 +48,13 @@
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
Var TaobinLevelDesc3X = 310
Var TextEndDateY = 1570
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/display_point_mmr"
Var TaobinLevelDesc3X = 380
Var TextEndDateY = 1580
EndIf
@ -238,6 +241,73 @@
EndIf
If LanguageShow = "MYANMAR" Then
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "Jan"
Var TaobinExpireMonthX = "ဇန္နဝါရီလ"
EndIf
If TaobinExpireMonth = "02" Then
Var TaobinExpireMonth = "Feb"
Var TaobinExpireMonthX = "ေဖေဖာ္ဝါရီလ"
EndIf
If TaobinExpireMonth = "03" Then
Var TaobinExpireMonth = "Mar"
Var TaobinExpireMonthX = "မတ္လ"
EndIf
If TaobinExpireMonth = "04" Then
Var TaobinExpireMonth = "Apr"
Var TaobinExpireMonthX = "ဧျပီလ"
EndIf
If TaobinExpireMonth = "05" Then
Var TaobinExpireMonth = "May"
Var TaobinExpireMonthX = "ေမလ"
EndIf
If TaobinExpireMonth = "06" Then
Var TaobinExpireMonth = "Jun"
Var TaobinExpireMonthX = "ဇြန္လ"
EndIf
If TaobinExpireMonth = "07" Then
Var TaobinExpireMonth = "Jul"
Var TaobinExpireMonthX = "ဇူလိုင္လ"
EndIf
If TaobinExpireMonth = "08" Then
Var TaobinExpireMonth = "Aug"
Var TaobinExpireMonthX = "ၾသဂုတ္လ"
EndIf
If TaobinExpireMonth = "09" Then
Var TaobinExpireMonth = "Sep"
Var TaobinExpireMonthX = "စက္တင္ဘာလ"
EndIf
If TaobinExpireMonth = "10" Then
Var TaobinExpireMonth = "Oct"
Var TaobinExpireMonthX = "ေအာက္တိုဘာလ"
EndIf
If TaobinExpireMonth = "11" Then
Var TaobinExpireMonth = "Nov"
Var TaobinExpireMonthX = "ႏိုဝင္ဘာလ"
EndIf
If TaobinExpireMonth = "12" Then
Var TaobinExpireMonth = "Dec"
Var TaobinExpireMonthX = "ဒီဇင္ဘာလ"
EndIf
INT TaobinExpireYear
INT TaobinExpireDay
Var TaobinExpireYear = TaobinExpireYear + 0
EndIf
Var ExpireStrTmp = ""
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireDay
@ -388,28 +458,27 @@
If LanguageShow = "MYANMAR" Then
Var TaobinLevelDesc3 = "သင့်တွင် ကူပွန်များရှိသည်။ "
Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
Var TaobinLevelDesc3 = TaobinLevelDesc3 + " နံပါတ်များ"
If TaobinLevel = "1" Then
Var TaobinLevelDesc1 = "ရှက်လိပ်အဆင့်"
Var TaobinLevelDesc1 = "ရှက်နေသောလိပ်အဆင့်"
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel1.png"
EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "လမ်းလျှောက်လိပ်အဆင့်"
Var TaobinLevelDesc1 = "လမ်းလျှောက်နေသောလိပ်အဆင့်"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " အခွံများ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "Flying turtle အဆင့်သို့ ရွှေ့ရန်"
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ပျံသန်းသောလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel2.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
;Var TaobinLevelDesc1 = "လိပ်အဆင့် "
;Var TaobinLevelDesc1 = "ပျံသန်းနေသောလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
@ -418,19 +487,19 @@
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "လိပ်ပျံအဆင့်အထိ " + ExpireStrTmp
Var TaobinLevelDesc1 = "ပျံသန်းသောလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var PointDiff = 200 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " အခွံများ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "Master လိပ်အဆင့်သို့ ပြောင်းရွှေ့ရန်"
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ဆရာလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel3.png"
If CoffeePointRank > 199 Then
;Var TaobinLeveImg = "/taoLevel4.png"
;Var TaobinLevelDesc1 = "သခင်လိပ်အဆင့် "
;Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
@ -439,7 +508,7 @@
EndIf
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "မာစတာလိပ်အဆင့်အထိ " + ExpireStrTmp
Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
@ -1303,7 +1372,7 @@
</Text>
<Text>
<X> 310 </X>
<X> TaobinLevelDesc3X </X>
<Y> 1621 </Y>
<Size> 25 </Size>
<Width> 1000 </Width>

135
xml/page_collect_point_3_28.xml
View file

@ -31,16 +31,19 @@
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var TextEndDateY = 1570
Else
Var DirImage = "ROOT/taobin_project/image/display_point"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
Var TextEndDateY = 1570
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/display_point_mmr/"
Var TextEndDateY = 1570
EndIf
If LanguageObjectShow = "Enable" Then
@ -218,6 +221,73 @@
EndIf
If LanguageShow = "MYANMAR" Then
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "Jan"
Var TaobinExpireMonthX = "ဇန္နဝါရီလ"
EndIf
If TaobinExpireMonth = "02" Then
Var TaobinExpireMonth = "Feb"
Var TaobinExpireMonthX = "ေဖေဖာ္ဝါရီလ"
EndIf
If TaobinExpireMonth = "03" Then
Var TaobinExpireMonth = "Mar"
Var TaobinExpireMonthX = "မတ္လ"
EndIf
If TaobinExpireMonth = "04" Then
Var TaobinExpireMonth = "Apr"
Var TaobinExpireMonthX = "ဧျပီလ"
EndIf
If TaobinExpireMonth = "05" Then
Var TaobinExpireMonth = "May"
Var TaobinExpireMonthX = "ေမလ"
EndIf
If TaobinExpireMonth = "06" Then
Var TaobinExpireMonth = "Jun"
Var TaobinExpireMonthX = "ဇြန္လ"
EndIf
If TaobinExpireMonth = "07" Then
Var TaobinExpireMonth = "Jul"
Var TaobinExpireMonthX = "ဇူလိုင္လ"
EndIf
If TaobinExpireMonth = "08" Then
Var TaobinExpireMonth = "Aug"
Var TaobinExpireMonthX = "ၾသဂုတ္လ"
EndIf
If TaobinExpireMonth = "09" Then
Var TaobinExpireMonth = "Sep"
Var TaobinExpireMonthX = "စက္တင္ဘာလ"
EndIf
If TaobinExpireMonth = "10" Then
Var TaobinExpireMonth = "Oct"
Var TaobinExpireMonthX = "ေအာက္တိုဘာလ"
EndIf
If TaobinExpireMonth = "11" Then
Var TaobinExpireMonth = "Nov"
Var TaobinExpireMonthX = "ႏိုဝင္ဘာလ"
EndIf
If TaobinExpireMonth = "12" Then
Var TaobinExpireMonth = "Dec"
Var TaobinExpireMonthX = "ဒီဇင္ဘာလ"
EndIf
INT TaobinExpireYear
INT TaobinExpireDay
Var TaobinExpireYear = TaobinExpireYear + 0
EndIf
Var ExpireStrTmp = ""
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireDay
@ -364,6 +434,67 @@
EndIf
If LanguageShow = "MYANMAR" Then
Var TaobinLevelDesc3 = "သင့်တွင် ကူပွန်များရှိသည်။ "
Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
If TaobinLevel = "1" Then
Var TaobinLevelDesc1 = "ရှက်နေသောလိပ်အဆင့်"
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel1.png"
EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "လမ်းလျှောက်နေသောလိပ်အဆင့်"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ပျံသန်းသောလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel2.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
;Var TaobinLevelDesc1 = "ပျံသန်းနေသောလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
EndIf
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "ပျံသန်းသောလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var PointDiff = 200 - CoffeePointRank
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "ဆရာလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var TaobinLeveImg = "/taoLevel3.png"
If CoffeePointRank > 199 Then
;Var TaobinLeveImg = "/taoLevel4.png"
;Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
EndIf
EndIf
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel4.png"
EndIf
EndIf
@ -668,6 +799,10 @@
Var xPointEndDate = 575
Var yPointEndDate = 1563
EndIf
If LanguageShow = "MYANMAR" Then
Var xPointEndDate = 520
Var yPointEndDate = 1568
EndIf

165
xml/page_collect_point_3_28_lucky_draw_campaign.xml
View file

@ -33,16 +33,19 @@
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var TextEndDateY = 1570
Else
Var DirImage = "ROOT/taobin_project/image/display_point"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
Var TextEndDateY = 1570
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/display_point_mmr/"
Var TextEndDateY = 1580
EndIf
If LanguageObjectShow = "Enable" Then
@ -220,6 +223,73 @@
EndIf
If LanguageShow = "MYANMAR" Then
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "Jan"
Var TaobinExpireMonthX = "ဇန္နဝါရီလ"
EndIf
If TaobinExpireMonth = "02" Then
Var TaobinExpireMonth = "Feb"
Var TaobinExpireMonthX = "ေဖေဖာ္ဝါရီလ"
EndIf
If TaobinExpireMonth = "03" Then
Var TaobinExpireMonth = "Mar"
Var TaobinExpireMonthX = "မတ္လ"
EndIf
If TaobinExpireMonth = "04" Then
Var TaobinExpireMonth = "Apr"
Var TaobinExpireMonthX = "ဧျပီလ"
EndIf
If TaobinExpireMonth = "05" Then
Var TaobinExpireMonth = "May"
Var TaobinExpireMonthX = "ေမလ"
EndIf
If TaobinExpireMonth = "06" Then
Var TaobinExpireMonth = "Jun"
Var TaobinExpireMonthX = "ဇြန္လ"
EndIf
If TaobinExpireMonth = "07" Then
Var TaobinExpireMonth = "Jul"
Var TaobinExpireMonthX = "ဇူလိုင္လ"
EndIf
If TaobinExpireMonth = "08" Then
Var TaobinExpireMonth = "Aug"
Var TaobinExpireMonthX = "ၾသဂုတ္လ"
EndIf
If TaobinExpireMonth = "09" Then
Var TaobinExpireMonth = "Sep"
Var TaobinExpireMonthX = "စက္တင္ဘာလ"
EndIf
If TaobinExpireMonth = "10" Then
Var TaobinExpireMonth = "Oct"
Var TaobinExpireMonthX = "ေအာက္တိုဘာလ"
EndIf
If TaobinExpireMonth = "11" Then
Var TaobinExpireMonth = "Nov"
Var TaobinExpireMonthX = "ႏိုဝင္ဘာလ"
EndIf
If TaobinExpireMonth = "12" Then
Var TaobinExpireMonth = "Dec"
Var TaobinExpireMonthX = "ဒီဇင္ဘာလ"
EndIf
INT TaobinExpireYear
INT TaobinExpireDay
Var TaobinExpireYear = TaobinExpireYear + 0
EndIf
Var ExpireStrTmp = ""
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireDay
@ -367,6 +437,68 @@
EndIf
If LanguageShow = "MYANMAR" Then
Var TaobinLevelDesc3 = TaobinCoupons
Var TaobinLevelDesc3 = TaobinLevelDesc3 + " သင့်အတွက် ကူပွန်များရရှိနိုင်ပါသည်။"
If TaobinLevel = "1" Then
Var TaobinLevelDesc1 = "ရှက်နေသောလိပ်အဆင့်"
Var TaobinLevelDesc2 = ""
Var CurrentLevel = "ရှက်နေသောလိပ်"
Var TaobinLeveImg = "/level1.png"
EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "လမ်းလျှောက်နေသောလိပ်အဆင့်"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "\nပျံသန်းသောလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var CurrentLevel = "လမ်းလျှောက်နေသောလိပ်"
Var TaobinLeveImg = "/level2.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
;Var TaobinLevelDesc1 = "ပျံသန်းနေသောလိပ်အဆင့် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
EndIf
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "ပျံသန်းသောလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var PointDiff = 200 - CoffeePointRank
Var TaobinLevelDesc2 = "ပိုစုဆောင်းပါ။ " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " လိပ်ခွံ "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "အားဖြင့် "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + ExpireStrTmp
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "\nဆရာလိပ်အဆင့်သို့ တိုးတက်ရန်။"
Var CurrentLevel = "ပျံသန်းနေသောလိပ်"
Var TaobinLeveImg = "/level3.png"
If CoffeePointRank > 199 Then
;Var TaobinLeveImg = "/taoLevel4.png"
;Var TaobinLevelDesc1 = "ဆရာလိပ် "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
EndIf
EndIf
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "ဆရာလိပ်အဆင့်အထိ။ " + ExpireStrTmp
Var CurrentLevel = "ဆရာလိပ်"
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/level4.png"
EndIf
EndIf
@ -670,6 +802,10 @@
Var xPointEndDate = 575
Var yPointEndDate = 1563
EndIf
If LanguageShow = "MYANMAR" Then
Var xPointEndDate = 520
Var yPointEndDate = 1578
EndIf
Var LuckyDrawTicketFormat = "%03.0f"
Var ShowLuckyDrawTicketState = "Enable"
@ -932,8 +1068,13 @@
<Value>
eval(
If show_eng = "true" Then
Var return = "" + dayDiff
Var return = return + " days left to WIN a chance!"
If LanguageShow = "MYANMAR" Then
Var return = "ကံထူးရန်" + dayDiff
Var return = return + " ရက်သာ လိုတော့သည်"
Else
Var return = "" + dayDiff
Var return = return + " days left to WIN a chance!"
EndIf
Else
Var return = "เหลืออีก " + dayDiff
Var return = return + " วันก่อนจับรางวัล"
@ -952,7 +1093,11 @@
<Value>
eval(
If show_eng = "true" Then
Var return = "Buy more, WIN more! Tesla await!"
If LanguageShow = "MYANMAR" Then
Var return = "များများဝယ်ပါ၊ များများအနိုင်ရပါ။ Tesla က စောင့်မျှော်နေပါတယ်။"
Else
Var return = "Buy more, WIN more! Tesla await!"
EndIf
Else
Var return = "ยิ่งดื่ม ยิ่งมีโชค ยิ่งได้ลุ้น! Tesla รออยู่!"
EndIf
@ -985,7 +1130,11 @@
<Value>
eval(
If show_eng = "true" Then
Var return = "MEMBERSHIP STATUS"
If LanguageShow = "MYANMAR" Then
Var return = "အဖွဲ့ဝင်အခြေအနေ"
Else
Var return = "MEMBERSHIP STATUS"
EndIf
Else
Var return = "สถานะสมาชิก"
EndIf
@ -1011,7 +1160,11 @@
<Value>
eval(
If show_eng = "true" Then
Var return = "TOTAL SHELL BALANCE:"
If LanguageShow = "MYANMAR" Then
Var return = "စုစုပေါင်း Shell လက်ကျန်:"
Else
Var return = "TOTAL SHELL BALANCE:"
EndIf
Else
Var return = "ยอดกระดองสะสม:"
EndIf
@ -1331,7 +1484,7 @@
<Image>
<X> 172 </X>
<Y> 1570 </Y>
<Y> TextEndDateY </Y>
<Filename> Var( DirImage + "/text8_28.png" )</Filename>
</Image>

1
xml/page_drinkfail2.xml
View file

@ -9,6 +9,7 @@
; On open
RootLayoutVisible 3 "hide"
Var Seeker.TNumberTaobinMember = ""

4
xml/page_lid_straw.xml
View file

@ -120,8 +120,8 @@
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing_mmr/"
Var PictureBegin = "txt_"
;Var PictureEnd = "_mmr.png"
Var PictureEnd = "_en.png"
Var PictureEnd = "_mmr.png"
;Var PictureEnd = "_en.png"
EndIf
Else

2
xml/page_payment_credit3-TopupCash.xml
View file

@ -61,6 +61,8 @@
Var img_popup15 = "/img_popup15-AUS.png"
EndIf
Var CreditAmount = SumCreditAmount
Var RemainAmountStr !assigned StringFmt( CreditAmount, DisplayFormat, PreScaleConvertShow )
Var showRemaining = charOfBaht + RemainAmountStr

58
xml/page_show_error.lxml
View file

@ -24,6 +24,7 @@
EndIf
EndIf
DEBUGVAR MachineStage
DEBUGVAR stop_now
DEBUGVAR LanguageShow
@ -209,7 +210,62 @@
<Function2>
DEBUGVAR MachineStage
DEBUGVAR stop_now
Var DirImage = "ROOT/taobin_project/image/vending_error_en"
If InternationalEnable = 1 Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "JAPAN" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "CHINA" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MALAY" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "UAE_DUBAI" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
If InternationalEnable = 1 Then
If CountryName = "Thailand" Then
If MachineStage = "show-menu" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
If LanguageShow = "ENG" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "JAPAN" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "CHINA" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MALAY" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "UAE_DUBAI" Then
Var DirImage = CountryRootPath + "image/vending_error_en"
EndIf
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_mmr"
EndIf
EndIf
EndIf
EndIf
If MachineStage = "mcu-upgrade" Then
If LanguageShow = "THAI" Then
Var DirImage = "ROOT/taobin_project/image/vending_error"

12
xml/page_thankyou.xml
View file

@ -73,9 +73,11 @@
Var BottomText = PicturePath + "text_bottom_eng.png"
Var DirImage = "ROOT/taobin_project/image/page_thankyou_en"
Var DirImage = "ROOT/taobin_project/image/page_thankyou_mmr"
EndIf
DEBUGVAR StarwState
DEBUGVAR LidState
DEBUGVAR BottomText
@ -169,8 +171,12 @@
If SaveTheWorldCount < 2 Then
If InternationalEnable = 1 Then
Var script_thankyou = CountryRootPath + "video/script_thank.ev"
TRY script_thankyou
If CountryName = "Thailand" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/video/script2.ev"
Else
Var script_thankyou = CountryRootPath + "video/script_thank.ev"
TRY script_thankyou
EndIf
Else
TRY "/mnt/sdcard/coffeevending/taobin_project/video/script2.ev"
EndIf

18
xml/page_thankyouConti.xml
View file

@ -305,13 +305,13 @@
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 Seeker.selected_a_drink SelectSugarID
If CountryName = "Thailand" Then
If New_Payment = 1 Then
Open "ROOT/taobin_project/xml/page_NewBrewing3.xml"
If New_Payment = 1 Then
Open "ROOT/taobin_project/xml/page_NewBrewing3.xml"
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
Else
@ -320,12 +320,12 @@
Open Brew3Inter
Else
;obsolete
If New_Payment = 1 Then
Open "ROOT/taobin_project/xml/page_NewBrewing3.xml"
If New_Payment = 1 Then
Open "ROOT/taobin_project/xml/page_NewBrewing3.xml"
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
@ -401,7 +401,6 @@
Else
Var MachineErrorDetailAll = " กรุณานำแก้วออกก่อนครับ/คะ"
EndIf
If LanguageShow = "MYANMAR" Then
Var MachineErrorDetailAll = " ကျေးဇူးပြုပြီး ဖန်ခွက်ကို အရင်ထုတ်ပါ။"
EndIf
@ -411,7 +410,6 @@
Var MachineErrorDetailAll = " Please take a cup."
Else
Var MachineErrorDetailAll = " กรุณานำแก้วออกก่อนครับ/คะ"
EndIf
If LanguageShow = "MYANMAR" Then
Var MachineErrorDetailAll = " ကျေးဇူးပြုပြီး ဖန်ခွက်ကို အရင်ထုတ်ပါ။"

9
xml/payment_cash.ev
View file

@ -1,4 +1,11 @@
If show_eng = "true" Then
If LanguageShow = "ENG" Then
Var show_eng = "true"
EndIf
If LanguageShow = "THAI" Then
Var show_eng = "false"
EndIf
If show_eng = "true" Then
Var FilenameShowbuttonCashBN = "ROOT/taobin_project/image/page_payment_en/page_payment/bn_cash.png"
Var FilenameShowbuttonCashBP = "ROOT/taobin_project/image/page_payment_en/page_payment/bp_cash.png"
Var FilenameShowbuttonCashBD = "ROOT/taobin_project/image/page_payment_en/page_payment/bd_cash.png"

8
xml/process/discount_from_promotion.ev
View file

@ -102,6 +102,10 @@ EndIf
If InternationalEnable = 1 Then
Var discount_promo_file = CountryRootPath + "/xml/process/discount_from_promotion.ev"
TRY discount_promo_file
If CountryName = "Thailand" Then
;do not thing
Else
Var discount_promo_file = CountryRootPath + "/xml/process/discount_from_promotion.ev"
TRY discount_promo_file
EndIf
EndIf

8
xml/sometime/page_campaign_ads_lucky_draw.xml
View file

@ -24,6 +24,13 @@
EndIf
If LanguageShow = "MYANMAR" Then
Var Extension = "_mmr.png"
Var Text_X = 233
Var Text_Y = 1468
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
@ -169,4 +176,3 @@
</EventUnitTest4>
</Popup>