QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
5天前
查看: 5588|回复: 11
收起左侧

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

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

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

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

x
如题,已知圆弧的弧长和弦长,在CAD里应该怎样把这段圆弧画出来,想了好久没想到解决办法,请高手指点一下。图形如下:
! n0 G. R$ I2 I2 V# c, q cad.JPG
发表于 2010-5-22 18:23:27 | 显示全部楼层 来自: 中国广东肇庆
利用数学两公式求半径R
  L( ]8 _# n+ R1 y$ Psinθ=a/R
3 P8 |' |8 X( `L=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 编辑 + b8 G6 g. @3 r
  1. ) `* |8 K1 F4 i/ R4 ^/ F
  2. (defun c:aaa(/ p1 p2 l al a a1 a2 alt)
    ; m; J$ o; V9 B# a
  3.   (setq p1(getpoint "\n 指定圆弧的起点:" )
    8 ]# M" f4 n5 H/ w" H) Y; G! p
  4. p2(getpoint p1 "\n 指定圆弧的端点:" )5 T0 Q* w* i/ q' I+ I4 ?# O7 F8 h
  5. l(distance p1 p2)
    ( R- _% c3 M3 @. O) E% C
  6. al(getdist p2 "\n 指定弧长:" ). {5 h5 K- L+ ^$ S. p- n8 q7 I% K
  7. )9 K9 \5 ?2 `8 U5 I, R, B
  8.   (if (> al l)/ V8 h* s9 o8 O7 _! u$ [
  9.     (progn
    ) U2 n4 @6 M# H+ |1 C8 l0 b
  10.       (setq a1 0- v- t/ K6 H7 o1 Y, ^2 H9 X
  11.      a2 (* pi 2)
    : m9 P$ k. K2 {  z1 B
  12.      )
    % J+ P( c& N, o4 l( t, s% D) W
  13.       (while  (/= alt al) 5 _- P8 e3 Q) u
  14. (setq a(/(+ a1 a2) 2)
    ; w0 A! h. B0 L
  15.        alt(/(* a l) 2 (sin (/ a 2)))/ N" N* T) G# k2 N1 X7 g7 u0 ~
  16.        )
    ; }* b- v) ~8 Z
  17. (if (or (= a a1) (= a a2))' Z( @, [4 m" l9 x& i- r6 O3 P
  18.    (setq alt al)
    0 \# h. \6 F+ c' P( b
  19.    (if (> alt al)( ?  r) _) n! ^$ o/ ]3 A' J
  20.      (setq a2 a)
    ) W$ Z$ d, M( [% m* W
  21.      (setq a1 a)
    # K. G/ z+ g  R3 `# Q
  22.      )
    * X) f) e3 l4 \
  23.    ): [2 U. l9 a& B. y0 q4 y: `" Y
  24. )8 L) @" D+ a# S" z
  25.       (setq a(/(* a 180)pi))0 W" x, B; L, j$ m
  26.       (setvar "CMDECHO" 0)
    ' l/ W( D1 v3 t% x+ b
  27.       (command "arc" p1 "e" p2 "a" a)
    - A' i- W  }& N  ]
  28.       (setvar "CMDECHO" 1)
    - I$ J: ]- |4 B! b0 i5 @
  29.       )
    - b) Q4 `2 h/ q  K6 @
  30.     )
    % d# _4 n7 T* v
  31.   (princ)
    # k+ L/ a3 @/ M
  32.   )
    . N/ Q8 {$ ?  c
复制代码

评分

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

查看全部评分

发表于 2010-5-24 15:03:37 | 显示全部楼层 来自: 中国江苏扬州
7# woaishuijia 1 V, q) u" _. ]" x
( p. v5 W3 O* R4 P5 b, c
采用lsp进行实用编程,实在!谢谢你的分享!值得大家学习!
 楼主| 发表于 2010-5-24 19:16:55 | 显示全部楼层 来自: 中国广东东莞
本帖最后由 for-mar 于 2010-5-24 19:18 编辑 ) ^2 H+ j( @- ?: ?  m6 d) Y
- {# m: [9 G) G: p) F
5楼回帖里的方法应该是属于数学上的迭代数值求解,经若干次迭代达到很小的误差,令人眼前一亮,没想到可以将数学如此应用到CAD中来。
: f% \1 H/ y9 E+ \' W7楼的斑斑好NB,拜倒
  q( g# J! _8 `1 u$ F感谢各位高手的指点,真是受益良多啊。
发表于 2010-10-19 09:45:38 | 显示全部楼层 来自: 中国山东东营
本帖最后由 hh0 于 2010-10-19 09:51 编辑 9 j& g8 u3 t( p4 `: Y

& l2 T/ t" R8 ^) r' f请教,7楼的程序如何应用?
发表于 2010-10-19 10:17:53 | 显示全部楼层 来自: 中国河南郑州
请教,7楼的程序如何应用?' O8 ?: u/ S8 [" R1 e- J; s
hh0 发表于 2010-10-19 09:45 http://www.3dportal.cn/discuz/images/common/back.gif
+ m* k9 r0 l- l: k- l' X
. b" E; q2 m( a$ B2 m# }5 f( y
1.将代码复制下来,粘贴到记事本内,保存为LSP格式文件。
) c/ G- a: k* N+ R6 `2.回到CAD,工具——加载应用程序,选中刚保存的LSP格式文件,点保存——关闭。
% q- Q  Z6 M7 ]! q' Z% h# t0 c3.命令行内输入aaa,回车。。。。。。。按提示操作。
发表于 2011-3-25 15:34:40 | 显示全部楼层 来自: 中国浙江温州
大哥 能在具体点吗* [8 s; L0 y6 [: H$ X1 m* X
. ?/ [4 v! t; N6 ~) M1 g" z
我想知道怎么画
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


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

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

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