画法一：缓和曲线AutoLISP 应用程序
一、制作缓和曲线AutoLISP 应用程序
复制AutoLISP程序源代码，打开“记事本”，粘贴进去后，另存为文件名“缓和曲线.LSP”，保存类型为“所有文件”（AutoLISP程序源代码见附件 ）
二、加载缓和曲线AutoLISP应用程序
画法二：坐标脚本法
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 （输入终点的切点）
附件：缓和曲线AutoLISP 程序源代码
;;多义线摹拟缓和曲线。
;;输入起止直线、半径、缓和曲线长或设计车速。 (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 在命令行输入“appload”打开自动加载对话框。在对话框的“查找范围”里找到“缓和曲线.LSP”的那个程序，选中后，点击【加载】，显示“已成功加载缓和曲线.LSP”后，关闭对话框，ok你那个程序自动启动加载了。 三、在CAD中画出切线长:宋体;">四、运行程序在命令行中输入hh回车 五、选择两条切线，然后输入曲线半径 如：2204.5回车
<六、输入缓和曲线长，如270，绘图完成！
