求证宏程序对错

追梦

G54 G40 G90 G0 Z100.
S800 M3
G0 X74. Y0. Z100.
#1=5
#2=0
1 x) t' ?' B  d8 i# _#3=48.95
WHILE[#2GE-48.95]DO1
9 r. A+ }4 P% E" [7 t) L#4=46.75-TAN[#1]*#2+31.5
% Y* D) o0 o- q#5=#2+#3
) L2 f5 I& d$ U7 z- cG1 X#4 Z#5 F30
0 c* \7 x# a$ E8 J/ u) k$ ?G42 G3 I-#4 F800
0 h+ L: X" s0 D3 G: p#2=#2-1
! `; E% @( s% j: w$ z: D' bEND1
G0 G90 G54 G40
& s; d, n; U, K  ]: F+ h  QS800 M3
G0 X78.25 Y0
#1=46.75
% ]& [" V0 N- a+ R6 I#2=40
+ ?$ C6 O! P; s1 N6 Q+ b#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]
) e/ N" D% T$ L2 `# a, jG01 Z[#6]
X[#1-#5]
G02 I[-[#1-#5]]
#4=#4+5
ENDW
G0 Z100.
M30

追梦

是不是应该这样写
G54 G40 G90 G0 Z100.
S800 M3
, F. U( s, s) l9 YG0 X74. Y0. Z100.
#1=5
#2=0
#3=48.95
* q9 q: J- X7 c" ^3 SWHILE[#2GE-48.95]DO1
#4=46.75-TAN[#1]*#2+31.5
#5=#2+#3
G1 X#4 Z#5 F30
5 B+ a- {; X/ Z( a$ m2 b" kG42 G3 I-#4 F800
#2=#2-1
$ M2 `! S. L0 q  |END1
G0 G90 G54 G40
S800 M3
$ V$ y2 t' B1 E5 Y" rG0 X78.25 Y0
#1=0
# P; ?3 w; K- ^5 z9 {  {WHILE[#1GE-90]DO1
3 a# C5 G  y4 s( w7 Y#2=COS[#1]*25
* g& N9 D% W" K$ C7 a+ X#3=SIN[#1]*25
) x4 i5 H; J, }# @; f! XG1 X#2 Z#3 F300
/ k9 J# R4 m" a1 M$ `8 J) BG42 G3 I-#2 F1000
#1=#1-1
% v( o: u+ w# X, O, oEND1
7 b( t/ ], A* K3 V! I& a8 E4 aG0 Z100.
M30

追梦

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

laomei

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

xinsuixue521

高手都玩宏程序

LANG581314

CIMCO Edit V6也可以吧！

寒露

高手都玩宏程序

xue983123

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

ya_blueang

學習謝謝大大分享

xiaonen770

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