找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
查看: 14856|回复: 25

传一个OKUMA系统的椭圆宏程序

[复制链接]
发表于 2009-7-10 21:18:03 | 显示全部楼层 |阅读模式
看到版主编的FANUC铣椭圆的宏程序不觉手痒,把版主的程序稍作改动,改成OKUMA系统的椭圆宏程序,只是照葫芦画瓢。供大家参考。有得罪版主之处请谅解。
6 a! ]9 ?: O; [7 [' t. {主程序是: CALL  LX=45  LY=25  LC=1  LZ=-10.- d0 T2 F, R6 @" b2 W8 o( `
用户宏程序是:
3 m, G8 h* m/ |. }! r. h/ |; f$ SN2VC1=LC         角度步长5 v; L5 k6 w  k5 P1 L% G" F. b; A
N4VC101=0           
初始角度' \' z( n$ z* Q. J
N6VC102=361      
终止角度. X- a/ `! `6 `$ Y" f
N8VC2=LX         
长半轴
/ x6 O' d$ @/ o$ L/ O7 vN10VC3=LY      
短半轴% |. \( I# C( w# [
N12VC105=LZ  
深度
6 Y0 M+ C) V3 [& E5 R  K) ~N13G90G00X[[VC2]+20]Y0Z100.0        
刀具运行到(65,0,100.0)的位置0 _) i" s( E7 W+ B9 I
N14S1000M03                                      
主轴正转$ L: c2 ^  N/ f  v: L: [; W
N15G01Z[VC105]F1000.0                       
刀具下-10.0mm, x2 l/ Z; n) c3 E. k( y
N16VC114=VC101                                    
变量#114赋初始值
03 G" b0 Q, g! r8 i8 L
N18VC112=[VC2]*COS[VC114]                  
计算X坐标值
4 V: T% `( m& ^( R: u
N20VC113=[VC3]*SIN[VC114]                    
计算Y坐标值2 c4 ?0 l" q3 M2 {1 o
N22G01G42X[ROUND[VC112]]Y[ROUND[VC113]]D02F500.0; k" p, J: g% w5 u2 Z
                                                            
走到第一点,并运行一个步长
3 P" P% y' [7 dN24VC114=VC114+VC1                        
变量#114增加一个角度步长" E, l5 A% ?' B5 B* m$ {
N26IF[[VC114]LT[VC102]]GOTO N18              
条件判断变量#114是否小于361,满足则返" s. x* w/ s% l3 u& _& `2 X7 y
5 N8 A! x6 ^, ~2 t, p
18
( k/ y, ~/ i, a  z7 t& f3 {

" _" S7 f% E+ ]N28G01G40X[VC103+20]Y0                  取消刀具补偿,回到(65.0,0)
9 M$ b% u# T. k" pN30G90G00Z100.0M05                       
抬刀
回复

使用道具 举报

发表于 2009-7-10 23:19:05 | 显示全部楼层
有没有OKUMA OSP5020G 外圆磨加工程序
 楼主| 发表于 2009-7-11 12:09:24 | 显示全部楼层
我是做加工中心的,没用过数控磨
发表于 2009-7-11 13:13:03 | 显示全部楼层
这个程序运行时,机床进给速度平稳吗?
 楼主| 发表于 2009-7-11 19:04:32 | 显示全部楼层
没明白楼上的意思,,不过有一点可以说明,我们单位大偎机床,走圆弧时是自动加衰减的,不需要输入任何G代码。
发表于 2009-7-11 19:11:57 | 显示全部楼层
就是说,这个程序干出的活,轮廓是不是很平滑。
 楼主| 发表于 2009-7-11 20:41:23 | 显示全部楼层
本帖最后由 少年游 于 2009-7-11 21:24 编辑 8 H: X5 @# e' R4 E4 K8 `9 W

$ `) z/ g8 |- G$ w: a这应该取决于参数方程踩点的密集程度,前边已经说了只是把版主的程序稍作改动,改成OKUMA系统的椭圆宏程序,只是照葫芦画瓢。供大家参考。程序本身并没有在机床上验证。如果是真正加工的话,我会把角度步长改小,另外我会采用顺铣。不过我用FANUC系统编过椭圆加上AI纳米轮廓控制,效果还是不错的。
 楼主| 发表于 2009-7-11 21:31:01 | 显示全部楼层
以下是螺旋下到转圆的程序,是我在加工中经常用的,效果不错
6 b5 ^' G8 W& I2 ^! Q5 S! T3 c螺旋下刀转圆
4 D# _; y" W8 F1 g* {主程序CALL  OLXZY  PD=___  PH=___  PQ=___PT=___
% b" {. f1 t$ }PD_为孔直径。PH为孔深度。PQ为层降深度。PT为刀具直径。9 R; t0 Z1 W9 R
子程序OLXZY
) V( [+ s+ X! @* V1 U5 WVC1=ABS[PD]- G, m# k1 p* W4 R# \6 n( P  ]
VC2=ABS[PH]
2 N0 r8 O3 u- T" mVC3=ABS[PQ]. R2 d. f# U& q7 |) O$ ?
VC4=ABS[PT]
) h. N% H  _" ?$ T8 BN2% @5 ~4 M' m$ w5 D0 ]/ i9 b9 ~+ J
VC5=0
1 L9 Y8 W4 @! r& e5 `/ {VC7=0
( q8 u0 i0 {7 G5 cIF[[VC4]GE[VC1]]N6
! r* q9 s! \/ O* X1 X# T( u% \VC6=[[VC1]-[VC4]]/2.01 }1 Z0 f( S! k+ u% X- W
VC7=VC7+VC3
% n8 f4 X: j7 B5 C# t9 NG91G01X[VC6]
7 {# |5 }/ r, M; K. {9 B2 HN3/ w: i- c- F& v" b/ t
G03I-[VC6]Z-[VC3]+ ?! C  z. i9 J6 v' b4 ?. d
VC7=VC7+VC33 \) c* _9 K# O. e( O' P
IF[[VC7]LE[VC2]]GOTO N3
. p3 j% n% X" A* S# i/ i* R- `N4
4 R. J7 Z+ f6 H  u" \9 ?2 ~VC9=0.001
* f% Z. V3 V9 A- x9 @VC8=ABS[VC2-[VC7-VC3]]
4 w2 r& U1 Q' E" D2 `4 Z0 J; @- uIF[[VC8]LT[VC9]]GOTO N50 B+ Y- s7 Y7 {9 ^, y
VC7=VC2-[VC7-VC3]% }4 w/ Q, K* R# T6 o2 L0 r% G& G% o
G03I-[VC6]Z-[VC7]
# |, A( P) q, |2 D% b5 o  NN5
4 Z" R3 h: O1 @$ q5 {0 jG03I-[VC6]
+ b1 d8 `% R3 _2 [! B: a% d% Q& ?% TG01X-[VC6]0 B: N- O& U6 z7 t& Q' [: Z- r
G01Z[VC2]
' I4 \- v+ Z& g6 mN6
+ q- c+ N+ s1 g" J; K" z" t' GM05
5 t; }$ E" `% t" {9 FRTS
发表于 2009-7-12 09:11:44 | 显示全部楼层
纳米插补?; \8 \; R# V5 }' g0 a
什么系统,TD还是16I?
 楼主| 发表于 2009-7-12 11:05:27 | 显示全部楼层
本帖最后由 少年游 于 2009-7-12 11:06 编辑
, m& H1 H. T1 O9 C
( P( b( a; d7 p' f! DFANUC  18i  日本SNK的
您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

Archiver|手机版|小黑屋|机械社区 ( 京ICP备10217105号-1,京ICP证050210号,浙公网安备33038202004372号 )

GMT+8, 2025-6-18 03:33 , Processed in 0.064642 second(s), 15 queries , Gzip On.

Powered by Discuz! X3.5 Licensed

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表