明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2884|回复: 6

[求助]通过等高线绘制地面线LISP程序的编写

[复制链接]
发表于 2010-7-2 15:08:00 | 显示全部楼层 |阅读模式

请问有几根标高不同的等高线,我想画一条多段线穿过它们

求得这个多段线与每个等高线的交点

(包含等高线的高程坐标Z的信息)

通过这些交点绘制地面线,LISP程序该怎么写?

发表于 2010-7-2 17:43:00 | 显示全部楼层

网页和博客上有的,你艘下多义线与直线交点,   或艘坐标标注程序,这种程序很多,你用它来点几个点,直线一连接就OK了

 楼主| 发表于 2010-7-8 15:26:00 | 显示全部楼层
我自己已经摸索出来了,笨办法,但是很有效
 楼主| 发表于 2010-7-8 15:46:00 | 显示全部楼层
  1. ************************************************************
  2. ***                                LSD 图形处理程序 V1.0                                 ***
  3. ***              All Rights Reserved By LSD Studio (C) 2009-2010            ***
  4. ************************************************************
  5. 【标注类】:
  6.        b1 — 标注全局比例归一
  7.        bd — 标注文字置中
  8.      bzjt — 修改标注样式箭头
  9.      bzys — 更改标注颜色
  10.       cbz — 清除标注文字替代及前后缀
  11.        da — 标注对齐
  12.        db — 标注样式颜色随层
  13.       dss — 更改标注样式
  14.        md — 标注样式修正
  15.        z1 — 标注主单位归一
  16. 【查询类】:
  17.        ae — 封闭区域面积
  18.        ol — 判断点线位置
  19.       tym — 查询图元名
  20. 【绘图类】:
  21.       pll — 输出多段线长度
  22.       plt — 输出多段线顶点
  23. 【钢筋类】:
  24.       dgj — 替换点钢筋
  25.        gb — 钢筋编号修改
  26.       gbc — 钢筋编号归层
  27.        gj — 钢筋转为多段线
  28.      gjjt — 钢筋标注箭头修正
  29.      gjwz — 替换带钢筋符号文字
  30. 【工程类】:
  31.       dkj — 弹性地基框架计算
  32.      kwht — 开挖回填
  33.        pd — 坡度标注
  34.        qj — 清基
  35. 【绘图类】:
  36.        ba — 交叉切断
  37.        bk — 交点切断
  38.        bu — 设置常用捕捉
  39.       c2p — 圆转换为多段线
  40.        df — 等分复制
  41.       dgs — 删除光栅图像
  42.        e1 — 批量删除图元
  43.      gcgc — 高程归层
  44.      gcxg — 高程修改
  45.        qm — 删除图象
  46.        rb — 重命名匿名块
  47.      xgsx — 替换图元属性
  48. 【图层类】:
  49.        gc — 图元归层
  50.        l1 — 图层开关
  51.        sl — 删除辅助图层
  52.        tc — 建立常用图层
  53.       tc3 — 建立三维图层
  54.      tkys — 图框颜色
  55. 【图形处理类】:
  56.       a20 — 所有图元转到0层
  57.       a2d — 所有图元转到地形图层
  58.       abl — 图元随层
  59.        bl — 图形整体改变比例
  60.       dcd — 高程点采点
  61.        dx — 处理地形图
  62.      dxpm — 地形剖面
  63.        dz — 处理地质图
  64.        et — 删除临时图层元素
  65.      getz — 地形图采点
  66.        gl — 删除填充及标注关联
  67.       ktd — 块替代
  68.       kys — 更改块颜色
  69.       kzk — 块炸开
  70.       lkx — 线条加粗
  71.       lsd — 图形处理
  72.      lsd1 — 炸开块、标注并处理地质图
  73.      lsd2 — 炸开全部并处理地质图
  74.      lsd3 — 炸开块
  75.      lsd4 — 炸开块、标注
  76.      lsd5 — 炸开块、标注、填充
  77.      lsd6 — 处理地质图并处理块颜色
  78.      lsd7 — 处理钢筋图
  79.      lsd8 — 保留奇偶图框
  80.      lsd9 — 保留轮廓线
  81.      lsdo — 炸开全部,出图
  82.      oldm — 恢复自己处理过的图
  83.       old — 处理旧图
  84.        tk — 图框炸开
  85.        tq — 图框前置
  86.       xcd — 等高线采点
  87.        xx — 标准线型比例
  88.      xxbl — 更改线型比例
  89.      xxgc — 线型归层
  90.        z0 — Z坐标归零
  91. 【文字类】:
  92.       chs — 批量更改文字样式
  93.       cht — 文字处理
  94.        ot — 输出文字
  95.        jj — 数字加减
  96.       rep — 替换文字
  97.       s2f — 更改Standard字体为仿宋体
  98.        zg — 修改文字高度
  99.        zk — 修改文字宽度
  100.        zt — 批量修改字体
  101. 【其他】:
  102.        bz — 说明
  103.        dy — 批量打印图纸
  104.       jyb — 去除教育版打印戳记
  105.     other — 其他
  106.       rel — 重新加载程序
复制代码
以上是我自己编写的LISP小程序(只能算是入门级的)的目录
有兴趣的交流一下
发表于 2012-4-5 21:05:11 | 显示全部楼层
— 判断点线位置
程序可以判断 点 是在线的左侧还是右侧么?
发表于 2012-4-5 21:06:31 | 显示全部楼层
dxpm — 地形剖面
是在等高线中剖断面线,还是三角网,或者别的呢?请楼主贴源码让我学习下
发表于 2012-5-11 22:48:27 | 显示全部楼层
http://www.znch.net/showcourse.asp?id=61在地形图上截断面lisp
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-7-22 05:01 , Processed in 0.184080 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表