在AutoCAD中缓和曲线的几种画法

合集下载

在CAD中用样条曲线画缓和曲线

在CAD中用样条曲线画缓和曲线

303.1518303°15'18"X Y SplineZH9665.6317087.8837087.883,9665.631HY9370.3697140.5667140.566,9370.369QZ8962.1647282.5967282.596,8962.164YH8594.0047509.0087509.008,8594.004HZ8366.4807704.4257704.425,8366.487087.883,9665.6317704.425,8366.48支距法现在都不怎么用了 给你个偏角法的计算ZH至i点的偏角 A=30xL的平方 除以派 除以R 除以LsZH至i点的弦长 C=L(ZH至i点的长)-L的5次方 除以90 除以R的平方 除以Ls的平方缓和曲线坐标公式X=L-L^5÷[40(RLS)^2]+L^9÷[3456(RLS)^4]–L^13÷[599040(RLS)^6]+L^17÷[175472640(RLS)^8]- L^21÷[7.80337152×1010(RLS)^10]Y=L^3÷[6(RLS)] - L^7÷[336(RLS)^3]+L^11÷[42240(RLS)^5] - L^15÷[9676800(RLS)^7]+L^19÷[3530096640(RLS)^9] - L^23÷[1.8802409472×1012园是C 曲线是SPL 样条曲线或者用 A画弧线(1)将“对象捕捉”中的“节点”选中(2)绘图-----单点-----选中一条线的起始点--------空格------输入距离(输入距离之前一定要先捕捉到第一个点,然后沿着这条线的方向去输入距离)-----空格------输入(3)你在标注的时候那些“点”就会被捕捉到大家多多指教!因为我不大会做动画,所以只能用文字说明,忘大家谅解:1.现做一个CAD脚本,会的人跳过(用Windows 文本另存为“.scr”文件)2.脚本编辑输入“SPLINE+空格键+Y坐标+,+X坐标+空格键+Y坐标+,+X坐标……” 以此类推!点输的越密,线条越平滑。

在CAD中进行曲线绘制的方法

在CAD中进行曲线绘制的方法

在CAD中进行曲线绘制的方法在CAD软件中进行曲线绘制是一项非常基础却又重要的功能。

本文将介绍一些常用的绘制曲线的方法和技巧,帮助大家更好地使用CAD软件。

首先,我们需要选择合适的绘制工具。

在CAD软件中,一般有多种绘制曲线的工具可供选择,如直线工具、圆弧工具、样条曲线工具等。

根据实际需求,我们可以选择不同的工具来绘制各种类型的曲线。

第一种曲线绘制方法是使用直线工具。

直线工具可以用来绘制直线段,但也可以用来绘制一些简单的曲线。

首先,我们需要选择直线工具,并确定起点和终点。

然后,在确定起点后,我们可以通过在终点前单击并拖动鼠标来创建一个曲线控制点,进而调整曲线的形状。

最后,我们可以再次单击鼠标来确定终点,这样就完成了曲线的绘制。

第二种曲线绘制方法是使用圆弧工具。

圆弧工具可以用来绘制圆弧和弧段。

首先,我们需要选择圆弧工具,并确定圆心和起始点。

然后,通过拖动鼠标来确定圆弧的半径和角度。

最后,我们可以再次单击鼠标来确定终点,这样就完成了圆弧的绘制。

第三种曲线绘制方法是使用样条曲线工具。

样条曲线工具可以用来绘制复杂的曲线。

首先,我们需要选择样条曲线工具,并确定起点。

然后,通过在绘制路径上单击并拖动鼠标来创建曲线控制点,从而调整曲线的形状。

我们可以使用多个控制点来创建复杂的曲线。

最后,我们可以再次单击鼠标来确定终点,这样就完成了样条曲线的绘制。

除了上述的基本绘制方法外,还有一些常用的曲线绘制技巧。

例如,我们可以使用绘制连接工具来将多个曲线连接在一起,形成一个整体。

我们还可以通过调整曲线的节点来改变曲线的形状。

另外,我们可以使用修剪和延伸工具来对曲线进行修剪和延伸操作,以满足实际需求。

在进行曲线绘制时,我们还需注意一些绘图原则。

首先,我们应该保持绘图的准确性和精度,避免出现绘图误差。

其次,我们应该根据实际需求来选择合适的绘制工具和技巧。

最后,我们应该进行适当的编辑和修改,以达到理想的曲线效果。

只有掌握了这些技巧和原则,我们才能更好地进行CAD中的曲线绘制。

AUTO CAD环境下缓和曲线绘制方法的研究

AUTO CAD环境下缓和曲线绘制方法的研究
[ "] [ L] 的解算 、 缓和曲线弓形面积计 算 等 内容, 而 这些
=
引言
+,-.=*%P 公 司推出 的 +,-./+0 软 件 具有 处 理 图
内容数值解的获 取 有 时 较 为 繁 琐, 需借助于专用数 学模型和据此编写的计算机软件才能实现。如果我 们找到了在 /+0 上精确表 示缓和 曲线 的方法, 则等 于开辟了一条不依赖于缓和曲线有关参数模型来进 行数据处理的新方法。因此, 研究缓 和曲线 在 +,-.H /+0 上的绘制方法具有重要的应用价值。
则切向角 ! 可由 式中, ’ $# ! ’ # # ’ $ 。因 & ! ! ’& %, 下式求得:
%
! !
!’ & %

(()
将 (%) 式代入 (() 式, 并顾及曲线起点 $ 在线路坐标 则缓和曲线上任意点 & 的切线 系中的方位角为"$ , 方位角计算通用模型为: ( ’ $ % $ (% ( ) " ! "$ " 式中 ( ! ())
方便实现, 其实对 应 于 我 们 用 数 值 或 数 学 模 型 方 法 建立的缓和曲 线 和 其 平 行 线 的 参 数 方 程 边桩坐标的计算
[M, !]
、 线路中
、 缓和曲线与其它曲线交点 坐标
作者简介: 李 全 信, 男, 教 授 级 高 级 工 程 师, 主 要 从 事 N<> JKLM 年 生,
{
) ! ) $ $ + *+, "$ 1 , ,-. "$
(2)
-..7 年第 ! 期

在CAD中如何绘制曲线

在CAD中如何绘制曲线

在CAD中如何绘制曲线CAD(计算机辅助设计)软件是一种广泛用于工程绘图和设计的工具。

对于许多人来说,学习如何使用CAD软件绘制曲线可能会有一定的困难,但实际上,只要掌握一些基本的技巧和功能,绘制曲线在CAD中并不难。

首先,打开CAD软件并创建一个新的绘图文件。

在绘制曲线之前,我们需要了解几种不同的曲线绘制方法。

1. 绘制直线段:在CAD中,可以使用"直线"工具来绘制直线段。

选择该工具后,点击绘图界面上的起点,然后通过点击接下来的点来定义直线的方向和长度。

2. 绘制圆弧:圆弧是由一段圆周所组成的曲线。

使用"圆弧"工具,在绘图界面上选择圆弧的起点和终点,然后通过拖动鼠标来定义圆弧的半径和弧度。

3. 绘制椭圆弧:椭圆弧是由一段椭圆的圆周所组成的曲线。

使用"椭圆弧"工具,选择椭圆弧的起点和终点,然后拖动鼠标来定义椭圆弧的半径和弧度。

4. 绘制样条曲线:样条曲线是由多个点所连接而成的平滑曲线。

使用"样条曲线"工具,在绘图界面上选择曲线上的点,然后通过调整这些点的位置和角度来定义样条曲线的形状。

现在,让我们使用这些方法来绘制一些常见的曲线。

首先,我们将使用"直线"工具绘制一条直线段。

选择该工具后,点击绘图界面上的起点,然后点击接下来的点来定义直线的方向和长度。

重复这个过程来绘制更多的直线段,以便创建一条复杂的曲线。

接下来,让我们使用"圆弧"工具来绘制一个圆弧。

选择该工具后,在绘图界面上选择圆弧的起点和终点,然后通过拖动鼠标来定义圆弧的半径和弧度。

可以通过调整起点和终点之间的距离来改变圆弧的弧度。

然后,我们可以使用"椭圆弧"工具来绘制一个椭圆弧。

选择该工具后,选择椭圆弧的起点和终点,然后通过拖动鼠标来定义椭圆弧的半径和弧度。

同样,通过调整起点和终点之间的距离来改变椭圆弧的形状。

cad画缓和曲线方法

cad画缓和曲线方法

在AutoCAD中缓和曲线的几种画法2011-06-25 20:32在AutoCAD中画缓和曲线比较困难,目前常用的画法有AutoLISP程序法(需要已知曲线要素)、坐标脚本法(需事先计算好各特征点及其他点为的坐标)、曲线命令法(需事先准备各特征点坐标),现分别介绍如下:画法一:缓和曲线AutoLISP 应用程序一、制作缓和曲线AutoLISP 应用程序复制AutoLISP程序源代码,打开“记事本”,粘贴进去后,另存为文件名“缓和曲线.LSP”,保存类型为“所有文件”(AutoLISP程序源代码见附件)二、加载缓和曲线AutoLISP应用程序在命令行输入“appload”打开自动加载对话框。

在对话框的“查找范围”里找到“缓和曲线.LSP”的那个程序,选中后,点击【加载】,显示“已成功加载缓和曲线.LSP”后,关闭对话框,ok你那个程序自动启动加载了。

三、在CAD中画出切线长四、运行程序在命令行中输入hh回车五、选择两条切线,然后输入曲线半径如:2204.5回车六、输入缓和曲线长,如270,绘图完成!画法二:坐标脚本法1.现做一个CAD脚本,会的人跳过(用Windows 文本另存为“.scr”文件)2.脚本编辑输入“SPLINE+空格键+Y坐标+,+X坐标+空格键+Y坐标+,+X坐标……” 以此类推!点输的越密,线条越平滑。

也可以用EXCEL算出各个点的坐标后粘贴进去,然后按照“SPLINE+空格键+Y坐标+,+X坐标+空格键+Y坐标+,+X坐标……”格式编辑。

3.进入CAD,运行脚本,就行了!注意:你可能输入了100个点,而出现的确只有几个点,这个很正常,你把图像删除了,多运行几次就行,一般不超过4次。

画法三:使用真样条曲线命令举例如下:输入导线:pline命令绘制1、2、3各点,其对应坐标如下x1=213.7748 y1=92.1117x2=313.7748 y2=92.1117x3=399.6787 y3=143.3026绘制通过ZH、HZ、QZ、HY和YH各点的与路线导线相切的含缓和曲线的平曲线。

CAD绘制曲线的方法与技巧

CAD绘制曲线的方法与技巧

CAD绘制曲线的方法与技巧CAD(Computer-Aided Design,计算机辅助设计)软件是现代工程设计中不可或缺的工具之一。

在CAD软件中,绘制曲线是常见且重要的任务。

本文将介绍CAD绘制曲线的方法与技巧,帮助读者更好地掌握这一技能。

首先,我们来了解几种常见的CAD软件中绘制曲线的方法。

1. 画弧(Arc):画弧是绘制曲线最常用的方法之一。

在CAD软件中,选择“画弧”工具,然后选择起始点和终止点,再选择弧的半径或者通过指定圆心和起始点来确定圆弧的形状。

这种方法适用于绘制圆弧、弧线等各种曲线形状。

2. 画样条曲线(Spline):画样条曲线是一种更灵活的曲线绘制方法。

在CAD软件中,选择“画样条曲线”工具,然后选择曲线上的控制点,CAD软件会自动生成曲线,通过调整控制点的位置来改变曲线的形状。

样条曲线适用于绘制自然曲线,如波浪线、弯曲的线条等。

3. 参数方程绘制曲线:一些CAD软件支持通过输入曲线的参数方程来绘制曲线。

在CAD软件中,选择“参数方程”工具,然后输入曲线的参数方程,软件会自动绘制曲线。

这种方法适用于绘制复杂的曲线,如椭圆、双曲线等。

除了以上几种基本的绘制方法外,还有一些绘制曲线的技巧可以帮助提高效率和精度。

1. 使用捕捉功能:CAD软件通常提供了各种捕捉功能,如吸附点、吸附线、吸附圆、吸附曲线等。

在绘制曲线时,可以使用这些捕捉功能来吸附到其他图形元素的节点或边界,帮助保持曲线的对齐和精确度。

2. 使用草图工具:CAD软件通常提供了一些草图工具,如跟随模式、自由草图等。

在绘制曲线时,可以使用这些草图工具来辅助手绘曲线,使曲线更加自然且具有艺术感。

3. 使用曲线编辑工具:CAD软件通常提供了一些曲线编辑工具,如剪切、平滑、过滤等。

在绘制曲线后,可以使用这些编辑工具来微调曲线的形状和细节,使曲线更加理想和符合设计要求。

4. 使用曲线变换功能:CAD软件通常提供了一些曲线变换功能,如拉伸、扩展、旋转等。

CAD曲线平滑与调整技巧

CAD曲线平滑与调整技巧

CAD曲线平滑与调整技巧CAD软件是一种常用的工程设计软件,也是许多工程师和设计师必备的工具。

其中一个重要的功能就是能够创建和编辑曲线。

在CAD软件中,曲线的平滑与调整是一个非常关键的技巧,它能够使设计更加精确和美观。

下面,我们将介绍一些CAD曲线平滑与调整的技巧。

第一种技巧是使用Bezier曲线进行调整。

Bezier曲线是一种常用的数学曲线,它可以用来描述平滑的曲线形状。

在CAD软件中,我们可以使用Bezier曲线工具创建和编辑曲线。

通过调整Bezier曲线的控制点,我们可以改变曲线的形状和曲率。

具体操作步骤如下:1. 选择Bezier曲线工具,并点击绘制曲线的起点。

2. 点击鼠标左键,并拖动鼠标以确定曲线的方向和曲率。

3. 释放鼠标左键,并点击鼠标左键以确定曲线的终点。

4. 接下来,我们可以调整Bezier曲线的控制点来改变曲线的形状。

选中曲线上的控制点,然后拖动它们以实现平滑的曲线调整。

第二种技巧是使用曲线平滑工具。

CAD软件通常都提供了曲线平滑工具,它能够帮助我们自动平滑曲线的形状。

具体操作步骤如下:1. 选择曲线平滑工具,并点击要平滑的曲线。

2. 根据软件的提示,在弹出的对话框中输入平滑的参数。

通常,参数值越大,曲线的平滑度就越高。

3. 点击确认按钮以应用平滑效果。

第三种技巧是使用节点编辑工具进行曲线的调整。

节点编辑工具可以帮助我们精确地调整曲线的形状和位置。

具体操作步骤如下:1. 选择节点编辑工具,并点击要调整的曲线节点。

2. 拖动节点以改变曲线的形状和位置。

3. 如果需要调整曲线的曲率,可以选择曲线上的控制点,并拖动它们以实现所需的曲率。

最后,我们还可以使用CAD软件提供的曲线修剪和延伸工具对曲线进行调整。

曲线修剪工具可以帮助我们去除曲线上不需要的部分,而曲线延伸工具则可以在曲线上增加额外的部分。

具体操作步骤如下:1. 选择曲线修剪工具或曲线延伸工具。

2. 按照软件的提示,选择要修剪或延伸的曲线区域。

CAD设计中常用的曲线绘制方法

CAD设计中常用的曲线绘制方法

CAD设计中常用的曲线绘制方法在CAD设计中,曲线的绘制是非常重要的一个环节。

曲线的形状和质量直接影响到设计的效果。

下面介绍一些CAD设计中常用的曲线绘制方法。

1. 样条曲线:样条曲线是一种平滑曲线,它可以通过一系列的控制点来确定。

在CAD软件中,我们可以使用贝塞尔曲线工具来创建样条曲线。

首先,我们需要选择控制点,然后通过调整控制点的位置和曲线的属性,来绘制出所需的曲线形状。

2. 圆弧:圆弧是一种由圆的一部分组成的曲线。

在CAD软件中,我们可以使用圆弧工具来创建圆弧。

首先,我们需要选择圆心和半径,然后通过指定起始角度和结束角度,来绘制出所需的圆弧形状。

3. 椭圆:椭圆是一种由圆的变形构成的曲线。

在CAD软件中,我们可以使用椭圆工具来创建椭圆。

首先,我们需要选择椭圆的中心点和两个半轴长度,然后通过调整属性来绘制出所需的椭圆形状。

4. 螺旋线:螺旋线是一种由半径逐渐增大或减小的曲线。

在CAD软件中,我们可以使用螺旋线工具来创建螺旋线。

首先,我们需要选择螺旋线的起始点和半径,然后通过调整属性来创建所需的螺旋线形状。

5. 多段线:多段线是由多个线段和曲线段组成的曲线。

在CAD软件中,我们可以使用多段线工具来创建多段线。

首先,我们需要选择线段和曲线段的起始点和终点,然后通过调整属性来绘制出所需的多段线形状。

以上是CAD设计中常用的曲线绘制方法。

通过合理使用这些方法,我们可以创建出各种形状各异的曲线,满足不同设计需求。

在实际操作中,我们还可以结合不同的工具和技巧,进一步提高曲线的绘制效果和质量。

希望这些方法对CAD设计的学习和实践有所帮助。

CAD曲线平滑与修剪方法

CAD曲线平滑与修剪方法

CAD曲线平滑与修剪方法在使用CAD软件进行设计和绘图时,曲线的平滑和修剪是非常重要的技巧。

平滑和修剪曲线可以使设计更加精确和流畅。

本文将介绍CAD软件中常用的曲线平滑和修剪方法,希望对读者有所帮助。

一、CAD软件中的曲线平滑方法1. 贝塞尔曲线平滑贝塞尔曲线是一种常用的曲线绘制方法。

在CAD软件中,可以使用贝塞尔曲线工具创建平滑的曲线。

选择贝塞尔曲线工具后,通过点击鼠标来确定曲线的控制点,通过调整控制点的位置和曲线的切线,可以获得需要的平滑曲线。

2. 控制点平移在CAD软件中,还可以通过调整曲线上的控制点的位置来实现曲线的平滑。

选中曲线上的控制点,并将其平移一定距离,可以改变曲线的形状和平滑度。

这种方法需要一定的经验和技巧,需要不断调整控制点的位置,才能获得理想的平滑曲线。

3. 曲线平滑命令CAD软件通常都提供了曲线平滑命令,使用该命令可以对选定的曲线进行平滑处理。

在CAD软件中,可以通过菜单栏或命令行输入相应的指令来调用曲线平滑命令。

根据软件的不同,平滑命令的具体操作步骤可能会有所不同,需要根据软件的帮助文档进行操作。

二、CAD软件中的曲线修剪方法1. 切割命令在CAD软件中,可以使用切割命令来修剪曲线。

选择切割命令后,通过指定切割点或切割线,将曲线进行分割或修剪。

该方法适用于需要修剪曲线的部分与其他部分分开的情况。

2. 融合命令CAD软件中的融合命令可以将两条或多条曲线进行合并。

在修剪曲线时,可以选择需要融合的曲线,并通过融合命令将它们合并为一条曲线。

该方法适用于需要修剪曲线的部分与其他部分合并的情况。

3. 扩展命令扩展命令是一种对曲线进行修剪的常用方法。

选择扩展命令后,通过指定修剪曲线的端点和扩展距离,可以对曲线进行修剪。

该方法适用于需要根据一定距离修剪曲线的情况。

以上介绍了CAD软件中常用的曲线平滑和修剪方法。

在进行曲线设计和绘图时,平滑和修剪曲线是非常重要的技巧,可以提高设计的准确性和美观度。

CAD绘制缓和曲线说明

CAD绘制缓和曲线说明

详细介绍说明:基本线形曲线主要分为圆曲线和缓和曲线。

圆曲线是具有一定曲率半径的圆弧;缓和曲线是连接直线与圆曲线的过渡曲线,其曲率半径由无穷大渐变为圆曲线半径。

由于经常需要精准的绘出线路的圆曲线和缓和曲线,以便准确的计算出线路中心至地面上某点的距离,通过学习和研究运用AutoCAD集成的Visual Basic编写出一个绘制曲线的辅助程序,供大家学习参考。

基础:AutoCAD辅助程序qxhz是通过辛普森公式编写,该公式则是利用区间二等分的三个点来进行积分插值。

需提供已知数据(起点坐标、方位角、长度、间距、起止点半径),方法近似于大家所称的线元法。

准备:1、已知数据(曲线要素):交点坐标:X=3373351.385、Y=458628.379;交点桩号:JDK=9557.84;曲线半径:R=2040;曲线转角:az=-14°18ˊ10″;缓和曲线:ls1=260、ls2=280;计算方位角:F=152°09ˊ41.68″2、hzqx.dvb辅助程序(下载地址附后)通过公式:ZHX=JDX-T1*Cos(F)、ZHY=JDY-T1*Sin(F)求得直缓坐标:ZHX=3373693.597、ZHY=458447.6578输入示例:起点坐标:458447.6578,3373693.597(数学坐标与测量坐标相反)、起点方位角:152d09'41.68"(格式d'")、起点半径:0(属于直线接缓和曲线半径无穷大)、止点半径:-2040(缓和曲线接圆曲线方向为左转)、长度:260、间距:1步骤:1、打开AutoCAD在命令行输入:appload回车键。

2、弹出“加载/卸载应用程序"对话框。

3、选择qxhz.dvb→点击“加载"→点击“关闭"→出现以下对话框。

4、在命令行中输入:qxhz回车键会提示:4.1请获取(或输入)曲线起点坐标,在这里可以用鼠标指针直接点击图中的位置或者手动输入坐标,输入:458447.6578,3373693.597(数学坐标与测量坐标相反)4.2、请获取(或输入)曲线起点方位角,输入:152d09'41.68"(字符为英文)4.3、请输入曲线长度(m):260(为第一段缓和曲线长度)4.4、请输入曲线起点半径R(左转为负,右转为正,直线为0):0(属于直线接缓和曲线,由于直线半径无穷大则输入0)4.5、请输入曲线止点半径R(左转为负,右转为正,直线为0):-2040(缓和曲线接圆曲线,输入曲线半径-2040,由于是左转则为负)4.6、请输入计算间距(m):1(计算步长值,每1m计算一个点)5、提示:曲线绘制完毕(说明已经成功绘制)5.1在命令行中输入Z回车键。

AutoCAD Civil 3D 中缓和曲线的定义-16.12.19

AutoCAD Civil 3D 中缓和曲线的定义-16.12.19

I
第1章
AutoCAD Civil 3D 中缓和曲线的定义
第 1 章 AutoCAD Civil 3D 中缓和曲线的定义
本文对 AutoCAD Civil 3D 中缓和曲线的定义进行了整理。 原英文网页如下: https:///support/autocad-civil-3d/learn-explore/caas/Cl oudHelp/cloudhelp/2016/ENU/Civil3D-UserGuide/files/GUID-DD7C0EA1-8465-4 5BA-9A39-FC05106FD822-htm.html 原中文网页如下: /CIV3D/2013/CHS/index.html?url=filesCUG/GUID-5 81518E0-DE06-482E-840C-B997C3590489.htm,topicNumber=CUGd30e185916
2 2 2 9 L 2 L X L 1 L 1 0.0226689447 48 2 R R
y 坐标的最大值为
2 X2 1 1 X Y 2 0.14867881635766 R 4 R
参数说明 .............................................................................................................1 回旋线 .................................................................................................................2 2.1 公式 ................................................................................................................3 Bloss 螺线 ..........................................................................................................3 正弦一波型缓和曲线 .........................................................................................4 正弦半波型缓和曲线 .........................................................................................4 三次抛物线 .........................................................................................................5 6.1 7.1 8.1 8.2 8.3 最小曲率半径 ................................................................................................5 为什么这么定义 ............................................................................................6 简单型 ............................................................................................................6 复合型 ............................................................................................................7 k(l) ..................................................................................................................7 三次缓和曲线(JP) .........................................................................................5 四次两段曲线(Schramm螺线) ...........................................................................6

缓和曲线CAD画法

缓和曲线CAD画法

在AutoCAD中缓和曲线的几种画法2011-06-25 20:32在AutoCAD中画缓和曲线比较困难,目前常用的画法有AutoLISP程序法(需要已知曲线要素)、坐标脚本法(需事先计算好各特征点及其他点为的坐标)、曲线命令法(需事先准备各特征点坐标),现分别介绍如下:画法一:缓和曲线AutoLISP 使用程序一、制作缓和曲线AutoLISP 使用程序复制AutoLISP程序源代码,打开“记事本”,粘贴进去后,另存为文件名“缓和曲线.LSP”,保存类型为“所有文件”(AutoLISP程序源代码见附件)二、加载缓和曲线AutoLISP使用程序在命令行输入“appload”打开自动加载对话框。

在对话框的“查找范围”里找到“缓和曲线.LSP”的那个程序,选中后,点击【加载】,显示“已成功加载缓和曲线.LSP”后,关闭对话框,ok你那个程序自动启动加载了。

三、在CAD中画出切线长四、运行程序在命令行中输入hh回车五、选择两条切线,然后输入曲线半径如:2204.5回车六、输入缓和曲线长,如270,绘图完成!画法二:坐标脚本法1.现做一个CAD脚本,会的人跳过(用Windows 文本另存为“.scr”文件)2.脚本编辑输入“SPLINE+空格键+Y坐标+,+X坐标+空格键+Y坐标+,+X坐标……” 以此类推!点输的越密,线条越平滑。

也可以用EXCEL算出各个点的坐标后粘贴进去,然后按照“SPLINE+空格键+Y坐标+,+X坐标+空格键+Y坐标+,+X坐标……”格式编辑。

3.进入CAD,运行脚本,就行了!注意:你可能输入了100个点,而出现的确只有几个点,这个很正常,你把图像删除了,多运行几次就行,一般不超过4次。

画法三:使用真样条曲线命令举例如下:输入导线:pline命令绘制1、2、3各点,其对应坐标如下x1=213.7748 y1=92.1117x2=313.7748 y2=92.1117x3=399.6787 y3=143.3026绘制通过ZH、HZ、QZ、HY和YH各点的和路线导线相切的含缓和曲线的平曲线。

在CAD中画缓及曲线过程

在CAD中画缓及曲线过程

一、在CAD中画出切线长二、运行程序:在命令行中输入hh回车三、选择两条切线,然后输入曲线半径如:2204.5回车四、输入缓和曲线长,如270,绘图完成!如图基本命令集(设计中心“Ctrl+2”)修改特性“Ctrl+1”)(属性匹配)(文字样式)(设置颜色)(图层操作)ETYPE(线形)(线形比例)(线宽)(图形单位)(属性定义)(编辑属性)(边界创建,包括创建闭合多段线和面域)(对齐)(退出)(输出其它格式文件)(输入文件)(自定义CAD设置)PLOT(打印)(清除垃圾)(重新生成)(重命名)(捕捉栅格)(设置极轴追踪)(设置捕捉模式)(打印预览)(工具栏)(命名视图)(面积)(距离)(显示图形数据信息)、绘图命令:(点)(直线)(射线)(多段线)(多线)(样条曲线)(正多边形)(矩形)圆)圆弧)(圆环)(椭圆)(面域)(多行文本)(多行文本)(块定义)(插入块)(定义块文件)(等分)(填充)、修改命令:(复制)(镜像)(阵列)(偏移)(旋转)(移动)键*ERASE(删除)(分解)(修剪)(延伸)H(拉伸)(直线拉长)(比例缩放)(打断)倒角)(倒圆角)(多段线编辑)(修改文本)、视窗缩放:(平移)+空格+空格,*实时缩放局部放大返回上一视图+E,*显示全图、尺寸标注:(直线标注)IGNED(对齐标注)(半径标注)(直径标注)(角度标注)(中心标注)(点标注)(标注形位公差)(快速引出标注)(基线标注)(连续标注)(标注样式)IMEDIT(编辑标注)替换标注系统变量) (二)常用CTRL快捷键【CTRL】+1*PROPERTIES(修改特性) 【CTRL】+2*ADCENTER(设计中心)【CTRL】+O *OPEN(打开文件)【CTRL】+N、M *NEW(新建文件)【CTRL】+P *PRINT(打印文件)【CTRL】+S *SAVE(保存文件)【CTRL】+Z *UNDO(放弃)【CTRL】+X *CUTCLIP(剪切)【CTRL】+C *COPYCLIP(复制)【CTRL】+V *PASTECLIP(粘贴)【CTRL】+B *SNAP(栅格捕捉)【CTRL】+F *OSNAP(对象捕捉)【CTRL】+G *GRID(栅格)【CTRL】+L *ORTHO(正交)【CTRL】+W *(对象追踪)【CTRL】+U *(极轴)(三)常用功能键【F1】*HELP(帮助)【F2】*(文本窗口)【F3】*OSNAP(对象捕捉)【F7】*GRIP(栅格)【F8】*ORTHO(正交)第17章布图、打印与图纸管理绘制好的建筑图样需要打印出来进行报批、存档、交流、指导施工,所以绘图的最后一步是打印图形。

缓和曲线CAD画法

缓和曲线CAD画法

在 AutoCAD中和缓曲线的几种画法2011-06-25 20:32在AutoCAD中画缓和曲线比较困难,当前常用的画法有AutoLISP 程序法(需要已知曲线因素)、坐标脚本法(需预先计算好各特点点及其余点为的坐标)、曲线命令法(需预先准备各特点点坐标),现分别介绍以下:画法一:和缓曲线 AutoLISP应用程序一、制作和缓曲线AutoLISP 应用程序复制 AutoLISP 程序源代码,翻开“记事本”,粘贴进去后,另存为文件名“和缓曲线 .LSP”,保留种类为“全部文件”(AutoLISP程序源代码见附件)二、加载和缓曲线AutoLISP应用程序在命令行输入“ appload”翻开自动加载对话框。

在对话框的“查找范围”里找到“和缓曲线 .LSP”的那个程序,选中后,点击【加载】,显示“已成功加载和缓曲线 .LSP”后,封闭对话框, ok 你那个程序自动启动加载了。

三、在 CAD 中画出切线长四、运转程序在命令行中输入hh 回车五、选择两条切线,而后输入曲线半径如: 2204.5回车六、输入缓和曲线长,如270,绘图完成!画法二:坐标脚本法1.做一个 CAD 脚本,会的人跳(用Windows 文本另存“ .scr文”件)2.脚本入“ SPLINE+空格 +Y 坐 +, +X 坐 +空格 +Y 坐 +, +X 坐⋯⋯”以此推!点的越密,条越光滑。

也能够用 EXCEL 算出各个点的坐后粘去,而后依据“SPLINE+空格 +Y 坐 +,+X 坐 +空格 +Y 坐 +,+X 坐⋯⋯”格式。

3.入 CAD ,运转脚本,就行了!注意:你可能入了 100个点,而出确实只有几个点,个很正常,你把像除了,多运转几次就行,一般不超 4次。

画法三:使用真样条曲线命令比以下:入: pline 命令制 1、 2、 3各点,其坐以下x1=213.7748 y1=92.1117x2=313.7748 y2=92.1117x3=399.6787 y3=143.3026制通 ZH、HZ、 QZ 、HY 和 YH 各点的与路相切的含和曲的平曲。

CAD里面如何绘制缓和曲线

CAD里面如何绘制缓和曲线

CAD里面如何绘制缓和曲线
缓和曲线是曲线的一种,我们在CAD中无法直接绘制,没有工具和命令,所以需要下载一个工具。

那么大家知道CAD里面如何绘制缓和曲线吗?下面是店铺整理的CAD里面如何绘制缓和曲线的方法,希望能帮到大家!
CAD里面绘制缓和曲线的方法
下载一个“缓和曲线.LSP”工具。

解压下载好的压缩文件,复制解压好的“缓和曲线.LSP”。

把它拷贝到你的CAD安装包中的support文件中。

加载程序
打开cad,输入加载命令“ap”。

进入程序加载框,找到CAD安装的位置和support文件夹。

找到“缓和曲线.LSP”工具,选中它,点击加载。

然后再点击关闭。

绘制曲线
程序加载完成后,就可以绘制缓和曲线了。

根据提供的信息,作出曲线的两条切线。

输入绘制缓和曲线的命令“hh”,回车。

选择第一条直线,点击第一条切线上任意即可。

选中第二条直线,点击第二条切线任意一点即可。

根据提供的曲线要素,输入曲线的半径,例如本次输入为半径500,回车。

根据提供的曲线要素,输入缓和曲线的长度,例如本次输入的长度为20,回车。

完成以上步骤后,系统进入自动绘图,稍等片刻,完成绘图。

曲线要素标注
指定曲线要素标注文字的位置。

调整字体的大小,细化它的位置,完成绘制。

CAD程序中缓和曲线精确绘制方法实例分析及应用

CAD程序中缓和曲线精确绘制方法实例分析及应用

CAD程序中缓和曲线精确绘制方法实例分析及其应用公路工程及铁路工程平面线形中,主要线形类型为直线、圆曲线、缓和曲线。

随着电脑在工程施工中的应用,尤其是部分应用程序的使用,使工程施工及其工程平面控制测量、施工放样的计算简单及准确化。

CAD应用程序在工程施工中可进行平面线形及结构体绘制,并利用绘制的图形进行数据查询,以得到想要的数据。

例如,根据设计提供的曲线要素绘制曲线,利用查询功能可得到曲线上任意点的坐标、曲线长并进行里程推算、定位等。

按照CAD应用程序的功能,常用平面线形如直线、圆曲线及其组合形式很容易精确绘制,但对于工程施工及工程测量中常用的缓和曲线,其各种功能均不能达到精度要求,为此,结合缓和曲线支距放样计算公式,以武汉绕城公路东西湖互通工程A匝道桥的一段缓和曲线为例,对缓和曲线精确绘制进行分析如下:一、缓和曲线要素资料(设计图纸提供)1、主点坐标:起点(ZH)x=5909.978y=5399.449终点(HY)x=5762.809y=5018.179切交点(JD)x=5843.279y=5131.4322、缓和曲线要素值:终点半径(R)550m参数A/R475.584m缓和曲线长(ls)411.236m转角值(α)21-25-12(xx)切线xxT1--276.192(m)T2--138.930(m)弦长408.687m二、缓和曲线绘制步骤注意:由于CAD程序中世界坐标系和图纸中采用的大地坐标系X、Y轴方向不一置,故在输入点位坐标时应将X、Y坐标值互换,例如ZH点的坐标输入值应为(5399.449,5909.978)等.1)在世界坐标系下绘制点ZH、JD、HY点,并将其连接成直线;2)建立UCS坐标系:原点为ZH点,X轴为ZH→JD方向;3)根据缓和曲线支距计算公式计算各内插点坐标值并在UCS坐标系下输入; 根据“路桥施工计算手册”,切线支距法计算公式为x=l-l5/(40×R2×ls2)+ l9/(3456×R4×ls4)y=l3/(6×R×ls)-l7/(336×R3×ls3)+ l11/(42240×R5×ls5)其中l—待求点到坐标原点的曲线长;ls—缓和曲线长(411.236m);R—终点曲线半径(550m);则各内插点支距坐标值计算如下:l=20m时,x=20.000y=0.006l=40m时,x=40.000y=0.047l=60m时,x=0.159l=80m时,x= 80.000l=100m时,x= 99.995l=120m时,x= 119.988l=140m时,x= 139.974l=160m时,x= 159.949l=180m时,x= 179.908l=200m时,x= 199.844l=220m时,x= 219.748l=240m时,x= 239.611l=260m时,x=l=280m时,x= 279.160l=300m时,x= 298.815l=320m时,x= 318.364l=340m时,x= 337.786l=360m时,x= 357.056l=380m时,x= 376.146l=400m时,x= 395.025l=411.236m时,x= 405.526y=0.377y=0.737y= 1.273 y= 2.022 y= 3.018 y= 4.296 y= 5.892 y= 7.840 y= 10.175 y= 12.931 y= 16.141 y= 19.839 y=24.058y=28.827y=34.179y=40.141y=46.740y=50.7384)输入以上支距坐标点,并从ZH点开始依次将各内插点用直线段连接起来,直至HY点结束;5)将以上各直线段合并为多段线;6)将多段线通过各内插点进行拟合;7)返回到世界坐标系下,则缓和曲线绘制完成,可利用CAD程序中的查询功能求出缓和曲线上任意点的坐标值.。

CAD绘制曲线的五种技巧

CAD绘制曲线的五种技巧

CAD绘制曲线的五种技巧CAD(Computer-Aided Design)是一种计算机辅助设计技术,广泛应用于工程、建筑和制造等领域。

在使用CAD软件进行绘图时,曲线的绘制是一个非常重要的步骤。

本文将介绍CAD绘制曲线的五种技巧,帮助读者更加高效地完成曲线绘制任务。

一、使用基础绘图工具CAD软件通常提供了一系列的基础绘图工具,如直线、圆弧、多段线等,这些工具可以满足大部分曲线的绘制需求。

通过熟练掌握这些基础工具的使用方法,可以快速地绘制出各种曲线图形。

例如,使用直线工具可以绘制出线段,使用圆弧工具可以绘制出曲线弧段。

二、控制控制点在CAD软件中,我们可以通过控制控制点的位置和属性来调整曲线的形状。

对于贝塞尔曲线来说,控制点决定了曲线的控制线和曲率。

通过调整控制点的位置,可以改变曲线的形状。

此外,还可以通过调整控制点的属性,如权值和约束等,来进一步控制曲线的特性。

三、使用样条曲线样条曲线是CAD软件中一种常见的曲线类型,其特点是平滑且具有连续性。

通过选择适当的控制点,CAD软件可以生成样条曲线,用于绘制复杂的曲线图形。

在使用样条曲线时,可以通过增加或删除控制点,来调整曲线的形状。

此外,还可以使用插值功能,通过选取曲线上的若干点,自动生成样条曲线。

四、利用辅助工具CAD软件中通常还提供了一些辅助工具,如偏移、修剪、延伸等,这些工具可以帮助我们更加高效地绘制曲线。

比如,使用偏移工具可以在原有曲线的基础上生成一条平行的曲线,使用修剪工具可以删除曲线上的不需要部分,使用延伸工具可以延长曲线的端点。

通过合理运用这些辅助工具,可以更加灵活地调整和编辑曲线。

五、使用CAD插件和脚本除了CAD软件本身提供的功能,还可以使用各类CAD插件和脚本来扩展CAD绘图的功能。

比如,有些插件可以通过简单的操作,快速生成复杂的曲线图形;有些脚本可以自动化完成一些重复性工作,提高绘图的效率。

通过了解和使用这些插件和脚本,我们可以更加便捷地实现曲线的绘制和编辑。

cad画缓和曲线lisp程序(1)

cad画缓和曲线lisp程序(1)

CAD中画缓和曲线,首先复制本文☆后面的源程序保存至cad安装目录的SUPPORT文件夹,保存类型为.lsp 可以随便复制一个SUPPORT文件夹内的lsp文件,然后替换本文的程序。

打开CAD后,输入appload回车,找到你保存的缓和曲线lsp程序,点击加载,然后就可以画缓和曲线了。

首先,要画出缓和曲线的两条直线,然后输入HH回车,按提示完成缓和曲线。

注:本程序,缓和曲线段拟合长度为,如需更改拟合长度,将程序的第8行(repeat (FIX(/ Ls )及9行(setq l (+ l (/ Ls (FIX(/ Ls )))中的修改即可。

☆;;多义线摹拟缓和曲线。

;;输入起止直线、半径、缓和曲线长或设计车速。

;;命令:HH(defun com_p()(setq l 0)(command "ucs" "o" (list (- 0 x1) 0 0))(command "pline" (list 0 0 0) "w" "0" ""(repeat (FIX(/ Ls )(setq l (+ l (/ Ls (FIX(/ Ls )))x (+ (- l (/ (* l l l l l) 40 C C)) (/ (* l l l l l l l l l) 3456 C C C C))y (* id__ (+ (- (/ (* l l l) 6 C) (/ (* l l l l l l l) 336 C C C)) (/ (* l l l l l l l l l l l) 42240 C C C C C))));setq(command (list x y 0)));repaet);command(setq pt5 (trans (list x y 0) 1 0)));com_p(defun ll_v()(setq V (getreal "\nGive Velocity:")Ls1 (* VLs2 (/ (* V V V) R)Ls (max Ls1 Ls2 (/ R 9))Ls (* (fix (/ Ls 10)));setq(if (> Ls R) (setq Ls R))(ll_d));ll_v(defun ll_d()(setq os (getvar "osmode"))(setvar "osmode" 0)(setq C (* Ls R)q (- (+ (- (/ Ls 2) (/ (* Ls Ls Ls) 240 R R)) (/ (* Ls Ls Ls Ls Ls) 34560 R R R R)) (/ (* Ls Ls Ls Ls Ls Ls Ls) 8386560 R R R R R R)) pt1 (cdr (assoc 10 (entget (car p1))))pt2 (cdr (assoc 11 (entget (car p1))))pt10(polar pt1 (angle pt1 pt2) (/ (distance pt1 pt2) 2))pt3 (cdr (assoc 10 (entget (car p2))))pt4 (cdr (assoc 11 (entget (car p2))))pt20(polar pt3 (angle pt3 pt4) (/ (distance pt3 pt4) 2))p (+ (- (/ (* Ls Ls) 24 R) (/ (* Ls Ls Ls Ls) 2688 R R R)) (/ (* Ls Ls Ls Ls Ls Ls) 506880 R R R R R))jd (inters pt1 pt2 pt3 pt4 nil)alf1(angle pt10 jd)alf2(angle pt20 jd)alf (- (angle jd pt20) alf1));setq(if (or (> alf pi) (and (< alf 0) (> alf (- 0 pi))))(progn(setq id__ -1)(if (> alf pi) (setq alf (- (+ pi pi) alf)) (setq alf (abs alf))));progn(progn(setq id__ 1)(if (<= alf (- 0 pi)) (setq alf (+ pi pi alf))));progn);if(setq x0 (/ (* (+ p R) (sin(/ alf )) (cos(/ alf ))x1 (+ x0 q)Cl (+ (* alf R) Ls)E (- (/ (+ R p) (cos(/ alf 2))) R));setq(command "ucs" "o" jd)(command "ucs" "z" (/ (* 180 alf1) pi))(com_p) (setq pt6 pt5)(setq ppt1 (list x1 0 0))(command "ucs" "")(command "ucs" "o" jd)(command "ucs" "z" (/ (* 180 alf2) pi))(setq id__ (- 0 id__)) (com_p)(setq ppt2 (list x1 0 0))(command "ucs" "")(if (> (abs(distance jd pt1)) (abs(distance jd pt2)))(setq ptt1 pt1)(setq ptt1 pt2));if(setq ptt2 (polar jd alf1 (- 0 x1)))(thh p1 ptt1 10)(thh p1 ptt2 11)(if (> (abs(distance jd pt3)) (abs(distance jd pt4)))(setq ptt3 pt3)(setq ptt3 pt4));if(setq ptt4 (polar jd alf2 (- 0 x1)))(thh p2 ptt3 10)(thh p2 ptt4 11)(if (= id__ 1) (command "arc" pt5 "e" pt6 "r" R) (command "arc" pt6 "e" pt5 "r" R))(setq alfd (angf alf))(setvar "osmode" os)(command "cmdecho" "1")(command "text" pause pause "" (strcat "偏角=" alfd))(command "cmdecho" "0")(command "text" "" (strcat "半径=" (rtos R 2 2)))(command "text" "" (strcat "切线长=" (rtos x1 2 2)))(command "text" "" (strcat "曲线长=" (rtos Cl 2 2)))(command "text" "" (strcat "外距=" (rtos E 2 2)))(command "text" "" (strcat "缓曲长=" (rtos Ls 2 2))));ll_d(defun angf (alf)(setq alff (angtos alf 1 4)n 1kk (strlen alff))(repeat kk(setq alfn (substr alff n 1))(if (= alfn "d")(setq nn n));if(setq n (+ n 1)));repeat(strcat (substr alff 1 (- nn 1)) "%%" (substr alff nn)));angf(defun c:hh(/ p1 p2 pt1 pt2 pt3 pt4 pt5 pt6 pt10 pt20 id__ R V Ls E p3r1 x y l x0 x1 C jd alf alf1 alf2 q p Cl Ls1 Ls2)(command "ucs" "")(setq p1 nil p2 nil)(while (= p1 nil) (setq p1 (entsel "\n拾取第一条直线:")))(redraw (car p1) 3)(while (= p2 nil) (setq p2 (entsel "\n拾取第二条直线:")))(redraw (car p2) 3)(initget 1)(setq R (getdist "\n请输入圆曲线半径R: "))(initget 1 "Ls V")(setq p3 (getdist "\n输入缓和曲线长度(Ls)或[设计速度(V)]: ")) (if (= p3 "V") (ll_v) (progn (setq ls p3) (ll_d)))(princ));eline(defun thh(len pt h)(setq en_data (entget (car len))old_data (assoc h en_data)new_data (cons h pt)en (subst new_data old_data en_data));setq(entmod en));thh。

CAD曲线画法

CAD曲线画法

引用如何在CAD中画缓和曲线一、在CAD中画出切线长二、运行程序:在命令行中输入hh回车三、选择两条切线,然后输入曲线半径如:2204.5回车四、输入缓和曲线长,如270,绘图完成!如图记事本格式内容,新建的lisp语言,在CAD中要先加载;;多义线摹拟缓和曲线。

;;输入起止直线、半径、缓和曲线长或设计车速。

;;命令:HH(defun com_p()(setq l 0)(command "ucs" "o" (list (- 0 x1) 0 0))(command "pline" (list 0 0 0) "w" "0" ""(repeat 1000(setq l (+ l (/ Ls 1000))x (+ (- l (/ (* l l l l l) 40 C C)) (/ (* l l l l l l l l l) 3456 C C C C))y (* id__ (+ (- (/ (* l l l) 6 C) (/ (* l l l l l l l) 336 C C C)) (/ (* l l l l l l l l l l l) 42240 C C C C C))));setq(command (list x y 0)));repaet);command(setq pt5 (trans (list x y 0) 1 0)));com_p(defun ll_v()(setq V (getreal "\nGive Velocity:")Ls1 (* V 0.85)Ls2 (/ (* 0.0357 V V V) R)Ls (max Ls1 Ls2 (/ R 9))Ls (* (fix (/ Ls 10)) 10.0));setq(if (> Ls R) (setq Ls R))(ll_d));ll_v(defun ll_d()(setq os (getvar "osmode"))(setvar "osmode" 0)(setq C (* Ls R)q (- (+ (- (/ Ls 2) (/ (* Ls Ls Ls) 240 R R)) (/ (* Ls Ls Ls Ls Ls) 34560 R R R R)) (/ (* Ls Ls Ls Ls Ls Ls Ls) 8386560 R R R R R R))pt1 (cdr (assoc 10 (entget (car p1))))pt2 (cdr (assoc 11 (entget (car p1))))pt10(polar pt1 (angle pt1 pt2) (/ (distance pt1 pt2) 2))pt3 (cdr (assoc 10 (entget (car p2))))pt4 (cdr (assoc 11 (entget (car p2))))pt20(polar pt3 (angle pt3 pt4) (/ (distance pt3 pt4) 2))p (+ (- (/ (* Ls Ls) 24 R) (/ (* Ls Ls Ls Ls) 2688 R R R)) (/ (* Ls Ls Ls Ls Ls Ls) 506880 R R R R R))jd (inters pt1 pt2 pt3 pt4 nil)alf1(angle pt10 jd)alf2(angle pt20 jd)alf (- (angle jd pt20) alf1));setq(if (or (> alf pi) (and (< alf 0) (> alf (- 0 pi))))(progn(setq id__ -1)(if (> alf pi) (setq alf (- (+ pi pi) alf)) (setq alf (abs alf))) );progn(progn(setq id__ 1)(if (<= alf (- 0 pi)) (setq alf (+ pi pi alf))));progn);if(setq x0 (/ (* (+ p R) (sin(/ alf 2.0))) (cos(/ alf 2.0)))x1 (+ x0 q)Cl (+ (* alf R) Ls)E (- (/ (+ R p) (cos(/ alf 2))) R));setq(command "ucs" "o" jd)(command "ucs" "z" (/ (* 180 alf1) pi))(com_p) (setq pt6 pt5)(setq ppt1 (list x1 0 0))(command "ucs" "")(command "ucs" "o" jd)(command "ucs" "z" (/ (* 180 alf2) pi))(setq id__ (- 0 id__)) (com_p)(setq ppt2 (list x1 0 0))(command "ucs" "")(if (> (abs(distance jd pt1)) (abs(distance jd pt2)))(setq ptt1 pt1)(setq ptt1 pt2));if(setq ptt2 (polar jd alf1 (- 0 x1)))(thh p1 ptt1 10)(thh p1 ptt2 11)(if (> (abs(distance jd pt3)) (abs(distance jd pt4)))(setq ptt3 pt3)(setq ptt3 pt4));if(setq ptt4 (polar jd alf2 (- 0 x1)))(thh p2 ptt3 10)(thh p2 ptt4 11)(if (= id__ 1) (command "arc" pt5 "e" pt6 "r" R) (command "arc" pt6 "e" pt5 "r" R))(setq alfd (angf alf))(setvar "osmode" os)(command "cmdecho" "1")(command "text" pause pause "" (strcat "偏角=" alfd)) (command "cmdecho" "0")(command "text" "" (strcat "半径=" (rtos R 2 2)))(command "text" "" (strcat "切线长=" (rtos x1 2 2)))(command "text" "" (strcat "曲线长=" (rtos Cl 2 2)))(command "text" "" (strcat "外距=" (rtos E 2 2)))(command "text" "" (strcat "缓和曲线长=" (rtos Ls 2 2))));ll_d(defun angf (alf)(setq alff (angtos alf 1 4)n 1kk (strlen alff))(repeat kk(setq alfn (substr alff n 1))(if (= alfn "d")(setq nn n));if(setq n (+ n 1)));repeat(strcat (substr alff 1 (- nn 1)) "%%" (substr alff nn)));angf(defun c:hh(/ p1 p2 pt1 pt2 pt3 pt4 pt5 pt6 pt10 pt20 id__ R V Ls E p3 r1 x y l x0 x1 C jd alf alf1 alf2 q p Cl Ls1 Ls2)(command "ucs" "")(setq p1 nil p2 nil)(while (= p1 nil) (setq p1 (entsel "\n拾取第一条直线:")))(redraw (car p1) 3)(while (= p2 nil) (setq p2 (entsel "\n拾取第二条直线:")))(redraw (car p2) 3)(initget 1)(setq R (getdist "\n请输入弯道半径R: "))(initget 1 "Ls V")(setq p3 (getdist "\n输入缓和曲线长度(Ls)或[设计速度(V)]: "))(if (= p3 "V") (ll_v) (progn (setq ls p3) (ll_d)))(princ));eline(defun thh(len pt h)(setq en_data (entget (car len))old_data (assoc h en_data)new_data (cons h pt)en (subst new_data old_data en_data));setq(entmod en));thh公路设计中的缓和曲线在CAD中绘制时一直是个难题。

相关主题
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

在AutoCAD中缓和曲线的几种画法
在AutoCAD中缓和曲线的几种画法
在AutoCAD中画缓和曲线比较困难,目前常用的画法有AutoLISP程序法(需要已知曲线要素)、坐标脚本法(需事先计算好各特征点及其他点为的坐标)、曲线命令法(需事先准备各特征点坐标),现分别介绍如下:
画法一:缓和曲线AutoLISP 应用程序
一、制作缓和曲线AutoLISP 应用程序
复制AutoLISP程序源代码,打开“记事本”,粘贴进去后,另存为文件名“缓和曲线.LSP”,保存类型为“所有文件”(AutoLISP程序源代码见附件)
二、加载缓和曲线AutoLISP应用程序
在命令行输入“appload”打开自动加载对话框。

在对话框的“查找范围”里找到“缓和曲线.LSP”的那个程序,选中后,点击【加载】,显示“已成功加载缓和曲线.LSP”后,关闭对话框,ok 你那个程序自动启动加载了。

画法二:坐标脚本法
1.现做一个CAD脚本,会的人跳过(用Windows 文本另存为“.scr”文件)
2.脚本编辑输入“SPLINE+空格键+Y坐标+,+X坐标+空格键+Y坐标+,+X坐标……” 以此类推!点输的越密,线条越平滑。

也可以用EXCEL算出各个点的坐标后粘贴进去,然后按照“SPLINE+空格键+Y坐标+,+X坐标+空格键+Y坐标+,+X坐标……”格式编辑。

3.进入CAD,运行脚本,就行了!
注意:你可能输入了100个点,而出现的确只有几个点,这个很正常,你把图像删除了,多运行几次就行,一般不超过4次。

画法三:使用真样条曲线命令
举例如下:
输入导线:pline命令绘制1、2、3各点,其对应坐标如下
x1=213.7748 y1=92.1117
x2=313.7748 y2=92.1117
x3=399.6787 y3=143.3026
绘制通过ZH、HZ、QZ、HY和YH各点的与路线导线相切的含缓和曲线的平曲线。

通过计算,五个点的直角坐标为:
ZH:X=232.9548 Y=92.1117
HY:X=285.3608 Y=94.4667
QZ:X=311.8101 Y=99.2371
YH:X=336.9780 Y=108.6801
HZ:X=383.6319 Y=133.7401
使用真样条曲线命令绘制含缓和曲线的平曲线的基本操作步骤如下:
Command(命令): Spline(启动真样条曲线命令)
object/<Enter first point>(指定起点):232.9548,92.1117(通过ZH)
Enter point :285.3608,94.4667
Close/Fit Tolerance/<Enter point>(指定下一个点):311.8101,99.2371<通过QZ> Close/Fit Tolerance/<Enter point> (指定下一个点):336.9708,108.6801<通过YH> Close/Fit Tolerance/<Enter point>(指定下一个点):383.6319,133.7401<通过HZ> Close/Fit Tolerance/<Enter point>(指定下一个点):<加如回车>(选择输入切点的模式)Enter star tangent(指定起点切向):232.9548,92.1117 (输入起点切点)
Enter star tangent(指定端点切向):383.6319,133.7401 (输入终点的切点)。

相关文档
最新文档