Thread for "inbetween lisp" is there one????

I got a lisp file called "inbetween" that was used with 2008 and it does not work for 2010. Is there already a thread for this?

(DEFUN C:INBETWEEN ()

(SETQ XPT1 (GETPOINT "\nSELECT FIRST POINT: "))

(SETQ XPT2 (GETPOINT "\nSELECT 2nd POINT: "))

(POLAR XPT1 (ANGLE XPT1 XPT2) (/ (DISTANCE XPT1 XPT2) 2.0))

)

AutoCAD already has 'm2p'

and MTP

Ok......What is wrong now???????????

Command:

Command: _m2p Unknown command "M2P". Press F1 for help.

OK,,,,,,,,Now it's working,,,,,,,Why it is working now but not before????????????

When making a line try mtp or m2p (while command is active).