CAD中画缓和曲线，首先复制本文后面的源程序保存至cad安装目录的SUPPORT文件夹，保存类型为.lsp 可以随便复制一个SUPPORT文件夹内的lsp文件，然后替换本文的程序。 打开CAD后，输入appload回车，找到你保存的缓和曲线lsp程序，点击加载，然后就可以画缓和曲线了。 首先，要画出缓和曲线的两条直线，然后输入HH回车，按提示完成缓和曲线。注：本程序，缓和曲线段拟合长度为0.4m，如需更改拟合长度，将程序的第8行(repeat (FIX(/ Ls 0.4)及9行(setq l (+ l (/ Ls (FIX(/ Ls 0.4)中的0.4修改即可。;多义线摹拟缓和曲线。;输入起止直线、半径、缓和曲线长或设计车速。;命令：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 0.4)
