CNC机床线性测量宏程序

CNCADT

O0001
#1=0(测量起点位置mm)
#2=50(测量终点位置mm)
#3=10(测量步距mm)
#4=2(过冲量mm)
#5=5000(暂停时间ms)
, d: c& p  |; C' _6 `1 FIF[#2 LE 0]
0 ^8 F# u% P! K6 Y( ?{
/ [( e9 x& P  K& d% W% F) d' o  #3000=1(测量终点位置设置错误！)
+ p5 J# S3 h) \5 P' E}
IF[[#2-#1]MOD[#3]!=0]
{
  #3000=1(测量行程非测量步距整数倍！)
}
3 r; L" ]! ~7 C6 r1 ^$ K. u) TG40 G17 G90 G54 G49 G80
+ v/ t9 P* d$ K9 X  G7 ]#11=#1
G01 X[#11-#4] F1000.
  C/ O9 U  k- u2 V3 K% pG04 P1500.
G01 X[#11]
3 h! @$ B) _% }) w0 ]" |M00
! z% s! b& v  ~6 _1 mN100 IF[#11 GE #2] GOTO 200
$ i5 `) C' O/ B, E#11=#11+#3
G01 X[#11] F1000.
2 W2 Z0 c; J1 A' s  X( k! RG04 P[#5]
# p9 O1 z2 R5 A; O# ?+ i  T& }/ VGOTO 100
9 g4 e2 q) Q# P/ o9 p# e8 J7 ?N200
3 ]7 i! p, g: `' s  z# w8 XG01 X[#11+#4]
G04 P1500.
' J- Z% B5 y4 v0 i- L& dX[#11]
" a8 ?2 m- s" S* ~5 f+ U$ BG04 P[#5]
* U+ V, M& p( X& S. bN300 IF [#11 LE #1] GOTO 400
4 k3 }! `$ Q. m$ H( c; U$ I#11=#11-#3
G01 X[#11] F1000.
( d% w& t' O& T: fG04 P[#5]
GOTO 300.
2 z* L4 n6 ?5 v/ y, l4 JN400
M98P2L1
& [2 f8 U6 _( C" B1 tM30
%

boye28

感謝分享  謝謝樓主

zhangchenghu

这个程序有啥用？

蕾蕾

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

1426437527

感谢分享，支持一下

纯情执着哥

新手小白看不懂！

wx_5544813524

AAAAAAAAAAAAAAAAAAAAAAAAAAAA