Mid Point?

[Tempest]

I guess this is really going to be an easy one.

(I even typed MID at the command line as I thought it may be a command and it would ask me to select 2 points - But it didn't!)



Anyway.........

Say I have 1 horizontal line near the top of the screen and another horizontal line at the bottom of the screen.

Is there a built in command, where you simply select the 2 and it plots in a point (or moves the cursor) or something like that, to the dead centre between the two points (in this case lines) I've selected?

Rather than measuring it, or using the offset command?

[lpseifert]

Try typing M2P instead of Mid, see if that works. If not I've got other ways.

[Tempest]

Try typing M2P instead of Mid, see if that works. If not I've got other ways.

Thanks, but M2P does not appear to be a command it recognises.

[Tiger]

first type Line or Polyline - and then at the first prompt type M2P

[lpseifert]

Put this in your acaddoc.lsp file

(defun mid2pt (p1 p2 / x y z)
 (setq x (/ (+ (car p1)(car p2)) 2))
 (setq y (/ (+ (cadr p1)(cadr p2)) 2))
 (setq z (/ (+ (caddr p1)(caddr p2)) 2))
 (list x y z))
(defun c:mid2pt ( / p1 p2)
 (setq p1 (getpoint "\nFirst point: "))
 (setq p2 (getpoint "\nSecond point: "))
 (mid2pt p1 p2))

Then make a toolbar button w/ this as the macro

'Mid2Pt

or you can invoke it transparently with 'mid2pt

[SLW210]

Thanks, but M2P does not appear to be a command it recognises.

You use MTP at the "select point" or "specify point" option on a command.

[lpseifert]

You use MTP at the "select point" or "specify point" option on a command.

um.... MTP is what I meant!
Well the code isn't a complete loss, it's good for pre-2007

[SLW210]

um.... MTP is what I meant

When you first posted it M2P it went right on by me as well, when he said it wasn't a command, it hit me. And I have a big sticky note right in my face that says "MTP-midpoint 2 points" and I missed it the first time.

[Rupert9819]

I didnt know about that command...i just love finding out new stuff

[Tempest]

Thanks everyone for your help (and command spelling corrections )

Another helpful nugget of information to add to my book.