..

xml/page_collect_point_2.xml

@@ -15,31 +15,24 @@
 		Var CoffeePoint = 10
 		Open "ROOT/taobin_project/xml/page_show_consent.xml"
 	EndIf
+
+	Var TaobinLevel = 0
 		
 </EventOpen>
 <Timeout> 1000 </Timeout>
 <EventTimeout> 
 	Var CountDownBrewing = CountDownBrewing - 1
 	
-	; run test;
-	;If CountDownBrewing = 40 Then 
-	;	Open "ROOT/taobin_project/xml/page_drinkok.xml"  
-	;EndIf
-	;If CountDownBrewing = 0 Then
-	;	Open "ROOT/taobin_project/xml/page_drinkok.xml" 
-	;EndIf
-
 	Var ShowCountDownBrewing = CountDownBrewing
 
 
 	Var Timeout = Timeout + 1
 	If Timeout > 30 Then
-        ;Var CoffeePoint = 1 
-		;Open "ROOT/taobin_project/xml/page_show_consent.xml" 
-		
+      
 		If StepGetPoint = 0 Then
 			Open "ROOT/taobin_project/xml/page_show_consent.xml" 
 		Else
+			Var TaobinLevel = 0
 			Var CoffeePoint = 1 
 			Open "ROOT/taobin_project/xml/page_collect_point_3.xml" 
 		EndIf
@@ -65,21 +58,56 @@
 			Open "ROOT/taobin_project/xml/page_show_consent.xml" 
 		Else
 			Var StepGetPoint = 1
-    		GETACCEXT TelephoneNumber 5
+    		GETACCEXT TelephoneNumber 14
 			Open "ROOT/taobin_project/xml/page_collect_point_2.xml"  
 		EndIf
 	Else
 		If Ext1a = "" Then
-			Var CoffeePoint = 1 
+			Var CoffeePoint = 0 
 			Open "ROOT/taobin_project/xml/page_collect_point_3.xml" 
 			
 		Else
+
+			If Ext1a = "ok" Then
+
+				Var TaobinName = Ext1d
+				Var TaobinCoupons = Ext1g
+				Var TaobinExpire = Ext1f
+
+				Var TNumberTaobinMemberXXX = TelephoneNumber
+
+				Trim TNumberTaobinMemberXXX 3
+				Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + "-XXX-"
+				Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + number7
+				Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + number8
+				Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + number9
+				Var TNumberTaobinMemberXXX = TNumberTaobinMemberXXX + number10
+
+
+				Var PointTaobin = PayAmount / 20
+
+
+				Var PointTaobinStr = "" + PointTaobin
+				Var PointTaobinStr = PointTaobinStr + "/"
+				Var PointTaobinStr = PointTaobinStr + PointTaobin
+				
+
+				Var CoffeePointRank = Ext1b
+				INT CoffeePointRank
+
+				Var CoffeePoint1 = Ext1c
+				INT CoffeePoint1
+			
+				Var CoffeePoint = PointTaobin + CoffeePoint1
+				Open "ROOT/taobin_project/xml/page_collect_point_3.xml" 
+
+			Else
+				Var CoffeePoint = 0 
+				Open "ROOT/taobin_project/xml/page_collect_point_3.xml" 
+			EndIf
+			
 	
-			Var CoffeePoint1 = Ext27
-			INT CoffeePoint1
-		
-			Var CoffeePoint = 1 + CoffeePoint1
-			Open "ROOT/taobin_project/xml/page_collect_point_3.xml" 
+			
 
 		EndIf
 	EndIf