Do keto sugar

xml/page_brewing3.xml

@@ -631,6 +631,18 @@
 	EndIf
 
 	DEBUGVAR CountUpBrewing
+
+	If CountUpBrewing = 5 Then
+		If StarwState = "Press" Then
+			Machine Straw
+			LED LedDoorLid Blink 255 255 255 255
+		EndIf
+		If LidState = "Press" Then
+			Machine Lid
+			LED LedDoorLid Blink 255 255 255 255
+		EndIf
+	EndIf
+
 	; animation video loop
 	If AnimationOn = "true" Then
 		Var CountUpBrewing = CountUpBrewing + 1

xml/page_drinkok.xml

@@ -10,14 +10,14 @@
 	DEBUGVAR LidState
 	
 
-	If StarwState = "Press" Then
-		Machine Straw
-		LED LedDoorLid Blink 255 255 255 255
-	EndIf
-	If LidState = "Press" Then
-		Machine Lid
-		LED LedDoorLid Blink 255 255 255 255
-	EndIf
+	;If StarwState = "Press" Then
+	;	Machine Straw
+	;	LED LedDoorLid Blink 255 255 255 255
+	;EndIf
+	;If LidState = "Press" Then
+	;	Machine Lid
+	;	LED LedDoorLid Blink 255 255 255 255
+	;EndIf
 
 	; On open
 	Var LidState = "Enable"

xml/page_topping_select.xml

@@ -92,6 +92,7 @@
 		Var PriceDrinkTmp = "Free"
 	EndIf
 
+	Var StateImgKeto = "Invisible"
 
 
 	Var ToppingGotoPayment = "true"
@@ -195,15 +196,23 @@
 	DEBUGVAR toppingID1index3
 	DEBUGVAR toppingID1index4
 	DEBUGVAR toppingID1index5
+	DEBUGVAR toppingID1index6
+	DEBUGVAR toppingID1index7
+	DEBUGVAR toppingID1index8
+	DEBUGVAR toppingID1index9
+	
 	DEBUGVAR toppingID2index1
 	DEBUGVAR toppingID2index2
 	DEBUGVAR toppingID2index3
 	DEBUGVAR toppingID2index4
 	DEBUGVAR toppingID2index5
-		
-
 	
+	Var sugarKeto = "false"
 
+
+	STRCONTAIN "ID=1058" MaterialAvailable sugarKeto
+	DEBUGVAR sugarKeto
+	
 	
 	DEBUGVAR MenuCodeName
 	DEBUGVAR toppingID1Default
@@ -224,7 +233,7 @@
 		DEBUGVAR BrewParam
 		DEBUGVAR IgnoreLidStraw
 		
-		
+		Var h_block_of_sugar = 210
 
 		If IgnoreLidStraw = "true" Then
 			Var IgnoreLidStraw = "false"
@@ -249,7 +258,14 @@
 
 		;PressForever
 		If TOPPING1 = "Sugar" Then
-			Var BGSugar = "Enable"
+			
+			If sugarKeto = "true" Then
+				Var StateImgKeto = "Enable"
+				Var BGSugar = "Invisible"
+			Else
+				Var BGSugar = "Enable"
+			Endif
+
 			Var ShiftSugarStep = 1
 			Var SugarState1 = "Enable"
 			Var SugarState2 = "Enable"
@@ -280,7 +296,15 @@
 		EndIf
 		
 		If TOPPING1 = "Powder Sugar" Then
-			Var BGSugar = "Enable"
+
+			If sugarKeto = "true" Then
+				Var StateImgKeto = "Enable"
+				Var BGSugar = "Enable"
+				Var h_block_of_sugar = 262
+			Else
+				Var BGSugar = "Enable"
+			EndIf
+			;Var BGSugar = "Enable"
 			Var ShiftSugarStep = 1
 			Var SugarState1 = "Enable"
 			Var SugarState2 = "Enable"
@@ -609,15 +633,22 @@
 ;- Begin topping1
 <Block>
 <Width> 986 </Width>
-<Height> 210 </Height>
+<Height> h_block_of_sugar </Height>
 <MarginTop> 5 </MarginTop>
 <State> BGSugar </State> 
 ; sugar layout
+;<Image>
+;<State> BGSugar </State>
+;<Filename> Var( DirImage + "/img_sugar.png" )</Filename>
+;</Image>
+
 <Image>
-<State> BGSugar </State>
-<Filename> Var( DirImage + "/img_sugar.png" )</Filename>
+<State> StateImgKeto </State>
+<Filename> Var( DirImage + "/img_sugar_keto.png" )</Filename>
 </Image>
 
+;
+
 ; sugar1
 <Button>
 <X> 137 </X>