This commit is contained in:
miggaze 2023-07-20 19:54:03 +07:00
parent e959c4385c
commit cbd8efbca3
6 changed files with 133 additions and 37 deletions

View file

@ -1032,11 +1032,11 @@
If Seeker.VendingCode = "MKFOO" Then
Var Cid = 31
Var PointCrm = "2"
Var Cid = 33
Var PointCrm = "0"
Var GetScore = "1"
Var TelephoneNumberx = "0899999999"
AddData Cid TelephoneNumberx Seeker.CodeNumber PointCrm GetScore
AddData Cid Seeker.TNumberTaobinMember Seeker.CodeNumber PointCrm GetScore
Var Seeker.CodeChannel = 0
EndIf

View file

@ -723,11 +723,11 @@
Else
If Seeker.VendingCode = "MKFOO" Then
Var Cid = 31
Var PointCrm = "2"
Var Cid = 33
Var PointCrm = "0"
Var GetScore = "1"
Var TelephoneNumberx = "0899999999"
AddData Cid TelephoneNumberx Seeker.CodeNumber PointCrm GetScore
AddData Cid Seeker.TNumberTaobinMember Seeker.CodeNumber PointCrm GetScore
Var Seeker.CodeChannel = 0
EndIf

View file

@ -118,6 +118,8 @@
Var TaobinLevel = Ext1e
Var TaobinPDPA = Ext1h
Var TaobinPromoX = Ext1j
DEBUGVAR TaobinPDPA
Var PointTaobinTmp = Ext1i
@ -194,6 +196,14 @@
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf
If TaobinPromoX = "p2.no_otp" Then
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"
EndIf
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
Else

View file

@ -22,11 +22,13 @@
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collect_point1_en"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_en/page_payment"
;Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Else
Var DirImage = "ROOT/taobin_project/image/collect_point1"
Var DirImage2 = "ROOT/taobin_project/image/page_payment"
;Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
@ -34,7 +36,7 @@
Var FailState = "Invisible"
Var Tel_Confirm_Flag = 1
@ -49,6 +51,10 @@
Var MaxNumber = 12
EndIf
Var StepGetServer = 0
var OtpCode = ""
Var failTime = 0
</EventOpen>
<Timeout> 1000 </Timeout>
@ -65,16 +71,84 @@
Var Timeout = Timeout + 1
If Timeout > 30 Then
Open "ROOT/taobin_project/xml/page_catalog2.xml"
EndIf
If FailState = "Enable" Then
Var failTime = failTime + 1
If failTime >= 3 Then
Var failTime = 0
Var FailState = "Invisible"
Var TelephoneNumber = ""
Var Tel_Confirm_State = "Invisible"
Var Timeout = 0
EndIf
EndIf
Refresh
TimerReset
</EventTimeout>
<EventActionOk>
DEBUGVAR Ext1a
DEBUGVAR Ext1b
DEBUGVAR Ext1c
If StepGetServer = 1 Then
Var LineST = Ext1a
Var ProST = Ext1b
Var OtpCode = Ext1c
If LineST = "found_line" Then
If ProST = "p2.unused" Then
Open "ROOT/taobin_project/xml/page_identityMember_otp.xml"
EndIf
If ProST = "p2.used" Then
Var load_gif_stage = "Invisible"
Var FailState = "Enable"
Var img_popup16 = "/img_popup16-2.png"
EndIf
If ProST = "p2.no_otp" Then
Var load_gif_stage = "Invisible"
Var FailState = "Enable"
Var img_popup16 = "/img_popup16-1.png"
EndIf
If ProST = "p2.error" Then
Var load_gif_stage = "Invisible"
Var FailState = "Enable"
Var img_popup16 = "/img_popup16-1.png"
EndIf
Else
Var load_gif_stage = "Invisible"
Var FailState = "Enable"
Var img_popup16 = "/img_popup16-1.png"
EndIf
Refresh
EndIf
</EventActionOk>
<EventActionError>
</EventActionError>
<Image>
@ -432,7 +506,14 @@
If Tel2DFlag = 1 Then
Open "ROOT/taobin_project/xml/page_identityMember_consent.xml"
;Open "ROOT/taobin_project/xml/page_identityMember_consent.xml"
Var Param1 = TelephoneNumber
GETACCEXT Param1 29
Var StepGetServer = 1
Else
If show_eng = "true" Then
@ -479,6 +560,23 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<State> FailState </State>
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
</Image>
<Image>
<X> 249 </X>
<Y> 751 </Y>
<State> FailState </State>
<Filename> Var( DirImage2 + img_popup16 )</Filename>
</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>

View file

@ -80,6 +80,10 @@
Var IDNumx = "2640100003053"
;AddData Cid TelephoneNumber IDNumx PointCrm GetScore
DEBUGVAR TelephoneNumber
Var TelNumPromotion = TelephoneNumber
</EventOpen>
<EventActionOk>
@ -91,6 +95,11 @@
If Ext1a = "ok" Then
Var ChildrenFree = 1
Var Cid = 33
Var PointCrm = "1"
Var GetScore = "1"
AddData Cid TelNumPromotion IDNum PointCrm GetScore
Open "ROOT/taobin_project/xml/page_payment.xml"
Else
@ -108,27 +117,10 @@
Var errorX = 0
If Ext1a = "invalid_mobile" Then
Var errorX = 1
EndIf
If Ext1a = "not_found" Then
Var errorX = 1
EndIf
If errorX = 1 Then
Var load_gif_stage = "Invisible"
Var FailState = "Enable"
Var img_popup16 = "/img_popup16-1.png"
Else
Var load_gif_stage = "Invisible"
Var FailState = "Enable"
Var img_popup16 = "/img_popup16-2.png"
EndIf
Var load_gif_stage = "Invisible"
Var FailState = "Enable"
Var img_popup16 = "/img_popup16-1.png"
EndIf
@ -236,11 +228,11 @@
Var Adult7 = 1
If Adult7 = 1 Then
Var Input1 = TelephoneNumber + "/"
Var Input1 = TelNumPromotion + "/"
Var Input1 = Input1 + IDNum
GETACCEXT Input1 28
GETACCEXT Input1 30
Var StepGetServer = 1
Else

View file

@ -262,11 +262,7 @@
Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum
Var Cid = 31
Var PointCrm = "1"
Var GetScore = "1"
AddData Cid TelephoneNumber IDNum PointCrm GetScore
Var Seeker.TNumberTaobinMember = TelNumPromotion
;If Seeker = "curr" Then
;