找回密码 注册 QQ登录
开思网工业级高精度在线3D打印服务

iCAx开思网

CAD/CAM/CAE/设计/模具 高清视频【积分说明】如何快速获得积分?快速3D打印 手板模型CNC加工服务在线3D打印服务,上传模型,自动报价
打印 上一主题 下一主题

[挑战题目100分] DMG 50V 五面(轴)加工后置处理程序开发

[复制链接]
11
发表于 2003-10-8 09:41:23 | 只看该作者
我用MSYS来计算刀轴 I J K, 可是不对 (MSYS/-49.5037,110.6111,4.6673,-0.2336063,0.4305111,-0.8718304,-0.1114245,-0.9025853,-0.4158418 )
  
可是如果加工用MCS, 我用mom_tool_axis读出来的I J K 总为 0 0 1, 如果不用MCS倒还可以....
12
发表于 2003-10-8 10:04:53 | 只看该作者
请大家指点.....

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
13
发表于 2003-10-8 10:13:45 | 只看该作者
上面只是我在猜想, 主要是针对五面加工, 五轴加工还要复杂,  苦于没有参考和指点, ......
  
       希望WAVE版主光临指导..... (鼓掌!.....)
14
发表于 2003-10-8 19:17:43 | 只看该作者
wave wrote:
先定再做  
  已准备给先做的高手加分,期待ing  
  

  
終於出聲了...:D:D:D
15
发表于 2003-10-9 20:37:21 | 只看该作者
有兴趣的话请电话联系133 18890259,我可以帮你试试,以前做过MIKRON YASDA和东芝等几种五轴联动的,.
16
发表于 2003-10-10 09:05:08 | 只看该作者
To jinly:
  
做这类机床(斜45度)的后处理,要注意的是:
1.机床的NC程序运行方式
  程序中 L X Y Z B C 的值 在机床运行时的位置是机床的绝对值还是相对值,也就是说,程序中 L X Y Z B C 的值通过机床插补(M指令)换算成机床的绝对位置.另外就是通过后处理来换算的(我一般用此法)
2.后处理的算法
  把UG中CLS文件中X Y Z I J K通过三角函数换算成X Y Z B C
  
例 B角  
proc rotate_b {b pos_in pos_out} {
  upvar $pos_in in
  upvar $pos_out out
  global DEG2RAD
  global Sin45
  global ud_y_offset
  global ud_z_offset
  
  set ry -$Sin45
  set rz $Sin45
  
  set sinb [expr sin($b * $DEG2RAD)]
  set cosb [expr cos($b * $DEG2RAD)]
  
  set x1 [expr $cosb * $in(0)]
  set x2 [expr $x1 + (-$rz * $sinb * $in(1))]
  set x1 [expr $x2 + ($ry * $sinb * $in(2))]
  
  set y1 [expr $rz * $sinb * $in(0)]
  set y2 [expr $y1 + (($cosb + (1 - $cosb) * pow($ry,2)) * $in(1))]
  set y1 [expr $y2 + ((1 - $cosb) * $ry * $rz) * $in(2)]
  
  set z1 [expr (-$ry * $sinb) * $in(0)]
  set z2 [expr $z1 + ((1 - $cosb) * $ry * $rz) * $in(1)]
  set z1 [expr $z2 + ($cosb + (1 - $cosb) * pow($rz,2)) * $in(2)]
  
  set out(0) $x1
  set out(1) [expr $y1 - $ud_y_offset]
  set out(2) [expr $z1 - $ud_z_offset]
}
  
proc linearize {mp_start mp_end p_start p_end} {
  upvar $mp_start mp1
  upvar $mp_end mp2
  upvar $p_start p1
  upvar $p_end p2
  
  global mom_lintol_status
  global mom_lintol
  
  if { [info exist mom_lintol] == 0} {
    return
  }
  
  array set m "0 0 1 0 2 0"
  VEC3_add mp1 mp2 m
  vec_div m 2 m
  set b [expr ($p1(b) + $p2(b)) /2.0]
  set c [expr ($p1(c) + $p2(c)) /2.0]
  array set p "0 0.0 1 0.0 2 0.0 b $b c $c"
  rotate_c $c m p
  rotate_b $b p p
  set d [dis_p2l p1 p2 p]
  if {$d > $mom_lintol} {
    linearize mp1 m p1 p
    say [format "L X%.3f Y%.3f Z%.3f B%.3f C%.3f" $p(0) $p(1) $p(2) $p(b) $p(c)]
17
发表于 2003-10-14 16:42:49 | 只看该作者
学无止尽!!!感叹
18
发表于 2003-10-15 10:56:51 | 只看该作者
我用VB写一个全新的后置程序,原计划十月份完成,现在看来要推迟了。不过早晚要完成的,到时公布出来,望班主加分。
19
发表于 2003-10-16 09:54:32 | 只看该作者
The machine

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
20
发表于 2003-10-16 09:55:55 | 只看该作者
The machining....

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
您需要登录后才可以回帖 登录 | 注册

本版积分规则

3D打印手板模型快速制作服务,在线报价下单!

QQ 咨询|手机版|联系我们|iCAx开思网  

GMT+8, 2025-1-27 12:33 , Processed in 0.026457 second(s), 9 queries , Gzip On, Redis On.

Powered by Discuz! X3.3

© 2002-2025 www.iCAx.org

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