check current taobin point in member page

This commit is contained in:
Kenta420 2024-01-31 15:10:23 +07:00
parent a55eafb406
commit 068b298c2e
10 changed files with 109 additions and 83 deletions

View file

@ -29,10 +29,15 @@
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If FromCheckMemberPoint = 1 Then
If Timeout > 10 Then
Open "ROOT/taobin_project/xml/page_check_member2.xml"
EndIf
Else
If Timeout > 5 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
TimerReset
@ -110,8 +115,22 @@
<FilenameDisable2> Var( DirImage + "/disable2_get15discount.png" )</FilenameDisable2>
<EventClick>
; goto lid straw
Var Seeker.UseGet15Discount = 1
Var PreviousSeeker.UseGet15Discount = 1
DEBUGVAR FromCheckMemberPoint
If FromCheckMemberPoint = 1 Then
Var PointTaobinStr = "0/00-00-00-0000/cash"
Var PointCrm = "0"
Var GetScore = 1
Var Cid = 39
DEBUGVAR "AddData 39"
DEBUGVAR TNumberTaobinMemberXXX
AddData Cid TNumberTaobinMemberXXX PointTaobinStr PointCrm GetScore
Else
Var Seeker.UseGet15Discount = 1
Var PreviousSeeker.UseGet15Discount = 1
EndIf
Var PopUpState2 = "Invisible"
Var PopUpState1 = "Enable"
Var Timeout = 0
@ -129,7 +148,11 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
</EventClick>
</Button>
@ -144,7 +167,11 @@
<EventClick>
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
</EventClick>
</Button>