...

xml/page_collect_point_3.xml

@@ -46,28 +46,25 @@
 	
 	Var pImageStr = pImageStr + ".png"
 
+	Var pImageStr = "ROOT/taobin_project/image/display_point" + pImageStr
+
 	Var pointStr = ""
 	Var pointStr = pointStr + CoffeePointTmp
 	Var pointStr = pointStr + "/"
 	Var pointStr = pointStr + "30"
 
 
-	Var PointDiff = 400 - CoffeePointRank
-
-	Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าเดิน จนถึง "
-	Var TaobinLevelDesc2 = "สะสมแสตมป์อีก " 
-
-	Var TaobinLevelDesc2 = TaobinLevelDesc2 +  PointDiff
-	Var TaobinLevelDesc2 = TaobinLevelDesc2 + " ดวง ก่อน "
+	Var PointDiff = 150 - CoffeePointRank
 
 
-	Var TaobinLevelDesc3 = "ตอนนี้คุณมีคูปองแลกเครื่องดื่มฟรีเหลืออยู่ "
-	Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
-	Var TaobinLevelDesc3 = TaobinLevelDesc3 + " ใบ"
+
+
+	
 
 
 	Var TaobinExpireDay = ""
 	Var TaobinExpireMonth = ""
+	 Var TaobinExpireMonthX = ""
 	Var TaobinExpireYear = ""
 
 	
@@ -78,50 +75,62 @@
 
 	If TaobinExpireMonth = "01" Then
 		Var TaobinExpireMonth = "ม.ค."
+		Var TaobinExpireMonthX = "มกราคม"
 	EndIf
 
 	If TaobinExpireMonth = "02" Then
 		Var TaobinExpireMonth = "ก.พ."
+		Var TaobinExpireMonthX = "กุมภาพันธ์"
 	EndIf
 
 	If TaobinExpireMonth = "03" Then
 		Var TaobinExpireMonth = "มี.ค."
+		 Var TaobinExpireMonthX = "มีนาคม"
 	EndIf
 
 	If TaobinExpireMonth = "04" Then
 		Var TaobinExpireMonth = "เม.ย."
+		Var TaobinExpireMonthX = "เมษายน"
 	EndIf
 
 	If TaobinExpireMonth = "05" Then
 		Var TaobinExpireMonth = "พ.ค."
+		Var TaobinExpireMonthX = "พฤษภาคม"
 	EndIf
 
 	If TaobinExpireMonth = "06" Then
 		Var TaobinExpireMonth = "มิ.ย."
+		 Var TaobinExpireMonthX = "มิถุนายน"
 	EndIf
 
 	If TaobinExpireMonth = "07" Then
 		Var TaobinExpireMonth = "ก.ค."
+		 Var TaobinExpireMonthX = "กรกฎาคม"
 	EndIf
 
 	If TaobinExpireMonth = "08" Then
 		Var TaobinExpireMonth = "ส.ค."
+		 Var TaobinExpireMonthX = "สิงหาคม"
 	EndIf
 
 	If TaobinExpireMonth = "09" Then
 		Var TaobinExpireMonth = "ก.ย."
+		Var TaobinExpireMonthX = "กันยายน"
 	EndIf
 
 	If TaobinExpireMonth = "10" Then
 		Var TaobinExpireMonth = "ต.ค."
+		Var TaobinExpireMonthX = "ตุลาคม"
 	EndIf
 
 	If TaobinExpireMonth = "11" Then
 		Var TaobinExpireMonth = "พ.ย."
+		Var TaobinExpireMonthX = "พฤศจิกายน"
 	EndIf
 
 	If TaobinExpireMonth = "12" Then
 		Var TaobinExpireMonth = "ธ.ค."
+		Var TaobinExpireMonthX = "ธันวาคม"
 	EndIf
 
 	INT TaobinExpireYear
@@ -137,13 +146,100 @@
 	Var ExpireStrTmp = ExpireStrTmp + " "
 	Var ExpireStrTmp = ExpireStrTmp + TaobinExpireYear
 
-	Var TaobinLevelDesc1 = TaobinLevelDesc1 + ExpireStrTmp
-	Var TaobinLevelDesc2 = TaobinLevelDesc2 + ExpireStrTmp
-	Var TaobinLevelDesc2 = TaobinLevelDesc2 + " เพื่อเลื่อนขั้นเป็นเต่าบิน"
+	
+
 
 	
 
 
+
+	If show_eng = "true" Then 
+
+		Var TaobinLevelDesc3 = "You have coupons "
+		Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
+		Var TaobinLevelDesc3 = TaobinLevelDesc3 + " numbers"
+
+		If TaobinLevel = "1" Then
+            Var TaobinLevelDesc1 = "Shy turtle level"
+            Var TaobinLevelDesc2 = ""
+
+            Var TaobinLeveImg = "/taoLevel1.png"
+        EndIf
+
+        If TaobinLevel = "2" Then
+            Var TaobinLevelDesc1 = "Walking turtle level"
+            Var TaobinLevelDesc2 = "Earn " + PointDiff
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + " stamps "
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Flying turtle level"
+
+            Var TaobinLeveImg = "/taoLevel2.png"
+
+			If CoffeePointRank > 149 Then
+				Var TaobinLeveImg = "/taoLevel3.png"
+
+				Var TaobinLevelDesc1 =  "Flying turtle level "
+            	Var TaobinLevelDesc2 = ""
+
+			EndIf
+
+        EndIf
+
+        If TaobinLevel = "3" Then
+            Var TaobinLevelDesc1 = "Flying turtle level "
+        
+            Var TaobinLevelDesc2 = ""
+
+            Var TaobinLeveImg = "/taoLevel3.png"
+        EndIf
+
+
+
+	Else
+
+		Var TaobinLevelDesc3 = "ตอนนี้คุณมีคูปองแลกเครื่องดื่มฟรีเหลืออยู่ "
+		Var TaobinLevelDesc3 = TaobinLevelDesc3 + TaobinCoupons
+		Var TaobinLevelDesc3 = TaobinLevelDesc3 + " ใบ"
+
+		If TaobinLevel = "1" Then
+            Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าขี้อาย"
+            Var TaobinLevelDesc2 = ""
+
+            Var TaobinLeveImg = "/taoLevel1.png"
+        EndIf
+
+        If TaobinLevel = "2" Then
+            Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าเตาะแตะ"
+            Var TaobinLevelDesc2 = "สะสมแสตมป์อีก " + PointDiff
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + " ดวง "
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + "เพื่อเลื่อนขั้นเป็นเต่าติดปีก"
+
+            Var TaobinLeveImg = "/taoLevel2.png"
+
+			If CoffeePointRank > 149 Then
+				Var TaobinLeveImg = "/taoLevel3.png"
+
+				Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก "
+            	Var TaobinLevelDesc2 = ""
+
+			EndIf
+
+        EndIf
+
+        If TaobinLevel = "3" Then
+            Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก "
+        
+            Var TaobinLevelDesc2 = ""
+
+            Var TaobinLeveImg = "/taoLevel3.png"
+        EndIf
+
+
+	EndIf
+
+
+
+	
+	Var CheckCoupons = 0
 	
 
 </EventOpen>
@@ -161,13 +257,18 @@
 	Var Timeout = Timeout + 1
 	If Timeout > 30 Then
 
-		Open "ROOT/taobin_project/xml/page_back_to_main.xml"
+		
 
     	; goto lid straw
     	If CoffeePoint > 29 Then
 			Open "ROOT/taobin_project/xml/page_display_get_free.xml"
 		Else
-			Open "ROOT/taobin_project/xml/page_lid_straw.xml"
+			If FromConsent = 1 Then 
+				Open "ROOT/taobin_project/xml/page_display_get_free.xml"
+			Else
+				Open "ROOT/taobin_project/xml/page_lid_straw.xml"
+			EndIf
+			
 		EndIf
 	EndIf
 
@@ -184,7 +285,10 @@
 </EventSecurity>
 
 <EventActionOk>
-	;Open "ROOT/taobin_project/xml/page_check_member2.xml"
+	If  CheckCoupons = 1 Then
+		Var MakeDrinkState = 1
+		Open "ROOT/taobin_project/xml/page_check_member2.xml"
+	EndIf
 </EventActionOk>
 
 
@@ -253,7 +357,7 @@
 <Image>
 <X> 624 </X>
 <Y> 734 </Y>
-<Filename> Var( DirImage + "/taoLevel1.png" )</Filename>
+<Filename> Var( DirImage + TaobinLeveImg )</Filename>
 </Image>
 ;
 
@@ -261,7 +365,7 @@
 <Image>
 <X> 252 </X>
 <Y> 1341 </Y>
-<Filename> Var( DirImage + pImageStr )</Filename>
+<Filename> pImageStr </Filename>
 </Image>
 
 
@@ -275,8 +379,13 @@
 <Volume> SoundVolume </Volume>
 <EventClick> 
 	; goto lid straw
-	Open "ROOT/taobin_project/xml/page_back_to_main.xml"
-	Open "ROOT/taobin_project/xml/page_lid_straw.xml"
+	;Open "ROOT/taobin_project/xml/page_back_to_main.xml"
+	If FromConsent = 1 Then 
+		Open "ROOT/taobin_project/xml/page_display_get_free.xml"
+	Else
+
+		Open "ROOT/taobin_project/xml/page_lid_straw.xml"
+	EndIf
 
 </EventClick>
 </Button>
@@ -293,9 +402,10 @@
 	; goto lid straw
 
 
-	AddData 11 "0617944956"  "3330/3330" "" ""
 
-	;GETACCEXT TelephoneNumber 15
+
+	GETACCEXT TelephoneNumber 15
+	Var CheckCoupons = 1
 	
 
 </EventClick>