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

check current taobin point in member page

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

BIN
image/display_point/imgCoupon120.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 16 KiB

BIN
image/display_point/imgCoupon121.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 17 KiB

BIN
image/display_point_en/imgCoupon120.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 16 KiB

BIN
image/display_point_en/imgCoupon121.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 18 KiB

11
xml/event/script_common_for_open_promotion_xml.ev
View file

@ -33,17 +33,14 @@ Else
EndIf
EndIf
Else
If RerunProEnable = 1 Then
; Temporary debug
If ProPeachEnable = 1 Then
Var BigButtonEnable = "Enable"
Open "ROOT/taobin_project/xml/event/promotion_rerun.xml"
Open "ROOT/taobin_project/xml/event/promotion_peach.xml"
Else
If ProPeachEnable = 1 Then
If RerunProEnable = 1 Then
Var BigButtonEnable = "Enable"
Open "ROOT/taobin_project/xml/event/promotion_peach.xml"
Open "ROOT/taobin_project/xml/event/promotion_rerun.xml"
Else
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.xml"
EndIf

1
xml/page_check_member1.xml
View file

@ -75,6 +75,7 @@
Var CoffeePoint1 = Ext1c
INT CoffeePoint1
Var CoffeePointOld = CoffeePoint1
DEBUGVAR CoffeePointOld
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g

63
xml/page_check_member2.xml
View file

@ -323,7 +323,7 @@
Var FromCheckMemberPoint = 0
@ -486,6 +486,13 @@
If CouponTypeA = "113" Then
Var CouponNameA = "/imgCoupon113.png"
EndIf
If CouponTypeA = "120" Then
Var CouponNameA = "/imgCoupon120.png"
EndIf
If CouponTypeA = "121" Then
Var CouponNameA = "/imgCoupon121.png"
EndIf
INT CouponExireA_D
INT CouponExireA_Y
@ -598,6 +605,13 @@
Var CouponNameB = "/imgCoupon113.png"
EndIf
If CouponTypeB = "120" Then
Var CouponNameB = "/imgCoupon120.png"
EndIf
If CouponTypeB = "121" Then
Var CouponNameB = "/imgCoupon121.png"
EndIf
INT CouponExireB_D
INT CouponExireB_Y
Var CouponExireB_Y = CouponExireB_Y + 0
@ -715,6 +729,13 @@
Var CouponNameA = "/imgCoupon113.png"
EndIf
If CouponTypeA = "120" Then
Var CouponNameA = "/imgCoupon120.png"
EndIf
If CouponTypeA = "121" Then
Var CouponNameA = "/imgCoupon121.png"
EndIf
INT CouponExireA_D
INT CouponExireA_Y
Var CouponExireA_Y = CouponExireA_Y + 543
@ -825,6 +846,13 @@
Var CouponNameB = "/imgCoupon113.png"
EndIf
If CouponTypeB = "120" Then
Var CouponNameB = "/imgCoupon120.png"
EndIf
If CouponTypeB = "121" Then
Var CouponNameB = "/imgCoupon121.png"
EndIf
INT CouponExireB_D
INT CouponExireB_Y
Var CouponExireB_Y = CouponExireB_Y + 543
@ -1136,22 +1164,25 @@
</Text>
;<Button>
;<X> 156 </X>
;<Y> 1746 </Y>
;<Filename> Var( DirImage + "/bn_checkKradong.png" )</Filename>
;<FilenamePress> Var( DirImage + "/bp_checkKradong.png" )</FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Open "ROOT/taobin_project/xml/page_check_member_point.xml"
;</EventClick>
;</Button>
<Button>
<X> 156 </X>
<Y> 1746 </Y>
<Filename> Var( DirImage + "/bn_checkKradong.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_checkKradong.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
GETACCEXT TNumberTaobinMemberXXX 14
Open "ROOT/taobin_project/xml/page_check_member_point.xml"
</EventClick>
</Button>
<Button>
<X> 397 </X>
;<X> 630 </X>
;<X> 397 </X>
<X> 630 </X>
<Y> 1746 </Y>
<Filename> Var( DirImage + bn_exit )</Filename>
<FilenamePress> Var( DirImage + bp_exit )</FilenamePress>
@ -1210,7 +1241,7 @@
<Text>
<X> 372 </X>
<Y> 1370 </Y>
<Y> 1375 </Y>
<Size> 15 </Size>
<Width> 600 </Width>
<Font> KanitRegularTTF </Font>
@ -1243,7 +1274,7 @@
<Text>
<X> 372 </X>
<Y> 1613 </Y>
<Y> 1618 </Y>
<Size> 15 </Size>
<Width> 600 </Width>
<Font> KanitRegularTTF </Font>

65
xml/page_check_member_point.xml
View file

@ -666,12 +666,6 @@
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 15 Then
@ -705,36 +699,24 @@
</EventSecurity>
<EventActionOk>
If CheckCoupons = 1 Then
Var MakeDrinkState = 1
Var CouponPage = 1
Var CouponInfo1 = Ext1a
Var CouponInfo2 = Ext1b
Var CouponInfo3 = Ext1c
Var CouponInfo4 = Ext1d
Var CouponInfo5 = Ext1e
Var CouponInfo6 = Ext1f
Var CouponInfo7 = Ext1g
Var CouponInfo8 = Ext1h
Var CouponInfo9 = Ext1i
Var CouponInfo10 = Ext1j
If Ext1a = "ok" Then
Var CoffeePoint1 = Ext1c
INT CoffeePoint1
Var CoffeePointOld = CoffeePoint1
Var CoffeePoint = CoffeePoint1
DEBUGVAR CoffeePointOld
Var TelephoneNumber = TelephoneNumberX
GETACCEXT TelephoneNumber 13
Var CheckCoupons = 2
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g
Var TaobinExpire = Ext1f
Var TaobinLevel = Ext1e
Else
Var CoffeePointRank = Ext1b
INT CoffeePointRank
Var CoffeePointRankTmp = CoffeePointRank
If CheckCoupons = 2 Then
Var TaobinCredit = Ext1b
Open "ROOT/taobin_project/xml/page_check_member2.xml"
EndIf
Open "ROOT/taobin_project/xml/page_check_member_point.xml"
EndIf
</EventActionOk>
@ -1176,25 +1158,6 @@
</Text>
;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> IMG_CNT </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>
<EventUnitTest1>
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
</EventUnitTest1>

41
xml/page_display_get_15_discount.xml
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>

11
xml/page_display_get_drink_5_baht.xml
View file

@ -23,6 +23,13 @@
Var PopUpState1 = "Invisible"
Var PopUpState2 = "Invisible
EndIf
If FromCheckMemberPoint = 1 Then
Var PointTaobinStr = "0/00-00-00-0000/cash"
Var PointCrm = "0"
Var GetScore = "0"
AddData 40 TNumberTaobinMemberXXX PointTaobinStr PointCrm GetScore
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
@ -43,7 +50,7 @@
EndIf
Else
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member3.xml"
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
@ -139,7 +146,7 @@
Refresh
Else
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member3.xml"
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf