Leaderboard

Use (SSGET "_C" p1 p2). The objects will need to be visible on the screen most likely.

Not sure .. works fine here:

Using Civil 3D field codes 2 points and an offset distance is all you'd need. https://help.autodesk.com/view/CIV3D/2022/ENU/?guid=GUID-59F46AEC-0E42-4F98-A257-F864C31F0E37 To draw a Rectangle using 3 points try Lee Mac's 3-Point Rectangle lisp http://www.lee-mac.com/3pointrectangle.html

Though to be honest, hitting the space bar twice to cancel then repeat the command isn't a huge issue for me and probably about the same number of key presses as selecting an option

I've ended up drawing a rhomboid, not sure if thats desired but sharing the code anyways - ; Draws rhomboid by specifying 3 points (defun C:test ( / p1 p2 p3 p4 ) (and (setq p1 (getpoint "\nSpecify first point: ")) (setq p2 (getpoint "\nSpecify second point: " p1)) (progn (grdraw p1 p2 1) t) (setq p3 (getpoint "\nSpecify third point: " p2)) (progn (grdraw p2 p3 1) t) (setq p4 (inters p1 (mapcar '+ p1 (mapcar '- p2 p3)) p3 (mapcar '+ p3 (mapcar '- p2 p1)) nil ) ); setq p4 (entmakex (append '((0 . "LWPOLYLINE")(100 . "AcDbEntity")(100 . "AcDbPolyline")(90 . 4)(70 . 1)) (mapcar (function (lambda (p) (cons 10 p))) (list p1 p2 p3 p4)) ) ) ) (redraw) (princ) ); defun

Watch this space doing something at moment. Length, Area and block count.