m b1 As Brep = Nothing
If (heights(b) > heights(b+1)) Then
b0 = breps(b+1)
b1 = breps(b)
Else
b0 = breps(b)
b1 = breps(b+1)
End If
Dim bDiff As Brep() = Brep.CreateBooleanDifference(b0, b1, 0.1)
If (bDiff IsNot Nothing) AndAlso (bDiff.Length > 0) Then
breps(b) = bDiff(0)
End If
--
David Rutten
david@mcneel.com
Poprad, Slovakia…
Added by David Rutten at 7:32am on October 16, 2012
rence not set to an instance of an object. (line: 80)
Both .dlls appear to have been successfully imported.
Thanks in advance,
Charles
RStatSystem rs = ri as RStatSystem;
List<Line> slines = new List<Line>();
foreach(RStatBeam b0 in rs.Beams) { <------ line 80
if (b0.StiffnessMultiplier < 0.3) continue;
slines.Add(new Line(b0.P0.ToPoint3d(), b0.P1.ToPoint3d())); }
A = slines;
…
I don't think I know what you mean. If it is that you want the curve numbers written out as text tags, use the reworked example below and adjust it to your needs.
/Ola
old version that has been fixed by now. I'd ask you to test this on the Rhino6 beta (which I am using to test this), but it looks like you're using a cracked version of Rhino so you probably don't have access to that.…