WTC+SGP: change collect pt ui and member regis QR

This commit is contained in:
Pakin 2024-10-04 17:28:51 +07:00
parent da3e42901e
commit 9ad0f10a7c
25 changed files with 565 additions and 349 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 2.1 KiB

After

Width:  |  Height:  |  Size: 64 KiB

Before After
Before After

View file

@ -11,8 +11,8 @@
; jump
If IgnoreCollectPointByMe = 1 Then
Var IgnoreCollectPointByMe = 0
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointMain = 0 Then
@ -20,10 +20,10 @@
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
If SettingIgnoreCollectPoint = 1 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Var ShowErrorText = "Invisible"
@ -35,7 +35,7 @@
Var TimeOutPlay = 0
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collect_point1_en"
;Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
@ -81,7 +81,7 @@
Var CampaingRef1 = ""
Var CampaingRef2 = ""
SUBSTRING CampaingRef 0 6 CampaingRef1
SUBSTRING CampaingRef 12 18 CampaingRef2
@ -131,7 +131,7 @@
Var PepweenCollectPoint = 0
EndIf
EndIf
DEBUGVAR PepweenCollectPoint
DEBUGVAR ProBadValentineEnable
@ -143,13 +143,13 @@
DEBUGVAR ProThaiTeaEnable
DEBUGVAR FromProThaiTea
DEBUGVAR FromProYuzu
If Seeker.TNumberTaobinCredit = "" Then
If web_telnumOK = "" Then
If show_eng = "true" Then
If show_eng = "true" Then
Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
Else
Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
@ -160,7 +160,7 @@
Var StepGetPoint = 1
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
@ -180,16 +180,16 @@
AddData 45 TelPhoneNum drink_price param2 param3
EndIf
;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Var Param1 = TelephoneNumber + "/"
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
If MyMintEnable = 1 Then
If FromMyMintPro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
EndIf
EndIf
@ -221,7 +221,7 @@
If PepweenEnable = 1 Then
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
EndIf
EndIf
@ -278,7 +278,7 @@
GETACCEXT Param1 23
EndIf
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_2.lxml"
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_2.lxml"
EndIf
Else
@ -296,7 +296,7 @@
Var StepGetPoint = 1
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
@ -306,10 +306,10 @@
Var TelephoneNumberX = TelephoneNumber
DEBUGVAR TelephoneNumber
DEBUGVAR PepweenCollectPoint
;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Var Param1 = TelephoneNumber + "/"
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
DEBUGVAR MyMintEnable
@ -319,7 +319,7 @@
If MyMintEnable = 1 Then
If FromMyMintPro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
EndIf
EndIf
@ -339,7 +339,7 @@
Open "ROOT/taobin_project/inter/mys/xml/event/thai_tea/page_get_free_1_thai_tea.lxml"
EndIf
EndIf
DEBUGVAR ProYuzuEnable
DEBUGVAR FromProYuzu
If ProYuzuEnable = 1 Then
@ -396,7 +396,7 @@
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
If UseSGPCollectFlag = 1 Then
@ -405,7 +405,7 @@
Else
GETACCEXT Param1 23
EndIf
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_2.lxml"
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_2.lxml"
EndIf
EndIf
@ -416,7 +416,7 @@
If SGPSimMode = "Enable" Then
If BREW_CNT = 0 Then
Var BREW_CNT = 20
EndIf
@ -492,10 +492,10 @@
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
@ -511,20 +511,20 @@
DEBUGVAR XPercent
Var XPercent = XPercent / InitCNT
EndIf
DEBUGVAR XPercent
EndIf
StrLen TelephoneNumber TelNumLen
If TelNumLen > 0 Then
Var ShowTextNumber = "Invisible"
Else
; Add
Var TimeOutPlay = TimeOutPlay + 1
If TimeOutPlay > 10 Then
Var TimeOutPlay = 0
If show_eng = "true" Then
If show_eng = "true" Then
Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
Else
Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
@ -533,17 +533,17 @@
;
EndIf
DEBUGVAR Timeout
Var Timeout = Timeout + 1
If Timeout > 30 Then
SAVELOG "collect_point1-p107."
;Open "ROOT/taobin_project/xml/page_catalog.xml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
If Timeout = 18 Then
@ -561,7 +561,7 @@
Refresh
TimerReset
</EventTimeout>
</EventTimeout>
@ -587,13 +587,13 @@
<FilenamePress> bp_NumPad1 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "1"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -603,9 +603,9 @@
TimerReset
Refresh
</EventClick>
</Button>
@ -617,13 +617,13 @@
<FilenamePress> bp_NumPad2 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "2"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -642,13 +642,13 @@
<FilenamePress> bp_NumPad3 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "3"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -667,13 +667,13 @@
<FilenamePress> bp_NumPad4 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "4"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -692,13 +692,13 @@
<FilenamePress> bp_NumPad5 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "5"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -717,13 +717,13 @@
<FilenamePress> bp_NumPad6 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "6"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -742,13 +742,13 @@
<FilenamePress> bp_NumPad7 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "7"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -767,13 +767,13 @@
<FilenamePress> bp_NumPad8 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "8"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -792,13 +792,13 @@
<FilenamePress> bp_NumPad9 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "9"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -807,7 +807,7 @@
TimerReset
Refresh
</EventClick>
</Button>
@ -818,13 +818,13 @@
<FilenamePress> bp_NumPad0 </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "0"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -843,24 +843,24 @@
<FilenamePress> bp_NumPadBack </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Trim TelephoneNumber -1
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
If TelNumLen < 10 Then
Var Tel_Confirm_State = "Invisible"
EndIf
If TelNumLen = 0 Then
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
TimerReset
Refresh
</EventClick>
</Button>
@ -884,11 +884,11 @@
<FilenamePress> Var( DirImage + "/bp_negative.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; goto lid straw
;Open "ROOT/taobin_project/xml/page_catalog.xml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
SAVELOG "collect_point1-p589."
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventClick>
</Button>
@ -903,9 +903,9 @@
<FilenameDisable> Var( DirImage + "/bn_positive.png") </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Tel_Confirm_Flag = 1 Then
@ -921,7 +921,7 @@
Var StepGetPoint = 1
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
@ -940,17 +940,17 @@
AddData 45 TelPhoneNum drink_price param2 param3
EndIf
If ChildrenFree = 1 Then
Var Seeker.TNumberTaobinMember = TelephoneNumber
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Var Param1 = TelephoneNumber + "/"
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
DEBUGVAR FruityRayaEnable
@ -981,7 +981,7 @@
If MyMintEnable = 1 Then
If FromMyMintPro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
EndIf
EndIf
@ -1033,7 +1033,7 @@
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
If UseSGPCollectFlag = 1 Then
Var Param1 = "SG/" + Param1
@ -1042,13 +1042,13 @@
Else
GETACCEXT Param1 23
EndIf
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_2.lxml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_2.lxml"
EndIf
Else
Else
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage2 = "ROOT/taobin_project/image/collectiing"
@ -1061,7 +1061,7 @@
Var Tel_Confirm_State = "Invisible"
Refresh
EndIf
@ -1165,11 +1165,11 @@
<State> ShowErrorText </State>
<Filename> text_show_error </Filename>
</Image>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventMachine>
If MachineStage = "drink-success" Then
@ -1186,7 +1186,12 @@
Var DebugBypassCollectPt2 = 1
DEBUGVAR DebugBypassCollectPt2
Var TaobinLevel = "2"
Var CoffeePoint = 55
</EventUnitTest1>
</Popup>
</Popup>

View file

@ -10,7 +10,7 @@
Var Timeout = 0
SAVELOG UnitTestType
If UnitTestType = "1" Then
Var CoffeePoint = 10
Open "ROOT/taobin_project/xml/page_show_consent.xml"
@ -22,12 +22,12 @@
Var Seeker.TaobinErrorNetwork = 0
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
@ -42,6 +42,10 @@
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Var TaobinLevel = 2
Var CoffeePointRank = 55
DEBUGVAR TaobinLevel
; reset
Var DebugBypassCollectPt2 = 0
@ -75,10 +79,10 @@
Var IMG_CNT = "ROOT/taobin_project/inter/whatthecup/sgp/image/page_doing/img2_eng.png"
EndIf
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
@ -93,51 +97,51 @@
DEBUGVAR XPercent
Var XPercent = XPercent / InitCNT
EndIf
DEBUGVAR XPercent
EndIf
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var TaobinLevel = 0
Var CoffeePoint = 1
Var CoffeePoint = 1
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
DEBUGVAR "Try open collect.error timeout30"
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_error.lxml"
EndIf
TimerReset
Refresh
</EventTimeout>
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If StepGetPoint = 0 Then
If PdpaAsk = 0 Then
Open "ROOT/taobin_project/xml/page_show_consent.xml"
Open "ROOT/taobin_project/xml/page_show_consent.xml"
Else
Var StepGetPoint = 1
Var TelephoneNumber = TelephoneNumberX
If UseSGPCollectFlag = 1 Then
GETACCEXT Param1 35
Else
@ -145,21 +149,21 @@
EndIf
Var Ext1a = ""
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_2.xml"
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_2.xml"
EndIf
Else
If Ext1a = "" Then
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_error.lxml"
Else
If Ext1a = "ok" Then
@ -180,7 +184,7 @@
INT PointTaobinTmp
INT TaobinPDPA
DEBUGVAR TaobinName
Var CatchNotMember = 0
If TaobinName = "" Then
@ -213,7 +217,7 @@
Var TNumberTaobinMemberXXX = TelephoneNumber
;Var PointTaobinTmp = 4
Var PointTaobin = PointTaobinTmp
Var pTaobin = PointTaobin
@ -235,14 +239,14 @@
Var Seeker.PointTaobinStr = ParamCP
Var Seeker.TNumberTaobinMember = TelephoneNumberX
Var CoffeePointRank = Ext1b
INT CoffeePointRank
Var CoffeePoint1 = Ext1c
INT CoffeePoint1
Var CoffeePoint = PointTaobin + CoffeePoint1
Var CoffeePointOld = CoffeePoint1
@ -250,7 +254,7 @@
Var CoffeePointRank = CoffeePointRank + 0
Else
Var CoffeePointRank = CoffeePointRank + PointTaobin
EndIf
EndIf
Var CoffeePointRankTmp = CoffeePointRank
@ -261,13 +265,13 @@
;inter-xml-open
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_3.xml"
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_3.xml"
EndIf
;inter-xml-open
If CountryName = "Indonesia" Then
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_3.xml"
EndIf
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_3.xml"
EndIf
;inter-xml-open
If CountryName = "Australia" Then
@ -276,71 +280,71 @@
Var pageCollectPoint = CountryRootPath + "/xml/page_collect_point_3.lxml"
Open pageCollectPoint
Else
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
EndIf
;inter-xml-open
If CountryName = "Singapore" Then
DEBUGVAR "Try open collect3.sgp"
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_3.lxml"
EndIf
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_3.lxml"
EndIf
Open "ROOT/taobin_project/xml/page_show_consent.xml"
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf
If PayAmount >= 20 Then
If TaobinPromoX = "p2.no_otp" Then
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
EndIf
If TaobinPromoX = "p2.unused" Then
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
EndIf
EndIf
If NewCollectPoint = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
Else
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_error.lxml"
EndIf
EndIf
EndIf
</EventActionOk>
<EventActionError>
<EventActionError>
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Open "ROOT/taobin_project/inter/sgp/xml/page_collect_point_error.lxml"
</EventActionError>
</EventActionError>
<EventMachine>
If MachineStage = "drink-success" Then
@ -416,4 +420,3 @@
</Popup>

View file

@ -26,7 +26,7 @@
DEBUGVAR TelephoneNumber
DEBUGVAR TelephoneNumberX
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/display_point_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
@ -38,7 +38,7 @@
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
Var CoffeePointTmp = CoffeePoint
If CoffeePoint > 54 Then
@ -46,11 +46,11 @@
Var CoffeePointTmp = 55
EndIf
Var pImage = CoffeePointTmp * 20
Var pImage = pImage / 55
Var pImageStr = "/taobinPoint55.png"
Var pImageStr = "/taobinPoint55.png"
If UsePepsiTheme = 1 Then
Var pImageStr = "ROOT/taobin_project/inter/whatthecup/sgp/image/page_member" + pImageStr
@ -70,7 +70,7 @@
Var TaobinExpireDay = ""
@ -78,14 +78,14 @@
Var TaobinExpireMonthX = ""
Var TaobinExpireYear = ""
SPLIT TaobinExpire "/" 1 TaobinExpireDay
SPLIT TaobinExpire "/" 2 TaobinExpireMonth
SPLIT TaobinExpire "/" 3 TaobinExpireYear
If show_eng = "true" Then
If show_eng = "true" Then
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "Jan"
@ -152,7 +152,7 @@
Var TaobinExpireYear = TaobinExpireYear + 0
Else
Else
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "ม.ค."
@ -229,17 +229,17 @@
Var ExpireStrTmp = ExpireStrTmp + " "
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireYear
If TaobinLevel = "1" Then
Var PointMaskState = "Enable"
EndIf
If show_eng = "true" Then
If show_eng = "true" Then
Var TaobinLevelDesc3 = "You have coupons "
Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
@ -253,124 +253,69 @@
;EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "Walking turtle level"
Var TaobinLevelDesc1 = "CUPPING"
Var TaobinLevelDesc1Cont = "GOOD!"
Var TaobinLevelDesc1More = "BRONZE LEVEL"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " shells "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Flying turtle level"
Var TaobinLeveImg = "/taoLevel2.png"
Var TaobinLeveImg = "/WTCLevel1.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
Var TaobinLeveImg = "/WTCLevel2.png"
;Var TaobinLevelDesc1 = "Flying turtle level "
Var TaobinLevelDesc1 = "CUPPING"
Var TaobinLevelDesc1Cont = "BETTER!"
Var TaobinLevelDesc1More = "SILVER LEVEL"
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
Var CoffeePointRank = CoffeePointRank - 150
EndIf
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "Flying turtle level until " + ExpireStrTmp
;Var TaobinLevelDesc1 = "Flying turtle level until " + ExpireStrTmp
Var PointDiff = 350 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " shells "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Master turtle level"
Var TaobinLeveImg = "/taoLevel3.png"
Var TaobinLeveImg = "/WTCLevel2.png"
If CoffeePointRank > 349 Then
;Var TaobinLeveImg = "/taoLevel4.png"
Var TaobinLeveImg = "/WTCLevel3.png"
;Var TaobinLevelDesc1 = "Master turtle level "
Var TaobinLevelDesc1 = "CUPPING"
Var TaobinLevelDesc1Cont = "BEST!"
Var TaobinLevelDesc1More = "GOLD LEVEL"
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
Var CoffeePointRank = CoffeePointRank - 350
EndIf
EndIf
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "Master turtle level until " + ExpireStrTmp
;Var TaobinLevelDesc1 = "Master turtle level until " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel4.png"
Var TaobinLeveImg = "/WTCLevel3.png"
EndIf
Else
Var TaobinLevelDesc3 = "ตอนนี้คุณมีคูปองแลกเครื่องดื่มฟรีเหลืออยู่ "
Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
Var TaobinLevelDesc3 = TaobinLevelDesc3 + " ใบ"
;If TaobinLevel = "1" Then
; Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าขี้อาย"
; Var TaobinLevelDesc2 = ""
; Var TaobinLeveImg = "/taoLevel1.png"
;EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าเตาะแตะ"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "สะสมกระดองอีก " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " กระดอง "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "เพื่อเลื่อนขั้นเป็นเต่าติดปีก"
Var TaobinLeveImg = "/taoLevel2.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
;Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
EndIf
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก จนถึง " + ExpireStrTmp
Var PointDiff = 350 - CoffeePointRank
Var TaobinLevelDesc2 = "สะสมกระดองอีก " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " กระดอง "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "เพื่อเลื่อนขั้นเป็นผู้เฒ่าเต่า"
Var TaobinLeveImg = "/taoLevel3.png"
If CoffeePointRank > 349 Then
;Var TaobinLeveImg = "/taoLevel4.png"
;Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
EndIf
EndIf
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า จนถึง " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel4.png"
EndIf
EndIf
Var CheckCoupons = 0
Var MakeDrinkState = 0
@ -380,24 +325,24 @@
Var ShellXCol3 = 365
Var ShellXCol4 = 462
Var ShellXCol5 = 557
Var ShellXCol6 = 652
Var ShellXCol7 = 747
Var ShellXCol8 = 842
Var ShellXCol6 = 662
Var ShellXCol7 = 757
Var ShellXCol8 = 852
; 1-8
Var ShellYRow1 = 1037
Var ShellYRow1 = 1047
; 9-16
Var ShellYRow2 = 1120
Var ShellYRow2 = 1130
; 17-24
Var ShellYRow3 = 1203
Var ShellYRow3 = 1213
; 25-32
Var ShellYRow4 = 1282
Var ShellYRow4 = 1292
; 33-40
Var ShellYRow5 = 1365
Var ShellYRow5 = 1375
; 41-48
Var ShellYRow6 = 1448
Var ShellYRow6 = 1458
; 49-55
Var ShellYRow7 = 1531
Var ShellYRow7 = 1541
Var taobinP1 = "Invisible"
@ -461,7 +406,7 @@
Var taobinP53 = "Invisible"
Var taobinP54 = "Invisible"
Var taobinP55 = "Invisible"
Var taobinImgP1 = "/taobinPN.png"
Var taobinImgP2 = "/taobinPN.png"
@ -877,20 +822,20 @@
Var CheckCouponState = "Disable"
EndIf
Var PointEndDate = ""
GetDateEndOfMonth PointEndDate
DEBUGVAR PointEndDate
Var xPointEndDate = 570
If show_eng = "true" Then
If show_eng = "true" Then
Var xPointEndDate = 618
EndIf
Var Point2XState = "Invisible"
Var Point2XImage = ""
If Point2X = 1 Then
Var Point2XState = "Enable"
If Point2X = 1 Then
Var Point2XState = "Enable"
If Seeker.CampaignPayChanel = "kbank" Then
Var Point2XImage = "/text9.png"
EndIf
@ -900,7 +845,7 @@
If Seeker.CampaignPayChanel = "dolfin" Then
Var Point2XImage = "/text11.png"
EndIf
EndIf
;inter-from-consent
@ -911,17 +856,17 @@
;inter-from-consent
If CountryName = "Indonesia" Then
Var Seeker.FromConsent = 0
EndIf
EndIf
;inter-from-consent
If CountryName = "Australia" Then
Var Seeker.FromConsent = 0
EndIf
EndIf
;inter-from-consent
If CountryName = "Singapore" Then
Var Seeker.FromConsent = 0
EndIf
EndIf
Var AlphaBg = "ROOT/taobin_project/image/display_point/alpha.png"
@ -962,10 +907,10 @@
Var Free1 = "ROOT/taobin_project/inter/whatthecup/sgp/image/page_member/free1.png"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
@ -981,7 +926,7 @@
DEBUGVAR XPercent
Var XPercent = XPercent / InitCNT
EndIf
DEBUGVAR XPercent
EndIf
@ -997,36 +942,36 @@
If CoffeePoint > 54 Then
Open "ROOT/taobin_project/xml/page_display_get_free.xml"
Else
If Seeker.FromConsent = 1 Then
If Seeker.FromConsent = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_free.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If CheckCoupons = 1 Then
Var MakeDrinkState = 1
Var CouponPage = 1
Var CouponPage = 1
Var CouponInfo1 = Ext1a
Var CouponInfo2 = Ext1b
Var CouponInfo3 = Ext1c
@ -1037,14 +982,14 @@
Var CouponInfo8 = Ext1h
Var CouponInfo9 = Ext1i
Var CouponInfo10 = Ext1j
Var TelephoneNumber = TelephoneNumberX
GETACCEXT TelephoneNumber 13
Var CheckCoupons = 2
Var CheckCoupons = 2
Else
If CheckCoupons = 2 Then
If CheckCoupons = 2 Then
Var TaobinCredit = Ext1b
@ -1052,15 +997,15 @@
Var ChackMemberPage = CountryRootPath + "xml/page_check_member2.lxml"
Open ChackMemberPage
Else
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Open "ROOT/taobin_project/xml/page_check_member2.xml"
EndIf
EndIf
EndIf
</EventActionOk>
@ -1095,7 +1040,6 @@
;
<Image>
<X> 108 </X>
<Y> 665 </Y>
@ -1109,24 +1053,50 @@
</Image>
<Image>
<X> 243 </X>
<Y> 722 </Y>
<Filename> Var( DirImage + "/text7.png" )</Filename>
</Image>
;<Image>
;<X> 483 </X>
;<Y> 700 </Y>
;<Filename> Var( DirImage + "/text7.png" )</Filename>
;</Image>
;<Text>
;<X> 483 </X>
;<Y> 750 </Y>
;<Size> 38 </Size>
;<Font> PepsiExtend </Font>
;<Color> HeadlineColor </Color>
;<Value> TaobinLevelDesc1 </Value>
;</Text>
<Text>
<X> 483 </X>
<Y> 730 </Y>
<Size> 20 </Size>
<Font> PepsiExtend </Font>
<Color> WTCMediumBlueColor </Color>
<Value> "MEMBERSHIP\nSTATUS:" </Value>
</Text>
;<Image>
;<X> 483 </X>
;<Y> 900 </Y>
;<Filename> Var( DirImage + "/text4.png" )</Filename>
;</Image>
<Text>
<X> 483 </X>
<Y> 930 </Y>
<Size> 20 </Size>
<Font> PepsiExtend </Font>
<Color> WTCMediumBlueColor </Color>
<Value> "TOTAL BALANCE:" </Value>
</Text>
<Image>
<X> 243 </X>
<Y> 860 </Y>
<Filename> Var( DirImage + "/text4.png" )</Filename>
</Image>
<Image>
<X> 625 </X>
<Y> 734 </Y>
<Filename> Var( DirImage + TaobinLeveImg )</Filename>
</Image>
@ -1148,7 +1118,7 @@
<FilenamePress> ClosePressFilename </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; goto lid straw
;Open "ROOT/taobin_project/xml/page_back_to_main.xml"
@ -1157,7 +1127,7 @@
Open "ROOT/taobin_project/inter/sgp/xml/page_check_member.lxml"
EndIf
If Seeker.FromConsent = 1 Then
If Seeker.FromConsent = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_free.xml"
Else
If CoffeePoint > 54 Then
@ -1165,7 +1135,7 @@
EndIf
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
@ -1555,8 +1525,8 @@
; free
<Button>
<X> 747 </X>
<Y> 1528 </Y>
<X> 740 </X>
<Y> 1535 </Y>
<Filename> Free1 </Filename>
</Button>
@ -1567,24 +1537,24 @@
<Filename> Var( DirImage + taobinImgP55 )</Filename>
</Button>
<Text>
<X> 250 </X>
<Y> 790 </Y>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> TNumberTaobinMemberXXX </Value>
<Format> Telnum-mask-3 </Format>
</Text>
;<Text>
;<X> 250 </X>
;<Y> 790 </Y>
;<Size> 20 </Size>
;<Width> 1000 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> 0x746253 </Color>
;<Value> TNumberTaobinMemberXXX </Value>
;<Format> Telnum-mask-3 </Format>
;</Text>
<Text>
<X> 250 </X>
<Y> 890 </Y>
<Size> 50 </Size>
<X> 720 </X>
<Y> 930 </Y>
<Size> 20 </Size>
<Width> 120 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Font> PepsiExtend </Font>
<Color> WTCMediumBlueColor </Color>
<Value> CoffeePointRank </Value>
</Text>
@ -1595,15 +1565,37 @@
<Filename> Var( DirImage + "/pointMask.png" )</Filename>
</Button>
;<Text>
;<X> 250 </X>
;<Y> 990 </Y>
;<Size> 25 </Size>
;<Width> 1000 </Width>
;<Font> KanitRegularTTF </Font>
;<Color> 0xDE794E </Color>
;<Value> TaobinLevelDesc1 </Value>
;</Text>
<Text>
<X> 483 </X>
<Y> 800 </Y>
<Size> 50 </Size>
<Font> PepsiExtend </Font>
<Color> HeadlineColor </Color>
<Value> TaobinLevelDesc1 </Value>
</Text>
; TaobinLevelDesc1Cont
<Text>
<X> 483 </X>
<Y> 838 </Y>
<Size> 50 </Size>
<Font> PepsiExtend </Font>
<Color> HeadlineColor </Color>
<Value> TaobinLevelDesc1Cont </Value>
</Text>
; TaobinLevelDesc1More
<Text>
<X> 483 </X>
<Y> 898 </Y>
<Size> 20 </Size>
<Font> PepsiExtend </Font>
<Color> HeadlineColor </Color>
<Value> TaobinLevelDesc1More </Value>
</Text>
;<Text>
;<X> 250 </X>
@ -1703,8 +1695,9 @@
Var taobinP42 = "Enable"
Var taobinP50 = "Enable"
Var taobinP55 = "Enable"
</EventUnitTest1>
</Popup>

View file

@ -36,7 +36,7 @@
Var YesPressButton = ImgDir + "bp_yes.png"
Var NoPressButton = ImgDir + "bp_no.png"
Var QRImg = ImgDirStatic + "qr_regis.png"
Var UseSGPCollectFlag = 0
DEBUGVAR YesButton
@ -62,10 +62,10 @@
Var Timeout = 0
; to-lid-straw
SAVELOG "member_prompt.Timeout"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Refresh
@ -151,7 +151,7 @@
<Image>
<X> 400 </X>
<X> 300 </X>
<Y> 1065 </Y>
<State> DisplayQR </State>
<Filename> QRImg </Filename>
@ -159,4 +159,4 @@
;include="ROOT/taobin_project/inc/video.inc"
</Popup>
</Popup>

Binary file not shown.

After

Width:  |  Height:  |  Size: 53 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 37 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 29 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 38 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 3.9 KiB

After

Width:  |  Height:  |  Size: 1.6 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 2.5 KiB

After

Width:  |  Height:  |  Size: 820 B

Before After
Before After

Binary file not shown.

After

Width:  |  Height:  |  Size: 37 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 29 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 38 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 3.3 KiB

After

Width:  |  Height:  |  Size: 2.2 KiB

Before After
Before After

Binary file not shown.

After

Width:  |  Height:  |  Size: 64 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 1.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 820 B

Binary file not shown.

Before

Width:  |  Height:  |  Size: 76 KiB

After

Width:  |  Height:  |  Size: 50 KiB

Before After
Before After

View file

@ -0,0 +1,201 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> BackgroundColor </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
If show_eng = "true" Then
Var DirImage = CountryWTCRootPath + "/image/display_get_free_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Else
Var DirImage = "ROOT/taobin_project/image/display_get_free"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
Var MemberState1 = "Enable"
Var MemberState2 = "Invisible"
Var MemberState3 = "Invisible"
;Var TaobinLevel = "3"
DEBUGVAR TaobinLevel
If TaobinLevel = "1" Then
Var MemberState1 = "Invisible"
Var MemberState2 = "Enable"
Var MemberState3 = "Invisible"
If show_eng = "true" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Get_free_drink_faster.mp3"
Else
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Get_free_drink_faster.mp3"
EndIf
Else
If show_eng = "true" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/You_mode_it.mp3"
Else
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/You_mode_it.mp3"
EndIf
EndIf
If Seeker.FromConsent = 1 Then
Var MemberState1 = "Invisible"
Var MemberState2 = "Invisible"
Var MemberState3 = "Enable"
EndIf
Var img_popup2 = "/img_popup2.png"
Var img_popup3 = "/img_popup3.png"
;inter-condition
;inter-image not use. because customer auto assige member.
If InternationalEnable = 1 Then
Var MemberState1 = "Enable"
Var MemberState2 = "Invisible"
Var MemberState3 = "Invisible"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
;
</EventActionOk>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
;<Image>
;<X> 0 </X>
;<Y> 0 </Y>
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
;include="ROOT/taobin_project/inc/video.inc"
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/inter/whatthecup/sgp/image/display_point/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 665 </Y>
<State> MemberState1 </State>
<Filename> Var( DirImage + "/img_popup1.png" )</Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 665 </Y>
<State> MemberState2 </State>
<Filename> Var( DirImage + img_popup2 )</Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 665 </Y>
<State> MemberState3 </State>
<Filename> Var( DirImage + img_popup3 )</Filename>
</Image>
<Button>
<X> 397 </X>
<Y> 1680 </Y>
<Filename> Var( DirImage + "/bn_accept.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_accept.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventClick>
</Button>
;
;<Image>
;<X> 751 </X>
;<Y> 413 </Y>
;<Filename> "ROOT/taobin_project/image/page_doing/img2.png" </Filename>
;</Image>
;
;<Text>
;<X> XPosiShowCountDownBrew </X>
;<Y> 470 </Y>
;<Align> End </Align>
;<Width> 153 </Width>
;<Size> 88 </Size>
;<Font> RobotoBold </Font>
;<Color> 0x513C2F </Color>
;<Value> ShowCountDownBrewing </Value>
;</Text>
</Popup>