QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 5584|回复: 11
收起左侧

[已解决] 已知圆弧长和弦长的圆弧应该怎么画

[复制链接]
发表于 2010-5-22 17:47:55 | 显示全部楼层 |阅读模式 来自: 中国广东东莞

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

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

x
如题,已知圆弧的弧长和弦长,在CAD里应该怎样把这段圆弧画出来,想了好久没想到解决办法,请高手指点一下。图形如下:
7 m/ q, f4 S6 ]8 B3 h. a  J3 u cad.JPG
发表于 2010-5-22 18:23:27 | 显示全部楼层 来自: 中国广东肇庆
利用数学两公式求半径R- M& T& Q2 g2 g9 L* a  ]1 k/ A
sinθ=a/R
  M) p% ~' `2 `" iL=2θ*π*R/180
 楼主| 发表于 2010-5-22 18:54:26 | 显示全部楼层 来自: 中国广东东莞
数学方法是可以解,我想试一下作图看看能不能作出来
发表于 2010-5-22 21:46:11 | 显示全部楼层 来自: 中国上海
用纯粹的几何作图或CAD作图是做出的,至少要在CAD的命令行里输入计算公式。
发表于 2010-5-22 22:52:07 | 显示全部楼层 来自: 中国湖北荆州

评分

参与人数 1三维币 +3 收起 理由
★新手★ + 3 应助

查看全部评分

发表于 2010-5-23 14:00:17 | 显示全部楼层 来自: 中国安徽芜湖
楼上提及的方法在工程实践中非常实用。
发表于 2010-5-23 21:44:59 | 显示全部楼层 来自: 中国北京
本帖最后由 woaishuijia 于 2010-5-24 12:18 编辑 6 Z5 m1 q8 `& B9 g( j- M% _! V, W" P! A

  1. 4 u: N; E1 U6 y1 S: }% Q0 y
  2. (defun c:aaa(/ p1 p2 l al a a1 a2 alt)
    8 c. X6 O9 b( v5 Z9 V5 N& q0 _0 K
  3.   (setq p1(getpoint "\n 指定圆弧的起点:" )
    " `6 ?! S/ b8 b; F/ ^
  4. p2(getpoint p1 "\n 指定圆弧的端点:" )' ]1 I9 e" b, t4 ^8 T4 Q" s
  5. l(distance p1 p2)
    / F1 t( ^6 E. Y* y* t
  6. al(getdist p2 "\n 指定弧长:" )
    5 D% v: A: C' R$ p! h3 U
  7. )  X* U  U" P6 G
  8.   (if (> al l)
    6 W: T7 g: U* f* ~  r6 F
  9.     (progn5 R) v5 {& M6 w+ g
  10.       (setq a1 0
    8 \' \: w' H  I9 ?
  11.      a2 (* pi 2); h8 s$ B' L1 X: N& u2 x
  12.      )7 o# Q4 C' ^- G6 c( Z4 r
  13.       (while  (/= alt al) 5 g. T0 f+ x+ Y  A7 s. i. K& e: ^- a
  14. (setq a(/(+ a1 a2) 2)6 G3 Y, Y6 p6 I! j8 B2 [
  15.        alt(/(* a l) 2 (sin (/ a 2)))& P) [# y/ }- H8 D  d
  16.        ). c  g1 J! T. r2 l1 U3 K
  17. (if (or (= a a1) (= a a2)): d% N( M7 `( \: y/ K) r/ Q  X$ q
  18.    (setq alt al)
    : u& u9 n1 A/ |& `# m# M
  19.    (if (> alt al)& F/ i1 K# C$ v' V* }( o3 f& _) H
  20.      (setq a2 a)
    1 p# z6 q. X' S- T
  21.      (setq a1 a)$ T( [) Y! ^6 D5 Z0 L2 ]
  22.      )0 K/ f2 g: [' A8 w
  23.    )) i! v4 S4 Y' X; `! d# Z( c+ I
  24. )( L3 Q; k$ Z; |" i& ]
  25.       (setq a(/(* a 180)pi))) h5 n, N) u! _: t7 r# |+ l
  26.       (setvar "CMDECHO" 0)
    7 h0 j: u6 d  f
  27.       (command "arc" p1 "e" p2 "a" a)2 n1 N( x. s* P% Z( I# y* V* _
  28.       (setvar "CMDECHO" 1), F0 z3 g! m0 z. r
  29.       )7 c$ {/ Z7 L& G/ h
  30.     )
    0 i5 a0 e' B5 |9 f& F7 @
  31.   (princ)# t9 F! G- F+ f- B8 R# A
  32.   )
    $ u' g* _2 T7 |" r
复制代码

评分

参与人数 1三维币 +8 收起 理由
★新手★ + 8 应助

查看全部评分

发表于 2010-5-24 15:03:37 | 显示全部楼层 来自: 中国江苏扬州
7# woaishuijia
. t- @  i" M% ^' b9 u0 W* q5 M9 j! \5 z
) a' l- V/ _& C$ O采用lsp进行实用编程,实在!谢谢你的分享!值得大家学习!
 楼主| 发表于 2010-5-24 19:16:55 | 显示全部楼层 来自: 中国广东东莞
本帖最后由 for-mar 于 2010-5-24 19:18 编辑
% j1 m4 l- {8 F$ c7 \8 |
! Y8 \7 w4 f0 X: ~* I8 {5楼回帖里的方法应该是属于数学上的迭代数值求解,经若干次迭代达到很小的误差,令人眼前一亮,没想到可以将数学如此应用到CAD中来。/ G( m5 m1 U! I) S$ Z# j
7楼的斑斑好NB,拜倒
( y8 a9 P$ H+ Z9 l6 z4 D感谢各位高手的指点,真是受益良多啊。
发表于 2010-10-19 09:45:38 | 显示全部楼层 来自: 中国山东东营
本帖最后由 hh0 于 2010-10-19 09:51 编辑
4 A7 K" Y% u# A) J5 K2 p. s% R$ }4 ]5 ~" ^1 r( F+ b/ l
请教,7楼的程序如何应用?
发表于 2010-10-19 10:17:53 | 显示全部楼层 来自: 中国河南郑州
请教,7楼的程序如何应用?$ J4 m4 U& ^. z+ \1 ^/ k! X. n
hh0 发表于 2010-10-19 09:45 http://www.3dportal.cn/discuz/images/common/back.gif
$ r+ M7 E* j3 T. L; h  d( x

' q' J0 p% e. C  g4 N+ ^. ]1.将代码复制下来,粘贴到记事本内,保存为LSP格式文件。6 C; w) n* s- o
2.回到CAD,工具——加载应用程序,选中刚保存的LSP格式文件,点保存——关闭。5 z- z' r) k" s4 R5 F: ?! n% D
3.命令行内输入aaa,回车。。。。。。。按提示操作。
发表于 2011-3-25 15:34:40 | 显示全部楼层 来自: 中国浙江温州
大哥 能在具体点吗: l  m, H) A% v' h

0 b5 u! d# L* s  v我想知道怎么画
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

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