whoami3340a 发表于 2012-7-9 19:54:35

sen.sam 发表于 2012-7-9 19:54:36

本帖最后由 sen.sam 于 2012-7-9 20:40 编辑

(defun c:v()            
(setq ipt (getpoint"Pick point:"))   
(setq hgt "1")            
(Command "insert" "*D:\\My Documents\\xk1.dwg"ipt hgt hgt"0")
(princ)
)
路径前面加*就是分解插入块

sen.sam 发表于 2012-7-9 20:36:50

(defun c:v()            
(setq ipt (getpoint"Pick point:"))   
(setq hgt "1")            
(Command "insert" "D:\\My Documents\\xk1.dwg"ipt hgt hgt"0")
(setq el (entlast) )
(Command "explode" el)
(princ)
)

Andyhon 发表于 2012-7-9 20:43:37

(defun c:v ()

(prompt "Pick point:")
(setq ipt (getpoint))
(setq hgt 1)
(Command "insert" "D:\\My Documents\\xk1.dwg"   ipt hgt hgt 0 )

(setq el (entlast))
(Command "explode" el)
)

whoami3340a 发表于 2012-7-9 21:49:55

whoami3340a 发表于 2012-7-9 21:55:16

wide 发表于 2016-1-6 12:03:18

学习了,谢谢。

479274135 发表于 2018-8-8 11:27:42

sen.sam 发表于 2012-7-9 19:54
(defun c:v()            
(setq ipt (getpoint"Pick point:"))   
(setq hgt "1")            


又学一招

184632152 发表于 2021-7-5 21:55:18

Andyhon 发表于 2012-7-9 20:43
(defun c:v ()

(prompt "Pick point:")


可以插入块时选择比例因子后再炸开吗?

sjl_fyl 发表于 2024-6-11 11:04:27

{:1_1:}学习一下
页: [1]
查看完整版本: 帮看看我这个插入块,然后自动将此块炸开的liisp错哪了