BO算法-画线求交填充法

wang2006zhi

2. /// <summary>
   
3. /// 寻找填充边界
   
4. /// </summary>
   
5. [CommandMethod("tt5")]
   
6. public void Tt5()
   
7. {
   
8.     using var tr = new DBTrans();
   
9.     if (!Env.Editor.GetPoint(out Point3d point,"\n 获取一个点"))
   
10.         return;
    
11.     var selPtc = point.GetPointCollection(5000);
    
12.     if (!Env.Editor.SelEnts(out List<Curve> curs,selPtc))
    
13.         return;
    
14.     var extens = curs.GetExtents();
    
15.     var h = extens.GetHeight();
    
16.     var w = extens.GetWidth();
    
17.     double n = 100;
    
18.     h /= n;
    
19.     w /= n;
    
20.     var pts = new List<Point3d>();
    
21.     HashSet<Point3d> pos = [point];
    
22.     Queue<Point3d> points = new Queue<Point3d>();
    
23.     points.Enqueue(point);
    
24.     while (points.Count > 0)
    
25.     {
    
26.         var p = points.Dequeue();
    
27.         var sha = p + new Vector3d(0, h, 0);
    
28.         var xia = p + new Vector3d(0, -h, 0);
    
29.         var zuo = p + new Vector3d(-w, 0, 0);
    
30.         var you = p + new Vector3d(w, 0, 0);
    
31.         Addpoint(p, sha);
    
32.         Addpoint(p, xia);
    
33.         Addpoint(p, zuo);
    
34.         Addpoint(p, you);
    
35.     }
    
36. 
    
37.     var newPts=pts.OrderBy(o => (point - o).AngleOnPlane())
    
38.         .ThenBy(x => x.X)
    
39.         .ThenBy(y => y.Y).ToList();
    
40. 
    
41.     var pl=newPts.MakePolyline();
    
42.     pl.ColorIndex = 1;
    
43.     pl.ConstantWidth = 5;
    
44.     pl.Closed = true;
    
45.     tr.CurrentSpace.AddEntity(pl);
    
46.    
    
47.     bool IsIntersectWith(Curve line)
    
48.     {
    
49.         return curs.Any(c =>
    
50.         {
    
51.             var ptC = new Point3dCollection();
    
52.             c.IntersectWith(line, Intersect.OnBothOperands, ptC, IntPtr.Zero, IntPtr.Zero);
    
53.             if (ptC.Count<=0)
    
54.                 return false;
    
55.             foreach (Point3d o in ptC)
    
56.             {
    
57.                 pts.Add(o);
    
58.             }
    
59.             return true;
    
60.         });
    
61.     }
    
62.    
    
63.     void Addpoint(Point3d p, Point3d p1)
    
64.     {
    
65.         if (pos.Contains(p1))
    
66.             return;
    
67.         var line = new Line(p, p1);
    
68.         if (!IsIntersectWith(line))
    
69.             points.Enqueue(p1);
    
70.         pos.Add(p1);
    
71.     }
    
72.    
    
73. }

/// <summary><br /> /// 寻找填充边界<br /> /// </summary><br /> [CommandMethod("tt5")]<br /> public void Tt5()<br /> {<br />     using var tr = new DBTrans();<br />     if (!Env.Editor.GetPoint(out Point3d point,"\n 获取一个点"))<br />         return;<br />     var selPtc = point.GetPointCollection(5000);<br />     if (!Env.Editor.SelEnts(out List<Curve> curs,selPtc))<br />         return;<br />     var extens = curs.GetExtents();<br />     var h = extens.GetHeight();<br />     var w = extens.GetWidth();<br />     double n = 100;<br />     h /= n;<br />     w /= n;<br />     var pts = new List<Point3d>();<br />     HashSet<Point3d> pos = [point];<br />     Queue<Point3d> points = new Queue<Point3d>();<br />     points.Enqueue(point);<br />     while (points.Count > 0)<br />     {<br />         var p = points.Dequeue();<br />         var sha = p + new Vector3d(0, h, 0);<br />         var xia = p + new Vector3d(0, -h, 0);<br />         var zuo = p + new Vector3d(-w, 0, 0);<br />         var you = p + new Vector3d(w, 0, 0);<br />         Addpoint(p, sha);<br />         Addpoint(p, xia);<br />         Addpoint(p, zuo);<br />         Addpoint(p, you);<br />     }<br /> <br />     var newPts=pts.OrderBy(o => (point - o).AngleOnPlane())<br />         .ThenBy(x => x.X)<br />         .ThenBy(y => y.Y).ToList();<br /> <br />     var pl=newPts.MakePolyline();<br />     pl.ColorIndex = 1;<br />     pl.ConstantWidth = 5;<br />     pl.Closed = true;<br />     tr.CurrentSpace.AddEntity(pl);<br />    <br />     bool IsIntersectWith(Curve line)<br />     {<br />         return curs.Any(c =><br />         {<br />             var ptC = new Point3dCollection();<br />             c.IntersectWith(line, Intersect.OnBothOperands, ptC, IntPtr.Zero, IntPtr.Zero);<br />             if (ptC.Count<=0)<br />                 return false;<br />             foreach (Point3d o in ptC)<br />             {<br />                 pts.Add(o);<br />             }<br />             return true;<br />         });<br />     }<br />    <br />     void Addpoint(Point3d p, Point3d p1)<br />     {<br />         if (pos.Contains(p1))<br />             return;<br />         var line = new Line(p, p1);<br />         if (!IsIntersectWith(line))<br />             points.Enqueue(p1);<br />         pos.Add(p1);<br />     }<br />    <br /> }

箭头_Row

https://www.cnblogs.com/JJBox/p/12571436.html

找邊界算法這個帖子里很詳細哦。但下面語句是整個帖子的精華濃縮：

1. // 到了Acad2011: 就可以通过以下语句获取
   
2. Editor ed = Acap.DocumentManager.MdiActiveDocument.Editor;
   
3. ed.TraceBoundary(........);

复制代码

2. // 获取Boundary 注意TraceBoundary 中 deleteisland 的设置
   
3.    using DBObjectCollection dbo = Env.Editor.TraceBoundary(ppr.Value, false);
   
4.    if (dbo.Count != 1)
   
5.    {
   
6.        Env.Print("\n闭合空间错误，调整后重试！");
   
7.        return;
   
8.    }
   
9.    pline = (Polyline)dbo[0];
   
10.    if (pline.NumberOfVertices == 0)
    
11.    {
    
12.        Env.Print("\n闭合空间错误，调整后重试！");
    
13.        return;
    
14.    }

// 获取Boundary 注意TraceBoundary 中 deleteisland 的设置<br />    using DBObjectCollection dbo = Env.Editor.TraceBoundary(ppr.Value, false);<br />    if (dbo.Count != 1)<br />    {<br />        Env.Print("\n闭合空间错误，调整后重试！");<br />        return;<br />    }<br />    pline = (Polyline)dbo[0];<br />    if (pline.NumberOfVertices == 0)<br />    {<br />        Env.Print("\n闭合空间错误，调整后重试！");<br />        return;<br />    }

這個自帶的Api又準又快速哦！

你有种再说一遍

crtrccrt  2024-8-6 06:10
LSP，准确又快速，还能批量

要比批量c#可太幸福了,
编辑器能够提示数据结构的修改,
还能多线程并行,
还能调用SIMD指令集,
还能注重CPU cache line的miss情况

wang2006zhi

箭头_Row 发表于 2024-8-6 15:07
https://www.cnblogs.com/JJBox/p/12571436.html

找邊界算法這個帖子里很詳細哦。但下面語句是整個帖子 ...

自带的在非视口和后台无法使用。。所以想办法造一个。。

lelelewfxy

太难得的好材料啊

你有种再说一遍

怎么不是按照我文章做捏

crtrccrt

LSP，准确又快速，还能批量

wang2006zhi

你有种再说一遍 发表于 2024-8-5 18:48
怎么不是按照我文章做捏

你那文章看过，逻辑有点复杂，目前我的水平还改写不出来。。。

wang2006zhi

crtrccrt 发表于 2024-8-6 06:10
LSP，准确又快速，还能批量

语言不是门槛，逻辑算法是核心。。。

d1742647821

论坛是有代码块的，另外有太多你自带的函数了，别人没有一点参考性