' ******************************************************************************
' swxJRNL.swj - journal recorded on 02/19/06 by Propriétaire
' *****************************************************************************
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Dim FeatureData As Object
Dim Feature As Object
Dim Component As Object
Sub main()

Set swApp = Application.SldWorks

Set Part = swApp.OpenDoc6 ("C:\Documents and Settings\Propriétaire\Bureau\TP Turbo\Turbocompresseur Garrett.SLDASM", 2, 0, "", longstatus, longwarnings)
Set Part = swApp.ActivateDoc ("Turbocompresseur Garrett")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.LoadFile2 "C:\Documents and Settings\Propriétaire\Bureau\TP Turbo\Essai géométrie.SLDASM", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc6 ("C:\Documents and Settings\Propriétaire\Bureau\TP Turbo\Essai géométrie.SLDASM", 2, 0, "", longstatus, longwarnings)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Essai géométrie")
boolstatus = Part.Extension.SelectByID("", "FACE", 0.119, 0.01491003166052, 0.02176865778233, False, 0, Nothing)
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter -0.0996766, -0.103804
Part.ActiveView().RotateAboutCenter -0.118366, -0.161473
Part.ActiveView().RotateAboutCenter -0.0622979, -0.0807367
Part.ActiveView().RotateAboutCenter -0.0685277, -0.126872
Part.ActiveView().RotateAboutCenter -0.0498383, -0.126872
Part.ActiveView().RotateAboutCenter -0.0249191, -0.0922706
Part.ActiveView().RotateAboutCenter -0.0186894, -0.103804
Part.ActiveView().RotateAboutCenter -0.0186894, -0.14994
Part.ActiveView().RotateAboutCenter -0.0124596, -0.207609
Part.ActiveView().RotateAboutCenter -0.0249191, -0.138406
Part.ActiveView().RotateAboutCenter 0, -0.126872
Part.ActiveView().RotateAboutCenter 0, -0.0576691
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.0124596, 0
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0230676
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0230676
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0807367
Part.ActiveView().RotateAboutCenter 0.00622979, 0.103804
Part.ActiveView().RotateAboutCenter 0.00622979, 0.0692029
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0230676
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0346015
Part.ActiveView().RotateAboutCenter 0, 0.0346015
Part.ActiveView().RotateAboutCenter 0, 0.0346015
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0230676
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0230676
Part.ActiveView().RotateAboutCenter 0.00622979, 0.0230676
Part.ActiveView().RotateAboutCenter 0.00622979, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0230676
Part.ActiveView().RotateAboutCenter 0, 0.0346015
Part.ActiveView().RotateAboutCenter 0, 0.0230676
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0230676
Part.ActiveView().RotateAboutCenter 0, 0.0461353
Part.ActiveView().RotateAboutCenter -0.00622979, 0.103804
Part.ActiveView().RotateAboutCenter -0.00622979, 0.265278
Part.ActiveView().RotateAboutCenter 0, 0.103804
Part.ActiveView().RotateAboutCenter 0.0249191, 0.403684
Part.ActiveView().RotateAboutCenter 0.0436085, 0.54209
Part.ActiveView().RotateAboutCenter 0.0373787, 0.288345
Part.ActiveView().RotateAboutCenter 0.0560681, 0.288345
Part.ActiveView().RotateAboutCenter 0.0373787, 0.230676
Part.ActiveView().RotateAboutCenter 0.0311489, 0.207609
Part.ActiveView().RotateAboutCenter 0.0373787, 0.219143
Part.ActiveView().RotateAboutCenter 0.0373787, 0.207609
Part.ActiveView().RotateAboutCenter 0.0186894, 0.138406
Part.ActiveView().RotateAboutCenter 0.00622979, 0.0692029
Part.ActiveView().RotateAboutCenter 0.00622979, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0.00622979, 0.0230676
Part.ActiveView().RotateAboutCenter 0.0124596, 0
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0124596, 0
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0436085, -0.0461353
Part.ActiveView().RotateAboutCenter 0.0311489, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0115338
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0124596, 0
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0115338
Part.ActiveView().RotateAboutCenter -0.0124596, 0
Part.ActiveView().RotateAboutCenter -0.0622979, 0.0115338
Part.ActiveView().RotateAboutCenter -0.087217, 0.0230676
Part.ActiveView().RotateAboutCenter -0.105906, 0.0230676
Part.ActiveView().RotateAboutCenter -0.0747574, 0.0115338
Part.ActiveView().RotateAboutCenter -0.0311489, 0.0115338
Part.ActiveView().RotateAboutCenter -0.00622979, 0
Part.ActiveView().RotateAboutCenter -0.00622979, 0.0115338
Part.ActiveView().RotateAboutCenter -0.0124596, 0
Part.ActiveView().RotateAboutCenter -0.0186894, 0.0115338
Part.ActiveView().RotateAboutCenter -0.0249191, 0.0346015
Part.ActiveView().RotateAboutCenter -0.0124596, 0.0115338
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter -0.00622979, 0
Part.ActiveView().RotateAboutCenter 0, 0.0115338
Part.ActiveView().RotateAboutCenter 0.0311489, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0560681, 0.138406
Part.ActiveView().RotateAboutCenter 0.0498383, 0.115338
Part.ActiveView().RotateAboutCenter 0.00622979, 0
boolstatus = Part.Extension.SelectByID("", "EDGE", -0.06979646682623, 0.06504142064432, -0.04168335092808, False, 0, Nothing)
Part.TranslateComponent
Part.ClearSelection2 True
Part.EditUndo 1
boolstatus = Part.Extension.SelectByID("", "FACE", -0.02167592234122, -0.03846297414097, -0.04898324074972, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("", "FACE", -0.02167592234122, -0.03846297414097, -0.04898324074972, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Coaxiale68", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Coaxiale54", "MATE", 0, 0, 0, False, 0, Nothing)
boolstatus = Part.Extension.SelectByID("Coïncidente42", "MATE", 0, 0, 0, False, 0, Nothing)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID("Plan de face", "PLANE", 0, 0, 0, True, 1, Nothing)
boolstatus = Part.Extension.SelectByID("Plan de face@Carter Compresseur-1@Essai géométrie", "PLANE", 0, 0, 0, True, 1, Nothing)
Set Feature = Part.AddMate2 (0, 0, False, 0, 0, 0, 1, 1, 0, 0.5235987755983, 0.5235987755983, longstatus)
Part.ClearSelection2 True
Part.ActiveView().RotateAboutCenter -0.0498383, 0.0346015
Part.ActiveView().RotateAboutCenter -0.186894, 0.161473
Part.ActiveView().RotateAboutCenter -0.112136, 0.0807367
Part.ActiveView().RotateAboutCenter -0.137055, 0.0922706
Part.ActiveView().RotateAboutCenter -0.261651, 0.126872
Part.ActiveView().RotateAboutCenter -0.149515, 0.0692029
Part.ActiveView().RotateAboutCenter -0.0996766, 0.0115338
Part.ActiveView().RotateAboutCenter -0.186894, 0.0230676
Part.ActiveView().RotateAboutCenter -0.112136, -0.0115338
Part.ActiveView().RotateAboutCenter -0.118366, -0.0461353
Part.ActiveView().RotateAboutCenter -0.087217, -0.0576691
Part.ActiveView().RotateAboutCenter -0.0560681, -0.0692029
Part.ActiveView().RotateAboutCenter -0.0186894, -0.0230676
Part.ActiveView().RotateAboutCenter -0.0249191, -0.0461353
Part.ActiveView().RotateAboutCenter -0.0186894, -0.0692029
Part.ActiveView().RotateAboutCenter -0.00622979, -0.0807367
Part.ActiveView().RotateAboutCenter 0, -0.0922706
Part.ActiveView().RotateAboutCenter 0, -0.115338
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0461353
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0346015
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0346015
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0124596, 0
Part.ActiveView().RotateAboutCenter 0.0311489, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0436085, 0.0115338
Part.ActiveView().RotateAboutCenter 0.0373787, 0.0115338
Part.ActiveView().RotateAboutCenter 0.0996766, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0622979, 0.0576691
Part.ActiveView().RotateAboutCenter 0.0747574, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0622979, 0.0807367
Part.ActiveView().RotateAboutCenter 0.0685277, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0115338
Part.ActiveView().RotateAboutCenter 0.0373787, 0.0346015
Part.ActiveView().RotateAboutCenter 0.0311489, 0.0346015
Part.ActiveView().RotateAboutCenter 0.0311489, 0.0461353
Part.ActiveView().RotateAboutCenter 0.0622979, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0498383, 0.0807367
Part.ActiveView().RotateAboutCenter 0.0436085, 0.0576691
Part.ActiveView().RotateAboutCenter 0.0373787, 0.0807367
Part.ActiveView().RotateAboutCenter 0.00622979, 0.0230676
Part.ActiveView().RotateAboutCenter 0, 0.0461353
Part.ActiveView().RotateAboutCenter 0, 0.0692029
Part.ActiveView().RotateAboutCenter -0.00622979, 0.0576691
Part.ActiveView().RotateAboutCenter -0.00622979, 0.0461353
Part.ActiveView().RotateAboutCenter -0.00622979, 0.0346015
Part.ActiveView().RotateAboutCenter 0, 0.0576691
Part.ActiveView().RotateAboutCenter -0.00622979, 0.0922706
Part.ActiveView().RotateAboutCenter -0.00622979, 0.0922706
Part.ActiveView().RotateAboutCenter 0, 0.0922706
Part.ActiveView().RotateAboutCenter 0, 0.14994
Part.ActiveView().RotateAboutCenter 0, 0.0461353
Part.ActiveView().RotateAboutCenter 0, 0.0346015
Part.ActiveView().RotateAboutCenter 0, 0.0692029
Part.ActiveView().RotateAboutCenter 0, 0.0692029
Part.ActiveView().RotateAboutCenter 0, 0.0692029
Part.ActiveView().RotateAboutCenter -0.00622979, 0.0922706
Part.ActiveView().RotateAboutCenter 0, 0.0461353
Part.ActiveView().RotateAboutCenter 0, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0461353
Part.ActiveView().RotateAboutCenter 0.0186894, 0.0576691
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0461353
Part.ActiveView().RotateAboutCenter 0.0186894, 0.0461353
Part.ActiveView().RotateAboutCenter 0.0311489, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0373787, 0.0807367
Part.ActiveView().RotateAboutCenter 0.0373787, 0.0692029
Part.ActiveView().RotateAboutCenter 0.0373787, 0.0576691
Part.ActiveView().RotateAboutCenter 0.0249191, 0.0461353
Part.ActiveView().RotateAboutCenter 0.0186894, 0.0230676
Part.ActiveView().RotateAboutCenter 0.0186894, 0.0230676
Part.ActiveView().RotateAboutCenter 0.0186894, 0.0115338
Part.ActiveView().RotateAboutCenter 0.0249191, 0.0230676
Part.ActiveView().RotateAboutCenter 0.0249191, 0.0115338
Part.ActiveView().RotateAboutCenter 0.0186894, 0
Part.ActiveView().RotateAboutCenter 0.0373787, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0685277, -0.0692029
Part.ActiveView().RotateAboutCenter 0.0498383, -0.103804
Part.ActiveView().RotateAboutCenter 0.0498383, -0.115338
Part.ActiveView().RotateAboutCenter 0.0560681, -0.126872
Part.ActiveView().RotateAboutCenter 0.0373787, -0.115338
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0461353
Part.ActiveView().RotateAboutCenter 0, -0.0576691
Part.ActiveView().RotateAboutCenter 0, -0.0230676
Part.ActiveView().RotateAboutCenter 0, -0.0346015
Part.ActiveView().RotateAboutCenter -0.0124596, -0.0576691
Part.ActiveView().RotateAboutCenter -0.00622979, -0.0576691
Part.ActiveView().RotateAboutCenter 0, -0.0346015
Part.ActiveView().RotateAboutCenter 0, -0.0115338
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0346015
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0346015
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0115338
Part.ActiveView().RotateAboutCenter 0.0186894, 0
Part.ActiveView().RotateAboutCenter 0, -0.0115338
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0115338
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0115338
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter -0.0124596, -0.0115338
Part.ActiveView().RotateAboutCenter -0.0685277, -0.0576691
Part.ActiveView().RotateAboutCenter -0.0934468, -0.0807367
Part.ActiveView().RotateAboutCenter -0.0622979, -0.0576691
Part.ActiveView().RotateAboutCenter -0.0186894, -0.0115338
Part.ActiveView().RotateAboutCenter -0.155745, -0.115338
Part.ActiveView().RotateAboutCenter -0.112136, -0.126872
Part.ActiveView().RotateAboutCenter -0.242962, -0.380616
Part.ActiveView().RotateAboutCenter -0.087217, -0.219143
Part.ActiveView().RotateAboutCenter -0.0685277, -0.334481
Part.ActiveView().RotateAboutCenter -0.0249191, -0.276812
Part.ActiveView().RotateAboutCenter 0.0373787, -0.380616
Part.ActiveView().RotateAboutCenter 0.0622979, -0.196075
Part.ActiveView().RotateAboutCenter 0.0809872, -0.14994
Part.ActiveView().RotateAboutCenter 0.130826, -0.0922706
Part.ActiveView().RotateAboutCenter 0.137055, -0.0461353
Part.ActiveView().RotateAboutCenter 0.118366, 0
Part.ActiveView().RotateAboutCenter 0.130826, 0.0692029
Part.ActiveView().RotateAboutCenter 0.087217, 0.103804
Part.ActiveView().RotateAboutCenter 0.0934468, 0.196075
Part.ActiveView().RotateAboutCenter 0.0498383, 0.14994
Part.ActiveView().RotateAboutCenter 0.0498383, 0.138406
Part.ActiveView().RotateAboutCenter 0.0124596, 0.0230676
Part.ActiveView().RotateAboutCenter -0.00622979, 0.0230676
Part.ActiveView().RotateAboutCenter -0.0311489, 0.0692029
Part.ActiveView().RotateAboutCenter -0.0186894, 0.103804
Part.ActiveView().RotateAboutCenter 0, 0.103804
Part.ActiveView().RotateAboutCenter 0.0249191, 0.322947
Part.ActiveView().RotateAboutCenter 0.0622979, 0.288345
Part.ActiveView().RotateAboutCenter 0.0498383, 0.161473
Part.ActiveView().RotateAboutCenter 0.0311489, 0.0576691
Part.ActiveView().RotateAboutCenter 0.0311489, 0
Part.ActiveView().RotateAboutCenter 0.0373787, -0.0692029
Part.ActiveView().RotateAboutCenter 0.0311489, -0.138406
Part.ActiveView().RotateAboutCenter 0.0186894, -0.219143
Part.ActiveView().RotateAboutCenter -0.00622979, -0.14994
Part.ActiveView().RotateAboutCenter -0.0311489, -0.115338
Part.ActiveView().RotateAboutCenter -0.0560681, -0.184541
Part.ActiveView().RotateAboutCenter -0.0311489, -0.115338
Part.ActiveView().RotateAboutCenter 0, -0.0230676
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0115338
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.Save2 FALSE
Part.ActiveView().RotateAboutCenter 0.155745, 0.161473
Part.ActiveView().RotateAboutCenter 0.0685277, 0.138406
Part.ActiveView().RotateAboutCenter 0.0311489, 0.184541
Part.ActiveView().RotateAboutCenter 0, 0.0807367
Part.ActiveView().RotateAboutCenter -0.0373787, 0.126872
Part.ActiveView().RotateAboutCenter -0.0124596, 0.0346015
Part.ActiveView().RotateAboutCenter -0.0186894, 0.0461353
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0115338
Part.ActiveView().RotateAboutCenter 0.118366, -0.14994
Part.ActiveView().RotateAboutCenter 0.087217, -0.126872
Part.ActiveView().RotateAboutCenter 0.0685277, -0.103804
Part.ActiveView().RotateAboutCenter 0.0436085, -0.0922706
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0461353
Part.ActiveView().RotateAboutCenter -0.00622979, 0
Part.ActiveView().RotateAboutCenter -0.0186894, 0.0115338
Part.ActiveView().RotateAboutCenter -0.0498383, 0.0807367
Part.ActiveView().RotateAboutCenter -0.0373787, 0.0461353
Part.ActiveView().RotateAboutCenter -0.0186894, 0.0230676
Part.ActiveView().RotateAboutCenter 0.00622979, 0
Part.ActiveView().RotateAboutCenter 0.0186894, -0.0230676
Part.ActiveView().RotateAboutCenter 0.0311489, -0.0807367
Part.ActiveView().RotateAboutCenter 0.0249191, -0.0576691
Part.ActiveView().RotateAboutCenter 0.0124596, -0.0346015
Part.ActiveView().RotateAboutCenter 0.00622979, -0.0346015
Part.ActiveView().RotateAboutCenter 0, -0.0115338
Set Part = Nothing
swApp.CloseDoc "Essai géométrie"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Turbocompresseur Garrett")
Set Part = Nothing
swApp.CloseDoc "Turbocompresseur Garrett"
swApp.ExitApp
End Sub
