adding files

my-emco/custom-m-codes/M101

@@ -0,0 +1,4 @@
+#!/bin/bash
+# file to turn on parport pin 17 to open the spindle air valve
+halcmd setp parport.0.pin-17-out True
+exit 0

my-emco/custom-m-codes/M102

@@ -0,0 +1,4 @@
+#!/bin/bash
+# file to turn off parport pin 17 to open the spindle air valve
+halcmd setp parport.0.pin-17-out False
+exit 0

my-emco/custom-m-codes/M103

@@ -0,0 +1,4 @@
+#!/bin/bash
+# axis reload after
+axis-remote --reload
+exit 0

my-emco/custom-m-codes/mychange.ngc

@@ -0,0 +1,19 @@
+o<mychange> sub
+   o10 if [#<_current_tool> NE #<_selected_tool>]
+      ;(DEBUG, current tool: #<_current_tool>, selected_tool: #<_selected_tool>)
+      #<saved_z> = [#<_z>]      ; save position
+      #4999 = #<_selected_tool> ; store selected tool to use M61 at start-up
+      G53 G0 Z87     ; rapid to tool change location
+      M6
+      ;G53 G0 Z50
+      ;M101          ; engage spindle air blower
+      ;G53 G0 Z35
+      ;M102          ; disengage spindle air blower
+      ;(DEBUG, saved-z: #<saved_z>)
+      G43
+      G0 Z[#<saved_z>] ; restore position
+   o10 else
+      (DEBUG, tool #<_selected_tool> already in spindle)
+   o10 endif
+o<mychange> endsub
+M2

my-emco/custom-m-codes/myspindlestart.ngc

@@ -0,0 +1,9 @@
+o<myspindlestart> sub
+   o10 if [#<_spindle_on> EQ 1]
+      M5
+   o10 else
+	  S800
+      M3
+   o10 endif
+o<myspindlestart> endsub
+M2

my-emco/custom-m-codes/mytouch.ngc

@@ -0,0 +1,30 @@
+o<mytouch> sub
+   o10 if [EXISTS[#<_hal[jog-axis-sel]>]]
+      #<selected-axis> = #<_hal[jog-axis-sel]>
+      ;(DEBUG, my-mpg.axis-selector: #<selected-axis>)
+	  
+      (touch off z axis)
+      o20 if [#<selected-axis> EQ 0]
+         G10 L20 P0 Z0
+         M103
+         (MSG, touch off z axis)
+	  o20 endif
+	  
+	  (touch off y axis)
+	  o30 if [#<selected-axis> EQ 1]
+         G10 L20 P0 Y0
+         M103
+         (MSG, touch off y axis)
+	  o30 endif
+	  
+	  (touch off x axis)
+	  o40 if [#<selected-axis> EQ 2]
+         G10 L20 P0 X0
+         M103
+         (MSG, touch off x axis)
+	  o40 endif
+   o10 else
+     (DEBUG, didn't exist)
+   o10 endif
+o<mytouch> endsub
+M2