Macro Automatic drawing

Automatic drawing
Beschreibung
Mit diesem Code kann der Benutzer die Ansicht seines Objekts in einer Zeichnung mit 4 verschiedenen Positionen (vorne, oben, ISO, rechts) anzeigen. Erfordert einige Modifikationen, um perfekt zu sein. Versionsmakro : 1.0 Datum der letzten Änderung : 2016-09-26 FreeCAD version : All version using Drawing Workbench Herunterladen : ToolBar icon Autor: unknown
Autor
unknown
Herunterladen
ToolBar icon
Links
Makros Rezepte Wie installiere ich Makros So passen Sie Symbolleisten an
Macro-Version
1.0
Datum der letzten Änderung
2016-09-26
FreeCAD-Version(s)
All version using Drawing Workbench
Standardverknüpfung
None
Siehe auch
None

Beschreibung

Dieser Code generiert eine Seite Drawing Module mit drei orthogonalen Ansichten (vorne, oben und rechts) und einer isometrischen Ansicht rechts oben auf der Seite. Sie berechnet den Maßstab basierend auf der Modellgröße und dem verfügbaren Platz auf dem Arbeitsblatt. Die ISO-Ansicht ist auf 2/3 der Ortho-Ansichten skaliert.
Es verwendet die first-angle projection.

Wie verwende ich

Ein Objekt muss ausgewählt werden, bevor das Makro gestartet wird.

Einschränkungen

• Maßstab ist kein Standard. Möglicherweise müssen Sie die Ansichten manuell in einen Standardmaßstab ändern.
• Es funktioniert nur mit einem einzelnen Objekt (dies ist eine Einschränkung der Drawing Workbench)
• Muss geändert werden, um für die in den USA und Kanada verwendete Drittwinkelprojektion third-angle projection zu arbeiten.

Skript

ToolBar icon

Macro_Automatic_drawing.FCMacro

import FreeCAD, Part, Drawing
if len(Gui.Selection.getSelectionEx())>1:
   App.Console.PrintError("Warning: Only the first item is generate")
if len(Gui.Selection.getSelectionEx())==0:
   App.Console.PrintError("Warning: Need to select one item")
Piece=Gui.Selection.getSelectionEx()[0]
App.activeDocument().addObject('Drawing::FeaturePage','AutoDrawing')
App.activeDocument().AutoDrawing.Template = App.getResourceDir()+'Mod/Drawing/Templates/A3_Landscape.svg'
DH=20
DL=30
L=Piece.Object.Shape.BoundBox.XMax
H=Piece.Object.Shape.BoundBox.ZMax
P=Piece.Object.Shape.BoundBox.YMax
Sc=(400-3*DL)/(L+H)
Sc2=(250-3*DH)/(P+H)
if Sc>Sc2 : 
   Sc=Sc2
TopX=DL+Sc*L
FrontX=DL+Sc*L
RightX=2*DL+Sc*L
IsoX=2*DL+Sc*(L)
TopY=DH+Sc*P
RightY=DH+P*Sc
FrontY=2*DH+Sc*(P+H)
IsoY=2*DH+Sc*P

print TopX,RightX,TopY,FrontY

#Create topView
App.activeDocument().addObject('Drawing::FeatureViewPart','topView')
App.activeDocument().topView.Source =Piece.Object
App.activeDocument().topView.Direction = (0,0,1)
App.activeDocument().topView.Rotation=180
App.activeDocument().topView.X = TopX
App.activeDocument().topView.Y = TopY
App.activeDocument().topView.ShowHiddenLines=True
App.activeDocument().AutoDrawing.addObject(App.activeDocument().topView)
App.activeDocument().topView.Scale = Sc
#Create FrontView
App.activeDocument().addObject('Drawing::FeatureViewPart','FrontView')
App.activeDocument().FrontView.Source =Piece.Object
App.activeDocument().FrontView.Direction = (0,-1,0)
App.activeDocument().FrontView.Rotation=90
App.activeDocument().FrontView.Scale = Sc
App.activeDocument().FrontView.X = FrontX
App.activeDocument().FrontView.Y = FrontY
App.activeDocument().FrontView.ShowHiddenLines=True
App.activeDocument().AutoDrawing.addObject(App.activeDocument().FrontView)
#Create RightView
App.activeDocument().addObject('Drawing::FeatureViewPart','RightView')
App.activeDocument().RightView.Source =Piece.Object
App.activeDocument().RightView.Direction = (1,0,0)
App.activeDocument().RightView.Scale = Sc
App.activeDocument().RightView.X = RightX
App.activeDocument().RightView.Y = RightY
App.activeDocument().RightView.ShowHiddenLines=True
App.activeDocument().AutoDrawing.addObject(App.activeDocument().RightView)
#Create IsotView
App.activeDocument().addObject('Drawing::FeatureViewPart','IsoView')
App.activeDocument().IsoView.Source =Piece.Object
App.activeDocument().IsoView.Direction = (1,1,1)
App.activeDocument().IsoView.Rotation=60
App.activeDocument().IsoView.Scale = Sc*.6
App.activeDocument().IsoView.X = IsoX
App.activeDocument().IsoView.Y = IsoY
App.activeDocument().IsoView.ShowHiddenLines=True
App.activeDocument().AutoDrawing.addObject(App.activeDocument().IsoView)

Links

Das Forum Automatic drawing