Master turtle Level

xml/page_check_member.xml

@@ -49,6 +49,8 @@
 
 	Var StepX = 0
 
+	Var TaobinCredit = 0
+
 </EventOpen>
 <Timeout> 1000 </Timeout>
 <EventTimeout> 
@@ -110,6 +112,8 @@
 
 	Else
 
+		If StepX = 1 Then
+
 			Var PolygonST1 = "Invisible"
 			Var PolygonST2 = "Invisible"
 			Var CouponSTA =  "Invisible"
@@ -127,7 +131,20 @@
 			Var CouponInfo8 =  Ext1h
 			Var CouponInfo9 =  Ext1i
 			Var CouponInfo10 =  Ext1j
+
+			GETACCEXT TelephoneNumber 13
+
+			Var StepX = 2 
+
+			
+
+		Else
+
+			Var TaobinCredit =  Ext1b
 			Open "ROOT/taobin_project/xml/page_check_member2.xml" 
+		EndIf 
+
+		
 
 	EndIf
 	

xml/page_check_member2.xml

@@ -31,7 +31,7 @@
 	EndIf
 	
 
-	Var PointDiff = 150 - CoffeePointRank
+	;Var PointDiff = 150 - CoffeePointRank
 
 
 	Var TaobinExpireDay = ""
@@ -208,19 +208,51 @@
 
         If TaobinLevel = "2" Then
             Var TaobinLevelDesc1 = "Walking turtle level"
+            Var PointDiff = 150 - CoffeePointRank
             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 = ""
+				Var CoffeePointRank = CoffeePointRank - 150
+
+			EndIf
+
         EndIf
 
         If TaobinLevel = "3" Then
             Var TaobinLevelDesc1 = "Flying turtle level until " + ExpireStrTmp
         
-            Var TaobinLevelDesc2 = ""
+            Var PointDiff = 350 - CoffeePointRank
+            Var TaobinLevelDesc2 = "Earn " + PointDiff
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + " stamps "
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Master turtle level"
 
             Var TaobinLeveImg = "/taoLevel3.png"
+
+            If CoffeePointRank > 349 Then
+				Var TaobinLeveImg = "/taoLevel4.png"
+
+				Var TaobinLevelDesc1 =  "Master turtle level "
+            	Var TaobinLevelDesc2 = ""
+				Var CoffeePointRank = CoffeePointRank - 350
+
+			EndIf
+
+        EndIf
+
+        If TaobinLevel = "4" Then
+            Var TaobinLevelDesc1 = "Master turtle level until " + ExpireStrTmp
+        
+            Var TaobinLevelDesc2 = ""
+
+            Var TaobinLeveImg = "/taoLevel4.png"
         EndIf
 
         
@@ -237,19 +269,50 @@
 
         If TaobinLevel = "2" Then
             Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าเตาะแตะ"
+            Var PointDiff = 150 - CoffeePointRank
             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 = ""
+				Var CoffeePointRank = CoffeePointRank - 150
+
+			EndIf
         EndIf
 
         If TaobinLevel = "3" Then
             Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก จนถึง " + ExpireStrTmp
         
-            Var TaobinLevelDesc2 = ""
+            Var PointDiff = 350 - CoffeePointRank
+            Var TaobinLevelDesc2 = "สะสมแสตมป์อีก " + PointDiff
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + " ดวง "
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + "เพื่อเลื่อนขั้นเป็นผู้เฒ่าเต่า"
+
 
             Var TaobinLeveImg = "/taoLevel3.png"
+
+            If CoffeePointRank > 349 Then
+				Var TaobinLeveImg = "/taoLevel4.png"
+
+				Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า "
+            	Var TaobinLevelDesc2 = ""
+				Var CoffeePointRank = CoffeePointRank - 350
+
+			EndIf
+        EndIf
+
+        If TaobinLevel = "4" Then
+            Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า จนถึง " + ExpireStrTmp
+        
+            Var TaobinLevelDesc2 = ""
+
+            Var TaobinLeveImg = "/taoLevel4.png"
         EndIf
 
      
@@ -404,6 +467,9 @@
             If CouponTypeA = "103" Then
                 Var CouponNameA = "/imgCouponC40.png"
             EndIf 
+            If CouponTypeA = "105" Then
+                Var CouponNameA = "/imgCouponC38.png"
+            EndIf 
             If CouponTypeA = "106" Then
                 Var CouponNameA = "/imgCouponC41.png"
             EndIf 
@@ -503,6 +569,9 @@
             If CouponTypeB = "103" Then
                 Var CouponNameB = "/imgCouponC40.png"
             EndIf 
+            If CouponTypeB = "103" Then
+                Var CouponNameB = "/imgCouponC38.png"
+            EndIf 
             If CouponTypeB = "106" Then
                 Var CouponNameB = "/imgCouponC41.png"
             EndIf
@@ -608,6 +677,9 @@
             If CouponTypeA = "103" Then
                 Var CouponNameA = "/imgCouponC40.png"
             EndIf 
+            If CouponTypeA = "105" Then
+                Var CouponNameA = "/imgCouponC38.png"
+            EndIf 
             If CouponTypeA = "106" Then
                 Var CouponNameA = "/imgCouponC41.png"
             EndIf
@@ -706,6 +778,9 @@
             If CouponTypeB = "103" Then
                 Var CouponNameB = "/imgCouponC40.png"
             EndIf 
+            If CouponTypeB = "105" Then
+                Var CouponNameB = "/imgCouponC38.png"
+            EndIf 
             If CouponTypeB = "106" Then
                 Var CouponNameB = "/imgCouponC41.png"
             EndIf
@@ -775,7 +850,7 @@
 
         EndIf
 
-        Var CouponText = "คูปอง (" + CouponNum
+        Var CouponText = "คูปองสะสม (" + CouponNum
         Var CouponText = CouponText + ")"
 
     EndIf
@@ -783,7 +858,13 @@
    
 
 
-   
+    If MakeDrinkState = 1 Then
+        Var bn_exit = "/bn_cancel2.png"
+        Var bp_exit = "/bp_cancel2.png"
+    Else
+        Var bn_exit = "/bn_main.png"
+        Var bp_exit = "/bp_main.png"
+    EndIf
     
 
 
@@ -908,8 +989,8 @@
 
 
 <Image>
-<X> 148 </X>
-<Y> 631 </Y>
+<X> 162 </X>
+<Y> 560 </Y>
 <Filename> Var( DirImage + "/text5.png" )</Filename>
 </Image>
 
@@ -917,8 +998,8 @@
 
 
 <Image>
-<X> 700 </X>
-<Y> 600 </Y>
+<X> 617 </X>
+<Y> 587 </Y>
 <Filename> Var( DirImage + TaobinLeveImg )</Filename>
 </Image>
 ;
@@ -932,38 +1013,50 @@
 
 
 <Text>
-<X> 150 </X>
-<Y> 684 </Y>
+<X> 253 </X>
+<Y> 669 </Y>
 <Size> 35 </Size>
 <Width> 1000 </Width>
 <Font> KanitRegularTTF </Font>
-<Color> 0x513C2F </Color>
+<Color> 0xFFFFFF </Color>
 <Value> TaobinName </Value>
 </Text>
 
 <Text>
-<X> 150 </X>
-<Y> 725 </Y>
+<X> 253 </X>
+<Y> 720 </Y>
 <Size> 20 </Size>
 <Width> 1000 </Width>
 <Font> KanitRegularTTF </Font>
-<Color> 0x746253 </Color>
+<Color> 0xFFFFFF </Color>
 <Value> TNumberTaobinMemberXXX </Value>
 </Text>
 
 <Text>
-<X> 438 </X>
-<Y> 684 </Y>
-<Size> 50 </Size>
-<Width> 120 </Width>
+<X> 546 </X>
+<Y> 865 </Y>
+<Size> 70 </Size>
+<Width> 384 </Width>
+<Align> Center </Align>
 <Font> KanitRegularTTF </Font>
 <Color> 0xDE794E </Color>
 <Value> CoffeePointRank </Value>
 </Text>
 
 <Text>
-<X> 150 </X>
-<Y> 848 </Y>
+<X> 162 </X>
+<Y> 865 </Y>
+<Size> 70 </Size>
+<Width> 384 </Width>
+<Align> Center </Align>
+<Font> KanitRegularTTF </Font>
+<Color> 0xDE794E </Color>
+<Value> TaobinCredit </Value>
+</Text>
+
+<Text>
+<X> 159 </X>
+<Y> 1000 </Y>
 <Size> 25 </Size>
 <Width> 1000 </Width>
 <Font> KanitRegularTTF </Font>
@@ -972,8 +1065,8 @@
 </Text>
 
 <Text>
-<X> 150 </X>
-<Y> 885 </Y>
+<X> 159 </X>
+<Y> 1032 </Y>
 <Size> 20 </Size>
 <Width> 1000 </Width>
 <Font> KanitRegularTTF </Font>
@@ -984,10 +1077,10 @@
 
 
 <Button>
-<X> 398 </X>
-<Y> 1597 </Y>
-<Filename> Var( DirImage + "/bn_cancel2.png" )</Filename>
-<FilenamePress> Var( DirImage + "/bp_cancel2.png" )</FilenamePress>
+<X> 397 </X>
+<Y> 1746 </Y>
+<Filename> Var( DirImage + bn_exit )</Filename>
+<FilenamePress> Var( DirImage + bp_exit )</FilenamePress>
 <Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
 <Volume> SoundVolume </Volume>
 <EventClick> 
@@ -1004,9 +1097,9 @@
 
 
 <Text>
-<X> 243 </X>
-<Y> 1064 </Y>
-<Size> 24 </Size>
+<X> 159 </X>
+<Y> 1121 </Y>
+<Size> 36 </Size>
 <Width> 240 </Width>
 <Font> KanitRegularTTF </Font>
 <Color> 0x513C2F </Color>
@@ -1017,8 +1110,8 @@
 
 
 <Button>
-<X> 243 </X>
-<Y> 1131 </Y>
+<X> 166 </X>
+<Y> 1228 </Y>
 <State> CouponSTA </State>
 <Filename> Var( DirImage + CouponNameA )</Filename>
 <FilenamePress> Var( DirImage + CouponNameA )</FilenamePress>
@@ -1039,8 +1132,8 @@
 </Button>
 
 <Text>
-<X> 410 </X>
-<Y> 1297 </Y>
+<X> 372 </X>
+<Y> 1370 </Y>
 <Size> 15 </Size>
 <Width> 600 </Width>
 <Font> KanitRegularTTF </Font>
@@ -1050,8 +1143,8 @@
 
 
 <Button>
-<X> 243 </X>
-<Y> 1355 </Y>
+<X> 166 </X>
+<Y> 1470 </Y>
 <State> CouponSTB </State>
 <Filename> Var( DirImage + CouponNameB )</Filename>
 <FilenamePress> Var( DirImage + CouponNameB )</FilenamePress>
@@ -1072,8 +1165,8 @@
 </Button>
 
 <Text>
-<X> 410 </X>
-<Y> 1521 </Y>
+<X> 372 </X>
+<Y> 1613 </Y>
 <Size> 15 </Size>
 <Width> 600 </Width>
 <Font> KanitRegularTTF </Font>
@@ -1083,8 +1176,8 @@
 
 
 <Button>
-<X> 173 </X>
-<Y> 1290 </Y>
+<X> 65 </X>
+<Y> 1405 </Y>
 <State> PolygonST1 </State>
 <Filename> "ROOT/taobin_project/image/display_point/Polygon1.png"</Filename>
 <Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
@@ -1096,8 +1189,8 @@
 </Button>
 
 <Button>
-<X> 860 </X>
-<Y> 1290 </Y>
+<X> 990 </X>
+<Y> 1405 </Y>
 <State> PolygonST2 </State>
 <Filename> "ROOT/taobin_project/image/display_point/Polygon2.png"</Filename>
 <Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>

xml/page_check_member3.xml

@@ -167,7 +167,7 @@
 
 
 <Button>
-<X> 243 </X>
+<X> 158 </X>
 <Y> 661 </Y>
 <Filename> Var( DirImage + CouponName )</Filename>
 <FilenamePress> Var( DirImage + CouponName )</FilenamePress>

xml/page_collect_point_3.xml

@@ -52,7 +52,7 @@
 	Var pointStr = pointStr + "30"
 
 
-	Var PointDiff = 150 - CoffeePointRank
+	;Var PointDiff = 150 - CoffeePointRank
 
 
 
@@ -238,6 +238,7 @@
 
         If TaobinLevel = "2" Then
             Var TaobinLevelDesc1 = "Walking turtle level"
+			Var PointDiff = 150 - CoffeePointRank
             Var TaobinLevelDesc2 = "Earn " + PointDiff
             Var TaobinLevelDesc2 = TaobinLevelDesc2 + " stamps "
             Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Flying turtle level"
@@ -249,7 +250,7 @@
 
 				Var TaobinLevelDesc1 =  "Flying turtle level "
             	Var TaobinLevelDesc2 = ""
-				Var CoffeePointRank = 0
+				Var CoffeePointRank = CoffeePointRank - 150
 
 			EndIf
 
@@ -258,9 +259,30 @@
         If TaobinLevel = "3" Then
             Var TaobinLevelDesc1 = "Flying turtle level until " + ExpireStrTmp
         
-            Var TaobinLevelDesc2 = ""
+            Var PointDiff = 350 - CoffeePointRank
+            Var TaobinLevelDesc2 = "Earn " + PointDiff
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + " stamps "
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Master turtle level"
 
             Var TaobinLeveImg = "/taoLevel3.png"
+
+			If CoffeePointRank > 349 Then
+				Var TaobinLeveImg = "/taoLevel4.png"
+
+				Var TaobinLevelDesc1 =  "Master turtle level "
+            	Var TaobinLevelDesc2 = ""
+				Var CoffeePointRank = CoffeePointRank - 350
+
+			EndIf
+
+        EndIf
+
+		If TaobinLevel = "4" Then
+            Var TaobinLevelDesc1 = "Master turtle level until " + ExpireStrTmp
+        
+            Var TaobinLevelDesc2 = ""
+
+            Var TaobinLeveImg = "/taoLevel4.png"
         EndIf
 
 
@@ -280,6 +302,7 @@
 
         If TaobinLevel = "2" Then
             Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าเตาะแตะ"
+			Var PointDiff = 150 - CoffeePointRank
             Var TaobinLevelDesc2 = "สะสมแสตมป์อีก " + PointDiff
             Var TaobinLevelDesc2 = TaobinLevelDesc2 + " ดวง "
             Var TaobinLevelDesc2 = TaobinLevelDesc2 + "เพื่อเลื่อนขั้นเป็นเต่าติดปีก"
@@ -291,7 +314,7 @@
 
 				Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก "
             	Var TaobinLevelDesc2 = ""
-				Var CoffeePointRank = 0
+				Var CoffeePointRank = CoffeePointRank - 150
 
 			EndIf
 
@@ -300,9 +323,30 @@
         If TaobinLevel = "3" Then
             Var TaobinLevelDesc1 = "ระดับสมาชิก เต่าติดปีก จนถึง " + ExpireStrTmp
 
-            Var TaobinLevelDesc2 = ""
+			Var PointDiff = 350 - CoffeePointRank
+            Var TaobinLevelDesc2 = "สะสมแสตมป์อีก " + PointDiff
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + " ดวง "
+            Var TaobinLevelDesc2 = TaobinLevelDesc2 + "เพื่อเลื่อนขั้นเป็นผู้เฒ่าเต่า"
 
             Var TaobinLeveImg = "/taoLevel3.png"
+
+			If CoffeePointRank > 349 Then
+				Var TaobinLeveImg = "/taoLevel4.png"
+
+				Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า "
+            	Var TaobinLevelDesc2 = ""
+				Var CoffeePointRank = CoffeePointRank - 350
+
+			EndIf
+
+        EndIf
+
+		If TaobinLevel = "4" Then
+            Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า จนถึง " + ExpireStrTmp
+        
+            Var TaobinLevelDesc2 = ""
+
+            Var TaobinLeveImg = "/taoLevel4.png"
         EndIf
 
 
@@ -618,9 +662,23 @@
 		Var CouponInfo8 =  Ext1h
 		Var CouponInfo9 =  Ext1i
 		Var CouponInfo10 =  Ext1j
+		
+
+		GETACCEXT TelephoneNumber 13
+		Var CheckCoupons = 2 
+
+	Else
+
+		If  CheckCoupons = 2 Then 
+
+			Var TaobinCredit =  Ext1b
 			Open "ROOT/taobin_project/xml/page_check_member2.xml" 
 
 		EndIf
+		 
+	EndIf
+
+	
 </EventActionOk>
 
 
@@ -690,7 +748,7 @@
 
 
 <Image>
-<X> 624 </X>
+<X> 625 </X>
 <Y> 734 </Y>
 <Filename> Var( DirImage + TaobinLeveImg )</Filename>
 </Image>

xml/page_payment_storeCredit2-2.xml

@@ -772,6 +772,7 @@
 <Refresh> "Enable" </Refresh>
 <Value> TNumberTaobinCredit </Value>
 <Format> Telnum </Format>
+<Format> Telnum-mask-1 </Format>
 </Text>
 
 <Image>

xml/page_payment_storeCredit2.xml

@@ -685,6 +685,7 @@
 <Refresh> "Enable" </Refresh>
 <Value> TNumberTaobinCredit </Value>
 <Format> Telnum </Format>
+<Format> Telnum-mask-1 </Format>
 </Text>
 
 <Image>

xml/page_payment_storeCredit3.xml

@@ -117,6 +117,7 @@
 <Refresh> "Enable" </Refresh>
 <Value> TNumberTaobinCredit </Value>
 <Format> Telnum </Format>
+<Format> Telnum-mask-1 </Format>
 </Text>