CAD 删除多段线上重复点

CAD二次开发C#代码,给定容差删除多段线、二维多段线、三维多段线上的重复点，CAD2010，VS2012

using System;
using System.Collections;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.EditorInput;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Geometry;

[assembly:CommandClass（typeof（CheckDwgData.BasicCheck））]
namespace CheckDwgData
{
    public class BasicCheck
    {
        /// 

        /// 删除重复点
        /// 

        /// 当前文档
        /// 曲线
        /// 容差
        public void DeleteDuplicatePoints（Document acadDoc Curve cur Double dblDis）
        {
            #region
            Editor ed = acadDoc.Editor;
        

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       7205  2019-01-10 11:41  CheckDwgData\CheckDwgData\BasicCheck.cs

     文件        116  2017-08-21 09:18  CheckDwgData\CheckDwgData\bin\Debug\acad.err

    ..A..HR     16795  2019-01-09 17:23  CheckDwgData\CheckDwgData\bin\Debug\acad.fas

     文件       7168  2019-01-10 11:32  CheckDwgData\CheckDwgData\bin\Debug\CheckDwgData.dll

     文件      15872  2019-01-10 11:32  CheckDwgData\CheckDwgData\bin\Debug\CheckDwgData.pdb

    ..A..H.        54  2019-01-10 10:14  CheckDwgData\CheckDwgData\bin\Debug\Drawing1.dwl

    ..A..H.       207  2019-01-10 10:14  CheckDwgData\CheckDwgData\bin\Debug\Drawing1.dwl2

     文件       2576  2019-01-10 11:11  CheckDwgData\CheckDwgData\CheckDwgData.csproj

     文件        356  2017-08-21 09:04  CheckDwgData\CheckDwgData\CheckDwgData.csproj.user

     文件       2934  2019-01-10 11:32  CheckDwgData\CheckDwgData\obj\Debug\CheckDwgData.csproj.FileListAbsolute.txt

     文件      99756  2019-01-10 11:32  CheckDwgData\CheckDwgData\obj\Debug\CheckDwgData.csprojResolveAssemblyReference.cache

     文件       7168  2019-01-10 11:32  CheckDwgData\CheckDwgData\obj\Debug\CheckDwgData.dll

     文件      15872  2019-01-10 11:32  CheckDwgData\CheckDwgData\obj\Debug\CheckDwgData.pdb

     文件        673  2018-03-20 10:04  CheckDwgData\CheckDwgData\obj\Debug\DesignTimeResolveAssemblyReferences.cache

     文件       6659  2019-01-10 11:03  CheckDwgData\CheckDwgData\obj\Debug\DesignTimeResolveAssemblyReferencesInput.cache

     文件       1374  2017-08-18 11:30  CheckDwgData\CheckDwgData\Properties\AssemblyInfo.cs

     文件        926  2017-08-18 11:30  CheckDwgData\CheckDwgData.sln

    ..A..H.     18432  2018-03-20 10:04  CheckDwgData\CheckDwgData.suo

    ..A..H.     39936  2019-01-10 11:41  CheckDwgData\CheckDwgData.v11.suo

     目录          0  2017-08-21 09:05  CheckDwgData\CheckDwgData\bin\Debug\zh-CN

     目录          0  2017-08-18 11:30  CheckDwgData\CheckDwgData\obj\Debug\TempPE

     目录          0  2019-01-10 11:42  CheckDwgData\CheckDwgData\bin\Debug

     目录          0  2017-08-18 11:36  CheckDwgData\CheckDwgData\bin\Release

     目录          0  2019-01-10 11:42  CheckDwgData\CheckDwgData\obj\Debug

     目录          0  2019-01-10 11:42  CheckDwgData\CheckDwgData\bin

     目录          0  2019-01-10 11:42  CheckDwgData\CheckDwgData\obj

     目录          0  2019-01-10 11:42  CheckDwgData\CheckDwgData\Properties

     目录          0  2019-01-10 11:42  CheckDwgData\CheckDwgData

     目录          0  2019-01-10 11:42  CheckDwgData

----------- ---------  ---------- -----  ----

............此处省略2个文件信息