iCAx开思工具箱

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 24178|回复: 7
打印 上一主题 下一主题

【求助】原程序!

[复制链接]
跳转到指定楼层
楼主
发表于 2004-9-7 11:30:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册登录,享用更多网站功能!

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

x
我创建了一个圆柱体,然后想在圆柱体上打bore孔,发现没有打上!请指点!!  
UF_MODL_create_cyl1 (UF_NULLSIGN , origin1, h1, d1, direction1, [$cyl_obj_id4)]
  UF_MODL_ask_feat_body (cyl_obj_id4, [$bd4)]
  UF_MODL_ask_body_faces (bd4, [$list)]
  UF_MODL_ask_list_count(list,[$num)]
  ///////////////////得到上表面
  for (i=0; i<num; i++)
  {
    UF_MODL_ask_list_item(list,i,[$face)]
    UF_MODL_ask_face_data(face,&type,point,
                                  dir,box,[$radius,&rad,&sen)]
    if (fabs(dir[2]-1.0)< 10e-7)
    {
     faces=face;
   direction2[0]=dir[0];
     direction2[1]=dir[1];
   direction2[2]=dir[2];
      break;
    }
  }
///////////////////得到下表面
  for (i=0; i<num; i++)
  {
   UF_MODL_ask_list_item(list,i,[$face)]
    UF_MODL_ask_face_data(face,&type,point,
                                  dir,box,[$radius,&rad,&sen)]
    if (fabs(dir[2]+1.0)< 10e-7)
    {
    facex=face;
    origin2[0]=0;
    origin2[1]=0;
    origin2[2]=point[2];
    }
  }
  UF_MODL_delete_list([$list)]
/////////
  UF_MODL_create_c_bore_hole (origin2,direction2, "10.0","5","8.0","10.0","118.0",
                                     facex,faces,[$feature_obj_id)]
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 支持支持
沙发
发表于 2004-9-7 12:38:34 | 只看该作者

马上注册登录,享用更多网站功能!

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

x
板凳
 楼主| 发表于 2004-9-7 15:30:49 | 只看该作者

马上注册登录,享用更多网站功能!

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

x
地板
 楼主| 发表于 2004-9-7 15:42:10 | 只看该作者

马上注册登录,享用更多网站功能!

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

x
5
发表于 2004-9-7 15:48:37 | 只看该作者

马上注册登录,享用更多网站功能!

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

x
6
 楼主| 发表于 2004-9-7 16:15:42 | 只看该作者

马上注册登录,享用更多网站功能!

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

x
7
发表于 2004-9-7 16:36:27 | 只看该作者

马上注册登录,享用更多网站功能!

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

x
8
 楼主| 发表于 2004-9-7 16:51:30 | 只看该作者

马上注册登录,享用更多网站功能!

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

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

本版积分规则

手板模型制作,在线3D打印服务

QQ|小黑屋|手机版|开思工具箱 CAD工具箱_CAM工具箱  

GMT+8, 2024-11-15 16:48 , Processed in 0.015234 second(s), 7 queries , Gzip On, Redis On.

Powered by Discuz! X3.3

© 2002-2024 www.iCAx.org

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