9.21

inter/tha/xml/multi/EventTimeOutWihtOutMultiInstance.ev

@@ -0,0 +1,91 @@
+
+    ;DEBUGVAR ICE_PROCESS_STATUS
+    
+    If ICE_PROCESS_STATUS = 2 Then
+        Var ice_tab_process_show = "Enable"
+        Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
+    Else
+        Var ice_tab_process_show = "Invisible"
+    EndIf
+
+    If NextPage = "-" Then
+
+    Else
+            If CupOnArm = "true" Then
+                If Timeout > 9 Then
+                    SAVELOG "COA9"
+                    Open NextPage
+                EndIf
+            Else
+                If Timeout > 30 Then
+                    SAVELOG "COA30"
+                    Open NextPage
+                EndIf
+            EndIf
+    EndIf
+
+    If Timeout > 60 Then
+        SAVELOG "Timeout inter multi"
+        If  Seeker = "next" Then 
+            Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"  
+        Else
+            SAVELOG "Back inter multi"
+            Open "ROOT/taobin_project/xml/page_back_to_main.xml"
+        EndIf
+    EndIf
+
+    If BrewCommand = "RefreshAll" Then
+        Var BrewCommand = "-"
+        Open CurrentXMLFileName2
+    EndIf
+
+    If Seeker = "curr" Then
+        If DoorCupPosition = "bottom" Then
+            ; It normal 
+            Var EmergencyStop = "false"
+        Else
+            Var EmergencyStop = "true"
+            
+            ;Open "ROOT/taobin_project/xml/page_back_to_error.xml" 
+
+        EndIf
+    EndIf
+
+
+
+    ; zone cup on arm
+        ; zone cup on arm
+	If Seeker = "curr" Then
+		If CupOnArm = "true" Then
+
+			If CheckCupStateDoorCupClose = "" Then
+				If buttonRemoveCup =  "Enable" Then
+
+				Else
+					Refresh
+				EndIf
+
+				Var buttonRemoveCup = "Enable"
+
+			EndIf
+
+			If CheckCupStateDoorCupClose = "done" Then
+				If buttonRemoveCup =  "Enable" Then
+
+				Else
+					Refresh
+				EndIf
+				
+				Var buttonRemoveCup = "Enable"
+		
+			EndIf
+		Else
+			If buttonRemoveCup = "Enable" Then
+				Var buttonRemoveCup = "Invisible"
+				Refresh
+			EndIf
+		EndIf
+	Else
+		Var buttonRemoveCup = "Invisible"
+	EndIf
+