My first post!
I found this code on this forum posted by IFRs (Petroleum)and made a couple changes based on what I was able to figure on my own.
(DEFUN C:PTT (/ osm p1 x y s p2) ; ID a point, place coordinates text
(graphscr)
(setq osm (getvar "osmode"))
(command "osmode" 53)
(setq p1...