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