Macro FlattenWire

From FreeCAD Documentation
This page is a translated version of the page Macro FlattenWire and the translation is 100% complete.

FlattenWire

Description
Cette macro aplatit les Draft fils qui ne sont pas planaires à leur coordonnée Z médiane.

Version macro : 1.1
Date dernière modification : 2021-10-27
Version FreeCAD : Toutes
Téléchargement : Icône de la barre d'outils
Auteur: Yorik
Auteur
Yorik
Téléchargement
Icône de la barre d'outils
Liens
Version Macro
1.1
Dernière modification
2021-10-27
Version(s) FreeCAD
Toutes
Raccourci clavier
None
Voir aussi
None

Description

Cette macro aplatit les Draft fils qui ne sont pas planaires à leur coordonnée Z médiane.

Script

Icône de la barre d'outils

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