《LSP程序说明》word版

1、.LSP 程序说明：程 序 名：CC11.lsp用 途：根据花园岗地形图标注高层点原 理：原图高程点用 CIRCLE 表示，Z 值在 0 点上 通过标注数字将圆改为POINT ，Z 值改到 相应高度。命 令 名： QQ程 序 二： 将带 Z 值的 POINT 标注 Z 值命 令 名：YY 程 序 三：根据标注字设 POINT，其 Z 值为标注值命 令 名：99程 序 名：CCG.LSP用 途：高程标注程序命 令 名：33 用于将 POINT 标注 z 值命 令 名：22 1. 提示 旋转角度A/小数位数D/字高H/字体S/22 旋转角度a 确定座标引线的旋转角度, 采用弧度制, 也可用两 点确

2、定 小数位数D 确定座标值的小数点位数, 隐含值为 2 字高H 确定字高, 隐含值为 4 字体S 确定字体, 本程序的字体名称ckstyle, 隐含字体 为 monotxt. 2. 修改的程序不再设引线和座标的颜色, 而是将引线和座标的数字分 别写入 zzck-line 和 zzck-text 层中, 可通过层命令自由确定颜 色。程 序 名：CCP.LSP用 途：道路坐标标注程序命 令 名：PP 1. 提示 Angle/Desimal/Text-high/Hight-dim/text-Style/PP Angle 确定座标引线的旋转角度, 采用弧度制, 也可用两点 确定 Desimal 确定座

3、标值的小数点位数, 隐含值为 2 Text-high 确定字高, 隐含值为 4 Hight-dim 确定是否标注高程, 如果标注高程, 键入 Y, 并根据 提示键入高程值的小数点位数, 然后在每一次输入座 标后用键盘输入高程值 text-Style 确定字体, 本程序的字体名称ckstyle, 隐含字体为 monotxt. 2. 修改的程序不再设引线和座标的颜色, 而是将引线和座标的数字分 别写入 zzb-line 和 zzb-text 层中, 可通过层命令自由确定颜色 如觉不便者可调用 ccpc 程序.程 序 名：CCR.LSP用 途：标注道路转弯半径程序命 令 名：AA说 明： 1. 提示

4、 text-Hight/Decimal/text-Style/Mark(m) H 定字高, 隐含值为 4 D 定半径值的小数点位数, 隐含值为 0 S 定字体, 字体名为 ckrrsty, 隐含字体为 monotxt M 定是否标注 m, 肯定选择标注形式为 R=100m 否定选择标注形式为 R=100 2. 本程序在使用中自动产生两个层, 并将标注字和标注引线 分别写入两个层中： 标注字为 ZBJ-TEXT 标注注线为 ZBJ-LINE 3. 标注时用鼠标点取所需标注的弧线即可, 标注位置和数值 由程序自动进行. 提请注意： 图中所画的弧线半径必须为真实值, 否则 将会产生错误!程 序 名：

5、CHA-DYX.lsp用 途：检查*层内的多义线是否闭合，如不闭合放入*-U层内命 令 名：DDD用 法：键入 DDD 然后根据提示分别输入多义线所在的层名即可。程 序 名： CLA2.lsp用 途： 根据标注选择实体换层命 令 名： KK程 序 名： CHLAYER.lsp用 途： 将特定实体换层命 令 名：CCC 任选实体换层 CCA 将某一层的某类实体全部换层（鼠标输入） 与用鼠标选择的第一个实体所在层中的所有同类实体将全部 换入所选第二实体的所在层中 CCX 将某一层的某类实体全部换层（键盘输入） CCH 将等高线、等高点按高程换层文 件 名：CHLTEXT.lsp用 途：换层命令命

6、令 名：CVV 将 TEXT 换入 ZZ-text 层程 序 名：CHPOINT.lsp用 途：将高程点的 Z 值加高2倍命 令 名：22文 件 名：CHS.lsp用 途：英文字符大、小写转换命 令 名：44程 序 名: DD.lsp程序用途: 标注道路宽度命 令 名: VVS VV说 明: 先用 VVS 命令输入各道路断面的宽度,然后执行 VV 命令.程 序 名：DLMJJS-2.lsp用 途：道路面积计算方 法：先选取两条道路边线得到道路宽度，再选取道路中心线或边线 得到道路长度，以两者积求得道路面积。命 令 名：SET 设字高和层名等 AA 主程序程 序 名：GKD.lsp用 途：修改P

7、LINE 线宽度命 令 名：VV程 序 名： L-P.lsp用 途： 将 LINE 改为 POLYLINE命 令 名： LP程 序 名：MCP.lsp命 令 名： MK用 途：多重COPY命令(沿道路作绿化树)程 序 名：MJ.LSP用 途：面积计算及求和命 令 名：MT： 参数设置, P 输入人均指标； U 面积计算结果以公顷为单位；F 打 印结果时在前面加层名, A 在上方标注层名 T 输入标注字高, D 小数点位数 MD 取消上述参数设置 TT ： 按层求和, 求某层所有数字总和 TY ： 点选求和, 只计算用鼠标所选择的数字之和 TR ： 框选求和, 计算选择框内所有数字之和, 可多次

8、选择 ML： 计算面积, 按层计算，输入层名称后，计算该层所有 PLINE 线的 面积之和 MM： 计算面积, 计算选择框内所有 PLINE 线面积之和, 可多次选择 MC： 计算面积, 按颜色计算，输入颜色名（代号）后，计算以该颜色画 的所有 PLINE 线的面积之和，BYLAYER 或 BYBLOCK 的颜色 不能以这种方式计算。 MJ： 计算面积，用鼠标单选 PLINE 线计算。 NN： 以用地面积推算各地块的人口，计算前先用MT命令输入人均用地 面积指标。程 序 名：OOFF.lsp用 途：双向OFFSET，并可以置入不同层内。命 令 名：SW 输入offset 的距离 SN 输入目标

9、层名 11 offset 命令程序名：PODUJS.lsp用 途：计算坡度命令名：W 坡度计算，选取两个带 Z 值的 POINT 计算 WE 坡度计算，选取两个数值进行计算 WQ 线段长度计算，可以多段选取程 序 名：QDD.lsp程序用途：删除重复的字命 令 名：QDD程 序 名：TOPPO.lsp用 途：寻找高程值最高的POINT命 令 名：RTT程 序 名：TTR.lsp用 途：多实体 TRIM命 令 名：TT程 序 名：TXDGX.lsp用 途：将特定高程值的等高线放入以高程命名的层内命 令 名：CDG用 法：键入 CDG 然后根据提示分别输入等高线原来所在的层名和等高线 的高程值即可

10、。程 序 名：XXX.lsp用 途：计算 POINT 的 Z 值的平均值（地形的平均高度）命 令 名：XXX 计算某一层 SSS 计算选择范围内 SSD 查找最大值 SSX 查找最小值 FFF 查找以选取点为中心，以2*lll为边长的正方形内的 point 的平均值 LLL 定义 FFF 选取长度程 序 二用 途：计算 TEXT 的平均值、最大值、最小值命 令 名：TTM 计算平均值 TTX 计算最小值 TTD 计算最大值程 序 名：ZLBG.lsp用 途：整理表格原 理：CAD12可以将TXT的字符输入CAD,但表格输入后不能维持原排序, 本程序目的使其恢复为原排序状态。其原理是TXT字符进

11、入CAD 后，依据行的顺序排各列的内容，程序根据原有的列数依次寻 找每行各列的内容，重新排序。命 令 名：BBG程 序 名：ZPOINT.lsp用 途：作带 Z 值的 POINT命 令 名：QW程 序 名： ZZB.lsp用 途： 根据CAD图上的数据做饼图命 令 名： ZZb程 序 名： ZZT.lsp用 途： 根据CAD图上的数据做柱壮图或饼图命 令 名： ZZT程 序 名： A-P.lsp用 途： 将 ARC 改为 POLYLINE命 令 名： LP程 序 名：CCV.lsp用 途：查找实体表命令命 令 名：FFG程 序 名：HHGG.lsp用 途：将实体的 Z 坐标变为 0命 令 名：

12、HHG程 序 名：ll.LSP用 途：道路面积计算说 明：本程序以道路中心线的长度进行计算，程序本身有重复计算和漏 算的部分，基本可以相抵。为计算结果相对准确，应保证道路中 心线所在层的干净。命令名称：llk 计算开始 set 输入道路中心线层名 dde 清除重复的道路中心线程 序 名：POLJ.lsp功 能：将两条线段连接成一条 PLINE 线命 令 名：JJ 程 序 名： XUXIMADE程序目的： 画虚线命 令 名： RT程序思路： 沿 PLINE 线做虚线。程 序 名：CC111.lsp用 途：根据地形图的高程点编制地形的高程视图原 理：将原图的高程点分成多个 方格网，然后计算每个方格

13、网的平均 高程，再根据该方格网平均高程制作等值厚度的 POLYLINE 命 令 名： QQQ WWW 将 POLYLINE 变成 EXTRUDE程 序 名：CHLA3.lsp用 途：换层命令命 令 名：CCV 将等高线换层，等高线 Z 值小于间距值的1/2 CVC 根据等高线的平均值换层 CVV 将 LWPOLYLINE 换入 T-lw 层。程 序 名：DXLTT.lsp用 途：做 地形立体图 程序命 令 名：OOO程 序 名：JIAHDU.lsp用 途：为 POLYLINE 加厚度程序命 令 名：FFG程 序 名：TFHC.lsp用 途：将土方计算的高程数值换层;说 明：本程序将用 SURE 程序计算的土方网格图中的每个网格的左下角数值 换入 ZZ-1 层命 令 名：TTT花园岗地形图专用程序将部分字体置入特定层1. 将农业用地标注置入