M250 procedure

Author: mhaberler

nc_files/m250.ngc

@@ -0,0 +1,29 @@
+o<m250> sub
+(debug, in M250.ngc)
+
+o<g881_havex> if [EXISTS[#<x>]]
+(debug, X param set: #<x>)
+o<g881_havex> endif
+
+o<g881_havey> if [EXISTS[#<y>]]
+(debug, Y param set: #<y>)
+o<g881_havey> endif
+
+o<g881_havez> if [EXISTS[#<z>]]
+(debug, Z param set: #<z>)
+o<g881_havez> endif
+
+o<g881_havep> if [EXISTS[#<p>]]
+(debug, P param set: #<p>)
+o<g881_havep> endif
+
+o<g881_haveq> if [EXISTS[#<q>]]
+(debug, Q param set: #<q>)
+o<g881_haveq> endif
+
+o<g881_haver> if [EXISTS[#<r>]]
+(debug, R param set: #<r>)
+o<g881_haver> endif
+
+o<m250> endsub
+m2