本文へ移動
サポートシェアリングソリューション
OKWAVE Plus

このQ&Aは役に立ちましたか?

締切済み
※ ChatGPTを利用し、要約された質問です(原文:OSP 長穴ヘリカルマクロ)

OSP長穴ヘリカルマクロとは?

2023/10/19 03:34

このQ&Aのポイント
  • オークマOSPでのマクロ勉強中の方へ、長穴ヘリカル切削のマクロプログラム組み方について解説します。
  • 幅14、長さ24の長穴ヘリカル切削について、オークマOSPでのマクロプログラムの組み方を詳しく教えてください。
  • オークマOSPを使用している方のために、長穴ヘリカル切削のマクロプログラムの組み方について解説します。幅14、長さ24の切削例もご紹介します。
※ 以下は、質問の原文です

OSP 長穴ヘリカルマクロ

2013/10/26 21:07

オークマ OSPでのマクロ勉強中です。
長穴ヘリカル切削のマクロプログラム組み方
教えてください。

幅14 長さ24 です。

回答 (1件中 1~1件目)

2013/11/03 19:14
回答No.1

仕様は私の勝手にしました。
下記参考になれば幸いです。
----------
<シミュレーションのスクリーンショット>
http://ux.getuploader.com/mcnc/download/346/OVAL-1.jpg
----------
<引数の説明>
XL1=長さ
YL1=幅
XP1=X中心
YP1=Y中心
LA1=ランピング角度
ZA1=Z開始点
ZB1=Z終点
ZE1=Z戻り点
(工具半径は選択中の工具径補正値に設定)
----------
N1
G0 X0 Y0
Z100. G56 H1 D1 M3 S2000 F200
CALL OS11 XL1=24. YL1=14. XP1=0 YP1=0 LA1=3.
$ ZA1=3. ZB1=-10. ZE1=100.
G0 Z500. M5
M1
M2
----------
OS11
KP1=3.1415927
CR1=VTOFD[VDCOD]
RD1=YL1/2-CR1 XL2=XL1/2-YL1/2
LT1=KP1*RD1*2+XL2*4
ZD1=TAN[LA1]*LT1
G0 X=XP1 Y=YP1
X=XP1-XL2-RD1
Z=ZA1
ZZ1=ZA1
NJ1 ZZ1=ZZ1-ZD1
IF[DROUND[ZZ1] GT DROUND[ZB1]]NJ2
ZZ1=ZZ1+ZD1
ZD1=ZZ1-ZB1
ZZ1=ZB1
NJ2 ZP1=ZZ1+ZD1*[KP1*RD1/2+XL2*2+KP1*RD1+XL2*2]/LT1
ZP2=ZZ1+ZD1*[KP1*RD1/2+XL2*2+KP1*RD1 ]/LT1
ZP3=ZZ1+ZD1*[KP1*RD1/2+XL2*2 ]/LT1
ZP4=ZZ1+ZD1*[KP1*RD1/2 ]/LT1
ZP5=ZZ1
CALL OS12 XP1=XP1 YP1=YP1 XL2=XL2 RD1=RD1
$ ZP1=ZP1 ZP2=ZP2 ZP3=ZP3 ZP4=ZP4 ZP5=ZP5
IF[DROUND[ZZ1] GT DROUND[ZB1]]NJ1
CALL OS12 XP1=XP1 YP1=YP1 XL2=XL2 RD1=RD1
$ ZP1=ZB1 ZP2=ZB1 ZP3=ZB1 ZP4=ZB1 ZP5=ZB1
G3 X=XP1-XL2 I=RD1/2 Z=ZB1+0.1
G0 Z=ZE1
X=XP1
RTS
----------
OS12
G3 X=XP1-XL2 Y=YP1-RD1 I= RD1 Z=ZP1
G1 X=XP1+XL2 Z=ZP2
G3 Y=YP1+RD1 J= RD1 Z=ZP3
G1 X=XP1-XL2 Z=ZP4
G3 X=XP1-XL2-RD1 Y=YP1 J=-RD1 Z=ZP5
RTS
----------

お礼

2013/12/23 20:15

お礼遅れてすみませんです。ありがとうございました。

質問者

このQ&Aは役に立ちましたか?

この質問は投稿から一年以上経過しています。
解決しない場合、新しい質問の投稿をおすすめします。

質問する

お礼をおくりました

さらに、この回答をベストアンサーに選びますか?

ベストアンサーを選ぶと質問が締切られます。
なおベストアンサーを選びなおすことはできません。