Creating a Lisp that allows you to offset existing Cogo or Manual Points

[panicinthefarm]

Hey Autodesk forum,

I am not very well versed in Lisp routines but I am trying to help my employer build a lisp to allow them to stake curbs.

The Engineer sets the top of curb and gutter elevations and the PLS  takes this drawing and sets stake elevation at an offset from the top of curb points (usually 3 feet away), then proceeds to export the cogo points to the surveyors. I want to build a lisp that allows our PLS to type a command (for example: OffsetCogo) and the command allows him to create a copy of the original cogo elevation asking where he wants to offset the point within the X and Y axis. I have tried using Chatgpt to create the Lisp but it only returned an error. I have attached the created lisp routine below.

Thank you for your time and attention to this matter. I hope to hear from you soon. 

[tcorey]

If you learn VisualLISP, you will appreciate the control and access you have with Civil 3D Objects.

If I was trying to do what you're doing, I would want an Alignment involved. There is a method that retrieves Sta/Off of an existing location and then you can use another method that calculates x,y based on station/offset. Just input an offset 3' larger than what it reports for the existing location.

If you want to avoid programming and be able to create these points in seconds, consider creating a simple Corridor. You can extract the points from there.