本帖最后由 作者 于 2010-10-30 21:37:15 编辑
本人长期从事水深测量，围堤施工，筑路测量，采用Auto CAD VISUAL LISP 开发的内业绘图处理程序，主要从实用出发，
能够大大减少测量同仁们的工作量，希望大家试用后提出宝贵意见（Q Q:393456632)。
功能如下：
一、图形初始化（SCA）
1、程序运行方法
2、操作说明
二、层系列操作命令
XX 显示层系列操作命令清单
1、只显示被选对象所在层(XS)
2、快速修改对象的层(GS)
3、解锁所选对象图层
4、将所选对象的层变为当前层(DS)
5、关闭所选对象所在的层(W1)
6、冻结所选对象所在的层(W2)
7、锁定所选对象所在的层(W3)
8、显示全部层(A1)
9、解冻全部层(A2)
10、解锁全部层(A3)
11、显示+解锁+解冻全部层(A123)
三、图廓绘制
1、绘制斜图框(XTQ)
2、复制旋转图幅(COPYR)
3、计算绘图参数(PLOTS)
4、高斯水深图框(鼠标指定)(TILE)
5、高斯地形图框(鼠标指定)(TILED)
6、绘经纬图框(JWTKW)
7、绘任意经纬图框(JWTKR)
8、坐标系转换(四参数)(XYAB)
四、水深展点
1、程序说明
2、由数据文件展点（DRF）程序
3、经纬度文本展点（JWDPF）
4、数据文件计算经纬度并展点（XYBLDS）
5、经纬度水深点展点（JWDPT）
6、坐标展点（ZD）
7、修正水深值(GZ)
五、 水深(高程)字体格式化
1、直体化彩色水深(EDPC
2、直体化彩色水深(为数字)(TDPC)
3、海图化彩色水深(HEDPC)
4、泊位化水深(BEDPC)
5、直体化彩色高程文本(为数字)
6、地形化彩色水深字体(FEDPC)
7、地形化高程标注(DXTPC)
8、水深点高程化(GC)
9、改正水深值
六、水深（高程）编辑
1、对进行过RTK潮位改正的水深进行高程异常改正
2、水深值系统改正
3、水深过滤(GL)
4、水深保留(GLD)
5、绘制水深（高程）值的范围线(F&W)
6、剪贴板上的对象粘贴到原来坐标(G&FSS
七、查 询
1、查询点的坐标（DXY）
2、查询两点的距离和测量方位角(GSA)
3、查询断面图上两点的波比(PB)
4、查询所选直线、多段线及园弧的总长度（XCH）
5、读取水深(高程)点的三维坐标(GXYZ)
6、XYZ文件转换dat文件(XYZDA&T)
7、ZMAX坐标文件转换dat文件
8、由一点的坐标获取桩号和偏距(PJ)
9、由一点的桩号和偏距获取坐标(JP)
10、由所选点的坐标获取点的桩号和偏距(PJS)
11、由点的坐标文件获取点的桩号和偏距(PJDS)
12、由点的桩号和偏距文件获取点的坐标(JPDS)
13、平均水深(PJSS)
14、疏浚平均水深(PJSSD)
15、吹填标高平均值(CTBG)
16、水深精度统计(JCX)
17、查询点的经纬度(GSFS)
八、等深线绘制 (DSXX)
九、绘制沉降过程线(CJH)
十、实体编辑
1、沿某方向多重复制（CPN）
2、复制多段线选择的实体至剪贴板
3、编辑实体属性
4、删除相同实体 (SCXTO)
5、删除类同实体 (DELT)
6、删除多段线选择的实体
十一、图幅分幅 (FH)
十二、土方计算
1、立体模型
2、加权平均计算内插点(泊位)(JMB)
3、批量泊位内插点(JMBS)
4、加权平均计算内插点(水深)(JMS)
5、加权平均计算内插点(地形)(JMD)
6、生成多段线内插点(JMPL)
7、根据多段线生成内插点(JMPL1)
8、两水深点间内插点(JMM)
9、在断面线上自动内插点(IP)
10、水深点间内插点(JM)
11、疏浚土方计算
12、设计断面绘制(PMSJ)
13、断面绘制(PMC)
14、堤坝断面绘制(PMT)
15、棱体断面绘制(PMLT)
16、拾取水深点断面绘制(PMD)
17、断面面积计算（PLA）
十三、整饰图面(ZSTM)
十四、测量计划线
1、输出Hypack 计划线(HYL)
2、设计测量计划线(SJJH)
3、绘制Hypack DOS 计划线(DPL)
4、绘制Hypack Max 计划线(MPL)
十五、水深测量中多站潮位的数据处理程序设计
1、各站潮位信息文件制作
2、各站潮位数据文件制作
3、根据潮位站分布、潮位改正方案划分测区分区
4、绘制潮位过程线
5、测量数据数据文件制作
十六、水深文本加注点
1、一点的文本的加注(ZHB)
2、水深为块的加注点(ZHN)
3、水深为数字的加注点(ZHT)
5、水深文本加注点(ZHL)
6、水深文本加注点(与水深文本H值相关)(ZH)
十七、线型地物绘制
1、轴线绘制 (Z&XHZ)
2、曲线转化为多段线(QXPL)
3、园弧转为多段线(ARC-PL)
4、提取曲线等分段点坐标(QXCL)
5、绘制数学曲线(FUN)
6、文件绘制数学曲线(FUNF)
7、地物反向(REVERSE)
8、spline, or polyline反向
9、将线性对象的z值赋零O
10、陡 坎 (DK)
11、斜坡(不平滑)(XPZ)
12、斜坡(平滑）(XPQ)
13、加固斜坡(不平滑)(JGXPZ)
15、加固陡坎（JGDK)
16、加固陡坎（地形图）（JGDKD)
十八、点状、线状地物绘制
十九、程序安装步骤
1、关闭AutoCAD程序
2、运行水运工程测量程序文件夹中的安装程序Setup.exe。
3、启动AutoCAD后，在命令行输入命令WLISP，注册程序。
WLISP连云港工作室 | 
[复制链接]
发表于 2010-10-30 16:43:00
置顶卡
变色卡
显身卡
楼主