-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathProgram.cs
More file actions
109 lines (89 loc) · 3.95 KB
/
Program.cs
File metadata and controls
109 lines (89 loc) · 3.95 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
#region SearchAThing.Sci, Copyright(C) 2016-2017 Lorenzo Delana, License under MIT
/*
* The MIT License(MIT)
* Copyright(c) 2016 Lorenzo Delana, https://searchathing.com
*
* Permission is hereby granted, free of charge, to any person obtaining a
* copy of this software and associated documentation files (the "Software"),
* to deal in the Software without restriction, including without limitation
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
* and/or sell copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
* DEALINGS IN THE SOFTWARE.
*/
#endregion
using System;
using System.Collections.Generic;
using System.Linq;
using netDxf;
using System.Diagnostics;
using netDxf.Entities;
using System.Globalization;
using static System.Math;
using SearchAThing.Sci.Examples;
using netDxf.Tables;
using SearchAThing;
namespace SearchAThing.Sci.Examples
{
class Program
{
static void Main(string[] args)
{
const double tol = 1e-6;
const int N = 500; // nr. of points
const double W = 2000; // ellipse width
const double H = 1000; // ellipse height
const double boundaryPaddingPercent = 0;
const double ellipseFlatness = .1; // ellipse polygonalized flatness
var origin = Vector3D.Zero;
const double origPointRadius = 1;
var boundary = Polygon.EllipseToPolygon2D(origin, W, H, ellipseFlatness).ToList();
var rndPts = Vector3D.Random(N,
(-W / 2) * (1 - boundaryPaddingPercent), (W / 2) * (1 - boundaryPaddingPercent), // xrange
(-H / 2) * (1 - boundaryPaddingPercent), (H / 2) * (1 - boundaryPaddingPercent), // yrange
0, 0, // zrange
seed: 2)
.Select(v => v + origin)
.ToList();
var vs = rndPts
.Where(v => boundary.ContainsPoint(tol, v))
.ToHashSet();
var dxf = new DxfDocument();
EntityObject eo = null;
var layerAllRndPoints = new Layer("all_rnd_points") { Color = AciColor.DarkGray };
var layerConvexPoints = new Layer("convex_points") { Color = AciColor.Cyan };
var layerEllipseInsideRndPoints = new Layer("ellipse_rnd_points") { Color = AciColor.Green };
var layerBoundary = new Layer("bounday") { Color = AciColor.Yellow };
var layerBboxInsidePoints = new Layer("bbox_inside_points") { Color = AciColor.Magenta };
// draw all rnd points
foreach (var p in rndPts)
{
dxf.AddEntity(eo = new Circle(p, origPointRadius));
if (vs.Contains(p))
eo.Layer = layerEllipseInsideRndPoints;
else
eo.Layer = layerAllRndPoints;
}
var bbox_rnd_inside = vs.BBox();
bbox_rnd_inside.DrawCuboid(dxf, layerBboxInsidePoints);
var cxhull = vs.ConvexHull2D();
// draw boundary
dxf.AddEntity(boundary.ToLwPolyline(tol), layerBoundary);
// draw convex hull
cxhull.PolygonSegments(tol).Foreach(w => dxf.AddEntity(w, layerConvexPoints));
dxf.Viewport.ShowGrid = false;
dxf.Save("test.dxf", true);
Process.Start("test.dxf");
}
}
}