为什么我会出错？

MikeP · 发表于 2022-7-6 07:56:54

它的功能正常，但我得到了一个错误的最后它。波克？

(defun c:ppb (/ ss1)
(setq ss1 (ssget ))
(command "_.change" ss1 "" "P" "color" "magenta" "")
(command "copyclip" ss1 "")
(command "_.change" ss1 "" "P" "color" "Green" "")
(command "pasteblock" ss1)
(princ)
)

pBe · 发表于 2022-7-6 08:11:55

copy

 
(command "pasteblock" pause)

MikeP · 发表于 2022-7-6 08:14:41

谢谢，很好，

但现在它在命令行中显示了所有这些：

copy

Command: pasteblock Duplicate definition of block _ARCHTICK  ignored.
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHTITL.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [ARCHITXT.shx].
Substituting [simplex.shx] for [arch].
Substituting [simplex.shx] for [Arial Black].
Substituting [simplex.shx] for [Tahoma].
Substituting [simplex.shx] for [archstyl.shx].
Substituting [simplex.shx] for [3 of 9 Barcode].
Substituting [simplex.shx] for [C:\Program Files\AutoCAD LT\Archstyl.shx].