0025570: New Tcl sample scripts created for CAD Assistant