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

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>
eval(
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
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
)
</Filename>
<FilenamePress>
eval(
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
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
)
</FilenamePress>
<FilenameDisable>
eval(
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
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
)
</FilenameDisable>
@ -13102,7 +13126,11 @@ LIMENADE SODA" </Value>
If show_eng = "true" Then
Var return = "Invisible"
Else
Var return = "Enable"
If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
EndIf
)
</State>
@ -13116,8 +13144,12 @@ LIMENADE SODA" </Value>
<Height> 616 </Height>
<State>
eval(
If show_eng = "true" Then
Var return = "Enable"
If show_eng = "true" then
If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
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 SuperSetOutOfStock = Ext1d
Var BalanceEssenceTonerOutOfStock = Ext1e
Var CleansingGalOutOfStock = Ext1f
Var ClearGalOutOfStock = Ext1g
Var CleansingGelOutOfStock = Ext1f
Var TumbleBottleOutOfStock = Ext1g
Var ClearGelOutOfStock = Ext1h
;DEBUG
;Var SuperSetOutOfStock = 1
;Var BalanceEssenceTonerOutOfStock = 1
;Var CleansingGalOutOfStock = 1
;Var ClearGalOutOfStock = Ext1g
;Var CleansingGelOutOfStock = 1
;Var TumbleBottleOutOfStock = 1
;Var ClearGelOutOfStock = 1
DEBUGVAR SuperSetOutOfStock
DEBUGVAR BalanceEssenceTonerOutOfStock
DEBUGVAR CleansingGalOutOfStock
DEBUGVAR ClearGalOutOfStock
DEBUGVAR CleansingGelOutOfStock
DEBUGVAR TumbleBottleOutOfStock
DEBUGVAR ClearGelOutOfStock
If TaobinName = "" Then
Var Seeker.IsLineMember = 0
@ -135,39 +138,41 @@
EndIf
EndIf
If Seeker.IsAlreadyGetReward = 1 Then
SAVELOG "Already get reward skip to normal collect point."
If Seeker.CodeChannel = 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
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
EndIf
;If Seeker.IsAlreadyGetReward = 1 Then
; SAVELOG "Already get reward skip to normal collect point."
; If Seeker.CodeChannel = 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
; Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
; EndIf
;EndIf
If SuperSetOutOfStock = 1 Then
If BalanceEssenceTonerOutOfStock = 1 Then
If CleansingGalOutOfStock = 1 Then
If ClearGalOutOfStock = 1 Then
SAVELOG "All reward out of stock skip to normal collect point."
If TumbleBottleOutOfStock = 1 Then
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.CollectPointMain = 1 Then
If Seeker.CodeChannel = 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
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
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
EndIf
EndIf
@ -190,35 +195,16 @@
Var PointState[8] = 0
Var PointState[9] = 0
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
Var PointNameIndex[0] = -1
Var PointNameIndex[1] = -1
Var PointNameIndex[2] = -1
Var PointNameIndex[3] = -1
Var PointNameIndex[4] = -1
Var PointNameIndex[5] = -1
Var PointNameIndex[6] = -1
Var PointNameIndex[7] = -1
Var PointNameIndex[8] = -1
Var PointNameIndex[9] = -1
@ -503,79 +489,79 @@
If MenuPoint[0] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[0]
Var PointNameIndex[CurrentIndexPoint] = 0
EndIf
If MenuPoint[1] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[1]
Var PointNameIndex[CurrentIndexPoint] = 1
EndIf
If MenuPoint[2] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[2]
Var PointNameIndex[CurrentIndexPoint] = 2
EndIf
If MenuPoint[3] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[3]
Var PointNameIndex[CurrentIndexPoint] = 3
EndIf
If MenuPoint[4] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[4]
Var PointNameIndex[CurrentIndexPoint] = 4
EndIf
If MenuPoint[5] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[5]
Var PointNameIndex[CurrentIndexPoint] = 5
EndIf
If MenuPoint[6] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[6]
Var PointNameIndex[CurrentIndexPoint] = 6
EndIf
If MenuPoint[7] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[7]
Var PointNameIndex[CurrentIndexPoint] = 7
EndIf
If MenuPoint[8] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[8]
Var PointNameIndex[CurrentIndexPoint] = 8
EndIf
If MenuPoint[9] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[9]
Var PointNameIndex[CurrentIndexPoint] = 9
EndIf
If MenuPoint[10] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[10]
Var PointNameIndex[CurrentIndexPoint] = 10
EndIf
If MenuPoint[11] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[11]
Var PointNameIndex[CurrentIndexPoint] = 11
EndIf
If MenuPoint[12] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointState[CurrentIndexPoint].name = MenuPointName[12]
Var PointNameIndex[CurrentIndexPoint] = 12
EndIf
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[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
Var PointCount = PointCount + 1
@ -119,8 +160,8 @@
Var PointDiff = 10 - PointCount
If show_eng = "true" Then
Var MemberText = "สถานะสมาชิก"
Var MissionText = "ฝ่าไอร้อนพิชิตไอเท่มหน้าใส"
Var MemberText = "HELLO PAL, WANNA FELL FRESH?"
Var MissionText = "BEAT THE HEAT, GO!"
Var TaobinLevelDesc1 = "You have " + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " more fresh menus left to unlock CURA-MD"
@ -131,8 +172,8 @@
Var text8_X = 224
Else
Var MemberText = "HELLO PAL, WANNA FELL FRESH?"
Var MissionText = "BEAT THE HEAT, GO!"
Var MemberText = "สถานะสมาชิก"
Var MissionText = "ฝ่าไอร้อนพิชิตไอเท่มหน้าใส"
Var TaobinLevelDesc1 = "เหลืออีก " + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " เมนูที่จะได้กดสุ่มรางวัลจาก CURA-MD"
@ -168,7 +209,7 @@
Var CurrentPointCheck = "check"
Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
Var UpdatePoint = 1
Var UpdatePoint = 1
EndIf
@ -242,9 +283,10 @@
<Text>
<X> 243 </X>
<Y> 722 </Y>
<Width> 360 </Width>
<Width> 380 </Width>
<Height> 36 </Height>
<Size> 24 </Size>
<Color> 0x746253 </Color>
<Font> KanitMediumTTF </Font>
<Value> MemberText </Value>
</Text>
@ -256,6 +298,7 @@
<Width> 360 </Width>
<Height> 48 </Height>
<Size> 32 </Size>
<Color> 0x746253 </Color>
<Font> KanitMediumTTF </Font>
<Value> MissionText </Value>
</Text>
@ -282,9 +325,9 @@
<Text>
<X> 243 </X>
<Y> 800 </Y>
<Y> 815 </Y>
<Size> 14 </Size>
<Width> 90 </Width>
<Width> 100 </Width>
<Font> RobotoRegular </Font>
<Color> 0x746253 </Color>
<Value> TNumberTaobinMemberXXX </Value>
@ -306,7 +349,7 @@
<Text>
<X> 247 </X>
<Y> 970 </Y>
<Size> 25 </Size>
<Size> 20 </Size>
<Width> 500 </Width>
<Height> 30 </Height>
<Font> RobotoBold </Font>
@ -318,9 +361,8 @@
<X> 247 </X>
<Y> 1001 </Y>
<Size> 20 </Size>
<Width> 500 </Width>
<Height> 30 <Height>
<Font> KanitRegularTTF </Font>
<Width> 600 </Width>
<Font> RobotoBold </Font>
<Color> 0x746253 </Color>
<Value> TaobinLevelDesc2 </Value>
</Text>
@ -335,11 +377,20 @@
<Text>
<X> 234 </X>
<Y> 1252 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
@ -352,11 +403,20 @@
<Text>
<X> 388 </X>
<Y> 1252 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
@ -369,11 +429,20 @@
<Text>
<X> 542 </X>
<Y> 1252 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
@ -386,28 +455,46 @@
<Text>
<X> 696 </X>
<Y> 1252 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
<Image>
<X> 76 </X>
<X> 234 </X>
<Y> 1295 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[4]) </Filename>
</Image>
<Text>
<X> 76 </X>
<X> 234 </X>
<Y> 1434 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
@ -421,11 +508,20 @@
<Text>
<X> 388 </X>
<Y> 1434 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
@ -438,11 +534,20 @@
<Text>
<X> 542 </X>
<Y> 1434 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
@ -455,11 +560,20 @@
<Text>
<X> 696 </X>
<Y> 1434 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
@ -472,11 +586,20 @@
<Text>
<X> 388 </X>
<Y> 1616 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
@ -489,18 +612,27 @@
<Text>
<X> 542 </X>
<Y> 1616 </Y>
<Size> 10 </Size>
<Size> 12 </Size>
<Width> 154 </Width>
<Font> InterRegular </Font>
<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>
</Text>
<Button>
<X> 423 </X>
<X> 413 </X>
<Y> 1660 </Y>
<State> showRandomBtnState </State>
<Filename> RandomBtnImg </Filename>
@ -525,7 +657,7 @@
<Button>
<X> 610 </X>
<X> 413 </X>
<Y> 1660 </Y>
<State> showCloseBtnState </State>
<Filename> CloseBtnImg </Filename>
@ -574,7 +706,7 @@
Var PointState[8] = 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>
<EventUnitTest4>
@ -583,7 +715,7 @@
Else
Var show_eng = "true"
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>

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 RandomStyle = 0
Random2 0 1 RandomStyle
Random2 0 2 RandomStyle
If RandomStyle = 0 Then
Var Text_X = 241
@ -127,13 +127,13 @@
Var ShowCountDownBrewing = CountDownBrewing
If Timeout > 15 Then
SAVELOG "Timeout 15 second auto random for you"
Function 2
EndIf
If Timeout > 15 Then
SAVELOG "Timeout 15 second auto random for you"
Function 2
EndIf
Var Timeout = Timeout + 1
Var Timeout = Timeout + 1
TimerReset
Refresh
@ -210,9 +210,7 @@
; Random coupon
Var randResultInt = 0
DEBUGVAR MaxRandomIndex
Var MaxRandom = MaxRandomIndex - 1
DEBUGVAR MaxRandom
Random2 0 MaxRandom randResultInt
Random2 0 MaxRandomIndex randResultInt
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
EndIf
Var AddData = 0
Var CodeReward = CodeType
Var var2 = "X"
Var var3 = "X"
Var PhoneNum = TelephoneNumber
AddData 38 TelephoneNumber CodeReward var2 var3
GETACCEXT PhoneNum 34
</EventOpen>
<EventActionOk>
If Ext1a = "" Then
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
</EventActionOk>
@ -73,21 +107,21 @@
Var ShowCountDownBrewing = CountDownBrewing
If Timeout = 5 Then
If Seeker.CodeChannel = 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
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
EndIf
Timeout = Timeout + 1
If Timeout = 5 Then
If Seeker.CodeChannel = 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
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
EndIf
Timeout = Timeout + 1
TimerReset
Refresh
@ -104,26 +138,23 @@
<Filename> Var( DirImage + "/bg_reward.png") </Filename>
</Image>
<Image>
<X> 126 </X>
<Y> 595 <Y>
<Filename> RewardText </Filename>
</Image>
<Image>
<X> RewardImage_X </X>
<Y> RewardImage_Y </Y>
<Filename> RewardImage </Filename>
</Image>
<Image>
<X> 126 </X>
<Y> 595 </Y>
<Filename> RewardText </Filename>
</Image>
<Image>
<X> 229 </X>
<Y> 1662 </Y>
<Filename> Var ( DirImage + "/reward_result_line_register_text.png") </Filename>
<Image>
<Filename> Var( DirImage + "/reward_result_line_register_text.png") </Filename>
</Image>
;
<Image>

2
xml/event/script_common_for_open_promotion_xml.ev
View file

@ -56,7 +56,7 @@ Else
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"
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
Else
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
Var NamHomCoconutPro = 0
Var FromNamHomCoconutPro = 0
Var NamHomCoconutRewardOutOfStock = 0
Var NewCollectPoint = 1
@ -333,6 +334,7 @@ EndIf
If BoxID = 105005 Then
Var NewFlowPaymentCode = 1
Var EnergyDrink1BathPro = 1
Var CoffeeDrink1BathPro = 0
Var NamHomCoconutPro = 1
EndIf
@ -493,6 +495,15 @@ EndIf
Var CurrentMainVideoTemp = 0
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 CurrentMainVideoTemp = 1
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>
eval(
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
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
)
</Filename>
<FilenamePress>
eval(
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
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
)
</FilenamePress>
<FilenameDisable>
eval(
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
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
)
</FilenameDisable>
@ -609,13 +633,15 @@
<Height> 616 </Height>
<Loop> "true" </Loop>
<State>
eval(
If show_eng = "true" Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
)
If show_eng = "true" Then
Var return = "Invisible"
Else
If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
EndIf
</State>
<Filename> "ROOT/taobin_project/image/event/nam_hom_coconut/nam_hom_coconut_th.mp4" </Filename>
</Video>
@ -625,8 +651,12 @@
<Height> 616 </Height>
<State>
eval(
If show_eng = "true" Then
Var return = "Enable"
If show_eng = "true" then
If NamHomCoconutRewardOutOfStock = 1 Then
Var return = "Invisible"
Else
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf

4
xml/multi_ads/ads_path.ev
View file

@ -41,10 +41,6 @@ Var CurrentTotalCupInt = CurrentTotalCup
INT CurrentTotalCupInt
DEBUGVAR CurrentTotalCupInt
If CurrentTotalCupInt < 55555 Then
Var XMLLiveInfoEnable = 0
EndIf
If XMLLiveInfoEnable = 0 Then
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 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"
@ -1020,10 +1021,19 @@
Var SlientRefreshEnable = 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 CurrentMainVideo = 0 Then
If CurrentMainVideo = 2 Then
Var ShouldShowNamHomCoconutRemainReward = 1
EndIf
Var GetNamHomCoconutRemainReward = 1
Var dummy_phone = "089999999"
GETACCEXT dummy_phone 34
EndIf
If EnergyDrink1BathPro = 1 Then
@ -1048,6 +1058,62 @@
</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>
Var XMLProfile = "AllPriceUp05"
Open CurrentXMLFileName0
@ -1458,6 +1524,27 @@
</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>

4
xml/page_catalog_group_pro_freefile.xml
View file

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

63
xml/page_collect_point_1.xml
View file

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