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

THAI: Add Coconut reward out of stock

Browse source
This commit is contained in:
Kenta420 2024-05-18 23:22:55 +07:00
parent 3eb39e1363
commit 52ae355a96
25 changed files with 612 additions and 221 deletions
Download patch file Download diff file Expand all files Collapse all files

BIN
image/event/nam_hom_coconut/nam_hom_coconut_main_page.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 1.5 MiB

After

Width:  |  Height:  |  Size: 1.4 MiB

Before After
Before After

BIN
image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_en.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 310 KiB

BIN
image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_th.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 341 KiB

BIN
image/event/nam_hom_coconut/random/balance_essence_toner_reward_text.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 15 KiB

After

Width:  |  Height:  |  Size: 18 KiB

Before After
Before After

BIN
image/event/nam_hom_coconut/random/cleansing_gel_reward_text.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 11 KiB

After

Width:  |  Height:  |  Size: 16 KiB

Before After
Before After

BIN
image/event/nam_hom_coconut/random/clear_gel_reward_text.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 6.8 KiB

After

Width:  |  Height:  |  Size: 12 KiB

Before After
Before After

BIN
image/event/nam_hom_coconut/random/random_text.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 9.5 KiB

After

Width:  |  Height:  |  Size: 11 KiB

Before After
Before After

BIN
image/event/nam_hom_coconut/random/super_set_reward_text.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 8 KiB

After

Width:  |  Height:  |  Size: 13 KiB

Before After
Before After

BIN
image/event/nam_hom_coconut/random/tumble_bottle_reward_text.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 9.2 KiB

After

Width:  |  Height:  |  Size: 14 KiB

Before After
Before After

BIN
image/event/nam_hom_coconut/reward_remain.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 7.2 KiB

After

Width:  |  Height:  |  Size: 11 KiB

Before After
Before After

50
xml/event/promotion_nam_hom_coconut.xml → xml/event/ignore_gen_promotion_nam_hom_coconut.xml
View file

@ -13060,27 +13060,51 @@ LIMENADE SODA" </Value>
<Filename> <Filename>
eval( eval(
If show_eng = "true" Then If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_en.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png"
EndIf
Else Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_th.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png"
EndIf
EndIf EndIf
) )
</Filename> </Filename>
<FilenamePress> <FilenamePress>
eval( eval(
If show_eng = "true" Then If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_en.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png"
EndIf
Else Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_th.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png"
EndIf
EndIf EndIf
) )
</FilenamePress> </FilenamePress>
<FilenameDisable> <FilenameDisable>
eval( eval(
If show_eng = "true" Then If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_en.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png"
EndIf
Else Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_th.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png"
EndIf
EndIf EndIf
) )
</FilenameDisable> </FilenameDisable>
@ -13102,7 +13126,11 @@ LIMENADE SODA" </Value>
If show_eng = "true" Then If show_eng = "true" Then
Var return = "Invisible" Var return = "Invisible"
Else Else
Var return = "Enable" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
EndIf EndIf
) )
</State> </State>
@ -13116,8 +13144,12 @@ LIMENADE SODA" </Value>
<Height> 616 </Height> <Height> 616 </Height>
<State> <State>
eval( eval(
If show_eng = "true" Then If show_eng = "true" then
Var return = "Enable" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
Else Else
Var return = "Invisible" Var return = "Invisible"
EndIf EndIf

0
xml/event/multi_promotion_config_coconut_energy_melon.json → xml/event/ignore_multi_promotion_config_coconut_energy_melon.json
View file

130
xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_2.xml
View file

@ -94,20 +94,23 @@
Var Seeker.IsAlreadyGetReward = Ext1c Var Seeker.IsAlreadyGetReward = Ext1c
Var SuperSetOutOfStock = Ext1d Var SuperSetOutOfStock = Ext1d
Var BalanceEssenceTonerOutOfStock = Ext1e Var BalanceEssenceTonerOutOfStock = Ext1e
Var CleansingGalOutOfStock = Ext1f Var CleansingGelOutOfStock = Ext1f
Var ClearGalOutOfStock = Ext1g Var TumbleBottleOutOfStock = Ext1g
Var ClearGelOutOfStock = Ext1h
;DEBUG ;DEBUG
;Var SuperSetOutOfStock = 1 ;Var SuperSetOutOfStock = 1
;Var BalanceEssenceTonerOutOfStock = 1 ;Var BalanceEssenceTonerOutOfStock = 1
;Var CleansingGalOutOfStock = 1 ;Var CleansingGelOutOfStock = 1
;Var ClearGalOutOfStock = Ext1g ;Var TumbleBottleOutOfStock = 1
;Var ClearGelOutOfStock = 1
DEBUGVAR SuperSetOutOfStock DEBUGVAR SuperSetOutOfStock
DEBUGVAR BalanceEssenceTonerOutOfStock DEBUGVAR BalanceEssenceTonerOutOfStock
DEBUGVAR CleansingGalOutOfStock DEBUGVAR CleansingGelOutOfStock
DEBUGVAR ClearGalOutOfStock DEBUGVAR TumbleBottleOutOfStock
DEBUGVAR ClearGelOutOfStock
If TaobinName = "" Then If TaobinName = "" Then
Var Seeker.IsLineMember = 0 Var Seeker.IsLineMember = 0
@ -135,39 +138,41 @@
EndIf EndIf
EndIf EndIf
If Seeker.IsAlreadyGetReward = 1 Then ;If Seeker.IsAlreadyGetReward = 1 Then
SAVELOG "Already get reward skip to normal collect point." ; SAVELOG "Already get reward skip to normal collect point."
If Seeker.CodeChannel = 1 Then ; If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointMain = 1 Then ; If Seeker.CollectPointMain = 1 Then
GETACCEXT Param1 23 ; GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml" ; Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
Else ; Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml" ; Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf ; EndIf
Else ; Else
GETACCEXT Param1 23 ; GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml" ; Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf ; EndIf
EndIf ;EndIf
If SuperSetOutOfStock = 1 Then If SuperSetOutOfStock = 1 Then
If BalanceEssenceTonerOutOfStock = 1 Then If BalanceEssenceTonerOutOfStock = 1 Then
If CleansingGalOutOfStock = 1 Then If CleansingGalOutOfStock = 1 Then
If ClearGalOutOfStock = 1 Then If TumbleBottleOutOfStock = 1 Then
SAVELOG "All reward out of stock skip to normal collect point." If ClearGalOutOfStock = 1 Then
SAVELOG "All reward out of stock skip to normal collect point."
WRITE_FILE "/mnt/sdcard/nam_hom_coconut_reward_out_of_stock" "1" WRITE_FILE "/mnt/sdcard/nam_hom_coconut_reward_out_of_stock" "1"
If Seeker.CodeChannel = 1 Then If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointMain = 1 Then If Seeker.CollectPointMain = 1 Then
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
GETACCEXT Param1 23 GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml" Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
Else
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf EndIf
EndIf EndIf
EndIf EndIf
@ -190,35 +195,16 @@
Var PointState[8] = 0 Var PointState[8] = 0
Var PointState[9] = 0 Var PointState[9] = 0
If show_eng = "true" Then Var PointNameIndex[0] = -1
Var MenuPointName[0] = "Hat Yai\nBeach coconut" Var PointNameIndex[1] = -1
Var MenuPointName[1] = "Bangsaen\nBeach Coconut" Var PointNameIndex[2] = -1
Var MenuPointName[2] = "Jomtien\nBeach Coconut" Var PointNameIndex[3] = -1
Var MenuPointName[3] = "Nang Ram\nBeach Coconut" Var PointNameIndex[4] = -1
Var MenuPointName[4] = "Glass Sand\nBeach Coconut" Var PointNameIndex[5] = -1
Var MenuPointName[5] = "Mae Pim\nBeach Coconut" Var PointNameIndex[6] = -1
Var MenuPointName[6] = "Moonlight\nBeach Coconut" Var PointNameIndex[7] = -1
Var MenuPointName[7] = "Pattaya\nBeach Coconut" Var PointNameIndex[8] = -1
Var MenuPointName[8] = "Suan Son\nBeach Coconut" Var PointNameIndex[9] = -1
Var MenuPointName[9] = "Laem Sing\nBeach Coconut"
Var MenuPointName[10] = "Toem Rak\nBeach Coconut"
Var MenuPointName[11] = "Long\nBeach Coconut"
Var MenuPointName[12] = "Hat\nBeach Coconut"
Else
Var MenuPointName[0] = "มะพร้าวหาดใหญ่(มาก)"
Var MenuPointName[1] = "มะพร้าวหาดบางแสน\n(ห้า)"
Var MenuPointName[2] = "มะพร้าวหาดจอมเทียน\n(พรรษา)"
Var MenuPointName[3] = "มะพร้าวหาดนางรำ\n(สวย)"
Var MenuPointName[4] = "มะพร้าวหาดทรายแก้ว\n(มังกร)"
Var MenuPointName[5] = "มะพร้าวหาดแม่พิมพ์\n(ดีด)"
Var MenuPointName[6] = "มะพร้าวหาดแสงจันทร์\n(ไรอะ)"
Var MenuPointName[7] = "มะพร้าวหาดพัทยา\n(พารา)"
Var MenuPointName[8] = "มะพร้าวหาดสวนสน\n(ใจไหม)"
Var MenuPointName[9] = "มะพร้าวหาดแหลมสิง\n(หไกรภพ)"
Var MenuPointName[10] = "มะพร้าวหาดเติมรัก(ฉันทำไม)"
Var MenuPointName[11] = "มะพร้าวหาดยาว\n(ไปยาวไป)"
Var MenuPointName[12] = "มะพร้าวหาด(ใกล้ฉัน)"
EndIf
@ -503,79 +489,79 @@
If MenuPoint[0] = 1 Then If MenuPoint[0] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[0] Var PointNameIndex[CurrentIndexPoint] = 0
EndIf EndIf
If MenuPoint[1] = 1 Then If MenuPoint[1] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[1] Var PointNameIndex[CurrentIndexPoint] = 1
EndIf EndIf
If MenuPoint[2] = 1 Then If MenuPoint[2] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[2] Var PointNameIndex[CurrentIndexPoint] = 2
EndIf EndIf
If MenuPoint[3] = 1 Then If MenuPoint[3] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[3] Var PointNameIndex[CurrentIndexPoint] = 3
EndIf EndIf
If MenuPoint[4] = 1 Then If MenuPoint[4] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[4] Var PointNameIndex[CurrentIndexPoint] = 4
EndIf EndIf
If MenuPoint[5] = 1 Then If MenuPoint[5] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[5] Var PointNameIndex[CurrentIndexPoint] = 5
EndIf EndIf
If MenuPoint[6] = 1 Then If MenuPoint[6] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[6] Var PointNameIndex[CurrentIndexPoint] = 6
EndIf EndIf
If MenuPoint[7] = 1 Then If MenuPoint[7] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[7] Var PointNameIndex[CurrentIndexPoint] = 7
EndIf EndIf
If MenuPoint[8] = 1 Then If MenuPoint[8] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[8] Var PointNameIndex[CurrentIndexPoint] = 8
EndIf EndIf
If MenuPoint[9] = 1 Then If MenuPoint[9] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[9] Var PointNameIndex[CurrentIndexPoint] = 9
EndIf EndIf
If MenuPoint[10] = 1 Then If MenuPoint[10] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[10] Var PointNameIndex[CurrentIndexPoint] = 10
EndIf EndIf
If MenuPoint[11] = 1 Then If MenuPoint[11] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[11] Var PointNameIndex[CurrentIndexPoint] = 11
EndIf EndIf
If MenuPoint[12] = 1 Then If MenuPoint[12] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1 Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1 Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[12] Var PointNameIndex[CurrentIndexPoint] = 12
EndIf EndIf
DEBUGVAR Seeker.selected_a_drink DEBUGVAR Seeker.selected_a_drink

208
xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_3.xml
View file

@ -74,6 +74,47 @@
DEBUGVAR PointState[8] DEBUGVAR PointState[8]
DEBUGVAR PointState[9] DEBUGVAR PointState[9]
Var PointNameIndex0 = PointNameIndex[0]
Var PointNameIndex1 = PointNameIndex[1]
Var PointNameIndex2 = PointNameIndex[2]
Var PointNameIndex3 = PointNameIndex[3]
Var PointNameIndex4 = PointNameIndex[4]
Var PointNameIndex5 = PointNameIndex[5]
Var PointNameIndex6 = PointNameIndex[6]
Var PointNameIndex7 = PointNameIndex[7]
Var PointNameIndex8 = PointNameIndex[8]
Var PointNameIndex9 = PointNameIndex[9]
If show_eng = "true" Then
Var MenuPointName[0] = "Hat Yai\nBeach coconut"
Var MenuPointName[1] = "Bangsaen\nBeach Coconut"
Var MenuPointName[2] = "Jomtien\nBeach Coconut"
Var MenuPointName[3] = "Nang Ram\nBeach Coconut"
Var MenuPointName[4] = "Glass Sand\nBeach Coconut"
Var MenuPointName[5] = "Mae Pim\nBeach Coconut"
Var MenuPointName[6] = "Moonlight\nBeach Coconut"
Var MenuPointName[7] = "Pattaya\nBeach Coconut"
Var MenuPointName[8] = "Suan Son\nBeach Coconut"
Var MenuPointName[9] = "Laem Sing\nBeach Coconut"
Var MenuPointName[10] = "Toem Rak\nBeach Coconut"
Var MenuPointName[11] = "Long\nBeach Coconut"
Var MenuPointName[12] = "Hat\nBeach Coconut"
Else
Var MenuPointName[0] = "มะพร้าวหาดใหญ่(มาก)"
Var MenuPointName[1] = "มะพร้าวหาดบางแสน\n(ห้า)"
Var MenuPointName[2] = "มะพร้าวหาดจอมเทียน\n(พรรษา)"
Var MenuPointName[3] = "มะพร้าวหาดนางรำ\n(สวย)"
Var MenuPointName[4] = "มะพร้าวหาดทรายแก้ว\n(มังกร)"
Var MenuPointName[5] = "มะพร้าวหาดแม่พิมพ์\n(ดีด)"
Var MenuPointName[6] = "มะพร้าวหาดแสงจันทร์\n(ไรอะ)"
Var MenuPointName[7] = "มะพร้าวหาดพัทยา\n(พารา)"
Var MenuPointName[8] = "มะพร้าวหาดสวนสน\n(ใจไหม)"
Var MenuPointName[9] = "มะพร้าวหาดแหลมสิง\n(หไกรภพ)"
Var MenuPointName[10] = "มะพร้าวหาดเติมรัก(ฉันทำไม)"
Var MenuPointName[11] = "มะพร้าวหาดยาว\n(ไปยาวไป)"
Var MenuPointName[12] = "มะพร้าวหาด(ใกล้ฉัน)"
EndIf
If PointState[0] = 1 Then If PointState[0] = 1 Then
Var PointCount = PointCount + 1 Var PointCount = PointCount + 1
@ -119,8 +160,8 @@
Var PointDiff = 10 - PointCount Var PointDiff = 10 - PointCount
If show_eng = "true" Then If show_eng = "true" Then
Var MemberText = "สถานะสมาชิก" Var MemberText = "HELLO PAL, WANNA FELL FRESH?"
Var MissionText = "ฝ่าไอร้อนพิชิตไอเท่มหน้าใส" Var MissionText = "BEAT THE HEAT, GO!"
Var TaobinLevelDesc1 = "You have " + PointDiff Var TaobinLevelDesc1 = "You have " + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " more fresh menus left to unlock CURA-MD" Var TaobinLevelDesc1 = TaobinLevelDesc1 + " more fresh menus left to unlock CURA-MD"
@ -131,8 +172,8 @@
Var text8_X = 224 Var text8_X = 224
Else Else
Var MemberText = "HELLO PAL, WANNA FELL FRESH?" Var MemberText = "สถานะสมาชิก"
Var MissionText = "BEAT THE HEAT, GO!" Var MissionText = "ฝ่าไอร้อนพิชิตไอเท่มหน้าใส"
Var TaobinLevelDesc1 = "เหลืออีก " + PointDiff Var TaobinLevelDesc1 = "เหลืออีก " + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " เมนูที่จะได้กดสุ่มรางวัลจาก CURA-MD" Var TaobinLevelDesc1 = TaobinLevelDesc1 + " เมนูที่จะได้กดสุ่มรางวัลจาก CURA-MD"
@ -168,7 +209,7 @@
Var CurrentPointCheck = "check" Var CurrentPointCheck = "check"
Var val3 = "X" Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3 AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
Var UpdatePoint = 1 Var UpdatePoint = 1
EndIf EndIf
@ -242,9 +283,10 @@
<Text> <Text>
<X> 243 </X> <X> 243 </X>
<Y> 722 </Y> <Y> 722 </Y>
<Width> 360 </Width> <Width> 380 </Width>
<Height> 36 </Height> <Height> 36 </Height>
<Size> 24 </Size> <Size> 24 </Size>
<Color> 0x746253 </Color>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Value> MemberText </Value> <Value> MemberText </Value>
</Text> </Text>
@ -256,6 +298,7 @@
<Width> 360 </Width> <Width> 360 </Width>
<Height> 48 </Height> <Height> 48 </Height>
<Size> 32 </Size> <Size> 32 </Size>
<Color> 0x746253 </Color>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Value> MissionText </Value> <Value> MissionText </Value>
</Text> </Text>
@ -282,9 +325,9 @@
<Text> <Text>
<X> 243 </X> <X> 243 </X>
<Y> 800 </Y> <Y> 815 </Y>
<Size> 14 </Size> <Size> 14 </Size>
<Width> 90 </Width> <Width> 100 </Width>
<Font> RobotoRegular </Font> <Font> RobotoRegular </Font>
<Color> 0x746253 </Color> <Color> 0x746253 </Color>
<Value> TNumberTaobinMemberXXX </Value> <Value> TNumberTaobinMemberXXX </Value>
@ -306,7 +349,7 @@
<Text> <Text>
<X> 247 </X> <X> 247 </X>
<Y> 970 </Y> <Y> 970 </Y>
<Size> 25 </Size> <Size> 20 </Size>
<Width> 500 </Width> <Width> 500 </Width>
<Height> 30 </Height> <Height> 30 </Height>
<Font> RobotoBold </Font> <Font> RobotoBold </Font>
@ -318,9 +361,8 @@
<X> 247 </X> <X> 247 </X>
<Y> 1001 </Y> <Y> 1001 </Y>
<Size> 20 </Size> <Size> 20 </Size>
<Width> 500 </Width> <Width> 600 </Width>
<Height> 30 <Height> <Font> RobotoBold </Font>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color> <Color> 0x746253 </Color>
<Value> TaobinLevelDesc2 </Value> <Value> TaobinLevelDesc2 </Value>
</Text> </Text>
@ -335,11 +377,20 @@
<Text> <Text>
<X> 234 </X> <X> 234 </X>
<Y> 1252 </Y> <Y> 1252 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[0] </Color> <Color> taobinTextColorPoint[0] </Color>
<Value> PointState[0].name </Value> <Value> MenuPointName[PointNameIndex0] </Value>
<State>
eval(
If PointNameIndex0 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
@ -352,11 +403,20 @@
<Text> <Text>
<X> 388 </X> <X> 388 </X>
<Y> 1252 </Y> <Y> 1252 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[1] </Color> <Color> taobinTextColorPoint[1] </Color>
<Value> PointState[1].name </Value> <Value> MenuPointName[PointNameIndex1] </Value>
<State>
eval(
If PointNameIndex1 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
@ -369,11 +429,20 @@
<Text> <Text>
<X> 542 </X> <X> 542 </X>
<Y> 1252 </Y> <Y> 1252 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[2] </Color> <Color> taobinTextColorPoint[2] </Color>
<Value> PointState[2].name </Value> <Value> MenuPointName[PointNameIndex2] </Value>
<State>
eval(
If PointNameIndex2 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
@ -386,28 +455,46 @@
<Text> <Text>
<X> 696 </X> <X> 696 </X>
<Y> 1252 </Y> <Y> 1252 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[3] </Color> <Color> taobinTextColorPoint[3] </Color>
<Value> PointState[3].name </Value> <Value> MenuPointName[PointNameIndex3] </Value>
<State>
eval(
If PointNameIndex3 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
<Image> <Image>
<X> 76 </X> <X> 234 </X>
<Y> 1295 </Y> <Y> 1295 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[4]) </Filename> <Filename> Var( PointRootDir + taobinImgPoint[4]) </Filename>
</Image> </Image>
<Text> <Text>
<X> 76 </X> <X> 234 </X>
<Y> 1434 </Y> <Y> 1434 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[4] </Color> <Color> taobinTextColorPoint[4] </Color>
<Value> PointState[4].name </Value> <Value> MenuPointName[PointNameIndex4] </Value>
<State>
eval(
If PointNameIndex4 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
@ -421,11 +508,20 @@
<Text> <Text>
<X> 388 </X> <X> 388 </X>
<Y> 1434 </Y> <Y> 1434 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[5] </Color> <Color> taobinTextColorPoint[5] </Color>
<Value> PointState[5].name </Value> <Value> MenuPointName[PointNameIndex5] </Value>
<State>
eval(
If PointNameIndex5 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
@ -438,11 +534,20 @@
<Text> <Text>
<X> 542 </X> <X> 542 </X>
<Y> 1434 </Y> <Y> 1434 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[6] </Color> <Color> taobinTextColorPoint[6] </Color>
<Value> PointState[6].name </Value> <Value> MenuPointName[PointNameIndex6] </Value>
<State>
eval(
If PointNameIndex6 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
@ -455,11 +560,20 @@
<Text> <Text>
<X> 696 </X> <X> 696 </X>
<Y> 1434 </Y> <Y> 1434 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[7] </Color> <Color> taobinTextColorPoint[7] </Color>
<Value> PointState[7].name </Value> <Value> MenuPointName[PointNameIndex7] </Value>
<State>
eval(
If PointNameIndex7 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
@ -472,11 +586,20 @@
<Text> <Text>
<X> 388 </X> <X> 388 </X>
<Y> 1616 </Y> <Y> 1616 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[8] </Color> <Color> taobinTextColorPoint[8] </Color>
<Value> PointState[8].name </Value> <Value> MenuPointName[PointNameIndex8] </Value>
<State>
eval(
If PointNameIndex8 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
@ -489,18 +612,27 @@
<Text> <Text>
<X> 542 </X> <X> 542 </X>
<Y> 1616 </Y> <Y> 1616 </Y>
<Size> 10 </Size> <Size> 12 </Size>
<Width> 154 </Width> <Width> 154 </Width>
<Font> InterRegular </Font> <Font> InterRegular </Font>
<Color> taobinTextColorPoint[9] </Color> <Color> taobinTextColorPoint[9] </Color>
<Value> PointState[9].name </Value> <Value> MenuPointName[PointNameIndex9] </Value>
<State>
eval(
If PointNameIndex9 = -1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
</State>
<Align> center-vertical-horizontal </Align> <Align> center-vertical-horizontal </Align>
</Text> </Text>
<Button> <Button>
<X> 423 </X> <X> 413 </X>
<Y> 1660 </Y> <Y> 1660 </Y>
<State> showRandomBtnState </State> <State> showRandomBtnState </State>
<Filename> RandomBtnImg </Filename> <Filename> RandomBtnImg </Filename>
@ -525,7 +657,7 @@
<Button> <Button>
<X> 610 </X> <X> 413 </X>
<Y> 1660 </Y> <Y> 1660 </Y>
<State> showCloseBtnState </State> <State> showCloseBtnState </State>
<Filename> CloseBtnImg </Filename> <Filename> CloseBtnImg </Filename>
@ -574,7 +706,7 @@
Var PointState[8] = 1 Var PointState[8] = 1
Var PointState[9] = 1 Var PointState[9] = 1
Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_3.xml" Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_3.xml"
</EventUnitTest3> </EventUnitTest3>
<EventUnitTest4> <EventUnitTest4>
@ -583,7 +715,7 @@
Else Else
Var show_eng = "true" Var show_eng = "true"
EndIf EndIf
Open "ROOT/taobin_project/xml/event/lipit/page_collect_point_pro_lipit_3.xml" Open "ROOT/taobin_project/xml/event/nam_hom_coconut/page_collect_point_nam_hom_coconut_3.xml"
</EventUnitTest4> </EventUnitTest4>

18
xml/event/nam_hom_coconut/page_nam_hom_coconut_random.xml
View file

@ -11,7 +11,7 @@
Var DirImage = "ROOT/taobin_project/image/event/nam_hom_coconut/random" Var DirImage = "ROOT/taobin_project/image/event/nam_hom_coconut/random"
Var RandomStyle = 0 Var RandomStyle = 0
Random2 0 1 RandomStyle Random2 0 2 RandomStyle
If RandomStyle = 0 Then If RandomStyle = 0 Then
Var Text_X = 241 Var Text_X = 241
@ -127,13 +127,13 @@
Var ShowCountDownBrewing = CountDownBrewing Var ShowCountDownBrewing = CountDownBrewing
If Timeout > 15 Then If Timeout > 15 Then
SAVELOG "Timeout 15 second auto random for you" SAVELOG "Timeout 15 second auto random for you"
Function 2 Function 2
EndIf EndIf
Var Timeout = Timeout + 1 Var Timeout = Timeout + 1
TimerReset TimerReset
Refresh Refresh
@ -210,9 +210,7 @@
; Random coupon ; Random coupon
Var randResultInt = 0 Var randResultInt = 0
DEBUGVAR MaxRandomIndex DEBUGVAR MaxRandomIndex
Var MaxRandom = MaxRandomIndex - 1 Random2 0 MaxRandomIndex randResultInt
DEBUGVAR MaxRandom
Random2 0 MaxRandom randResultInt
Var CodeType = "" Var CodeType = ""

87
xml/event/nam_hom_coconut/page_nam_hom_coconut_random_result.xml
View file

@ -45,21 +45,55 @@
Var RewardImage_Y = 864 Var RewardImage_Y = 864
EndIf EndIf
Var AddData = 0
Var CodeReward = CodeType Var CodeReward = CodeType
Var var2 = "X" Var var2 = "X"
Var var3 = "X" Var var3 = "X"
Var PhoneNum = TelephoneNumber Var PhoneNum = TelephoneNumber
AddData 38 TelephoneNumber CodeReward var2 var3 AddData 38 TelephoneNumber CodeReward var2 var3
GETACCEXT PhoneNum 34
</EventOpen> </EventOpen>
<EventActionOk> <EventActionOk>
If Ext1a = "" Then If Ext1a = "" Then
Else Else
Var NamHomCoconutRewardRemain = Ext1a
DEBUGVAR NamHomCoconutRewardRemain If AddData = 0 Then
Var AddData = 1
GETACCEXT PhoneNum 34
Else
SAVELOG "NamHomCoconutPro: Update RemainReward"
SPLIT2 Ext1a "/" RemainRewardSpl
Var SuperSetRemain = RemainRewardSpl[0]
Var BalanceEssenceTonerRemain = RemainRewardSpl[1]
Var CleansingGalRemain = RemainRewardSpl[2]
Var TumbleBottleRemain = RemainRewardSpl[3]
Var ClearGalRemain = RemainRewardSpl[4]
INT SuperSetRemain
INT BalanceEssenceTonerRemain
INT CleansingGalRemain
INT TumbleBottleRemain
INT ClearGalRemain
Var SumNamHomCoconutRemainReward = SuperSetRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + BalanceEssenceTonerRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + CleansingGalRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + TumbleBottleRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + ClearGalRemain
If SumNamHomCoconutRemainReward = 0 Then
SAVELOG "NamHomCoconutPro: All reward out of stock"
WRITE_FILE "/mnt/sdcard/nam_hom_coconut_reward_out_of_stock" "1"
EndIf
Var NamHomCoconutRemainReward = SumNamHomCoconutRemainReward
EndIf
EndIf EndIf
</EventActionOk> </EventActionOk>
@ -73,21 +107,21 @@
Var ShowCountDownBrewing = CountDownBrewing Var ShowCountDownBrewing = CountDownBrewing
If Timeout = 5 Then If Timeout = 5 Then
If Seeker.CodeChannel = 1 Then If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointMain = 1 Then If Seeker.CollectPointMain = 1 Then
GETACCEXT Param1 23 GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml" Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
Else Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml" Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf EndIf
Else Else
GETACCEXT Param1 23 GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml" Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf EndIf
EndIf EndIf
Timeout = Timeout + 1 Timeout = Timeout + 1
TimerReset TimerReset
Refresh Refresh
@ -104,26 +138,23 @@
<Filename> Var( DirImage + "/bg_reward.png") </Filename> <Filename> Var( DirImage + "/bg_reward.png") </Filename>
</Image> </Image>
<Image>
<X> 126 </X>
<Y> 595 <Y>
<Filename> RewardText </Filename>
</Image>
<Image> <Image>
<X> RewardImage_X </X> <X> RewardImage_X </X>
<Y> RewardImage_Y </Y> <Y> RewardImage_Y </Y>
<Filename> RewardImage </Filename> <Filename> RewardImage </Filename>
</Image> </Image>
<Image>
<X> 126 </X>
<Y> 595 </Y>
<Filename> RewardText </Filename>
</Image>
<Image> <Image>
<X> 229 </X> <X> 229 </X>
<Y> 1662 </Y> <Y> 1662 </Y>
<Filename> Var ( DirImage + "/reward_result_line_register_text.png") </Filename> <Filename> Var( DirImage + "/reward_result_line_register_text.png") </Filename>
<Image> </Image>
; ;
<Image> <Image>

2
xml/event/script_common_for_open_promotion_xml.ev
View file

@ -56,7 +56,7 @@ Else
If CountEnablePromotion > 1 Then If CountEnablePromotion > 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/triple_promotion_nam_hom_coconut_and_energy_drink_1_bath_and_wednesday_melon.xml" Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/triple_promotion_nam_hom_coconut_and_energy_drink_1_bath_and_wednesday_melon.xml"
Else Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/promotion_nam_hom_coconut.xml" Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/ignore_gen_promotion_nam_hom_coconut.xml"
EndIf EndIf
Else Else
If EnergyDrink1BathPro = 1 Then If EnergyDrink1BathPro = 1 Then

11
xml/event/tricker.ev
View file

@ -106,6 +106,7 @@ Var FromWednesdayMelonPro = 0
; Enable Nam Hom Coconut, 3 - 21 June ; Enable Nam Hom Coconut, 3 - 21 June
Var NamHomCoconutPro = 0 Var NamHomCoconutPro = 0
Var FromNamHomCoconutPro = 0 Var FromNamHomCoconutPro = 0
Var NamHomCoconutRewardOutOfStock = 0
Var NewCollectPoint = 1 Var NewCollectPoint = 1
@ -333,6 +334,7 @@ EndIf
If BoxID = 105005 Then If BoxID = 105005 Then
Var NewFlowPaymentCode = 1 Var NewFlowPaymentCode = 1
Var EnergyDrink1BathPro = 1
Var CoffeeDrink1BathPro = 0 Var CoffeeDrink1BathPro = 0
Var NamHomCoconutPro = 1 Var NamHomCoconutPro = 1
EndIf EndIf
@ -493,6 +495,15 @@ EndIf
Var CurrentMainVideoTemp = 0 Var CurrentMainVideoTemp = 0
If NamHomCoconutPro = 1 Then If NamHomCoconutPro = 1 Then
READ_FILE "/mnt/sdcard/nam_hom_coconut_reward_out_of_stock" coconutRewardOutOfStock
STRCONTAIN "1" coconutRewardOutOfStock coconutRewardOutOfStockContain
If coconutRewardOutOfStockContain = "true" Then
Var NamHomCoconutRewardOutOfStock = 1
EndIf
DEBUGVAR NamHomCoconutRewardOutOfStock
Var VideoMainPage = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_main_page.png" Var VideoMainPage = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_main_page.png"
Var CurrentMainVideoTemp = 1 Var CurrentMainVideoTemp = 1
Var CountDownShowButton = 0 Var CountDownShowButton = 0

60
xml/event/triple_promotion_nam_hom_coconut_and_energy_drink_1_bath_and_wednesday_melon.xml
View file

@ -573,27 +573,51 @@
<Filename> <Filename>
eval( eval(
If show_eng = "true" Then If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_en.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png"
EndIf
Else Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_th.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png"
EndIf
EndIf EndIf
) )
</Filename> </Filename>
<FilenamePress> <FilenamePress>
eval( eval(
If show_eng = "true" Then If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_en.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png"
EndIf
Else Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_th.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png"
EndIf
EndIf EndIf
) )
</FilenamePress> </FilenamePress>
<FilenameDisable> <FilenameDisable>
eval( eval(
If show_eng = "true" Then If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_en.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_en.png"
EndIf
Else Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_out_of_stock_th.png"
Else
Var return = "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.png"
EndIf
EndIf EndIf
) )
</FilenameDisable> </FilenameDisable>
@ -609,13 +633,15 @@
<Height> 616 </Height> <Height> 616 </Height>
<Loop> "true" </Loop> <Loop> "true" </Loop>
<State> <State>
eval( If show_eng = "true" Then
If show_eng = "true" Then Var return = "Invisible"
Var return = "Invisible" Else
Else If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "Enable" Var return = "Invisible"
EndIf Else
) Var return = "Enable"
EndIf
EndIf
</State> </State>
<Filename> "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.mp4" </Filename> <Filename> "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.mp4" </Filename>
</Video> </Video>
@ -625,8 +651,12 @@
<Height> 616 </Height> <Height> 616 </Height>
<State> <State>
eval( eval(
If show_eng = "true" Then If show_eng = "true" then
Var return = "Enable" If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
Else Else
Var return = "Invisible" Var return = "Invisible"
EndIf EndIf

4
xml/multi_ads/ads_path.ev
View file

@ -41,10 +41,6 @@ Var CurrentTotalCupInt = CurrentTotalCup
INT CurrentTotalCupInt INT CurrentTotalCupInt
DEBUGVAR CurrentTotalCupInt DEBUGVAR CurrentTotalCupInt
If CurrentTotalCupInt < 55555 Then
Var XMLLiveInfoEnable = 0
EndIf
If XMLLiveInfoEnable = 0 Then If XMLLiveInfoEnable = 0 Then
Var showMultiAds = "false" Var showMultiAds = "false"

89
xml/page_board.xml
View file

@ -91,6 +91,7 @@
Var OpunMediumTTF = "ROOT/taobin_project/font/Opun/Opun-Medium.ttf" Var OpunMediumTTF = "ROOT/taobin_project/font/Opun/Opun-Medium.ttf"
Var OpunThinTTF = "ROOT/taobin_project/font/Opun/Opun-Thin.ttf" Var OpunThinTTF = "ROOT/taobin_project/font/Opun/Opun-Thin.ttf"
Var OpunBoldTTF = "ROOT/taobin_project/font/Opun/Opun-Bold.ttf"
Var KanitSemiBoldTTF = "ROOT/taobin_project/font/Kanit/Kanit-Medium.ttf" Var KanitSemiBoldTTF = "ROOT/taobin_project/font/Kanit/Kanit-Medium.ttf"
@ -1020,10 +1021,19 @@
Var SlientRefreshEnable = 0 Var SlientRefreshEnable = 0
Var ShouldShowNamHomCoconutRemainReward = 0 Var ShouldShowNamHomCoconutRemainReward = 0
Var ShowNamHomCoconutRemainReward = "Invisible"
Var GetNamHomCoconutRemainReward = 0
Var NamHomCoconutRemainReward_Y = 1071
Var NamHomCoconutRemainRewardNumber_Y = 1130
DEBUGVAR NamHomCoconutPro
DEBUGVAR CurrentMainVideo
If NamHomCoconutPro = 1 Then If NamHomCoconutPro = 1 Then
If CurrentMainVideo = 0 Then If CurrentMainVideo = 2 Then
Var ShouldShowNamHomCoconutRemainReward = 1 Var ShouldShowNamHomCoconutRemainReward = 1
EndIf EndIf
Var GetNamHomCoconutRemainReward = 1
Var dummy_phone = "089999999"
GETACCEXT dummy_phone 34
EndIf EndIf
If EnergyDrink1BathPro = 1 Then If EnergyDrink1BathPro = 1 Then
@ -1048,6 +1058,62 @@
</EventOpen> </EventOpen>
<EventActionOk>
If GetNamHomCoconutRemainReward = 1 Then
If Ext1a = "" Then
SAVELOG "Get Nam hom coconut remain reward error Ext1a is empty."
Else
DEBUGVAR Ext1a
SPLIT2 Ext1a "/" RemainRewardSpl
Var SuperSetRemain = RemainRewardSpl[0]
Var BalanceEssenceTonerRemain = RemainRewardSpl[1]
Var CleansingGalRemain = RemainRewardSpl[2]
Var TumbleBottleRemain = RemainRewardSpl[3]
Var ClearGalRemain = RemainRewardSpl[4]
INT SuperSetRemain
INT BalanceEssenceTonerRemain
INT CleansingGalRemain
INT TumbleBottleRemain
INT ClearGalRemain
Var SumNamHomCoconutRemainReward = SuperSetRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + BalanceEssenceTonerRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + CleansingGalRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + TumbleBottleRemain
Var SumNamHomCoconutRemainReward = SumNamHomCoconutRemainReward + ClearGalRemain
If ShouldShowNamHomCoconutRemainReward = 1 Then
Var ShowNamHomCoconutRemainReward = "Enable"
EndIf
;DEBUG
;Var SumNamHomCoconutRemainReward = 200
If SumNamHomCoconutRemainReward > 500 Then
Var ShowNamHomCoconutRemainReward = "Invisible"
Else
If SumNamHomCoconutRemainReward = 0 Then
SAVELOG "NamHomCoconutPro: All reward out of stock"
WRITE_FILE "/mnt/sdcard/nam_hom_coconut_reward_out_of_stock" "1"
EndIf
EndIf
Var NamHomCoconutRemainReward = SumNamHomCoconutRemainReward
DEBUGVAR NamHomCoconutRemainReward
EndIf
EndIf
</EventActionOk>
<EventActionError>
If GetNamHomCoconutRemainReward = 1 Then
SAVELOG "Get Nam hom coconut remain reward requet error."
EndIf
</EventActionError>
<EventUnitTest1> <EventUnitTest1>
Var XMLProfile = "AllPriceUp05" Var XMLProfile = "AllPriceUp05"
Open CurrentXMLFileName0 Open CurrentXMLFileName0
@ -1458,6 +1524,27 @@
</Video> </Video>
<Image>
<X> 224 </X>
<Y> NamHomCoconutRemainReward_Y </Y>
<State> ShowNamHomCoconutRemainReward </State>
<Filename> "ROOT/taobin_project/image/event/nam_hom_coconut/reward_remain.png" </Filename>
</Image>
<Text>
<X> 379 </X>
<Y> NamHomCoconutRemainRewardNumber_Y </Y>
<State> ShowNamHomCoconutRemainReward </State>
<Width> 224 </Width>
<Height> 112 </Height>
<Font> OpunBoldTTF </Font>
<Size> 100 </Size>
<Color> 0xFF0000 </Color>
<Align> center-vertical-horizontal </Align>
<Value> NamHomCoconutRemainReward </Value>
</Text>
<Button> <Button>

4
xml/page_catalog_group_pro_freefile.xml
View file

@ -556,7 +556,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound> <Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Kapella's Sweet Drinks" Var NameDrink = ""
Var NameDrinkTH = "คาเพลล่าสวีทดริ๊งค์" Var NameDrinkTH = "คาเพลล่าสวีทดริ๊งค์"
Var DrinkDescriptionTH = "น้ำเชื่อมสตอเบอร์รี่ นม น้ำตาล Oreo" Var DrinkDescriptionTH = "น้ำเชื่อมสตอเบอร์รี่ นม น้ำตาล Oreo"
Var DrinkDescription = "Strawberry Syrup, Milk, Sugar, Oreo" Var DrinkDescription = "Strawberry Syrup, Milk, Sugar, Oreo"
@ -652,7 +652,7 @@
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Kapella's Sweet Drinks" </Value> <Value> "" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>

105
xml/page_catalog_group_pro_nam_hom_coconut.xml
View file

@ -554,8 +554,8 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound> <Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Hat Yai beach coconut" Var NameDrink = "Hat Yai Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดใหญ่(มาก)" Var NameDrinkTH = "มะพร้าวหาดใหญ่ (มาก)"
Var DrinkDescriptionTH = "กาแฟ น้ำ และ น้ำเชื่อมมะพร้าว" Var DrinkDescriptionTH = "กาแฟ น้ำ และ น้ำเชื่อมมะพร้าว"
Var DrinkDescription = "Espresso, Coconut Syrup, Sugar, Water" Var DrinkDescription = "Espresso, Coconut Syrup, Sugar, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_americano_Coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_americano_Coconut_pro.png"
@ -629,7 +629,8 @@
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดใหญ่(มาก)" </Value> <Value> "มะพร้าวหาดใหญ่
(มาก)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -650,7 +651,8 @@
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Hat Yai beach coconut" </Value> <Value> "Hat Yai Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -805,8 +807,8 @@ Sugar, Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<OverlayImage> xmlpro( 12-21-02-0068, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage> <OverlayImage> xmlpro( 12-21-02-0068, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<EventOnClick> <EventOnClick>
Var NameDrink = "Hat Yai beach coconut" Var NameDrink = "Hat Yai Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดใหญ่(มาก)" Var NameDrinkTH = "มะพร้าวหาดใหญ่ (มาก)"
Var DrinkDescriptionTH = "กาแฟ น้ำ และ น้ำเชื่อมมะพร้าว" Var DrinkDescriptionTH = "กาแฟ น้ำ และ น้ำเชื่อมมะพร้าว"
Var DrinkDescription = "Espresso, Coconut Syrup, Sugar, Water" Var DrinkDescription = "Espresso, Coconut Syrup, Sugar, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_americano_Coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_americano_Coconut_pro.png"
@ -880,7 +882,8 @@ Sugar, Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดใหญ่(มาก)" </Value> <Value> "มะพร้าวหาดใหญ่
(มาก)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -901,7 +904,8 @@ Sugar, Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Hat Yai beach coconut" </Value> <Value> "Hat Yai Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -1058,7 +1062,7 @@ Sugar, Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Bangsaen Beach Coconut" Var NameDrink = "Bangsaen Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดบางแสน(ห้า)" Var NameDrinkTH = "มะพร้าวหาด บางแสน(ห้า)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว และน้ำ " Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว และน้ำ "
Var DrinkDescription = "Coconut Syrup and Water" Var DrinkDescription = "Coconut Syrup and Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_smoothie_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_smoothie_coconut_pro.png"
@ -1132,7 +1136,8 @@ Sugar, Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดบางแสน(ห้า)" </Value> <Value> "มะพร้าวหาด
บางแสน(ห้า)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -1153,7 +1158,8 @@ Sugar, Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Bangsaen Beach Coconut" </Value> <Value> "Bangsaen Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -1310,7 +1316,7 @@ Sugar, Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Jomtien Beach Coconut" Var NameDrink = "Jomtien Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดจอมเทียน(พรรษา)" Var NameDrinkTH = "มะพร้าวหาด จอมเทียน(พรรษา)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว นม และน้ำ " Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว นม และน้ำ "
Var DrinkDescription = "Coconut syrup, Milk, Water" Var DrinkDescription = "Coconut syrup, Milk, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_milk_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_milk_coconut_pro.png"
@ -1384,7 +1390,8 @@ Sugar, Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดจอมเทียน(พรรษา)" </Value> <Value> "มะพร้าวหาด
จอมเทียน(พรรษา)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -1405,7 +1412,8 @@ Sugar, Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Jomtien Beach Coconut" </Value> <Value> "Jomtien Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -1563,7 +1571,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Nang Ram Beach Coconut" Var NameDrink = "Nang Ram Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดนางรำ(สวย)" Var NameDrinkTH = "มะพร้าวหาด นางรำ(สวย)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว โกโก้ นม และน้ำ " Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว โกโก้ นม และน้ำ "
Var DrinkDescription = "Coconut syrup, Cocoa, Milk, Water" Var DrinkDescription = "Coconut syrup, Cocoa, Milk, Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_Cocoa_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_Cocoa_coconut_pro.png"
@ -1637,7 +1645,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดนางรำ(สวย)" </Value> <Value> "มะพร้าวหาด
นางรำ(สวย)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -1658,7 +1667,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Nang Ram Beach Coconut" </Value> <Value> "Nang Ram Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -1816,7 +1826,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Glass Sand Beach Coconut" Var NameDrink = "Glass Sand Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดทรายแก้ว(มังกร)" Var NameDrinkTH = "มะพร้าวหาด ทรายแก้ว(มังกร)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว มัทฉะ นมและน้ำ" Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว มัทฉะ นมและน้ำ"
Var DrinkDescription = "Coconut Syrup, Matcha Milk Water" Var DrinkDescription = "Coconut Syrup, Matcha Milk Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_match_milk_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_match_milk_coconut_pro.png"
@ -1890,7 +1900,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดทรายแก้ว(มังกร)" </Value> <Value> "มะพร้าวหาด
ทรายแก้ว(มังกร)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -1911,7 +1922,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Glass Sand Beach Coconut" </Value> <Value> "Glass Sand Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -2069,7 +2081,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Mae Pim Beach Coconut" Var NameDrink = "Mae Pim Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดแม่พิมพ์(ดีด)" Var NameDrinkTH = "มะพร้าวหาด แม่พิมพ์(ดีด)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว มัทฉะ และน้ำ" Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว มัทฉะ และน้ำ"
Var DrinkDescription = "Coconut Syrup, Matcha and Water" Var DrinkDescription = "Coconut Syrup, Matcha and Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_matcha_tea_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_matcha_tea_coconut_pro.png"
@ -2143,7 +2155,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดแม่พิมพ์(ดีด)" </Value> <Value> "มะพร้าวหาด
แม่พิมพ์(ดีด)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -2164,7 +2177,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Mae Pim Beach Coconut" </Value> <Value> "Mae Pim Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -2321,7 +2335,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Moonlight Beach Coconut" Var NameDrink = "Moonlight Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดแสงจันทร์(ไรอะ)" Var NameDrinkTH = "มะพร้าวหาด แสงจันทร์(ไรอะ)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว ชาไทย นมและน้ำ" Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว ชาไทย นมและน้ำ"
Var DrinkDescription = "Coconut Syrup, Thai Tea, Milk Water" Var DrinkDescription = "Coconut Syrup, Thai Tea, Milk Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_thai_milk_tea_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_hot_thai_milk_tea_coconut_pro.png"
@ -2395,7 +2409,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดแสงจันทร์(ไรอะ)" </Value> <Value> "มะพร้าวหาด
แสงจันทร์(ไรอะ)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -2416,7 +2431,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Moonlight Beach Coconut" </Value> <Value> "Moonlight Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -2574,7 +2590,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Pattaya Beach Coconut" Var NameDrink = "Pattaya Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดพัทยา(พารา)" Var NameDrinkTH = "มะพร้าวหาด พัทยา(พารา)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว ชาไทย และน้ำ" Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว ชาไทย และน้ำ"
Var DrinkDescription = "Coconut Syrup, Thai Tea and Water" Var DrinkDescription = "Coconut Syrup, Thai Tea and Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_black_tea_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_black_tea_coconut_pro.png"
@ -2648,7 +2664,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดพัทยา(พารา)" </Value> <Value> "มะพร้าวหาด
พัทยา(พารา)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -2669,7 +2686,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Pattaya Beach Coconut" </Value> <Value> "Pattaya Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -2826,7 +2844,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Suan Son Beach Coconut" Var NameDrink = "Suan Son Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดสวนสน(ใจไหม)" Var NameDrinkTH = "มะพร้าวหาด สวนสน(ใจไหม)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว ชามะลิ นมและน้ำ" Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว ชามะลิ นมและน้ำ"
Var DrinkDescription = "Coconut Syrup, Jasmine Tea, Milk Water" Var DrinkDescription = "Coconut Syrup, Jasmine Tea, Milk Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_jasmine_milk_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_jasmine_milk_coconut_pro.png"
@ -2900,7 +2918,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดสวนสน(ใจไหม)" </Value> <Value> "มะพร้าวหาด
สวนสน(ใจไหม)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -2921,7 +2940,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Suan Son Beach Coconut" </Value> <Value> "Suan Son Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -3079,7 +3099,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Laem Sing Beach Coconut" Var NameDrink = "Laem Sing Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดแหลมสิง(หไกรภพ)" Var NameDrinkTH = "มะพร้าวหาด แหลมสิง(หไกรภพ)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว ชามะลิ และน้ำ" Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว ชามะลิ และน้ำ"
Var DrinkDescription = "Coconut Syrup, Jasmine Tea and Water" Var DrinkDescription = "Coconut Syrup, Jasmine Tea and Water"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_jasmine_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_jasmine_coconut_pro.png"
@ -3153,7 +3173,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดแหลมสิง(หไกรภพ)" </Value> <Value> "มะพร้าวหาด
แหลมสิง(หไกรภพ)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -3174,7 +3195,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Laem Sing Beach Coconut" </Value> <Value> "Laem Sing Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -3331,7 +3353,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Toem Rak Beach Coconut" Var NameDrink = "Toem Rak Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดเติมรัก(ฉันทำไม)" Var NameDrinkTH = "มะพร้าวหาด เติมรัก(ฉันทำไม)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว และโซดา" Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว และโซดา"
Var DrinkDescription = "Coconut Syrup and Soda" Var DrinkDescription = "Coconut Syrup and Soda"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_Coconut_soda_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_Coconut_soda_pro.png"
@ -3405,7 +3427,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดเติมรัก(ฉันทำไม)" </Value> <Value> "มะพร้าวหาด
เติมรัก(ฉันทำไม)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -3426,7 +3449,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showengText </State> <State> showengText </State>
<Value> "Toem Rak Beach Coconut" </Value> <Value> "Toem Rak Beach
Coconut" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>
@ -3583,7 +3607,7 @@ Water" </Value>
<Volume> SoundVolume </Volume> <Volume> SoundVolume </Volume>
<EventOnClick> <EventOnClick>
Var NameDrink = "Long Beach Coconut" Var NameDrink = "Long Beach Coconut"
Var NameDrinkTH = "มะพร้าวหาดยาว(ไปยาวไป)" Var NameDrinkTH = "มะพร้าวหาด ยาว(ไปยาวไป)"
Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว เป๊ปซี่ และโซดา" Var DrinkDescriptionTH = "น้ำเชื่อมมะพร้าว เป๊ปซี่ และโซดา"
Var DrinkDescription = "Coconut Syrup, Pepsi and Soda" Var DrinkDescription = "Coconut Syrup, Pepsi and Soda"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_pepsi_coconut_pro.png" Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_pepsi_coconut_pro.png"
@ -3657,7 +3681,8 @@ Water" </Value>
<Font> KanitMediumTTF </Font> <Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color> <Color> 0x322B26 </Color>
<State> showthaiText </State> <State> showthaiText </State>
<Value> "มะพร้าวหาดยาว(ไปยาวไป)" </Value> <Value> "มะพร้าวหาด
ยาว(ไปยาวไป)" </Value>
</Text> </Text>
<Text> <Text>
<X> 16 </X> <X> 16 </X>

63
xml/page_collect_point_1.xml
View file

@ -226,6 +226,27 @@
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
GETACCEXT Param1 23 GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml" Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
@ -308,6 +329,27 @@
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 PepweenCollectPoint = 0 Then If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31 GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml" Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
@ -835,6 +877,27 @@
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 PepweenCollectPoint = 0 Then If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31 GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml" Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"

2
xml_main/startup.xml
View file

@ -113,7 +113,7 @@
;Oreo ;Oreo
Var OreoGuarantee = 0 Var OreoGuarantee = 0
Var CurrentMainVideo = 0 Var CurrentMainVideo = 2
</EventOpen> </EventOpen>
<Text> <Text>