[分享]：在图中直接插入网球场等土块的命令。

wwangffei

97年编的，用到现在。由于命令就在手边，用起来实在方便，所以虽然有各种具有同等功能软件，但还是自己的用起来更好。各位也可比较一下。。。

(defun c:qwq (/ os or)
  (setq os (getvar "osmode"))
  (setvar "osmode" 512)
  (setq or (getvar "clayer"))
  (command "layer" "m" "球场" "co" "123" "" "s" or "")
  (command "insert" "球场-网球场" pause "" "" pause
           "change" "l" "" "p" "la" "球场" "")
  (setvar "osmode" os)
)


当然，你要有一个网球场图块，并命名为球场-网球场.dwg，然后放在一个CAD能找的地方。