-Custom "Object Snap" -Snap Between, -AutoCad 2000i Map/Win XP

[ms]

Hello.

I need some help please?

I want to make a "snap-function" that gives me a point(midpoint) between to other point., e.g. I have two circles and want to start drawing a line from a point exactly between the two center of these circles. ( I could draw a line from center to center and start drawing from midpoint of that line, but I hope you can helpe me make a "snap between two points" instead).

At an aplication called "Point & NovaPoint 5.5" I can use a command called "Osnap between" , it's a macro but I don't know how they have made it.....

Hope someone can understand what I am talking about here (sorry, my language is all to bad).

I use:
Win XP and AutoCad 2000i Map.

Thanks for any help.

Br
Morten S

 

[Jim Claypool]

(defun between ( / pt1 pt2)
(while (not (setq pt1 (getpoint "\nSelect first point: ")))) (while (not (setq pt2 (getpoint "\nSelect second point: ")))) (polar pt1 (angle pt1 pt2) (/ (distance pt1 pt2) 2.0))
)

 

[TRJ]

Use AutoCAD's geometry calculator as in: (note the apostrophe preceeding CAL)

LINE Specify first point: 'CAL

 

[R.K. McSwain]

In addition to TRJ's suggestion, the calculator has a built in shortcut MEE that returns the midpoint between two endpoints [otherwise known as (end+end)/2]

 

[ms]

Hello.

This one looks to be the one I need,
but I can't make it work. Sorry.

Shall I copy the txt in to a lsp-file?
Or use it as a macro on a new button?
Or?

Morten

 

[Jim Claypool]

If you have a custom menu, put the code in an mnl file the same name as the menu, otherwise put the code in an acad.lsp file. You'll probably have to create it.

Then create a button to execute it.

 

[ms]

Hi.

I still have some problems about activateing the command, (have tried .lsp and .mnl and a button to activate)
but I will fix it, I hope...

Thank you Jim.

Morten

 

[ms]

Hi

Thanks for your respond.

Morten

Use AutoCAD's geometry calculator as in: (note the apostrophe preceeding CAL)

LINE Specify first point: 'CAL

 

[ms]

Hi

Thanks for your respond.

Morten

In addition to TRJ's suggestion, the calculator has a built in shortcut MEE that returns the midpoint between two endpoints [otherwise known as (end+end)/2]