spostamento testSam in ramo superiore proj...

2018-11-22 20:37:35 +01:00
parent f14590a37f
commit 287929dad7
368 changed files with 0 additions and 0 deletions
@@ -0,0 +1,21 @@
+Module M_machine
+
+    Sub get_machine_state()
+
+        machine_state = Read_Nc_var(IniRead.nVar_NC_state)
+
+    End Sub
+
+    Sub set_var_prg_1_ok(ByVal state As Integer)
+
+        Write_NC_var(IniRead.nVar_prg_1_ok, state)
+
+    End Sub
+
+    Sub set_var_prg_2_ok(ByVal state As Integer)
+
+        Write_NC_var(IniRead.nVar_prg_2_ok, state)
+
+    End Sub
+
+End Module