运用autolisp转换坐标系测设铁路支座十字线.doc

运用autolisp转换坐标系测设铁路支座十字线.doc

ID:52284057

大小:78.50 KB

页数:9页

时间:2020-03-26

运用autolisp转换坐标系测设铁路支座十字线.doc_第1页
运用autolisp转换坐标系测设铁路支座十字线.doc_第2页
运用autolisp转换坐标系测设铁路支座十字线.doc_第3页
运用autolisp转换坐标系测设铁路支座十字线.doc_第4页
运用autolisp转换坐标系测设铁路支座十字线.doc_第5页
资源描述:

《运用autolisp转换坐标系测设铁路支座十字线.doc》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库

1、运用autolisp转换坐标系测设铁路支座十字线摘耍:编制autolisp应用程序转换坐标系测设铁路桥梁支座十字线关键词:autolisp;坐标转换;支座十字线Abstract:ThepreparationofAutoLISPapplicationprogramconversioncoordinatesurveyingrailwaybridgebearingthecrosslineKeywords:AutoLISP;coordinatetransformation;supportcrossline中图分类号:TL113.2+1文献标识码:A文章编号:2095-2104(2013)铁

2、路简支梁架设施工屮的支座安装需预先对支座十字线放线测量,要求既要保证纵向梁跨与设计相符,还要保证横向桥梁工作线与设计相符。以往多采用极坐标偏角法或手工计算进行测量,对于长大曲线桥的支座十字线放线测量,十分繁杂。本文提出一套全新的测量作业方法。作业方法概述根据设计院提供的桥梁梁底平面布置图,在autoCAD中运用autolisp语言将支座十字线相对于桥梁工作线的坐标进行两次转换,输出设计统一坐标,然后以全站仪进行支座十字线的测设。内业步骤整理基础数据:根据设计院提供的桥梁梁底平面曲线布置图及曲线布置耍素表,整理形成基础数据表,形如下表梁底平面布置要素表需要的数据如下:台尾的线路中桩设

3、计统一坐标桥梁工作线相关参数包括梁缝、工作线交点距、工作线交点相对于线路屮线偏距,工作线偏角、线路曲线方向(左曲:L;右曲:R)、线间距支座相关参数:支座中心到梁端距离,支座中心到线路中心距离准备源数据文件:基础数据表另存,得到初步的源数据文件:将基础数据表另存为类型为“文本文件(制表符分隔)”的电子表格文件,并命名为workline.xlso整理源数据文件:按以下约定进行整理,以使autolisp读取该文件:第一行:单元格II,J1分别为第一台尾中桩的东坐标和北坐标第二行:单元格12,J2分别为第二台尾中桩的东坐标和北坐标第三行:A3为梁跨数第四行起按原基础数据表(梁底平面布置耍

4、素表)顺序整理后得到的文件命名为workline,xls在autoCAD中加载autolisp程序,输出支座十字线坐标文件及平面加载以aut.olisp语言编写的名为“支座十字线・lsp”的程序,其读取workline,xls,自动计算输出以下三个文件并自动绘制支座十字线平面图:crossl.xls:墩台横轴线坐标及桥梁工作线坐标表。cross2.xls:左线支座十字线坐标表。cross3.xls:右线支座十字线处标表。自动生成的dwg图形包含墩台横轴线、桥梁工作线、梁端线及支座十字线。“支座十字线・1SP”计算原理autoCAD系统变量初始化在autoCAD中设置angbasea

5、ngdir的系统变量,使得autolisp的函数angle返冋方位角。以下语句设定为正北为0角度方向,角度顺时针为正。(SETVAR〃ANGBASE〃270)(SETVAR〃ANGDIR〃1)处标转换基本模型计算过程中要进行两次坐标转换,均通过自定义函数(funENtransf())实现。转换模型示意如图1:图1:坐标系转换模型图0定义为原坐标系两坐标轴旋转到与新坐标系对应坐标轴重合滞要转动的角度,逆吋针旋转为正;也可以定义为原坐标系Y轴相对新坐标系Y轴的方位角,顺时针旋转为正。对应在autolisp中以用户函数实现上述转换,语句如下(坐标系一转换为坐标系二人(defunENtra

6、nsf(XYptlocalENptOlocalAtemp)(setqXlocal(nth0XYptlocal))(setqYlocal(nth1XYptlocal))(setqEOlocal(nth0ENptOlocal))(setqNOlocal(nth1ENptOlocal))(setqPAI3.1415926535897)(setqArad(*PAI(/Atemp180)))Arad))))(setqNconvert(+NOlocal(*Ylocal(cosArad))(*TXlocal(sinArad))))(setqEN(listEconvertNconvert)))变量

7、说明:;;XYptlocal坐标系一的坐标;ENpt01ocal坐标系一的原点在坐标系二中的坐标值;;atemp,坐标系一Y轴相对于坐标系二Y轴的方位角,顺时针旋转为正(即以处标系二Y轴为正北,坐标系一Y轴的方位角,顺时针为正);;Arad可以两点在坐标系一和坐标系二的坐标值进行反算得到,即以坐标系一下该线段方位角减去坐标系二下该线段方位角即得到以坐标系二Y轴为正北,坐标系一Y轴的方位角(函数angle可以反算出一已知两端点坐标的线段的方位角)建立坐标系:在支座十字线

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。