發(fā)一個走螺旋線的宏程序

少年游

這是兩年前編的一個走螺旋線的宏程序，挖大直徑圓腔用的。走刀路徑用中心鉆試過，沒問題，由于后來改用牛鼻刀層降了，沒有經(jīng)過實際加工的檢驗。只是感覺后邊編的有點糙，如果是用象限的概念直接把園做出來，而不是回中心再走圓應(yīng)該更好了。程序中#7是孔直徑，#20是刀直徑。
G90;
#100= #5001;
" n  Z! i' j4 c3 S( P0 A#101= #5002;
- \% d$ j; X/ v  J5 `#5=[[#7-#20]/2.0];
#1=0.05；
' Z. O- X# e' S4 fG52 X#100 Y#101;
N1；
8 s( Q9 |& D5 g2 i#2=0；
: R5 r3 h) c; I) G+ fWHILE[360.0GE#2]DO01;
#3= #1*COS[#2];
#4= #1*COS[#2];
G01 X#3 Y#4;
) H- j) S7 k; L6 ?( i#1 = #1+0.001;
#2=#2+0.05;
IF[#1GT#5]GOTO02;
END01;
0 h; ^, r8 @) Y6 d& BIF[#5GE#1] GOTO01;
8 \6 [7 f; c3 u& SGOTO03;
- _; Y7 A8 n6 zN2;
G01 X0 Y0;
! ]7 n7 @: y+ \G01 Y-#5;
: c* X& h* n4 h1 G5 a  {( SG03 J#5;
G01 Y0;
, J( c4 b' X9 U; l2 d3 a7 E0 ?G52 X0 Y0;
M99;
$ |! |% m, {2 h! _: ^

少年游

最后一個GOTO03應(yīng)該為GOTO02

djs2661003

#5001 #5002 是什么系統(tǒng)變量

jackjones

不管怎么樣，學(xué)習(xí)了