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

update new taobin credit 28 taobin

Browse source
This commit is contained in:
Kenta420 2024-01-03 14:35:52 +07:00
parent 961eb8bba6
commit 0e93a831d5
15 changed files with 91 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

57
xml/page_collect_point_3_28.xml
View file

@ -602,27 +602,47 @@
Var Get15DiscountState = "Disable"
EndIf
Var PreviosCreditPhoneNumber = ""
If Seeker = "curr" Then
Var PreviosCreditPhoneNumber = Seeker.TNumberTaobinCredit
Else
If Seeker.TNumberTaobinCredit = PreviosCreditPhoneNumber Then
If Seeker.UseGet15Discount = 1 Then
Var Get15DiscountState = "Disable2"
EndIf
EndIf
EndIf
Var KeepBnBtnImage = "/bn_keep.png"
Var KeepBpBtnImage = "/bp_keep.png"
Var PreviousSeeker = "tempSeeker"
Var Seeker.UseGet15Discount = 0
Var PreviousSeeker.UseGetDrink5Bath = 0
If Seeker = "curr" Then
Var PreviousSeeker.TNumberTaobinCredit = Seeker.TNumberTaobinCredit
Var PreviousSeeker.UseGet15Discount = 0
Else
If PreviousSeeker.TNumberTaobinCredit = Seeker.TNumberTaobinCredit Then
If PreviousSeeker.UseGet15Discount = 1 Then
Var Get15DiscountState = "Disable2"
EndIf
Else
Var PreviousSeeker.TNumberTaobinCredit = Seeker.TNumberTaobinCredit
Var PreviousSeeker.UseGet15Discount = 0
EndIf
EndIf
If CoffeePoint >= 28 Then
Var KeepBnBtnImage = "/bn_close.png"
Var KeepBpBtnImage = "/bp_close.png"
Var Get15DiscountState = "Disable"
Var PreviousSeeker.UseGetDrink5Bath = 1
Else
If PreviousSeeker.UseGetDrink5Bath = 1 Then
Var Get15DiscountState = "Disable2"
EndIf
EndIf
DEBUGVAR Seeker
DEBUGVAR Seeker.TNumberTaobinCredit
DEBUGVAR Seeker.UseGet15Discount
DEBUGVAR PreviousSeeker
DEBUGVAR PreviousSeeker.TNumberTaobinCredit
DEBUGVAR PreviousSeeker.UseGet15Discount
Var PointEndDate = ""
GetDateEndOfMonth PointEndDate
DEBUGVAR PointEndDate
@ -646,7 +666,7 @@
;Var Timeout = Timeout + 1
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
@ -656,8 +676,12 @@
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else
If CoffeePoint >= 15 Then
Var Discount15Timeout = 1
Open "ROOT/taobin_project/xml/page_display_get_15_discount.xml"
If Get15DiscountState = "Disable2" Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
Else
Var Discount15Timeout = 1
Open "ROOT/taobin_project/xml/page_display_get_15_discount.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
@ -826,6 +850,7 @@
<EventClick>
Var Seeker.UseGet15Discount = 1
Var PreviousSeeker.UseGet15Discount = 1
Open "ROOT/taobin_project/xml/page_display_get_15_discount.xml"
</EventClick>