合作申请设为首页收藏本站

中国先进制造技术论坛官方网站

机械行业CAD技巧:中望CAD绘制圆的渐开线

发布者: YANGHUIMIN | 发布时间: 2016-9-8 13:33| 查看数: 456| 评论数: 0|帖子模式

本帖最后由 YANGHUIMIN 于 2016-9-8 13:34 编辑

   机械行业在使用CAD的时候,常常会需要绘制圆的渐开线。作为一名CAD设计的爱好者,我对这个问题也非常感兴趣。查找一些资料,得到了一些基本的概念,并找到一个通过LISP程序来实现的方法。接下来我就和大家分享一下,如何用中望CAD来绘制圆的渐开线。
  圆的渐开线:把一条没有弹性的细绳绕在一个定圆上,拉开绳子的一端并拉直,使绳子与圆周始终相切。绳子端点的轨迹是一条曲线。这条曲线叫做圆的渐开线。这个定圆叫做渐开线的基圆。
  圆的渐开线广泛应用于齿轮的啮合,齿轮的受力总是沿着与基圆相切的方向。标准齿轮分度圆的压力角为20度,齿轮上的渐开线压力角不会超过80度。在下面程序中,为了直观,渐开线的压力角设置为360度。
  Lisp程序如下:
  (defun C:jkx ()
  (setvar "_ZW_XSDSCMDPAUSE" 1)
  (setq pi1 (/ pi 180))
  (setq po0 (getpoint " \n 请输入中心点:"))
  (if (= po0 nil)
  (setq po0 (list 0 0 0))
  )
  (SETQ d (GETREAL "\n 请输入分度圆直径:"))
  (if (= d nil)
  (setq d 100)
  )
  (setq step (getreal "\n 渐开线精细度(0<精细度<=10):"))
  (if (= step nil)
  (setq step 1)
  )
  (setq rd (/ d 2))
  (setq os (getvar "osmode"))
  (setvar "osmode" 0)
  (command "UCS" "O" po0)
  (command "CIRCLE" "0,0" rd)
  (SETQ R (* rd (COS (* PI1 20)))) ;标准齿轮分度圆的压力角为20度
  (SETQ ST 0)
  (SETQ STR (* PI1 ST))
  (SETQ X (* R (+ (COS STR) (* STR (SIN STR)))))
  (SETQ Y (* R (- (SIN STR) (* STR (COS STR)))))
  (SETQ XY (LIST X Y))
  (COMMAND "PLINE" XY)
  (SETQ ST (+ st step))
  (WHILE (<= ST 360) ;齿轮上的渐开线压力角
  (SETQ STR (* PI1 ST))
  (SETQ X (* R (+ (COS STR) (* STR (SIN STR)))))
  (SETQ Y (* R (- (SIN STR) (* STR (COS STR)))))
  (SETQ XY (LIST X Y))
  (COMMAND XY)
  (SETQ ST (+ st step))
  )
  (command "")
  (setvar "osmode" os)
  (command "UCS" "P")
  )
  绘制结果如下图:

本帖子中包含更多资源

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

x

最新评论

QQ|申请友链|关于我们|联系我们|法律声明|用户协议|广告与展览公司合作申请|平台入驻流程和好处|会员入驻| 中国先进制造技术论坛 ( 沪ICP备12020441号 )     

GMT+8, 2017-8-17 11:38 , Processed in 0.562741 second(s), 57 queries .

论坛声明:《中国先进制造技术论坛》属纯技术性非赢利性论坛,请勿发布非法言论、非法广告等信息,多谢合作。
本论坛言论纯属发表者个人意见且会员单独承担发表内容的法律责任,与本论坛立场无关;会员参与本论坛讨论必须遵守中华人民共和国法律法规,凡涉及政治言论、色情、毒品、违法枪支销售等信息一律删除,并将积极配合和协助有关执法机关的调查,请所有会员注意!
本论坛资源由会员在本论坛发布,版权属于原作者;论坛所有资源为会员个人学习使用,请勿涉及商业用途并请在下载后24小时删除;如有侵犯原作者的版权和知识产权,请来信告知,我们将立即做出处理和回复,谢谢合作!
电话:021-37709287 邮箱:info@amtbbs.org 微信公众号:AMTBBS 微信服务公众号:AMTservice QQ:2969954637

 

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