CNC机床线性测量宏程序

CNCADT

O0001
  x( [* q( d2 P#1=0(测量起点位置mm)
1 \$ M& n! v4 b* Q5 |#2=50(测量终点位置mm)
#3=10(测量步距mm)
; B+ e/ z3 o% d5 G& m# t#4=2(过冲量mm)
9 G- Z5 E4 M1 d$ l& B. R#5=5000(暂停时间ms)
$ b! J* D0 b; x+ d7 ~9 t# bIF[#2 LE 0]
  S, V, t) t# o4 C$ s{
* z' C% i  s: }; O( d  #3000=1(测量终点位置设置错误！)
+ J+ _9 H5 I- Q+ s3 _}
2 t( J$ m7 k- T4 mIF[[#2-#1]MOD[#3]!=0]
{
! x) V% B& e& f/ i7 Q. y& K' }  #3000=1(测量行程非测量步距整数倍！)
6 E) h5 o; t0 u}
G40 G17 G90 G54 G49 G80
6 M, x6 f& _# v4 U( k2 W9 x" \( |#11=#1
- l1 c& s4 y" R$ j9 LG01 X[#11-#4] F1000.
8 E7 T: e+ j3 z! z& bG04 P1500.
, @+ V, t4 j3 M; P" j0 ?+ T! A" _; uG01 X[#11]
; ?1 t7 v* V: a2 }: a" x0 k1 Y$ d8 yM00
; K+ M; W5 S$ ?3 {: d: g/ U% zN100 IF[#11 GE #2] GOTO 200
#11=#11+#3
* q6 C3 R  q. g+ {6 T5 _6 k) l/ q" \+ ~! \G01 X[#11] F1000.
4 c# G# S& ]* i+ c$ z3 O, l( UG04 P[#5]
% X0 ]( }# a' x( I4 f, o6 g+ BGOTO 100
N200
G01 X[#11+#4]
G04 P1500.
X[#11]
- K9 R# C; R& Y1 s- q5 _G04 P[#5]
N300 IF [#11 LE #1] GOTO 400
2 W3 [! W3 X) u3 n* A, L#11=#11-#3
G01 X[#11] F1000.
2 r# c- G  S6 S& A. {  lG04 P[#5]
  E% l4 ?5 J, v. t7 oGOTO 300.
N400
M98P2L1
M30
%

boye28

感謝分享  謝謝樓主

zhangchenghu

这个程序有啥用？

蕾蕾

好久了，回来看看。。。。。。。

1426437527

感谢分享，支持一下

纯情执着哥

新手小白看不懂！

wx_5544813524

AAAAAAAAAAAAAAAAAAAAAAAAAAAA