Monday, January 07, 2008

Layer Set by Pick Lisp

Looking for a quick way to set a layer active? Why not pick an object that already exists on that layer! The following lisp code does just that!

(defun c:ls ()

(while (not e) (setq e (entsel))) ;get layer of item picked

(setq lyr (cdr (assoc 8 (entget (car e)))))

(command "-LAYER" "set" lyr "") (setq e nil)

)


Labels: , , , ,

# posted by Richard Binning : Monday, January 07, 2008 0 comments links to this post

Tuesday, November 13, 2007

Updated for 2008: Routine to Copy Layer Keys Between Layer Key Styles

Need to migrate your layer keys in AutoCAD Architecture 2008? I updated the routine to work in 2008. Get it here.

Labels: , , , ,

# posted by Richard Binning : Tuesday, November 13, 2007 0 comments links to this post