求证宏程序对错

追梦

$ ~0 h4 H: {' v7 wG54 G40 G90 G0 Z100.
S800 M3
G0 X74. Y0. Z100.
( a& T) E1 D: B$ b, P7 {5 a& x#1=5
#2=0
3 S( ?( w0 H3 y' D#3=48.95
& B6 I5 h) y" R: t  DWHILE[#2GE-48.95]DO1
# z. `  D8 I" O( ]" |4 b' s#4=46.75-TAN[#1]*#2+31.5
#5=#2+#3
G1 X#4 Z#5 F30
G42 G3 I-#4 F800
#2=#2-1
END1
8 Q5 K/ Z3 h6 B8 SG0 G90 G54 G40
' x# t6 y* z. h7 m" r4 I7 W' ~S800 M3
! p4 r  z# E$ w0 w4 x0 @G0 X78.25 Y0
#1=46.75
#2=40
& k2 \6 @/ V, H9 h#3=31.5
#4=-270
G01 Z-48.59 F100
WHILE[#4]LE[-180]
#5=[#2-#3]*SIN[#4*PI/180]
#6=[#2-#3]*COS[#4*PI/180]
7 ^2 E1 V; o2 Q/ zG01 Z[#6]
7 @; W! X( q) HX[#1-#5]
G02 I[-[#1-#5]]
#4=#4+5
+ J$ z% ^+ y' k# v, rENDW
G0 Z100.
M30

追梦

是不是应该这样写
G54 G40 G90 G0 Z100.
& ~1 C8 l# B% P( ^1 w' q4 }! l- HS800 M3
G0 X74. Y0. Z100.
#1=5
& s2 N  }) V/ S6 L. p5 l7 p#2=0
$ E4 r3 b- B! K# r8 o#3=48.95
WHILE[#2GE-48.95]DO1
. ?9 l2 Z& S" R. S#4=46.75-TAN[#1]*#2+31.5
#5=#2+#3
G1 X#4 Z#5 F30
G42 G3 I-#4 F800
9 t# t" H( @+ T' D4 D$ \9 \1 M#2=#2-1
+ u2 ~8 i: E; s1 k, tEND1
0 @: ?. r. t2 JG0 G90 G54 G40
# P) p% A% d$ `# j/ E- d2 ZS800 M3
G0 X78.25 Y0
#1=0
8 a9 H/ Z2 R7 e; d5 ?# \WHILE[#1GE-90]DO1
#2=COS[#1]*25
! V- L1 H# S2 Y, V$ N#3=SIN[#1]*25
& b* W; y% ]* y6 q1 M. K; ~, QG1 X#2 Z#3 F300
9 n% h! m) Q' D5 i0 RG42 G3 I-#2 F1000
#1=#1-1
END1
G0 Z100.
/ J  }, b3 x/ VM30

追梦

那位兄弟在线的帮忙看看 急需求证

laomei

可以用VERICUT进行验证，我编的宏没把握时，就在vericut里验证一下，通过了就能大胆地上机床了。

xinsuixue521

高手都玩宏程序

LANG581314

CIMCO Edit V6也可以吧！

寒露

高手都玩宏程序

xue983123

宏程序累不累，有什么好弄的，

ya_blueang

學習謝謝大大分享

xiaonen770

CIMCO就能帮你验证宏程序对错