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

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

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

みんなの回答

noname#230359
noname#230359
回答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 ----------

noname#230358
質問者

お礼

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

関連するQ&A