傳一個OKUMA系統的橢圓宏程序

少年游

看到版主編的FANUC銑橢圓的宏程序不覺手癢，把版主的程序稍作改動，改成OKUMA系統的橢圓宏程序，只是照葫蘆畫瓢。供大家參考。有得罪版主之處請諒解。
主程序是： CALL  LX=45  LY=25  LC=1  LZ=-10.
6 S* v  ^- I7 A用戶宏程序是：
N2VC1=LC         角度步長
N4VC101=0           初始角度
6 o+ ~) g/ X& I2 q( D0 e: J! eN6VC102=361       終止角度
  z" R5 ?8 \9 Q9 v! z3 h& M* uN8VC2=LX         長半軸
N10VC3=LY      短半軸
, ?* c% J6 x# x+ `6 u2 CN12VC105=LZ  深度
N13G90G00X[[VC2]+20]Y0Z100.0        刀具運行到(65,0,100.0)的位置
N14S1000M03                                      主軸正轉
N15G01Z[VC105]F1000.0                       刀具下-10.0mm
N16VC114=VC101                                     變量#114賦初始值0
N18VC112=[VC2]*COS[VC114]                  計算X坐標值
& |8 b! ^& r2 M2 G# K2 y+ q9 R/ F6 EN20VC113=[VC3]*SIN[VC114]                    計算Y坐標值
N22G01G42X[ROUND[VC112]]Y[ROUND[VC113]]D02F500.0
                                                            走到第一點，并運行一個步長
N24VC114=VC114+VC1                         變量#114增加一個角度步長
N26IF[[VC114]LT[VC102]]GOTO N18              條件判斷變量#114是否小于361，滿足則返

回18。
- b$ q$ I/ K2 ?) y) x, T0 F2 m
3 W8 r& i; ^4 L4 F$ o) j2 l+ }. |N28G01G40X[VC103+20]Y0                  取消刀具補償，回到(65.0,0)
% s2 U+ `" y' H) F; H6 d) _- l: sN30G90G00Z100.0M05                       抬刀

HONDA

有沒有OKUMA OSP5020G 外圓磨加工程序

少年游

我是做加工中心的，沒用過數控磨

磨洋工

這個程序運行時，機床進給速度平穩嗎？

少年游

沒明白樓上的意思，，不過有一點可以說明，我們單位大偎機床，走圓弧時是自動加衰減的，不需要輸入任何G代碼。

螺旋線

就是說，這個程序干出的活，輪廓是不是很平滑。

少年游

6 J5 i8 B/ i6 u- _
這應該取決于參數方程踩點的密集程度，前邊已經說了只是把版主的程序稍作改動，改成OKUMA系統的橢圓宏程序，只是照葫蘆畫瓢。供大家參考。程序本身并沒有在機床上驗證。如果是真正加工的話，我會把角度步長改小，另外我會采用順銑。不過我用FANUC系統編過橢圓加上AI納米輪廓控制，效果還是不錯的。

少年游

以下是螺旋下到轉圓的程序，是我在加工中經常用的，效果不錯
9 u% g3 @* I, m1 C( L' \螺旋下刀轉圓
/ B, h8 i. X4 a) c, O9 @% R主程序CALL  OLXZY  PD=___  PH=___  PQ=___PT=___
PD_為孔直徑。PH為孔深度。PQ為層降深度。PT為刀具直徑。
子程序OLXZY
VC1=ABS[PD]
VC2=ABS[PH]
5 y2 Y% F. }; r9 TVC3=ABS[PQ]
& f& t! a9 V. @, A5 zVC4=ABS[PT]
N2
VC5=0
0 g: W$ Q  }4 w6 F4 D; [VC7=0
IF[[VC4]GE[VC1]]N6
% k. `/ r! c% yVC6=[[VC1]-[VC4]]/2.0
& h: V( x. G1 f8 e$ n: l% \VC7=VC7+VC3
G91G01X[VC6]
7 X" H. }: h! [N3
! @5 i1 p" e# e; gG03I-[VC6]Z-[VC3]
VC7=VC7+VC3
IF[[VC7]LE[VC2]]GOTO N3
5 [2 L9 W/ K% H, dN4
! i4 _5 o, K/ v, @VC9=0.001
/ W/ p' T4 K% _+ v) v4 iVC8=ABS[VC2-[VC7-VC3]]
) P# ]8 o& Q( vIF[[VC8]LT[VC9]]GOTO N5
VC7=VC2-[VC7-VC3]
G03I-[VC6]Z-[VC7]
5 _+ \8 b+ n( Q) G4 [* DN5
& O8 q: c4 O0 h  z* I9 CG03I-[VC6]
, k5 [8 x- f# ]. OG01X-[VC6]
/ C/ q! g0 i. H$ l1 z& wG01Z[VC2]
5 Y7 R7 O  \$ Z0 xN6
M05
RTS

螺旋線

納米插補？
0 Q  z! I. [% f" K2 r7 L2 W什么系統，TD還是16I?

少年游

/ O% x# G1 ]% r* yFANUC  18i  日本SNK的