求证宏程序对错

追梦

G54 G40 G90 G0 Z100.
. I, c6 A$ o: o9 nS800 M3
G0 X74. Y0. Z100.
, g. x! \9 E; ^* P1 z#1=5
#2=0
0 C$ `3 G) J, X' F7 C0 d! Z#3=48.95
( e3 A/ J. S& F# p# xWHILE[#2GE-48.95]DO1
) T0 j0 @( r8 W( N% d7 K#4=46.75-TAN[#1]*#2+31.5
+ ?+ }, N+ n8 W) S6 t# V#5=#2+#3
G1 X#4 Z#5 F30
2 |3 B! w3 a- U  o$ S5 `G42 G3 I-#4 F800
' g9 M/ _2 G8 @6 y5 x. X0 p, P#2=#2-1
* v2 r- y! q9 o& {* D& g& eEND1
/ M9 r4 g" ]# z; ^* d& w2 x1 BG0 G90 G54 G40
0 |; W1 q4 q& {% vS800 M3
G0 X78.25 Y0
#1=46.75
#2=40
) q+ y7 P9 x! z' Y5 P#3=31.5
0 [" R* J' X1 p#4=-270
( g% l0 ~5 B$ zG01 Z-48.59 F100
2 o" A7 V  N/ t( U" [WHILE[#4]LE[-180]
#5=[#2-#3]*SIN[#4*PI/180]
5 G) ~# F! K# c# _) D) w; X. c+ C' b% z#6=[#2-#3]*COS[#4*PI/180]
G01 Z[#6]
X[#1-#5]
$ Y+ d& y7 p, C) T# a, F0 r" e( dG02 I[-[#1-#5]]
#4=#4+5
ENDW
/ K: N& f2 x7 ^G0 Z100.
M30

追梦

是不是应该这样写
: k9 M! j# Q/ J. o" ?- ^G54 G40 G90 G0 Z100.
7 C! J( G9 F" xS800 M3
1 f3 p- i7 ], qG0 X74. Y0. Z100.
4 U% B$ w7 t' X" `#1=5
#2=0
2 \7 Z0 M$ [- i% G& p' ^$ `#3=48.95
WHILE[#2GE-48.95]DO1
#4=46.75-TAN[#1]*#2+31.5
#5=#2+#3
G1 X#4 Z#5 F30
; |# \7 I( s5 G. S# `. h! mG42 G3 I-#4 F800
#2=#2-1
" C% P! A4 X- g) a6 E8 FEND1
4 O2 Z1 C& \% WG0 G90 G54 G40
3 l. Y  y3 e: A) g4 D7 M6 Q3 ?4 ]( }S800 M3
! M5 n$ Y1 P% G$ U$ S9 t% RG0 X78.25 Y0
+ I3 D( }2 R4 w5 Q" c- X5 _#1=0
WHILE[#1GE-90]DO1
. L4 Z9 Y! @# b! Z#2=COS[#1]*25
, U* y: \4 @3 R* V#3=SIN[#1]*25
G1 X#2 Z#3 F300
2 E( K/ {( Z& \8 eG42 G3 I-#2 F1000
#1=#1-1
END1
G0 Z100.
M30

追梦

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

laomei

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

xinsuixue521

高手都玩宏程序

LANG581314

CIMCO Edit V6也可以吧！

寒露

高手都玩宏程序

xue983123

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

ya_blueang

學習謝謝大大分享

xiaonen770

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