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

Merge branch 'masterpiece' of ssh://192.168.10.159:/1TBHDD/ikong/taobin_project into masterpiece

Browse source
This commit is contained in:
wanlop run 2024-05-20 23:35:01 +07:00
commit d3ca6b6626
49 changed files with 17461 additions and 586 deletions
Download patch file Download diff file Expand all files Collapse all files

564
xml/event/energy_drink_1_bath/page_energy_drink_1_bath_check_member.xml Normal file
View file

@ -0,0 +1,564 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
;<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var ShowTextNumber = "Enable"
Var Timeout = 0
Var TelephoneNumber = ""
Var TelephoneNumberX = ""
Var TimeOutPlay = 0
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collect_point1_en"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_en/page_payment"
;Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Else
Var DirImage = "ROOT/taobin_project/image/collect_point1"
Var DirImage2 = "ROOT/taobin_project/image/page_payment"
;Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
Var FailState = "Invisible"
Var FailPopupImage = "ROOT/taobin_project/image/event/energy_drink_1_bath/check_member_fail_th.png"
Var Tel_Confirm_Flag = 1
Var MaxNumber = 10
Var StepGetServer = 0
var OtpCode = ""
Var failTime = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
StrLen TelephoneNumber TelNumLen
If TelNumLen > 0 Then
Var ShowTextNumber = "Invisible"
EndIf
DEBUGVAR Timeout
Var Timeout = Timeout + 1
If Timeout > 30 Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
EndIf
If FailState = "Enable" Then
Var failTime = failTime + 1
If failTime >= 5 Then
Var failTime = 0
Var FailState = "Invisible"
Var TelephoneNumber = ""
Var Tel_Confirm_State = "Invisible"
Var Timeout = 0
EndIf
EndIf
Refresh
TimerReset
</EventTimeout>
<EventActionOk>
DEBUGVAR Ext1a
If StepGetServer = 1 Then
If Ext1a = "ok" Then
Open "ROOT/taobin_project/xml/event/energy_drink_1_bath/page_energy_drink_1_bath_catalog.xml"
Else
Var load_gif_stage = "Invisible"
Var FailState = "Enable"
Var img_popup16 = "/img_popup16-1.png"
EndIf
Refresh
EndIf
</EventActionOk>
<EventActionError>
SAVELOG "GET ERROR!!!"
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 665 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 333 </X>
<Y> 1086 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "1"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1086 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "2"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1086 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "3"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1230 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "4"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1230 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "5"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1230 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "6"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1373 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "7"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1373 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "8"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1373 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "9"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1517 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "0"
Trim TelephoneNumber MaxNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1517 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim TelephoneNumber -1
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
Var Tel_Confirm_State = "Invisible"
EndIf
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
TimerReset
Refresh
</EventClick>
</Button>
<Text>
<X> 0 </X>
<Y> 873 </Y>
<Width> 1080 </Width>
<Align> Center </Align>
<Size> 62 </Size>
<Font> RobotoBlack </Font>
<Color> 0x513C2F </Color>
<Value> TelephoneNumber </Value>
<Format> Telnum-mask-1 </Format>
</Text>
<Button>
<X> 218 </X>
<Y> 1671 </Y>
<Filename> Var( DirImage + "/bn_back.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_back.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog2.xml"
</EventClick>
</Button>
<Button>
<X> 577 </X>
<Y> 1671 </Y>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_positive.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_positive.png") </FilenamePress>
<FilenameDisable> Var( DirImage + "/bn_positive.png") </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If Tel_Confirm_Flag = 1 Then
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
If Tel2DFlag = 1 Then
;Open "ROOT/taobin_project/xml/page_identityMember_consent.xml"
Var Param1 = TelephoneNumber
GETACCEXT Param1 33
Var StepGetServer = 1
Else
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage2 = "ROOT/taobin_project/image/collectiing"
EndIf
Var text_show_error = DirImage2 + "/text_show_error5.png"
Var ShowErrorText = "Enable"
Var TelephoneNumber = ""
Var Tel_Confirm_State = "Invisible"
Refresh
EndIf
EndIf
</EventClick>
</Button>
; Border Edit
<Image>
<X> 217 </X>
<Y> 866 </Y>
<Filename> "ROOT/taobin_project/image/collect_point1/img3.png" </Filename>
</Image>
<Image>
<X> 157 </X>
<Y> 868 </Y>
<State> ShowTextNumber </State>
<Filename> Var( DirImage + "/text_edit.png") </Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 699 </Y>
<Filename> "ROOT/taobin_project/image/event/energy_drink_1_bath/text20.png" </Filename>
</Image>
<Image>
<X> 152 </X>
<Y> 955 </Y>
<State> ShowErrorText </State>
<Filename> text_show_error </Filename>
</Image>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<State> FailState </State>
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
</Image>
<Image>
<X> 249 </X>
<Y> 751 </Y>
<State> FailState </State>
<Filename> FailPopupImage </Filename>
</Image>
;include="ROOT/taobin_project/inc/video.inc"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Popup>

70
xml/event/energy_drink_1_bath/page_energy_drink_1_bath_identity.xml
View file

@ -113,34 +113,6 @@
Refresh
; If StepGetServer = 1 Then
; If Ext1a = "ok" Then
; Var ChildrenFree = 1
; Open "ROOT/taobin_project/xml/page_payment.xml"
; Else
; If Ext1a = "limit" Then
; Var load_gif_stage = "Invisible"
; Var FailState = "Enable"
; Var img_popup16 = "/img_popup16-3.png"
; WRITE_FILE "/mnt/sdcard/oreo_for_free_limit" "true"
; Else
; Var load_gif_stage = "Invisible"
; Var FailState = "Enable"
; Var img_popup16 = "/img_popup16-2.png"
; EndIf
; Refresh
; EndIf
; EndIf
</EventActionOk>
<EventActionError>
@ -347,7 +319,22 @@
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog2.xml"
DEBUGVAR OpenFromXML
Var FromPowerUpPro = 0
Var FromEnergyDrink1BathPro = 0
Var FromCoffeeDrink1BathPro = 0
Var FromNamHomCoconutPro = 0
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
DEBUGVAR OpenFromInstMenuTab
If OpenFromInstMenuTab > 0 Then
DEBUGVAR OpenFromInstMenuTab
TabMenuVisibleInst OpenFromInstMenuTab
EndIf
Open OpenFromXML
</EventClick>
</Button>
@ -398,7 +385,15 @@ eval(
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog2.xml"
Var FromEnergyDrink1BathPro = 0
If Seeker = "next" Then
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
</EventClick>
</Button>
@ -412,7 +407,15 @@ eval(
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog2.xml"
Var FromEnergyDrink1BathPro = 0
If Seeker = "next" Then
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
</EventClick>
</Button>
@ -534,7 +537,10 @@ eval(
</EventUnitTest3>
<EventUnitTest4>
GETACCEXT TestIDNum 33
Var LegitAge = "true"
Var StepGetServer = 1
Var IDNum = "1104500029430"
GETACCEXT IDNum 33
</EventUnitTest4>
</Popup>

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

102
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
@ -153,21 +156,23 @@
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
@ -522,79 +508,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
Var 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>

6
xml/event/promotion_energy_drink_1_bath.xml
View file

@ -13050,8 +13050,6 @@ LIMENADE SODA" </Value>
<<<<<<< HEAD
=======
<Button>
@ -13087,12 +13085,10 @@ LIMENADE SODA" </Value>
)
</FilenameDisable>
<EventOnClick>
Open "ROOT/taobin_project/xml/event/energy_drink_1_bath/page_energy_drink_1_bath_catalog.xml"
Open "ROOT/taobin_project/xml/event/energy_drink_1_bath/page_energy_drink_1_bath_check_member.xml"
</EventOnClick>
>>>>>>> 3eb39e13631227c2112d7384cf82a0b86c464db5
<Video>
<X> 42 </X>

3
xml/event/promotion_template1.inc
View file

@ -32,8 +32,7 @@
)
</FilenameDisable>
<EventOnClick>
Open "ROOT/taobin_project/xml/event/energy_drink_1_bath/page_energy_drink_1_bath_catalog.xml"
Open "ROOT/taobin_project/xml/event/energy_drink_1_bath/page_energy_drink_1_bath_check_member.xml"
</EventOnClick>

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

54
xml/event/triple_promotion_nam_hom_coconut_and_energy_drink_1_bath_and_wednesday_melon.xml
View file

@ -573,33 +573,57 @@
<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>
<EventOnClick>
Open "ROOT/taobin_project/xml/page_catalog_group_pro_nam_hom_coconut.xml"
Open "ROOT/taobin_project/xml/page_catalog_group_pro_nam_hom_coconut.xml"
</EventOnClick>
@ -613,7 +637,11 @@
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>
@ -625,8 +653,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
@ -679,7 +711,7 @@
</FilenameDisable>
<EventOnClick>
Open "ROOT/taobin_project/xml/event/energy_drink_1_bath/page_energy_drink_1_bath_catalog.xml"
Open "ROOT/taobin_project/xml/event/energy_drink_1_bath/page_energy_drink_1_bath_check_member.xml"
</EventOnClick>