Guys
I am playing around with trying to create a simple routine from a macro I use a lot. I was thinking it would be easier to be typed in command opposed to a button I have to go find and push.
-la;s;C_NOTES;;CMLEADERSTYLE;"L80 CIRCLE WITH MTEXT";MLEADER;NEA;
-la;s;C_NOTES;;CMLEADERSTYLE;"L80 Leader Text Straight";MLEADER;NEA;
I have an example I am trying to follow, but I can not seem to get the OSNAP portion to work.
(defun C:mlo ()
(setvar "cmdecho" 0)
(setq CL (getvar "clayer")
) ;_ end of setq
(command "-LAYER" "M" "C_NOTES" "C" "82" "C_NOTES" "")
(setvar "cmleaderstyle" "L80 Circle")
(command ".mleader" pause)
(setvar "clayer" CL)
(princ)
)
(setvar "cmdecho" 0)
(princ)
(defun C:mlt ()
(setvar "cmdecho" 0)
(setq CL (getvar "clayer")
) ;_ end of setq
(command "-LAYER" "M" "C_NOTES" "C" "82" "C_NOTES" "")
(setvar "cmleaderstyle" "L80 Leader Text Straight")
(command ".mleader" pause)
(setvar "clayer" CL)
(princ)
)
(setvar "cmdecho" 0)
(princ)