QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 3829|回复: 17
收起左侧

[讨论] 较难的作图题:画圆弧

[复制链接]
发表于 2007-4-6 13:59:18 | 显示全部楼层 |阅读模式 来自: 中国广西钦州

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

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

x
出一道较难的作图题:画圆弧- I% l/ ^. c( ~' i
已知圆弧的长度为10.66666666,弦长为10,如何用CAD作出图来。
较难的作图题:画圆弧.jpg

评分

参与人数 1三维币 +10 收起 理由
★新手★ + 10 出题讨论!

查看全部评分

发表于 2007-4-6 16:20:03 | 显示全部楼层 来自: LAN
恐怕不通过计算,用CAD画很难实现.楼主如果确信用CAD能实现的话我就去研究研究.
 楼主| 发表于 2007-4-6 16:28:16 | 显示全部楼层 来自: 中国广西钦州
我采用精确选点法已经通过CAD作出图了。
头像被屏蔽
发表于 2007-4-6 16:39:30 | 显示全部楼层 来自: 中国浙江宁波
提示: 作者被禁止或删除 内容自动屏蔽
 楼主| 发表于 2007-4-6 16:48:58 | 显示全部楼层 来自: 中国广西钦州
原帖由 oldhenksu 于 2007-4-6 16:39 发表
& d/ N4 A! j2 m我用笨方法" m  l; n9 O0 d, U6 ^4 u; s/ a
画好弦,三点画好圆弧
# V5 U& U0 e& w2 ^打开属性看看弧长% A9 `* O+ }2 @" R9 }* t
然后选中圆弧中点,正交拖动,注意弧长变化4 f) f( x: q) _  i- M. Y
如果放大点,仔细点
- F1 ^6 c7 W) p- e! A. \可以拖到10.6666

  a' S6 o! Y' L5 T% c5 P7 l! d就是要看你怎样解决小数点后8位怎么作图。
发表于 2007-4-6 19:00:23 | 显示全部楼层 来自: 中国
Sub A()
, }. g4 k" W- V7 O+ e- d% C5 bOn Error GoTo 10& R: F5 F  M3 i
    Dim La As Double, Ll As Double, O As Variant1 [/ q9 c0 n8 R0 ^
    Dim Alpha As Double, R As Double. d9 ]6 J6 L5 s1 A; u* W/ T, g
    Dim A1 As Double, A2 As Double, A3 As Double8 y5 {5 C, q* Y' K& y5 Q4 E! F
    Dim Arc As AcadArc) ?# h1 U9 `- M, k- a4 D
    With ThisDrawing
% S) w0 C$ A% I4 D. N        La = .Utility.GetDistance(, vbCrLf & "指定弧长:"), o, I, t7 S3 L. i4 H* A. S2 z. n
        Do Until Ll < La And Ll > 0! _& O5 X- p+ S: ]( |: v7 q7 a
            Ll = .Utility.GetDistance(, vbCrLf & "指定弦长(小于弧长):")
6 U( i; h: K  t& l  b9 ^        Loop( S: \% h3 B7 T7 o
        O = .Utility.GetPoint(, vbCrLf & "指定弧的圆心:")
: |% n- D* F- P        A1 = 0
1 J7 d! H* }$ m2 J        A2 = 3.14159265358979
$ r5 G1 d6 @. v7 }" u        Do7 V( u! B9 }2 i, Z' R2 x
            Alpha = (A1 + A2) / 20 \& g7 P( r- K, ~
            A3 = La / Ll * Sin(Alpha). U/ E; A7 G( V# u
            If Alpha = A1 Or Alpha = A2 Or Alpha = A3 Then: }. A( o& b/ A) K
                Exit Do
) _; Z8 h* O1 e: ~: T9 q2 H. O            ElseIf A3 < Alpha Then
' H& K; `3 H2 A/ o( B; l, Z* y0 B1 V2 b                A2 = Alpha8 r3 A3 D4 B( X) r$ x
            Else2 n7 R- Q8 Q5 T; n6 t6 r* B2 m
                A1 = Alpha' O2 ^) N$ Y8 L
            End If
, {, K4 j& ^. [/ A        Loop+ D  h$ ^( u) T5 y- e
        R = La / Alpha / 2
7 R7 I8 ~; g+ I        Set Arc = .ModelSpace.AddArc(O, R, 1.5707963267949 - Alpha, 1.5707963267949 + Alpha), t4 J4 y* ]) R( E1 H9 X
        .ModelSpace.AddLine Arc.StartPoint, Arc.EndPoint" x) G  K" ]" D3 ^/ N" m
    End With0 n* U& A; P/ q+ I8 y$ A8 n
10: End Sub

评分

参与人数 1三维币 +10 收起 理由
★新手★ + 10 技术分享!

查看全部评分

发表于 2007-4-6 21:15:26 | 显示全部楼层 来自: 中国
再来个几何画法的
Untitled-1.gif

评分

参与人数 1三维币 +20 收起 理由
★新手★ + 20 高呀!技术分享!

查看全部评分

头像被屏蔽
发表于 2007-4-9 08:44:32 | 显示全部楼层 来自: 中国浙江宁波
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2007-4-9 10:08:48 | 显示全部楼层 来自: 中国辽宁营口
原帖由 oldhenksu 于 2007-4-9 08:44 发表 http://www.3dportal.cn/discuz/images/common/back.gif# n: e' l# I3 ?& F2 ]  g
7楼兄弟,余弦曲线如何做的?

" u5 c5 W" u; p/ q' L插入块。一个用样条曲线画成的余弦曲线的块。: ]  F3 J. e9 c& F
使用时可以在“插入块”对话框中设置缩放比例,也可将其设为“在屏幕上指定”,在下更喜欢用后者(需提前在图上画好范围)。由于块的尺寸是1个图形单位,所以插入后的实际尺寸等于输入的比例。如以范围的左上角为插入点,以范围的右下角为缩放的对角点,则图形的开口朝下,详见上面的作图过程;如以范围的左下角为插入点,以范围的右上角为缩放的对角点,则图形的开口朝上。+ Q# c+ H) ?) M& }: o  y
附:余弦曲线块文件,CAD2000格式

余弦曲线.rar

15.14 KB, 下载次数: 35

评分

参与人数 1三维币 +5 收起 理由
★新手★ + 5 技术分享

查看全部评分

发表于 2007-4-9 10:34:31 | 显示全部楼层 来自: 中国福建南平
真是佩服,CAD高手太多了,我只会简单的画图,计算什么的基本不懂,真要好好向各位高手学习!
发表于 2007-4-9 11:05:18 | 显示全部楼层 来自: 中国辽宁沈阳
4楼的方法很有意思,就是不大精确!
9 m8 J( T6 ]$ H, L, M8 |: n" Z7楼也太强了!学习中!
 楼主| 发表于 2007-4-9 13:33:56 | 显示全部楼层 来自: 中国广西南宁
精确选点法画圆弧动画演示
较难题:画圆弧动画演示1.gif
 楼主| 发表于 2007-4-9 13:35:09 | 显示全部楼层 来自: 中国广西南宁
来个最精确的,因为CAD最大能够显示出16位数值,将图放大的目的就是让16位数值都显示出来,使作图得到的精度最高。
较难题:画圆弧动画演示2.gif

评分

参与人数 1三维币 +10 收起 理由
★新手★ + 10 技术分享

查看全部评分

发表于 2007-4-11 09:07:54 | 显示全部楼层 来自: 中国安徽合肥
7楼真的很强,不知道定义块的时候定义插入点是哪一点,我要下来好好琢磨下,琢磨不出来再来问你!!!谢谢分享!!!
发表于 2007-4-14 17:37:22 | 显示全部楼层 来自: 中国四川成都
4楼的试画,7 楼的实际上也是计算,只是运用了所谓的正弦块作辅助。总之,计算才能最精确快速。
发表于 2007-4-23 10:47:37 | 显示全部楼层 来自: 中国上海

救命

12楼的大哥台快了,能慢点吗?
 楼主| 发表于 2007-4-23 11:12:44 | 显示全部楼层 来自: 中国广西钦州
原帖由 hccangle 于 2007-4-23 10:47 发表 http://www.3dportal.cn/discuz/images/common/back.gif3 ^9 [; d7 O' ?9 h) b  s
12楼的大哥台快了,能慢点吗?
! S6 g9 J, @* l' L8 l) `5 b  e. ^
13楼有慢的,原理是一样的,就是用鼠标捕捉圆弧的顶点,选择拉伸方向(垂直向下),7 `! s; G$ E( O1 M
在命令行中用键盘输入数值,回车就行了。
发表于 2007-4-24 13:14:28 | 显示全部楼层 来自: 中国吉林长春
这个好样不是很麻烦吧,耐心一点就可以了
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


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

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

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