← Inbox

C3D-TRACTA · Draw Tract A boundary done

C# payload

// Draw Tract A boundary as a closed polyline from the deed calls, NW corner anchored at IPF #479.
// Calls: N11-28-27E 210.00 / S89-10-36E 210.00 / S13-41-11W 220.00 / N86-51-24W 200.00
var bt = (BlockTable)Tx.GetObject(Db.BlockTableId, OpenMode.ForRead);
var ms = (BlockTableRecord)Tx.GetObject(bt[BlockTableRecord.ModelSpace], OpenMode.ForWrite);
EnsureLayer("C-PROP-LINE");

// corners (X=Easting, Y=Northing), NW=#479
var pts = new Point2d[] {
    new Point2d(2166566.931, 1330683.970), // SW
    new Point2d(2166608.698, 1330889.775), // NW  = IPF #479
    new Point2d(2166818.676, 1330886.758), // NE
    new Point2d(2166766.603, 1330673.009), // SE
};
var pl = new Polyline();
for (int i = 0; i < pts.Length; i++) pl.AddVertexAt(i, pts[i], 0, 0, 0);
pl.Closed = true;
pl.Layer = "C-PROP-LINE";
ms.AppendEntity(pl); Tx.AddNewlyCreatedDBObject(pl, true);
Log($"Tract A drawn: handle={pl.Handle}  area={pl.Area:F0} sf  perimeter={pl.Length:F1}'  (plat: 43,299 sf)");
Log("NW corner anchored at IPF #479 (2166608.70,1330889.78). Grid bearings -> translate to re-fit, no rotation.");

Result

Tract A drawn: handle=20B8C  area=43295 sf  perimeter=840.0'  (plat: 43,299 sf)
NW corner anchored at IPF #479 (2166608.70,1330889.78). Grid bearings -> translate to re-fit, no rotation.