usingSystem;partialclassExamples{publicstaticRhino.Commands.ResultAddCircle(Rhino.RhinoDoc doc){Rhino.Geometry.Point3d center =newRhino.Geometry.Point3d(0,0,0);constdouble radius =10.0;Rhino.Geometry.Circle c =newRhino.Geometry.Circle(center, radius);if(doc.Objects.AddCircle(c)!=Guid.Empty){
doc.Views.Redraw();returnRhino.Commands.Result.Success;}returnRhino.Commands.Result.Failure;}}
importRhinoimport scriptcontext
fromSystemimportGuiddefAddCircle():
center =Rhino.Geometry.Point3d(0,0,0)
radius =10.0
c =Rhino.Geometry.Circle(center, radius)if scriptcontext.doc.Objects.AddCircle(c)!=Guid.Empty:
scriptcontext.doc.Views.Redraw()returnRhino.Commands.Result.SuccessreturnRhino.Commands.Result.Failureif __name__=="__main__":AddCircle()
PartialClassExamplesPublicSharedFunctionAddCircle(ByVal doc AsRhino.RhinoDoc)AsRhino.Commands.ResultDim center AsNewRhino.Geometry.Point3d(0,0,0)Const radius AsDouble=10.0Dim c AsNewRhino.Geometry.Circle(center, radius)If doc.Objects.AddCircle(c)<>Guid.EmptyThen
doc.Views.Redraw()ReturnRhino.Commands.Result.SuccessEndIfReturnRhino.Commands.Result.FailureEndFunctionEndClass