--- a
+++ b/Tools/ModelUtilities/DimensionArrowWithText/SphereWithLabel.any
@@ -0,0 +1,14 @@
+//Draw a sphere at the node
+AnyDrawNode drw={
+  RGB=.rgb; //make reference to color
+  ScaleXYZ={1,1,1}*.radius; //make reference to size
+};
+/*
+//Use a AnyDrawvector to display a name
+AnyDrawVector  DrawName = {
+  Vec = {0.0,0,0};  //use zero length
+  Line.Thickness = 1.1; //arbitary value
+  Text = .Name; //make reference to name
+  Line.RGB=.rgb;//make reference to color
+};
+*/