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.
Autolisp routine
#3I 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.
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.