File Attachments

[#1]

Hi, i've a problem with using the macro menu.



I want take an object and its insert point. in the same point I should rotate the object without using the rotate command.



I want to create a command where i can copy, insert this, eand rotate an object.



i've wrote in the MACRO MENU:





^C^C_copy;\;_int;\;_rotate;





The
problem is that when i take the object, without define its insert
point, it's copied in to the screen, and a can rotate only the object
original, not the copy.



I'm sorry for my english...



Thanks..



Marco

[#2]

type MOCORO

[#3]

is possible an automation for Mocor..



Initializing...

_MOCORO

Selezionare oggetti: trovato(i) 1

Selezionare oggetti:

Base point:

[Move/Copy/Rotate/Scale/Base/Undo]<eXit>: C

Second point of displacement/Undo/<eXit>:

Second point of displacement/Undo/<eXit>: X

[Move/Copy/Rotate/Scale/Base/Undo]<eXit>: R

Second Point or Rotation angle:



i don't want to write C - X - R. I Want to click only one time and copy and rotate.

is it possible??

Thanks for your disponibility.



Marco

[#4]

Here is a simple lisp routine that has no error checking, but it does the
job, so make sure you load the lisp and if it has to be a macro, then call this
lisp with the macro:

(defun c:cir ()
  (setq ss (ssget "" '((0 . "INSERT")))) ;select
a block
  (setq blk (entget (ssname ss 0))) ;retrieve block
definition
  (setq bip (cdr (assoc 10 blk))) ;retrieve blocks insertion
point
  (command "_copy" ss "" bip pause) ;copy the block once from it's
insert point
  (setq ropt (getvar "lastpoint")) ;get the picked point
for the insertion
  (command "_rotate" "last" "" ropt) ;rotate the
copy around the insertion point
  )

--

Gordon

style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">

<Maark> wrote in message
href="news:6169553@discussion.autodesk.com">news:6169553@discussion.autodesk.com...

Hi,
i've a problem with using the macro menu.



I want take an object
and its insert point. in the same point I should rotate the object without
using the rotate command.



I want to create a command where i
can copy, insert this, eand rotate an object.



i've wrote in the
MACRO
MENU:





^C^C_copy;\;_int;\;_rotate;





The
problem
is that when i take the object, without define its insert
point, it's
copied in to the screen, and a can rotate only the object
original, not the
copy.



I'm sorry for my
english...



Thanks..



Marco