Macro FlattenWire/cs: Difference between revisions
(Created page with "==Skript==") |
(Updating to match new version of source page) |
||
(7 intermediate revisions by 2 users not shown) | |||
Line 1: | Line 1: | ||
<languages/> |
<languages/> |
||
{{Macro/cs|Icon=Text-x-python|Name=FlattenWire|Name/cs=FlattenWire|Description=This macro flattens draft wires that are not plane to their median Z coordinate|Author=Yorik|Version=1.0|Date=2011-08-01}} |
|||
<div class="mw-translate-fuzzy"> |
|||
{{Macro/cs |
|||
|Name=FlattenWire |
|||
|Translate=FlattenWire |
|||
|Icon=Macro_FlattenWire.png |
|||
|Description=Toto makro vyrovnává vodiče průvanu, které nejsou rovinné k jejich středové souřadnici Z |
|||
|Author=Yorik |
|||
|Version=1.0 |
|||
|Date=2011-08-01 |
|||
|FCVersion=All |
|||
|Download=[https://www.freecadweb.org/wiki/images/2/2f/Macro_FlattenWire.png ToolBar Icon] |
|||
}} |
|||
</div> |
|||
==Description== |
|||
<div class="mw-translate-fuzzy"> |
|||
==Deskriptivní== |
==Deskriptivní== |
||
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ů. |
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ů. |
||
</div> |
|||
==Skript== |
==Skript== |
||
ToolBar Icon |
|||
[[Image:Macro_FlattenWire.png]] |
|||
'''Macro_FlattenWire.FCMacro''' |
'''Macro_FlattenWire.FCMacro''' |
||
{{ |
{{MacroCode|code= |
||
import FreeCAD |
import FreeCAD |
||
obj = FreeCAD.ActiveDocument.ActiveObject |
obj = FreeCAD.ActiveDocument.ActiveObject |
||
Line 17: | Line 36: | ||
z = z/len(obj.Points) |
z = z/len(obj.Points) |
||
newpoints = [] |
newpoints = [] |
||
for p in obj.Points: |
for p in obj.Points: newpoints.append(FreeCAD.Vector(p.x, p.y, z)) |
||
obj.Points = |
obj.Points = newpoints |
||
}} |
}} |
||
{{clear}} |
Latest revision as of 10:22, 21 December 2021
Popis |
---|
Toto makro vyrovnává vodiče průvanu, které nejsou rovinné k jejich středové souřadnici Z Version macro : 1.0 Date last modification : 2011-08-01 FreeCAD version : All Download : ToolBar Icon Autor: Yorik |
Autor |
Yorik |
Download |
ToolBar Icon |
Odkazy |
Makro recepty| Jak nainstalovat makra Jak přizpůsobit panely nástrojů |
Verze |
1.0 |
Datum poslední úpravy |
2011-08-01 |
Verze FreeCAD |
All |
Výchozí zástupce |
None |
Viz též |
None |
Description
Deskriptivní
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ů.
Skript
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