本帖最后由 song宋_74729 于 2016-1-10 16:45 编辑
這張圖可以幫忙看看可以用嗎 內插高程 感謝樓主
感谢楼主
好用,谢谢!!!!!
楼主的代码太令人佩服了!
在实际运用中发现了一处问题,用“图面高程线”→“逐个内插”,在等高线100和101之间可以任意加点,但鼠标移动到等高线101和102之间再加点时,出现“内插高程点; 错误: 除数为零”,用Visual Lisp调试,发现是在求交点子代码中(setq zr (+ Za (/ (* (- Zc Za) (- (car R) Xa)) (- Xc Xa))))的“Xc”、“Xa”相等,出现除数为零的错误,测试平台Atuocad2006和Atuocad2008,都出现相同的错误。
代码太复杂了,不知道怎么修改。
楼主,我在使用这个插件的过程中发现:软件生成的有些高程点是错的!
这个资料太好,太感谢了
楼主不错,实用
顶楼主,谢谢你
新人下载看看
感谢楼主