Update revitDwgImportCleaner.scr

This commit is contained in:
2018-12-17 04:04:34 +01:00
parent e4b3e91194
commit 206e5b9aa3

View File

@@ -2,21 +2,19 @@
;Run this script before importing dwg-s to Revit
;Created by Peter Gyetvai - gyetpet@gmail.com
._MODEL
._-xref
r
*
;._-xref
;r
;*
._-xref
b
*
;
;This is deleteAllXlines.lsp. deletes all xlines in modelspace
(defun C:dax (/ ss)
(graphscr)
(setq ss (ssget "_A" '((0 . "XLINE"))));select all
(command "._erase" ss "")
)
dax
;
;(defun C:dax (/ ss)
; (graphscr)
; (setq ss (ssget "_A" '((0 . "XLINE"))))
; (command "._erase" ss "")
;)
;dax
;This is rxl.lsp: removes xlines from blocks:
(defun c:rxl (/ b d l lo nl x)
;; RJP - 04.30.2018