port messages from inch macros

Author: TurBoss

config/atc_sim/macros_sim_metric/m10.ngc

@@ -19,10 +19,12 @@ o1001 if [#<steps> LT -6]
 o1001 endif
 
 o1003 if [#<steps> GT 0]
+    (DEBUG, EVAL[vcp.getWidget{"dynatc"}.rotate{#<steps>, "ccw"}])
     M12 P[#<steps>]
 
 o1003 elseif [#<steps> LT 0]
     #<steps>=[#<steps> * -1]
+    (DEBUG, EVAL[vcp.getWidget{"dynatc"}.rotate{#<steps>, "cw"}])
     M11 P[#<steps>]
 o1003 endif
 

config/atc_sim/macros_sim_metric/m11.ngc

@@ -5,20 +5,20 @@ o<m11> sub
 ; Parameter #5170 is used to track the current tool pocket (persistently)
 (print, o<M11> P#<p>)
 
-O100 if [EXISTS[#<p>]]
-   #<Steps_to_move> = #<p>
-O100 else
-   #<Steps_to_move>=1
-O100 endif
-
-O110 if [#5171 NE 1]
+O100 if [#5171 NE 1]
       (print, atc not homed, homing)
       M13
-O110 endif
+O100 endif
 
-M68 E10 Q#<Steps_to_move> (tells the atc widget how many steps to move)
-M64 P13 (sets the direction and start moving)
+O110 if [EXISTS[#<p>]]
+   #<Steps_to_move> = #<p>
+O110 else
+   #<Steps_to_move>=1
+    (tells the atc widget move 1 step reverse)
+    (DEBUG, EVAL[vcp.getWidget{"dynatc"}.rotate{1, "ccw"}])
+O110 endif
 
+(tells the atc widget how many steps to move and start moving reverse)
 M64 P4 ; Move atc motor REV
 
 O120 do
@@ -32,7 +32,7 @@ O120 do
 O120 while [#<Steps_to_move> GT 0]
 
 M65 P4 ; Stop motor
-M65 P13
+
 #<_my_current_pocket> = #5170
 
 o<m11> endsub [1]

config/atc_sim/macros_sim_metric/m12.ngc

@@ -5,20 +5,21 @@ o<m12> sub
 ; Parameter #5170 is used to track the current tool pocket (persistently)
 (print, o<M12> P#<p>)
 
-O100 if [EXISTS[#<p>]]
-   #<Steps_to_move> = #<p>
-O100 else
-   #<Steps_to_move>=1
-O100 endif
-
-O110 if [#5171 NE 1]
+O100 if [#5171 NE 1]
       (print, atc not homed, homing)
       M13
+O100 endif
+
+O110 if [EXISTS[#<p>]]
+   #<Steps_to_move> = #<p>
+O110 else
+   #<Steps_to_move>=1
+    (tells the atc widget move 1 step forward)
+    (DEBUG, EVAL[vcp.getWidget{"dynatc"}.rotate{1, "cw"}])
 O110 endif
 
-M68 E10 Q#<Steps_to_move> (tells the atc widget how many steps to move)
-M64 P14 (sets the direction and start moving)
 
+(tells the atc widget how many steps to move and start moving forward)
 M64 P3 ; Move atc motor FWD
 
 O120 do
@@ -32,7 +33,7 @@ O120 do
 O120 while [#<Steps_to_move> GT 0]
 
 M65 P3 ; Stop motor
-M65 P14
+
 #<_my_current_pocket> = #5170
 
 o<m12> endsub [1]

config/atc_sim/macros_sim_metric/m13.ngc

@@ -3,23 +3,28 @@ o<m13> sub
 ; Move tool carousel CW until ATC zero
 ; ; Parameter #5170 is used to track the current tool pocket (persistently)
 (print, o<M13> P#<p>)
-M65 P10 (set atc widget unhomed)
-M64 P11 (show atc widget referencing msg)
+
+(DEBUG, EVAL[vcp.getWidget{"dynatc"}.atc_message{"REFERENCING"}])
 
 M64 P3 ; Move Motor FWD
 M66 P3 L1 Q20
- O120 if [#5399 LT 0]
-      (abort, failed to home carousel)
-      M65 P3; stop motor
- O120 endif
-   #5170 = 1
+O120 if [#5399 LT 0]
+    (abort, failed to home carousel)
+    M65 P3; stop motor
+O120 endif
+#5170 = 1
 M65 P3 ; Stop motor
 #5171 = 1
 
-M65 P11 (hide atc widget referencing msg)
-M64 P10 (set atc widget homed)
+(DEBUG, EVAL[vcp.getWidget{"dynatc"}.atc_message{}])
+
+#1 = 0
+o130 while [#1 LT 12]
+    #1 = [#1+1]
+    #2 = #[5189+#1]
+    (DEBUG, EVAL[vcp.getWidget{"dynatc"}.store_tool{#1, #2}])
+o130 endwhile
 
-M14
 m61 q#5210
 o<m13> endsub [1]
 

config/atc_sim/macros_sim_metric/m14.ngc

@@ -65,6 +65,7 @@ O180 IF [#110 GT 0] ; checks if there is a valid tool in the spindle
 
 	M10 P[#<open_pocket>] ; move carousel to an open pocket 
     	M21 ; puts the tool in spindle away into the open pocket
+    	(DEBUG, EVAL[vcp.getWidget{"dynatc"}.store_tool{#<open_pocket>, #110}])
         #30 = #<open_pocket>
 	##30 = #110 ; save tool number in pocket
 	#5210= 0 ; empty tool in the spindle
@@ -84,6 +85,7 @@ O200 IF [#100 GT 0] ; selected tool is not tool0
     O205 endif
     M65 P0
 
+    (DEBUG, EVAL[vcp.getWidget{"dynatc"}.store_tool{#<next_pocket>, 0}])
     M22 ;Carousel out
     #25 = #<next_pocket>
     ##25 =0 ; empty the pocket