Developer: RhinoScript
Summary: Demonstrates how to calculate the lengths of curve objects using RhinoScript.

Is there a command to output a list of lengths for a selected series of curves? The Length command gives a composite length and the list command does not give the curve lengths as far as I understand.

The following RhinoScript code demonstrates how to do the above.

 Option Explicit
 
 Sub CurveLength ()
   Dim arrCurves, dblTotal, dblLength, i
   dblTotal = 0.0
   arrCurves = Rhino.GetObjects("Select curves for length calculation", 4, True, True)
   If IsArray(arrCurves) Then
     For i = 0 To UBound(arrCurves)
       dblLength = Rhino.CurveLength(arrCurves(i))
       Rhino.Print("Curve" & CStr(i) & " = " & CStr(dblLength))
       dblTotal = dblTotal + dblLength
     Next
     Rhino.Print "Total length: " & " = " & CStr(dblTotal)
   End If
 End Sub

Here is the toolbar button macro version. Just create a new toolbar button and paste the following code into either the left or right mouse button command window.

 _-NoEcho
 _-RunScript (
 arrCurves = Rhino.GetObjects("Select curves for length calculation", 4, True, True)
 If IsArray(arrCurves) Then
 dblTotal = 0.0
 For i = 0 To UBound(arrCurves)
 dblLength = Rhino.CurveLength(arrCurves(i))
 Rhino.Print("Curve" & CStr(i) & " = " & CStr(dblLength))
 dblTotal = dblTotal + dblLength
 Next
 Rhino.Print "Total length: " & " = " & CStr(dblTotal)
 End If
 )