Macro FlattenWire

From FreeCAD Documentation
Revision as of 18:14, 27 April 2023 by FBXL5 (talk | contribs) (Created page with "Werkzeugleisten-Symbol")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)

FlattenWire

Beschreibung
Dieses Makro glättet Draft-Drähte, die nicht planar bezüglich ihrer mittlere Z-Koordinate ausgerichtet sind

Versionsmakro : 1.1
Datum der letzten Änderung : 2021-10-27
FreeCAD version : All
Herunterladen : ToolBar Icon
Autor: Yorik
Autor
Yorik
Herunterladen
ToolBar Icon
Links
Macro-Version
1.1
Datum der letzten Änderung
2021-10-27
FreeCAD-Version(s)
All
Standardverknüpfung
None
Siehe auch
None

Beschreibung

Dieses Makro glättet Draft-Drähte, die nicht planar bezüglich ihrer mittleren Z-Koordinate ausgerichtet sind

Skript

Werkzeugleisten-Symbol

Macro_FlattenWire.FCMacro

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: newpoints.append(FreeCAD.Vector(p.x, p.y, z))
obj.Points = newpoints