选取同一个矩形范围内的对象，执行多个不同的命令

yu960312

选取同一个矩形范围内的对象，执行多个不同的命令，这样会提示无效选择

(defun C:BNN()  
(princ "\n---炸开+查找复线+自动串接---")
(setq P1 (getpoint "\n指定第一点: "))  
(setq P2 (getcorner P1 "\n指定第二点: "))

(princ "\n---炸开对象---")
(command "EXPLODE" "w" P1 P2)

(princ "\n---查找复线---")
(command "DUP" "w" P1 P2)

(princ "\n---局部串接---")
(command "AJ" "w" P1 P2 )
(princ)
(princ)
)