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

AUS: Add CleanFeedback

Browse source
This commit is contained in:
Kenta420 2025-05-22 18:26:24 +07:00
parent b376726bac
commit c5a0631077
6 changed files with 78 additions and 63 deletions
Download patch file Download diff file Expand all files Collapse all files

3
inter/aus/xml/event/tricker.ev
View file

@ -9,7 +9,8 @@
; Enable app game
Var GameEnableFromTrickerEv = 0
Var NewCollectPointFlag = 1
Var New_Payment = 1
Var CleanFeedbackFlag = 1
Var HappyEasterPro = 0
Var AutumnBreezePro = 0

5
inter/aus/xml/page_brewing3.lxml
View file

@ -1122,7 +1122,7 @@
If AddData = 1 Then
Var Cid = 26
If NewCollectPointFlag = 1 Then
If Seeker.redeemDiscount = "2_dollar" Then
Var Cid = 49
EndIf
@ -1132,7 +1132,6 @@
EndIf
Var Seeker.redeemDiscount = ""
EndIf
AddData Cid Seeker.TNumberTaobinMember Seeker.PointTaobinStr PointCrm GetScore
EndIf
@ -1238,7 +1237,6 @@
If AddData = 1 Then
Var Cid = 26
If NewCollectPointFlag = 1 Then
If Seeker.redeemDiscount = "2_dollar" Then
Var Cid = 49
EndIf
@ -1248,7 +1246,6 @@
EndIf
Var Seeker.redeemDiscount = ""
EndIf
AddData Cid Seeker.TNumberTaobinMember Seeker.PointTaobinStr PointCrm GetScore
EndIf

4
inter/aus/xml/page_brewing3Conti.xml
View file

@ -622,7 +622,6 @@
If AddData = 1 Then
Var Cid = 26
DEBUGVAR "Brewing3Conti"
If NewCollectPointFlag = 1 Then
If Seeker.redeemDiscount = "2_dollar" Then
Var Cid = 49
EndIf
@ -633,7 +632,6 @@
DEBUGVAR Seeker.redeemDiscount
Var Seeker.redeemDiscount = ""
EndIf
DEBUGVAR Cid
DEBUGVAR Seeker
@ -750,7 +748,6 @@
If AddData = 1 Then
Var Cid = 26
If NewCollectPointFlag = 1 Then
If Seeker.redeemDiscount = "2_dollar" Then
Var Cid = 49
EndIf
@ -760,7 +757,6 @@
EndIf
Var Seeker.redeemDiscount = ""
EndIf
DEBUGVAR Cid
DEBUGVAR Seeker

10
inter/aus/xml/page_collect_point_1.lxml
View file

@ -185,8 +185,13 @@
;Open "ROOT/taobin_project/xml/page_catalog.xml"
If CleanFeedbackFlag = 1 Then
Var CleanFeedBackToCollectPoint = 0
Open "ROOT/taobin_project/xml/page_clean_feedback.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
If Timeout = 18 Then
Var date_time_str = ""
@ -531,7 +536,12 @@
;Open "ROOT/taobin_project/xml/page_catalog.xml"
SAVELOG "collect_point1-p589."
If CleanFeedbackFlag = 1 Then
Var CleanFeedBackToCollectPoint = 0
Open "ROOT/taobin_project/xml/page_clean_feedback.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
</EventClick>
</Button>

7
inter/aus/xml/page_collect_point_2.lxml
View file

@ -165,10 +165,11 @@
DEBUGVAR Seeker.PointTaobinStr
DEBUGVAR Seeker.TNumberTaobinMember
If NewCollectPointFlag = 1 Then
Open "ROOT/taobin_project/inter/aus/xml/page_collect_point_3.lxml"
If CleanFeedbackFlag = 1 Then
Var CleanFeedBackToCollectPoint = 1
Open "ROOT/taobin_project/xml/page_clean_feedback.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
Open "ROOT/taobin_project/inter/aus/xml/page_collect_point_3.lxml"
EndIf
Else

10
inter/aus/xml/page_collect_point_error.lxml
View file

@ -29,8 +29,13 @@
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
If CleanFeedbackFlag = 1 Then
Var CleanFeedBackToCollectPoint = 0
Open "ROOT/taobin_project/xml/page_clean_feedback.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
TimerReset
Refresh
@ -76,7 +81,12 @@
<EventClick>
; goto lid straw
If CleanFeedbackFlag = 1 Then
Var CleanFeedBackToCollectPoint = 0
Open "ROOT/taobin_project/xml/page_clean_feedback.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
</EventClick>
</Button>