need help with making a lisp

[htls69]

so i was wondering if one you smart guys here could help me out

i need a lsp routine that i can associate with a toolbar button that will reset the "table tag renumbering" "line stating number & curve starting number" the the number 1 with out me having to open 2 different dialog boxes.

if this is easy and can be done i would really appreciate it

(see Picture for what i want to change)

autodesk civil 3d 2012 all updates applied

win7 x64

[Jeff_M]

The properties to get/set these values are not available in the COM/ActiveX API. They are, however, available in the .NET API for 2013+.

So, no to the lisp, no for something in 2012, yes it could be done with a .NET application for 2013+

[htls69]

WE ARE MOVING TO CIVIL 3D 2015 IN 3 MONTHS

would be nice if you could create that for me please

[Jeff_M · Accepted solution]

Attached is a zip file with a .NET dll. After downloading, find the zip file with Windows Explorer, right click on it, select Properties. On the General tab, be sure there is no button labeled "Unblock", if there is one, click it, then exit the properties. Now extract the dll to a location you will remember, and, in 2014/2015, is a Trusted path. Load it into C3D2013, 2014, or 2015 with the NETLOAD command, this can be added to your acad.lsp file to auto load it everytime C3D is started. Once loaded, the command is "ResetRenumberingTo1".

For those curious about the actual code, this is it, in it's entirety:

using Autodesk.AutoCAD.Runtime;
using Autodesk.Civil.ApplicationServices;
using Autodesk.Civil.Settings;

namespace ResetRenumbersToOne
{
    public class ResetRenumbersToOne
    {
        [CommandMethod("ResetRenumberingTo1")]
        public void resetrenumbersto1()
        {
            CivilDocument civdoc = CivilApplication.ActiveDocument;
            SettingsTag settings = civdoc.Settings.TagSettings;
            settings.Renumbering.CurvesStartingNumber = 1;
            settings.Renumbering.LinesStartingNumber = 1;
        }
    }
}

[htls69]

i dont see the zip file

can you email it to be at allenrobberson at gmail dot com

[Jeff_M]

here's the file, sorry about that.