Merge block?

[LISP2LEARN]

We have a block standards on our office but I want to use my own block name. Is there a way to do it via lisp because I can't even do it on autocad?

Here is the scenario. I have block "M-d8" for a 8" round diffuser but I want to use my own block name "D8". The blocks are exactly the same and even the same base point.

 

I want to use my own block then after drafting I want all the blocks named "D8" to be block "M-D8" and deleting D8 on the block table. Thanks!

[BlackBox]

If your office has standards for this, then you would be wise to use them, instead of doing "your own thang."

 

If the blocks WERE the same, as you claim, then this request would not be necessary IMO.

 

Furthermore, if you feel that there are some enhancement(s) to the standard block that should be made, present that to your CAD Manager in a tactful, pursuasive manor... you just might earn some positive recognition, instead of being the shady guy who does what he wants.

[LISP2LEARN]

all blocks on the mechanical department starts with am M-. Since I'm a left hand keyboard type and dont use palletes and toolbars block insertion is my problem. imagine typing "M-" 10 times or more in a minute. IMO, I'm not doing my own thing because I'm still using company's block and still will.

[BlackBox]

I really don't see what your left hand has to do with anything.

 

Why not simply use something like this:

 

(defun c:D8 ()
 (command "._-insert" "M-d8")
 (princ))

 

... Instead of having a duplicate block, then having to rename them once inserted? Just a thought.

[LISP2LEARN]

I did try that before but I can't see the block which I'm inserting. Oh, well thanks anyway. If it can't be done i'll just stick with it. I did it for the past 3 years, I think I can bear with it for a little more.

 

All for my commands are on the left side of the keyboard. I'm so lazy that I don't even lift my left hand when I draft.

 

I really don't see what your left hand has to do with anything.

 

Why not simply use something like this:

 

(defun c:D8 ()
 (command "._-insert" "M-d8")
 (princ))

 

... Instead of having a duplicate block, then having to rename them once inserted? Just a thought.

[BlackBox]

I'm not sure I understand why the above code won't work for you? Could you be more specific?