|
Description |
---|
This macro flattens draft wires that are not plane to their median Z coordinate |
Author |
Yorik |
Links |
Makro návody How to install macros How to customize toolbars |
Version |
1.0 |
Date last modification |
2011-08-01 |
Contents |
Toto makro vyrovná nakreslený drát, který není vyrovnán (není v jedné rovině), do roviny, která odpovídá střední výšce nevyrovnaných drátů.
import FreeCAD obj = FreeCAD.ActiveDocument.ActiveObject z = 0 for p in obj.Points: z += p.z z = z/len(obj.Points) newpoints = [] for p in obj.Points: newppoints.append(FreeCAD.Vector(p.x,p.y,z)) obj.Points = newppoints