song宋_74729 发表于 2016-1-10 11:03:14

本帖最后由 song宋_74729 于 2016-1-10 16:45 编辑

這張圖可以幫忙看看可以用嗎 內插高程 感謝樓主

Y~_H_~K 发表于 2016-1-10 14:22:56

      感谢楼主

wu112031853 发表于 2016-1-11 20:57:59

好用，谢谢！！！！！

gcho 发表于 2016-3-10 18:56:24

楼主的代码太令人佩服了！
在实际运用中发现了一处问题，用“图面高程线”→“逐个内插”，在等高线100和101之间可以任意加点，但鼠标移动到等高线101和102之间再加点时，出现“内插高程点; 错误: 除数为零”，用Visual Lisp调试，发现是在求交点子代码中(setq zr (+ Za (/ (* (- Zc Za) (- (car R) Xa)) (- Xc Xa))))的“Xc”、“Xa”相等，出现除数为零的错误，测试平台Atuocad2006和Atuocad2008，都出现相同的错误。
代码太复杂了，不知道怎么修改。

雪音晓梦 发表于 2016-3-21 17:26:05

楼主，我在使用这个插件的过程中发现：软件生成的有些高程点是错的！

ku-8510 发表于 2016-5-12 19:05:24

这个资料太好，太感谢了

spano 发表于 2016-5-21 10:34:46

楼主不错，实用

独爱黄鹤楼 发表于 2016-7-18 19:25:42

顶楼主，谢谢你

hsmj_god 发表于 2016-10-13 23:36:54

新人下载看看

Ting 发表于 2016-10-21 16:52:16

感谢楼主
页: 5 6 7 8 9 10 11 12 13 14 [15] 16 17 18
查看完整版本: 高程点内插程序(已更新)