Macro FlattenWire/it: Difference between revisions
(Updating to match new version of source page) |
(Updating to match new version of source page) |
||
Line 1: | Line 1: | ||
<languages/> |
<languages/> |
||
{{Macro/it |
{{Macro/it |
||
|Name=FlattenWire |
|Name=FlattenWire |
||
Line 11: | Line 12: | ||
}} |
}} |
||
==Description== |
|||
<div class="mw-translate-fuzzy"> |
|||
==Descrizione== |
==Descrizione== |
||
Questa macro appiattisce i contorni che non sono su un unico piano al valore mediano della loro coordinata Z |
Questa macro appiattisce i contorni che non sono su un unico piano al valore mediano della loro coordinata Z |
||
</div> |
|||
==Script== |
==Script== |
||
⚫ | |||
ToolBar Icon |
|||
⚫ | |||
'''Macro_FlattenWire.FCMacro''' |
'''Macro_FlattenWire.FCMacro''' |
||
{{ |
{{Code|code= |
||
import FreeCAD |
import FreeCAD |
||
obj = FreeCAD.ActiveDocument.ActiveObject |
obj = FreeCAD.ActiveDocument.ActiveObject |
||
Line 29: | Line 35: | ||
for p in obj.Points: newppoints.append(FreeCAD.Vector(p.x,p.y,z)) |
for p in obj.Points: newppoints.append(FreeCAD.Vector(p.x,p.y,z)) |
||
obj.Points = newppoints |
obj.Points = newppoints |
||
}} |
}} |
||
{{clear}} |
Revision as of 12:37, 9 October 2021
Descrizione |
---|
Questa macro appiattisce i contorni che non sono su un unico piano al valore mediano della loro coordinata Z Versione macro: 1.0 Ultima modifica: 2011-08-01 Versione FreeCAD: Tutte Download: ToolBar Icon Autore: Yorik |
Autore |
Yorik |
Download |
ToolBar Icon |
Link |
Raccolta di macro Come installare le macro Personalizzare la toolbar |
Versione macro |
1.0 |
Data ultima modifica |
2011-08-01 |
Versioni di FreeCAD |
Tutte |
Scorciatoia |
Nessuna |
Vedere anche |
Nessuno |
Description
Descrizione
Questa macro appiattisce i contorni che non sono su un unico piano al valore mediano della loro coordinata Z
Script
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: newppoints.append(FreeCAD.Vector(p.x,p.y,z))
obj.Points = newppoints