rotate lines

rotate lines

luengo
Community Visitor Community Visitor
859 Views
9 Replies
Message 1 of 10

rotate lines

luengo
Community Visitor
Community Visitor

luengo_0-1697476142010.png

 

Is there a way to rotate multiple lines without moving them from the base?

Obviously it is possible 1 by 1, but I am looking to do it all at the same time at the same angle

0 Likes
860 Views
9 Replies
Replies (9)
Message 2 of 10

j.palmeL29YX
Mentor
Mentor

I'd say, not possible without some programming (LISP).

(Unfortunately at the moment don't know an appropriate LISP tool) 

 

 

Jürgen Palme
Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.

EESignature

0 Likes
Message 3 of 10

mattdVF27J
Advocate
Advocate

my guess is no. It seems like ACAD suffers from a lot of workflow cohesiveness. I often find myself asking very similar questions like how can I change all the MTEXT at one time. Often you cant. You have to go into 1 by 1 mode to edit text, no "global" option per se. Im not intentionally badmouthing ACAD. I just wish they would look at some other products out there that are so much more intuitive and enable many global workflows.

 

I think this inherently lies with the age and architecture of the code. There are some things it does well, but I find it takes me longer to do almost anything in ACAD vs other programs (more moves, more clicks). If you find out please share I would love to know!

Message 4 of 10

pendean
Community Legend
Community Legend
@luengo Set your SNAPANG to that angle, set your running OSNAP to ENDpoint, then use ROTATE command to select each line, snap to the bottom (aka "base"), drag/pull your cursor in the direction you want then repeat.

If you need to do this a 1000 times a day, daily, head over to the LISP forum to ask for help automating the above to save you a few clicks, here is the forum https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/bd-p/130
0 Likes
Message 5 of 10

pendean
Community Legend
Community Legend

@mattdVF27J wrote:

...how can I change all the MTEXT at one time. Often you cant. You have to go into 1 by 1 mode to edit text, no "global" option per se...


So what exactly do you need to "change"? Most of us do what you generically wrote about all day long in AutoCAD and have done so for a decade or more. Be very detailed.

0 Likes
Message 6 of 10

Kent1Cooper
Consultant
Consultant

@pendean wrote:

@mattdVF27J wrote:

...how can I change all the MTEXT at one time. ....


So what exactly do you need to "change"? ....


I believe they mean [possibly among other things] that if you select multiple Mtext objects, you can't give them all the same text content in the Properties palette text-content slot [the way you can do with plain Text], even if they all have the same current content as each other, showing in that slot [i.e. not *varies*].  When you click in there, you can't edit the content there, but must pick the little editing icon to the right, and it will take you into editing one of them, and when you're done with that one, it will move on to the next one, etc.  If you want them all the same, you have to give it that same content separately for each one.

Kent Cooper, AIA
0 Likes
Message 7 of 10

ВeekeeCZ
Consultant
Consultant

You can try a LISP routine if you like.

 

(vl-load-com)

(defun c:RotateEachLine ( / s a i e p)
  
  (or *rel-ref* (setq *rel-ref* "Start"))
  
  (if (and (setq s (ssget "_:L" '((0 . "LINE,ARC,LWPOLYLINE"))))
	   (not (initget "Start Middle End"))
	   (setq *rel-ref* (cond ((getkword (strcat "\nSpecify reference points [Start/Middle/End] <" *rel-ref* ">: "))) (*rel-ref*)))
	   (setq a (getangle "\nSpecify angle: "))
	   )
    (repeat (setq i (sslength s))
      (setq e (ssname s (setq i (1- i)))
	    p (cond ((= *rel-ref* "Start") (vlax-curve-getstartpoint e))
		    ((= *rel-ref* "End") (vlax-curve-getendpoint e))
		    ((= *rel-ref* "Middle") (vlax-curve-getpointatdist e (/ (vlax-curve-getdistatparam e (vlax-curve-getendparam e)) 2)))))
      (vla-rotate (vlax-ename->vla-object e) (vlax-3d-point p) a)))
  (princ)
  )

 

Message 8 of 10

Kent1Cooper
Consultant
Consultant

@luengo wrote:

Is there a way to rotate multiple lines without moving them from the base? ....


Can you count on all those Lines always being drawn in the same direction?  If they're not, then @ВeekeeCZ 's suggestion in Message 7 will give you a very different result from that in your image.

Kent Cooper, AIA
0 Likes
Message 9 of 10

mattdVF27J
Advocate
Advocate

exactly.  I know its easy to get defensive about ACAD. But if we simply accept the heavy workflow(way more clicks than needed) at times will AutoDesk ever improve it? My guess is no. After 16 some years of drafting my wrist hands and fingers would appreciate it. I digress.

0 Likes
Message 10 of 10

j.palmeL29YX
Mentor
Mentor

@mattdVF27J wrote:

 

But if we simply accept the heavy workflow ... at times will AutoDesk ever improve it? 


off topic

 

I am with you 😉 , but reclaiming or a complaint here in a user forum is rather worthless. You should better use an official feedback contact as e.g. >>here<< or similar. 

 

Jürgen Palme
Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.

EESignature

0 Likes