我试图让一个程序从库中插入块。以下是我如何称呼insert:
- (defun c:test()
- (setq angle 10
- basepoint (reverse(cdr(reverse(getpoint)))
- )
- (command "-INSERT" "blockname" "_r" angle "_s" 1 "_non" basepoint)
- )
一旦我手动将它调用的块放置到图形中,这正是我想要它做的。如果我将程序加载到一个新的图形上,它将不会加载块,并且会抛出一个错误。有办法解决这个问题吗?可以直接用lisp代码加载块吗?
非常感谢。 |