摘要：运用Autocad进行市政道路工程圆曲线放样辅助计算，比手工计算方便快捷。
关键词：Autocad 圆曲线 交叉口计算

　　圆曲线在市政道路工程建设中经常会遇到，传统放样往往采用手工计算放样点的位置，手工计算过程繁琐、精度差，在工程实践中，本人摸索出一套用Autocad辅助计算圆曲线放样点的的方法，现作详细阐述供各位同仁参考。
圆曲线放样有偏角法、切线支距法和弦高法等，随着全站仪的出现利用坐标放样法等。 利用Autocad绘图软件可轻松得到以上诸种放样方法的计算数据。
1． 绘制道路中线，根据设计图纸和实际测量成果，用Autocad绘出符合实际的道路设计中线。如图中红虚线。
2． 用offset 命令绘出道路的边线，用circle命令绘出圆曲线，用trim命令修剪出圆弧弯道，并同时剪去没有用的边线。如下图：
3．divide命令定数平分圆弧。
4．如图在主线方向（横的方向）每隔二十米作一短线平分主线交叉口辅助线，并连接对应的圆弧线，
　　 经过上述绘制步骤，图形已基本制成，现在只差计算过程了，下面是本文的重点：大地坐标计算，因为在绘图时，用的是大地坐标，所以不用再设置坐标原点了，直接输入txtpt命令即可，先点一下想要知道坐标的点，再在点上方点一下即可自动绘出坐标点。如下图示：

txtpt命令由本人编制，现介绍如下程序：
;;;find a point halfway between two selected points.
;;;Intpt.LSP From maximizing AutoCAD Release 2000
;;;MADE BY CHEN XIAN DONG
;;;between line one and line two intpoint
;;;本程序编制者:陈献东。;;;其他人使用而产生的一切情况将概不负
;;;责。本程序适用于AutoCAD R2000
;;;使用方法:加载此程序，打入intpt即可产生类似AutoCAD2000 ；
;;;的命令。
;;;此程序清楚明了，使用简单。
;;;本程序用于标注坐标.坐标格式形如: "x/y", 扩充了AutoCAD2000
;;;中坐标的标注.
;;;注: 下次版本采用对话框作为输入界面。
;;;编制日期:2000.10.25
;;;修改日期:2001.10.10

;以下是分程序
(defun intpoint(p1 p2 / x1 y1 z1)
(setq x1 (car p1))
(setq y1 (cadr P1))
(setq z1 (strcat (rtos x1 2 3)" " "/" (rtos y1 2 3)))
(list x1 y1 z1)
(command "_.text" p2 zg 0 z1)
)

;以下是主程序：
(defun c:intpt(/ p1 p2 bl input msg zg input2 msg2 zg2)
(setvar "cmdecho" 0) ;;设置初始值及初始变量
(command "_.layer" "m" "gcljsb" "" )
;(command "layer" "set" "gcljsb" "")
(setq artext (getvar "textstyle"));先取得原先的字体
(command "_.style" "宋体" "宋体" "0" 0.7 "" "" "" "");定义新的字体
(princ "...... 此程序由陈献东编制,欢迎你使用......")
(progn
(setq bl 100)
(setq zg 3)
(setq msg (strcat "\n 请输入图的比例<1:"
(itoa bl)
"> " ));将整数转换成该整数的ASCII表示
(setq msg2 (strcat "\n 请输标注的字高<" (rtos zg 2 1) " 毫米>" ))
;将实数转换成该实数的ASCII表示
;(Real to String)
(setq input (Cond ((getint msg))(t bl)))
(setq input2 (Cond ((getreal msg2))(t zg)))
(setq zg ( * input2 input 0.01 ))
) ; zg的值为设置初始值，比例的默认值为：100
(while
(setq p1 (getpoint "\n>>pick int
point:"))
(setq p2 (getpoint "\n>>output
point:"))
(intpoint p1 p2)
)
(command "_.style" artext "" "" "" "" "" "" "" ) ;恢复初始值
(princ)
(princ " ......谢谢使用, 再见. ")
(princ)
)

　　小巧门：在绘制CAD图形时，因为我们的图纸是大地坐标，与Autocad系统本身绘图有区别，X轴与Y轴是反的，因此在输入X坐标与Y坐标必须调换一下XY的值即可，同时用UNITS命令设置：角度一览设置为顺时针; 点击“方向（D）”, 基准角度设置为北270度。如下图示:

　　现场放样：如用全站仪放样，直接用CAD绘制的坐标放出即可，把仪器架设在交叉口中点或任一已知坐标点，后视较远的导线点，在全站仪上拨好后视的方位角，前视时，把要放样的点，用图中坐标数据输入即可。如用经纬仪放样，绘制图时要墙加距离与方位角，在Autocad中用的命令为list 列出所要放样的线，并复制list 命令所显示的文本，再用输入text文本命令，粘贴刚才复制的文本内容，即输出方位角与距离，最好把经纬仪架设在交叉口的交叉点,，后视导线点,把经纬仪拨好后视的方位角,前视时所要放样的点，拉出距离即可。
　　而在实际施工测量现场时，为方便计，也可用caiso计算器fx-4800进行补充计算放样线长度与方位角 图中数据转为长度与方位角程序如下
1． 坐标反算：
fx-4800程序步骤：
C”X1”:D”Y1”:E”X2”:F”Y2”:Fixm:Pol(E-C,F-D:I”S1-2=”◢
J≤O=>J=J+360△J”A1-2=”
操作过程：
ZBFS→EXE→输入X1值→EXE→输入Y1值→EXE→输入X2值→EXE→Y2→EXE→EXE→EXE S1-2：计算得出的距离；
A1-2：计算得出的角度。（按shift°′″ 转换为60进制的角度）
注：此程序可循环计算。
　　运用Autocad进行道路放样的辅助计算，大大提高了工作效率和精度，且各放样点及曲线形状一目了了然，在绘图的同时很容易发现图纸绘制或标注的错误，比用手工计算快捷、方便。

江苏张家港市政公司 陈献东
邮政编码：215600
Emial :tiyi8888@126.com