新闻中心 NEWS CENTER

  1. >工作动态
  2. >行业新闻
  3. 四川智绘地理信息科技有限公司 地址:
    四川省成都市新都区斑竹园镇北欧知识城3G创智广场3栋1412
    联系电话:
    028-83999526

首页 > 新闻中心 > 工作动态工作动态

    修改高程的四种方法
    发布者:admin 发布时间:2018-12-11点击次数:

    作者:张恒超

    1 单个修改方法

    ①、打开特性窗口;

    ②、选择一个高程点或线划;

    ③、在“位置(起点、端点)Z坐标”或“标高”栏中输入正确的高程值;

    ④、选择下一个高程点或线划,重复第3步。

    2 批处理修改方法

    (1) 利用AutoCAD中的命令和工具条进行手工批处理修改方法.

    ①、将图幅中的其它层全部关闭或冻结,但除高程点所在的层外;

    ②、选择任意一个高程点(其高程为Z),同时任意画一条PL线;

    ③、打开特性窗口;

    ④、将PL线的“标高”值改为“K+Z”;

    ⑤、在AutoCAD命令行输入“move”,选择所有的高程点,捕捉先前所选的高程点为基点,PL线上的任意点为第二目标点进行移动操作。

    操作结束后,查询其它点的高程值,就会发现所有点的高程值均在原有的基础上增加了一常数K。

    (2) 利用在AutoCAD的命令行中输入命令批处理修改方法.

    ①、利用特性窗口的“快速选择”来选择符合条件的对象(也可以利用将图幅中的其它层全部关闭或冻结,但除高程点所在的层外);

    ②、在AutoCAD命令行依次输入“move”、“all”、“0,0,0”、“0,0,K”。

    操作结束后也能达到上述的目标。

    (3) 利用AutoCAD为用户提供二次开发工具进行编程进行批处理修改方法.

    本文的程序设计就是利用AutoLISP语言设计的。假定高程点所在的层为“GCD”。

    程序清单:

    (defun c:gcd(/k ssi pt pty ptx ptz0 ptm)

       (setq cmdecho(getvar “cmdecho”))

       (setvar “cmdecho”0)

       (command “-layer”“new”“gcd03-”“set”“gcd03-” “”)

    (setq ssgcd(ssget“x”(list(cons0“point”)(cons8“gcd”)))

       (setqK(getdist“\nPlease Input  K:”))

       (if ssgcd

           (progn

              setq n (sslength ssgcd)

            n0 0

             )

             (repeat n

    (setq ssi(ssname ssgcd n0))

    (setq sse(entget ssi))

    (setq pt(cdr(assoc 10 sse)))

    (setq pty(car pt))

    (setq ptx(cadr pt))

    (setq pz0(caddr pt))

    (setq ptz(+pz0 k))

    (setq ptm(LIST pty ptx ptz))

    (command“point”ptm“”)

    (setq n0(+n0 1))

            )

           )

          )

         )

    在AutoCAD加载以上的lisp程序后,在命令行中输入“gcd”,运行结束后删除原来的高程点即可。

    3 线划整体修改方法

    当线划标高不为零时,根据数字线划地形图对线划标高的要求,需要把所有线划的标高统一改为零。步骤如下:

    ①、将图幅中高程点所在的层关闭或冻结,其它层不变;

    ②、在AutoCAD命令行输入“change”、“all”、“p”、“e”、“0”。

    操作结束后就能达到把所有线划的标高统一改为零的目标。

    4 菜单栏修改方法

    Cass中利用菜单栏数据批量修改数据


  1. 上一条:运用CASS软件的导线平差工具进行导线数据计算
  2. 下一条:ArcGIS符号库制作