椭圆宏程序

椭圆宏程序(华中数控)

1.jpg

T0101

G00 X100 Z30

(粗加工)

G00 X39 Z-13

#10=4

WHILE #10 GT 0

#11=8/4*SQRT[4*4-#10*#10]

G01 X[30+2*#10+0.6]

G01 Z[#11-30+0.1]

#10=#10-0.7

ENDW

G01 X[30+0.6]

G01 Z[-22+0.1]

G00 X100Z30

T0202

G00 X39 Z-13

G01 X30

Z-22

#12=0

WHILE #12 LE 90

#13=4*SIN[#12]

#14=8*SIN[#12]

G01 X[2*#13] Z[#14]

#12=#12+5

ENDW

G01 Z-37

再来个长半轴100/2,短半轴50/2的程序：

%0002

#20=100/2（长半轴）

#21=50/2 （短半轴）

#22=2*PI

#23=5

#24=200

G54G90G40G49G80

M03S800

G00X60Y-10

Z[#23+10]

G01Z[-#23]F[#24]

X[#20]Y[0]

#10=0

WHILE#10LE#22

G01X[#20*COS[#10]]Y[#218SIN[#10]] #10= #10+PI/12

ENDW

Y10

G00Z100

M30

数控宏程序车床车椭圆

小外圆30长8连接椭圆长半轴36 短半轴20 求宏程序编辑

M3S800F0.2

T0101

G0X40Z3 定位

#10=20 最高点跟最低点的差

N10#1=0 起点X

N20 #2=SQRT（1-#1*#1/20/20）*36-36 Z坐标

#3=2*（#1+#10）+0.5 X坐标

G1X#3Z#2

#1=#1+1

IF（#3LE40）GOTO20

G0U1

Z3

#10=#10-1

IF（#10GE0）GOTO10

G0X100Z100

M5

M2

帮忙编写一个数控洗宏程序，加工椭圆，长半轴为30 ，短半轴为19 ；操作系统FANUC的

我是搞数控车的,以下是车床车椭圆的宏程序,贴给你,你稍改动一下,就能用,

长半轴100,短半轴80

O0001

G00 X0 Z150.

G98

#24 = 80 （短轴半径，X 轴方向）

#26 = 100 （长轴半径，Z轴方向）

#7 = 0.1 （Z轴取点的间隔距离）

#1 = #26 + #7 （Z轴方向最大值，假设为顶点）

#23 = 3.15 （Z轴方向最小值）

WHILE [ #1 GT #23 ] DO 1

#1 = #1 - #7 （计算每次Z轴的坐标值）

IF [ #1 GT #23 ] GOTO 9

#1 = #23 （最后一次把Z轴终点坐标赋值给#1）

N9 #3 = 2 * #24 * SQRT[1-[#1*#1]/[#26*#26]] （X 轴坐标值计算，此处按直径编程）

G01 X#3 Z#1 F100

END 1

M30

%

7

回答者：mawan119

椭圆程序代码如下：

N10 G54 G90 G0 S1500 M03

N12 X0 Y0 Z20.

N14 G0 Z1

N16 G1 Z-5. F150.

N18 G41 D1

N20 #1=0

N22 #2=34

N24 #3=24

N26 #4=#2*COS[#1]

N28 #5=#3*SIN[#1]

N30 #10=#4*COS[45]-#5*SIN[45]

N32 #11=#4*SIN[45]+#5*COS[45]

N34 G1 X#10 Y#11

N36 #1=#1+1

N38 IF [#1 LT 370] GOTO26

N40 G40 G1 X0 Y0

N42 G0 Z100

N44 M30

数控铣加工中心椭圆程序

数控铣加工中心椭圆程序

悬赏分：50 - 解决时间：2009-2-17 20:28

请大家指教一下铣椭圆的宏程序。而且我看见别人的一个程序求详解，特别是不知道下面方程中X=A*COS&的角&到底是哪个角啊，该程序复制如下：

加工如下图所示的椭圆形的半球曲面，刀具为R8的球铣刀。利用椭圆的参数方程和圆的参数方程来编写宏程序。

椭圆的参数方程为：X=A*COS&；

Y=B*COS&；

其中，A为椭圆的长轴，B为椭圆的短轴。

编制参考宏程序如下：

%0012

#1=0

#2=20

#3=30

#4=1

#5=90

WHILE #5 GE #1 DO1

#6=#3*COS[#5*PI/180]+4

#7=#2*SIN[#5*PI/180]

G01X[#6]F800

Z[#7]

#8=360

#9=0

WHILE #9 LE #8 DO2

#10=#6*COS[#9*PI/180]

#11=#6*SIN[#9*pi/180]*2/3

G01X[#10]Y[#11]F800

#9=#9+1 (计数器)

END1

#5=#5-#4 (计数器)

END2

M99