dumfatnhappy Posted May 5, 2014 Posted May 5, 2014 if I have a circle and want to rotate something (a hole) by say 16" along the arc how would I do that easily? (I'm too old for this) Quote
paulmcz Posted May 6, 2014 Posted May 6, 2014 Rotate it by angle (deg) 16*180/pi/r, where r is radius of rotation (defun c:r16 (/ r deg) (setq r (getdist "\n Radius?: ") deg (/ (* 16.0 180) pi r)) (command "rotate" pause "" pause deg)) Quote
BIGAL Posted May 6, 2014 Posted May 6, 2014 ARC length = R*angle so 16=R*Angle note angle is in radians. Use entsel pick arc/circle get radius then pick object be aware angels are anti clockwise as default so -16 would be valid. Quote
steven-g Posted May 6, 2014 Posted May 6, 2014 Quick and dirty Array ;select hole path ;select arc item ;type the word item then give 16 as the distance 2 ;2 items (the original and the new positioned one exit the command and delete the first hole Quote
eldon Posted May 6, 2014 Posted May 6, 2014 Another way is to use Measure first on the circle, with the distance of 16. Then use Rotate, using a couple of the marks from Measure as the reference. Then you would have to clean up the measure marks Quote
BIGAL Posted May 6, 2014 Posted May 6, 2014 Another use Cal 16.0/rad copy answer when asked for rotation angle use paste, 2nd thought try rotate when asked for angle 'cal 16.0/rad not tested. Quote
ROBP Posted May 6, 2014 Posted May 6, 2014 I agree with Eldon OP can always copy both original arc and circle paste it underneath the first one , then draw a line from center of the arc trough the the center of the circle, then trim arc tail end , then use measure command on the arc by =16 copy the circle to the next point using node snap active , then copy the second circle with center base point of the first one and paste it on the original one. Quote
Bogbadbob658 Posted May 6, 2014 Posted May 6, 2014 Then use Rotate, using a couple of the marks from Measure as the reference. Or just grab it by the center grip and move it, snapping to the point. Just a few less key strokes. Quote
ROBP Posted May 6, 2014 Posted May 6, 2014 Or just grab it by the center grip and move it, snapping to the point. Just a few less key strokes. Also right but if the arc is split into 16 inches apart and the circle is not on one of those point then it wont be at 16 inches from the first one Quote
khoshravan Posted May 7, 2014 Posted May 7, 2014 ARC length = R*angle so 16=R*Angle note angle is in radians. Use entsel pick arc/circle get radius then pick object be aware angels are anti clockwise as default so -16 would be valid. What is entsel command? Quote
BIGAL Posted May 8, 2014 Posted May 8, 2014 (Entsel) to select an entity using lisp subequently you can get the entities properties in the case of a circle its radius plus others. In about its simplest form to reveal properties (entget (car (entsel))) just copy it to the command line and pick a line circle etc. (defun roang ( / oldang obj1 rad centpt ang) (setq oldang (getvar "aunits")) (setvar "aunits" 3) (princ "\nPick Arc or circle") (setq obj1 (entget (car (entsel)))) (setq rad (cdr (assoc 40 obj1))) (setq centpt (cdr (assoc 10 obj1))) (setq ang (/ (getreal "\nEnter Arc distance") rad)) (princ "\nPick object to rotate") (setq obj2 (entsel)) (command "rotate" obj2 "" centpt ang) (setvar "aunits" oldang) ) (roang) Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.