duotu007 发表于 2011-2-18 11:48:10

有创意，好

仲文玉 发表于 2011-2-18 20:13:25

顶版主，买个收藏

kwok 发表于 2011-2-19 10:33:54

很强,看不懂很复杂冒似!

yunlong300 发表于 2011-2-20 11:04:45

功能很强 下来试试 ：）

zxmmelly 发表于 2011-2-27 22:32:52

这个创意很好，不记得之前在哪看到过类似的代码

x_s_s_1 发表于 2011-2-28 09:57:44

回复 Gu_xl 的帖子

版主(command "_insert" (gxl-Blk-Check"路灯") (getpoint "\n图块插入点:") 1 1 1 0) 是否应改为(command "_insert" (gxl-Blk-Check"路灯") (getpoint "\n图块插入点:") 1 10)，我的是2004.还有如果块中有扩展数据或者超链接是否可写成lisp呢？如我发的图，谢谢

Gu_xl 发表于 2011-2-28 10:29:21

本帖最后由 Gu_xl 于 2011-4-3 20:10 编辑 <br /><br />回复 x_s_s_1 的帖子<BR>(command "_insert" (gxl-Blk-Check&nbsp;&nbsp;"路灯") (getpoint "\n图块插入点:") 1 1 1 0) 的确是多了个1<BR>正确应为：(command "_insert" (gxl-Blk-Check&nbsp;&nbsp;"路灯") (getpoint "\n图块插入点:") 1 1&nbsp;&nbsp;0) <BR>至于扩展数据和超链接数据，本程序未予考虑，主要是一般对于符号来说，很少能用到这两类数据！<BR>

x_s_s_1 发表于 2011-2-28 11:32:56

谢谢，确实，对于比较大的块，写lisp比较臃肿，直接做外部块调用好一些。

农 发表于 2011-3-5 23:52:25

呵呵，创意不错

flowerson 发表于 2011-3-6 23:16:55

很不错的思路！
页: 1 2 [3] 4 5 6 7 8 9 10 11 12
查看完整版本: 【Gu_xl】原创实用工具：Block 自动转为Lisp源代码