copy rotate object multiple times

[gary.betts]

I often have to copy rotate an object about a common centre but to several different angles. I wish there was a single command to do this,.. like the copy command but with rotation instead of displacement.
(Polar array does not help because it uses the same angle between items, and "Copy move rotate" only makes one copy each time.

[BrenBren]

I often have to copy rotate an object about a common centre but to several different angles. I wish there was a single command to do this,.. like the copy command but with rotation instead of displacement.
(Polar array does not help because it uses the same angle between items, and "Copy move rotate" only makes one copy each time.
Take a look at the express tools Move, Copy, Rotate (MOCORO)

[jerry.runnels]

Take a look at the express tools Move, Copy, Rotate (MOCORO)

I agree that MOCORO will do the job. But, I feel it is either too complicated, or there is not enough documentation to make it usable.

[bgb]

We have a lisp routine for that

[gary.betts]

I have a lisp routine now

(defun c:ro_cox (/ mysset base_pt ref_ang new_ang loop_sw )
(Princ "select objects to rotate")
(setq mysset (ssget))
(setq base_pt (getpoint "\nselect basepoint"))
(setq ref_ang (/ (* (getangle base_pt "\nselect reference angle") 180) pi))
(setq loop_sw 1)
(while (= loop_sw 1)
(setq new_ang (getangle base_pt "\nselect new angle"))
(if (boundp 'new_ang)
(command "rotate" mysset "" base_pt "C" "R" ref_ang (/ (* new_ang 180) pi))
(setq loop_sw 0)
)
)
princ))

[shashikanth.prabhakar]

Hi Gary,

If you are using AutoCAD Mechanical (as I assume you are given that you have posted the request in this forum), you may want to check out the new Move/Copy/Rotate feature in AutoCAD Mechanical 2010 (just released).

Shashikanth