TotalAngle in arc object

#1
the TotalAngle variable appears to be missing from the Arc object in intellicad

Our AutoCAD code is,

===============================

Dim Retarc as Arc

Set Retarc = IntelliCAD.ActiveDocument.ModelSpace.AddArc(CP1, ArcRad, CP1Ang2, CP1Ang1)

Retarc.Update

LimitAng = Retarc.TotalAngle

===============================

This returns the total angle of an arc

Note. TotalAngle is available in Autocad but not Intellicad. Is there a replacement command for this. or another way of calculating the total angle of an arc.

#2
Ensign,

The calculation for TotalAngle are:

TotalAngle = Arc Length / Radius

The value is in Radians.

Sorry, I just noticed that there was no reply to your email.

Autolisp routine

#3
I have a AutoLisp routine that will run in IC that calculates the
arc length. It only works for arcs up to 180 degrees though.
This gives an example of what it prints in the status box:

Arc Length= 7'-1 15/16" Rad= 3'-11" M.O.= 1'-6 5/16"
Chrd= 6'-2 7/16" Ang= 104.72215534

I can post it if you want it.
It could be modified for decimal instead of feet and inches pretty easy.