Macro FlattenWire: Difference between revisions

From FreeCAD Documentation
No edit summary
(MacroCode)
 
Line 28: Line 28:
'''Macro_FlattenWire.FCMacro'''
'''Macro_FlattenWire.FCMacro'''


{{Code|code=
{{MacroCode|code=
import FreeCAD
import FreeCAD
obj = FreeCAD.ActiveDocument.ActiveObject
obj = FreeCAD.ActiveDocument.ActiveObject

Latest revision as of 10:22, 21 December 2021

FlattenWire

Description
This macro flattens draft wires that are not planar to their median Z coordinate

Macro version: 1.1
Last modified: 2021-10-27
FreeCAD version: All
Download: ToolBar Icon
Author: Yorik
Author
Yorik
Download
ToolBar Icon
Links
Macro Version
1.1
Date last modified
2021-10-27
FreeCAD Version(s)
All
Default shortcut
None
See also
None

Description

This macro flattens draft wires that are not planar to their median Z coordinate.

Script

ToolBar Icon

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