' ******************************************************************************
' swxJRNL.swj - journal recorded on 08/09/01 by RIRIWIN
' ******************************************************************************

Dim swApp As Object
Dim Part As Object
Dim Gtol As Object
Dim FeatureData As Object
Dim Feature As Object
Dim Component As Object
Sub main()
Set swApp = CreateObject ("SldWorks.Application")
Set Part = swApp.OpenDoc ("D:\I.S.I\Mini_stepper\Solid_works\Assemblage\Emsemble.SLDASM", 2)
Set Part = swApp.ActivateDoc ("Emsemble")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter 0.00377265, 0.586201
Part.ActiveView().RotateAboutCenter 0, 0.406559
Part.ActiveView().RotateAboutCenter 0.011318, 0.501108
Part.ActiveView().RotateAboutCenter -0.0301812, 0.222189
Part.ActiveView().RotateAboutCenter -0.105634, 0.0709115
Part.ActiveView().RotateAboutCenter -0.101862, 0.00472743
Part.ActiveView().RotateAboutCenter -0.203723, -0.00472743
Part.ActiveView().RotateAboutCenter -0.226359, -0.0189097
Part.ActiveView().RotateAboutCenter -0.00377265, 0
Part.ActiveView().RotateAboutCenter -0.00754531, -0.0189097
Part.ActiveView().RotateAboutCenter -0.0679078, -0.0141823
Part.ActiveView().RotateAboutCenter 0.00754531, -0.217462
Part.ActiveView().RotateAboutCenter 0.0565898, -0.321465
Part.ActiveView().RotateAboutCenter 0.0490445, -0.260009
Part.ActiveView().RotateAboutCenter 0.011318, -0.0189097
Part.ActiveView().RotateAboutCenter 0.0490445, 0.0378194
Part.ActiveView().RotateAboutCenter 0, 0.0141823
Part.ActiveView().RotateAboutCenter 0.0414992, 0.0803663
Part.ActiveView().RotateAboutCenter 0.00754531, 0.0283646
Part.ActiveView().RotateAboutCenter -0.0150906, 0.0945486
Part.ActiveView().RotateAboutCenter -0.00754531, 0.0236372
Part.ActiveView().RotateAboutCenter 0.0905437, 0.486925
Part.ActiveView().RotateAboutCenter 0.0339539, 0.288373
Part.ActiveView().RotateAboutCenter 0.0452719, 0.0803663
Part.ActiveView().RotateAboutCenter 0.011318, 0.0236372
Part.ActiveView().RotateAboutCenter 0.00377265, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0150906, 0
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.1636171795472, -0.009582354531403, 0.06481689595017
' MSGBOX
' Le composant sélectionné est fixé. Il ne peut pas être déplacé.

Part.SelectByID "Châssis-1@Emsemble", "COMPONENT", 0, 0, 0
Part.TranslateComponent
' MSGBOX
' Le composant sélectionné est fixé. Il ne peut pas être déplacé.

Part.SelectByID "Châssis-1@Emsemble", "COMPONENT", 0, 0, 0
Part.TranslateComponent
Part.TranslateComponent
Part.SelectByID "Châssis-1@Emsemble", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.SelectByID "", "FACE", 0.1694715920718, -0.009159550072184, 0.1242103498401
Part.ActiveView().RotateAboutCenter 0.0188633, -0.0189097
Part.ActiveView().RotateAboutCenter 0.00754531, -0.099276
Part.ActiveView().RotateAboutCenter -0.0150906, -0.0472743
Part.ActiveView().RotateAboutCenter -0.0679078, -0.0850938
Part.ActiveView().RotateAboutCenter -0.0150906, -0.00945486
Part.ActiveView().RotateAboutCenter 0, -0.00945486
Part.ActiveView().RotateAboutCenter 0, -0.0189097
Part.ViewZoomTo2 0.115103, -0.025876, 0.0098584, 0.138143, -0.0527557, 0.0098584
Part.SelectByID "", "FACE", 0.1615445683286, -0.01030000312261, 0.06308574266933
Part.SelectByID "", "FACE", 0.1611177606782, -0.01025128739832, 0.06309888937938
Part.EditPart
Part.ClearSelection
Part.SelectByID "Base-Révolution@Axe_10-1@Emsemble", "BODYFEATURE", 0, 0, 0
Part.ClearSelection
Part.SelectByID "", "FACE", 0.1623674611827, -0.01064180114332, 0.06328390090107
Part.SelectByID "", "FACE", 0.1623674611827, -0.01064180114332, 0.06328390090107
Part.SelectByID "", "FACE", 0.164118863901, -0.0108908691895, 0.06271435485775
Part.SelectByID "", "FACE", 0.162824553215, -0.01041286415375, 0.06285901533903
Part.SelectByID "", "FACE", 0.1642595970577, -0.0109258265415, 0.06266931310176
Part.SetPickMode
Part.ClearSelection
Part.SelectByID "", "FACE", 0.1640480093204, -0.01078812591982, 0.06266682825435
Part.SelectByID "", "FACE", 0.1640837447963, -0.01079636999987, 0.062656129571
Part.SetPickMode
Part.ClearSelection
Part.EditRebuild
Part.SelectByID "", "FACE", 0.1605991952136, -0.01034711600158, 0.06322871341087
Part.ActivateSelectedFeature
Part.SelectByID "D1@Congé1@Axe_10-1@Emsemble", "DIMENSION", 0.07103942814676, -0.08535455303085, -0.02167199435687
Part.Parameter("D1@Congé1@Axe_10.Part").SystemValue = 0.0015
Part.ClearSelection
Part.EditUndo 1
Part.ActiveView().RotateAboutCenter 0.0679078, 0.0189097
Part.ActiveView().RotateAboutCenter 0.245223, 0.174915
Part.ActiveView().RotateAboutCenter 0.0565898, 0.179642
Part.ActiveView().RotateAboutCenter -0.105634, 0.00472743
Part.ActiveView().RotateAboutCenter -0.11318, -0.14655
Part.ActiveView().RotateAboutCenter -0.109407, -0.0898212
Part.ActiveView().RotateAboutCenter -0.11318, -0.0567292
Part.ActiveView().RotateAboutCenter -0.0452719, -0.0236372
Part.ActiveView().RotateAboutCenter -0.0188633, -0.0141823
Part.ActiveView().RotateAboutCenter 0.0264086, -0.0472743
Part.ActiveView().RotateAboutCenter 0.0339539, 0
Part.ActiveView().RotateAboutCenter 0.0301812, 0
Part.ActiveView().RotateAboutCenter 0.0150906, 0
Part.SelectByID "Base-Révolution@Axe_10-1@Emsemble", "BODYFEATURE", 0, 0, 0
Part.SelectByID "", "FACE", 0.1622235407123, -0.009205480500952, 0.06066976185167
Part.ActiveView().TranslateBy 0, -0.000610044
Part.ActiveView().TranslateBy 0.00305022, -0.0289771
Part.ActiveView().TranslateBy 0.00183013, -0.014031
Part.ActiveView().TranslateBy 0, -0.00823559
Part.ActiveView().TranslateBy 0, -0.0070155
Part.ActiveView().TranslateBy 0, -0.00122009
Part.ActiveView().TranslateBy -0.000305022, 0.0118959
Part.ActiveView().TranslateBy -0.000915066, 0.013726
Part.ActiveView().TranslateBy -0.000915066, 0.00854061
Part.ActiveView().TranslateBy 0, 0.00213515
Part.ActiveView().TranslateBy 0, 0.00122009
Part.ActiveView().TranslateBy 0, 0.00244017
Part.ActiveView().TranslateBy -0.000305022, 0.00213515
Part.EditRebuild
Part.ClearSelection
Part.SelectByID "", "FACE", 0.1608746940456, -0.01008275784693, 0.06298350877142
Part.ActivateSelectedFeature
Part.SelectByID "D1@Congé1@Axe_10-1@Emsemble", "DIMENSION", 0.06929382648649, -0.08377383217846, -0.02630771437975
Part.Parameter("D1@Congé1@Axe_10.Part").SystemValue = 0.0015
Part.ActiveView().RotateAboutCenter 0.00377265, 0
Part.ActiveView().RotateAboutCenter -0.0754531, -0.00472743
Part.ActiveView().RotateAboutCenter -0.0754531, 0.00472743
Part.ActiveView().RotateAboutCenter -0.0414992, 0
Part.ActiveView().RotateAboutCenter -0.0150906, 0
Part.ActiveView().RotateAboutCenter 0.0792258, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0490445, 0.00945486
Part.ActiveView().RotateAboutCenter 0.0603625, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0301812, 0
Part.ActiveView().RotateAboutCenter 0.00377265, 0
Part.SelectByID "D1@Congé1@Axe_10-1@Emsemble", "DIMENSION", 0.07273469451879, -0.08381199328875, -0.02293512268258
Part.EditRebuild
Part.ClearSelection
Part.SelectByID "", "FACE", 0.1580071921267, -0.0111367119755, 0.06328575509758
Part.SetPickMode
Part.ClearSelection
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.537634
Part.ActiveView().ZoomByFactor 0.847458
Part.ActiveView().ZoomByFactor 0.833333
Part.ActiveView().ZoomByFactor 0.793651
Part.ActiveView().ZoomByFactor 0.813008
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 1.09
Part.ActiveView().ZoomByFactor 1.16
Part.ActiveView().TranslateBy -0.000610044, -0.00305022
Part.ActiveView().TranslateBy -0.0103707, -0.0445332
Part.ActiveView().TranslateBy -0.0128109, -0.0341624
Part.ActiveView().TranslateBy -0.0122009, -0.0240967
Part.ActiveView().TranslateBy -0.000915066, -0.00122009
Part.ActiveView().TranslateBy 0.00396528, 0.00671048
Part.ActiveView().TranslateBy 0.000915066, 0.00152511
Part.SelectByID "", "FACE", 0.1367647156025, -0.009596295972301, 0.004740060612505
Part.SelectByID "", "FACE", 0.1331519821034, -0.005595851063902, -0.01827723722107
Part.SelectByID "", "FACE", 0.1391996085304, -0.007471325499353, 0.004450260099418
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.EditAssembly
Part.ClearSelection
Part.AndSelectByID "", "FACE", 0.1398130432239, -0.008800051217236, 0.00437724921369
Part.AndSelectByID "", "FACE", 0.1676532857309, -0.01287445112683, 0.06179832420929
Part.AddMate 5, 2, 0, 0.0035, 0.5235987755983
Part.ActiveView().TranslateBy 0, -0.000610044
Part.ActiveView().TranslateBy 0, -0.0201314
Part.ActiveView().TranslateBy 0.000610044, -0.0234867
Part.ActiveView().TranslateBy 0.00122009, -0.0118959
Part.ActiveView().TranslateBy 0.00305022, -0.0225716
Part.ActiveView().TranslateBy 0.000610044, -0.00549039
Part.ActiveView().TranslateBy 0, -0.00122009
' MSGBOX
' Cette contrainte a sur-contraint l'assemblage. Envisagez de supprimer certains des assemblages sur-contraints

Part.ClearSelection 
Part.SelectByMark "", "FACE", 0.1398130432239, -0.008800051217236, 0.00437724921369, 8
Part.AndSelectByMark "", "FACE", 0.1676532857309, -0.01287445112683, 0.06179832420929, 8
Part.EditMate 5, 1, 1, 0.0035, 0.5235987755983
' MSGBOX
' Veuillez entrer un nombre supérieur ou égal à 0 et inférieur ou égal à 1000000

Part.AddMate 5, 2, 1, 0.0035, 0.5235987755983
Part.ActiveView().TranslateBy 0, -0.000610044
Part.ActiveView().TranslateBy 0.00152511, -0.0228766
Part.ActiveView().TranslateBy 0.000610044, -0.0378227
Part.ActiveView().TranslateBy -0.00122009, -0.013726
Part.ActiveView().TranslateBy -0.00244017, -0.00884563
Part.ActiveView().RotateAboutCenter 0.0226359, -0.0283646
Part.ActiveView().RotateAboutCenter 0.0829984, -0.127641
Part.ActiveView().RotateAboutCenter -0.00377265, -0.0614566
Part.ActiveView().RotateAboutCenter -0.011318, -0.0472743
Part.ActiveView().RotateAboutCenter -0.0264086, -0.0378194
Part.ActiveView().RotateAboutCenter -0.011318, 0.00945486
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 0.5
Part.ActiveView().ZoomByFactor 0.826446
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.05
Part.ActiveView().RotateAboutCenter 0.0603625, 0.0567292
Part.ActiveView().RotateAboutCenter 0.362175, 0.033092
Part.ActiveView().RotateAboutCenter 0.124498, -0.0236372
Part.ActiveView().RotateAboutCenter 0.0414992, -0.0756389
Part.ActiveView().RotateAboutCenter 0.00754531, -0.00945486
Part.ActiveView().RotateAboutCenter 0, 0.00945486
Part.ActiveView().RotateAboutCenter 0.00377265, 0.260009
Part.ActiveView().RotateAboutCenter -0.0226359, 0.0945486
Part.ActiveView().RotateAboutCenter -0.0188633, 0.137095
Part.ActiveView().RotateAboutCenter -0.00377265, 0.0425469
Part.ActiveView().RotateAboutCenter 0, -0.00472743
Part.ActiveView().RotateAboutCenter 0, -0.118186
Part.ActiveView().RotateAboutCenter 0.00754531, -0.222189
Part.ActiveView().RotateAboutCenter -0.0226359, -0.033092
Part.ActiveView().RotateAboutCenter -0.0264086, -0.0803663
Part.ActiveView().RotateAboutCenter -0.0150906, -0.278918
Part.ActiveView().RotateAboutCenter -0.00377265, -0.0567292
Part.ActiveView().RotateAboutCenter 0.00377265, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0943164, 0.255281
Part.ActiveView().RotateAboutCenter 0.0490445, 0.0614566
Part.ActiveView().RotateAboutCenter 0.011318, 0.0236372
Part.ActiveView().RotateAboutCenter -0.011318, 0
Part.ActiveView().RotateAboutCenter -0.00377265, 0
Part.ClearSelection
Part.SelectByID "Axe_10-1@Emsemble", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.SelectByID "", "FACE", 0.1527330454546, 0.06997356755789, -0.07023839543474
Part.ClearSelection
Part.SelectByID "Grp. contr. asm 1", "MATEGROUPS", 0, 0, 0
Part.SelectByID "Grp. contr. asm 1", "MATEGROUPS", 0, 0, 0
Part.ActivateSelectedFeature
Part.SelectByID "Coïncidente8", "MATE", 0, 0, 0
Part.ClearSelection
Part.ActiveView().RotateAboutCenter -0.00377265, 0
Part.ActiveView().RotateAboutCenter -0.098089, 0.0283646
Part.ActiveView().RotateAboutCenter -0.0641351, 0.00945486
Part.ActiveView().RotateAboutCenter -0.0565898, 0.0283646
Part.ActiveView().RotateAboutCenter -0.00754531, 0.00472743
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0264086, 0.0898212
Part.ActiveView().RotateAboutCenter -0.0716804, 0.160733
Part.ActiveView().RotateAboutCenter -0.0641351, 0.0756389
Part.ActiveView().RotateAboutCenter -0.0528172, 0.0567292
Part.ActiveView().RotateAboutCenter -0.0226359, 0.0141823
Part.ActiveView().RotateAboutCenter -0.0452719, 0.033092
Part.ActiveView().RotateAboutCenter -0.0679078, 0.0378194
Part.ActiveView().RotateAboutCenter -0.011318, 0.00472743
Part.ActiveView().RotateAboutCenter 0.00377265, 0
Part.ActiveView().RotateAboutCenter 0.0792258, 0.0283646
Part.ActiveView().RotateAboutCenter 0.0339539, 0.0283646
Part.ActiveView().RotateAboutCenter 0.00377265, 0
Part.ActiveView().RotateAboutCenter 0.0792258, 0.0614566
Part.ActiveView().RotateAboutCenter 0.0414992, 0.0472743
Part.ActiveView().RotateAboutCenter 0.0226359, 0.0283646
Part.ActiveView().RotateAboutCenter 0, -0.00472743
Part.ActiveView().RotateAboutCenter -0.0716804, -0.34983
Part.ActiveView().RotateAboutCenter -0.0641351, -0.0567292
Part.ActiveView().RotateAboutCenter -0.098089, -0.0378194
Part.ActiveView().RotateAboutCenter -0.0641351, 0.00472743
Part.ActiveView().RotateAboutCenter -0.0754531, 0.0472743
Part.ActiveView().RotateAboutCenter -0.0565898, 0.033092
Part.ActiveView().RotateAboutCenter -0.0150906, 0
Part.ActiveView().RotateAboutCenter 0, -0.00472743
Part.ActiveView().RotateAboutCenter -0.0679078, -0.250554
Part.ActiveView().RotateAboutCenter -0.101862, -0.141823
Part.ActiveView().RotateAboutCenter -0.098089, -0.118186
Part.ActiveView().RotateAboutCenter -0.0867711, -0.0709115
Part.ActiveView().RotateAboutCenter -0.0943164, -0.099276
Part.ActiveView().RotateAboutCenter -0.0377265, -0.0378194
Part.ActiveView().RotateAboutCenter -0.0301812, -0.0189097
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0414992, 0.0520017
Part.ActiveView().RotateAboutCenter 0.0528172, 0.127641
Part.ActiveView().RotateAboutCenter 0.0490445, 0.170188
Part.ActiveView().RotateAboutCenter 0.0490445, 0.108731
Part.ActiveView().RotateAboutCenter 0.0339539, 0.151278
Part.ActiveView().RotateAboutCenter 0.0264086, 0.0803663
Part.ActiveView().RotateAboutCenter 0.0414992, 0.104003
Part.ActiveView().RotateAboutCenter 0.0150906, 0.0189097
Part.ActiveView().RotateAboutCenter 0.0377265, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0565898, -0.0236372
Part.ActiveView().RotateAboutCenter 0.0301812, -0.0189097
Part.ActiveView().RotateAboutCenter 0.00377265, 0
Part.ActiveView().RotateAboutCenter 0.00377265, -0.0283646
Part.SelectByID "A distance2", "MATE", 0, 0, 0
Part.SelectByID "A distance2", "MATE", 0, 0, 0
Part.ActiveView().RotateAboutCenter 0, 0
Part.EditRebuild
Part.ClearSelection
Part.SelectByID "Grp. contr. asm 1", "MATEGROUPS", 0, 0, 0
Part.ActivateSelectedFeature
Part.ViewZoomTo2 0.146195, 0.0145242, 0.0098584, 0.157843, -0.00035974, 0.0098584
Part.SelectByID "", "FACE", 0.1697076843218, -5.833980168291e-005, 0.03322382957236
Part.ActivateSelectedFeature
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.540541
Part.ActiveView().ZoomByFactor 0.588235
Part.ActiveView().ZoomByFactor 0.990099
Part.EditRebuild
Part.ClearSelection
Part.ShowNamedView2 "*Isométrique", 7
Part.SelectByID "Grp. contr. asm 1", "MATEGROUPS", 0, 0, 0
Part.SelectByID "Coaxial2", "MATE", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Châssis-1@Emsemble", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.TranslateComponent
Part.SelectByID "", "FACE", -0.1869075586411, 0.1373668817623, -0.07735661565624
Part.ViewZoomTo2 0.119614, 0.00347006, 0.0203823, 0.196135, -0.0759387, 0.0203823
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0242793, -0.00945486
Part.ActiveView().RotateAboutCenter 0.0687913, -0.0614566
Part.ActiveView().RotateAboutCenter 0.044512, -0.0614566
Part.ActiveView().RotateAboutCenter 0.11735, -0.0283646
Part.ActiveView().RotateAboutCenter 0.153769, 0.141823
Part.ActiveView().RotateAboutCenter 0.0728379, 0.283646
Part.ActiveView().RotateAboutCenter 0.0283258, 0.170188
Part.ActiveView().RotateAboutCenter 0.0080931, 0.236372
Part.ActiveView().RotateAboutCenter -0.0404655, -0.501108
Part.ActiveView().RotateAboutCenter -0.0566517, -0.36874
Part.ActiveView().RotateAboutCenter -0.0242793, -0.066184
Part.ActiveView().RotateAboutCenter -0.044512, -0.0898212
Part.ActiveView().RotateAboutCenter -0.0242793, -0.293101
Part.ActiveView().RotateAboutCenter -0.0121396, -0.127641
Part.ActiveView().RotateAboutCenter -0.00404655, -0.0567292
Part.ActiveView().RotateAboutCenter -0.00404655, -0.0283646
Part.ActiveView().RotateAboutCenter 0, -0.00945486
Part.ActiveView().RotateAboutCenter 0.0080931, 0
Part.ActiveView().RotateAboutCenter 0.080931, 0.00945486
Part.ActiveView().RotateAboutCenter 0.044512, 0.0236372
Part.ActiveView().RotateAboutCenter 0.0566517, 0.0378194
Part.ActiveView().RotateAboutCenter 0.0242793, 0.0141823
Part.ActiveView().RotateAboutCenter 0.0080931, 0.0472743
Part.ActiveView().RotateAboutCenter 0.00404655, 0.122913
Part.ActiveView().RotateAboutCenter -0.00404655, 0.14655
Part.ActiveView().RotateAboutCenter -0.00404655, 0.345102
Part.ActiveView().RotateAboutCenter -0.0283258, 0.127641
Part.ActiveView().RotateAboutCenter -0.0202327, 0.137095
Part.ActiveView().RotateAboutCenter -0.0242793, 0.198552
Part.ActiveView().RotateAboutCenter -0.0202327, 0
Part.ActiveView().RotateAboutCenter -0.254933, -0.033092
Part.ActiveView().RotateAboutCenter -0.21042, -0.00945486
Part.ActiveView().RotateAboutCenter -0.0364189, 0
Part.ShowNamedView2 "*Isométrique", 7
Part.ActiveView().RotateAboutCenter 0, 0.00945486
Part.ActiveView().RotateAboutCenter -0.0485586, 0.326193
Part.ActiveView().RotateAboutCenter -0.080931, 0.113458
Part.ActiveView().RotateAboutCenter -0.0647448, 0.0472743
Part.ActiveView().RotateAboutCenter -0.0485586, 0.00472743
Part.ActiveView().RotateAboutCenter -0.0606982, 0
Part.ActiveView().RotateAboutCenter -0.0526051, 0
Part.ActiveView().RotateAboutCenter -0.0404655, -0.00472743
Part.ActiveView().RotateAboutCenter -0.0728379, 0
Part.ActiveView().RotateAboutCenter -0.044512, 0.0189097
Part.ActiveView().RotateAboutCenter -0.0161862, 0.033092
Part.ActiveView().RotateAboutCenter -0.00404655, 0.0472743
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0485586, 0.00945486
Part.ActiveView().RotateAboutCenter 0.0687913, 0.066184
Part.ActiveView().RotateAboutCenter 0.0566517, 0.0567292
Part.ActiveView().RotateAboutCenter 0.0161862, 0.0756389
Part.ActiveView().RotateAboutCenter -0.00404655, 0.0378194
Part.ActiveView().RotateAboutCenter 0, 0.0709115
Part.ActiveView().RotateAboutCenter -0.0080931, 0.033092
Part.ActiveView().RotateAboutCenter -0.0080931, 0.0189097
Part.ActiveView().RotateAboutCenter -0.00404655, 0.0189097
Part.ActiveView().RotateAboutCenter -0.0121396, 0.0283646
Part.ActiveView().RotateAboutCenter -0.0404655, 0.0283646
Part.ActiveView().RotateAboutCenter -0.0364189, 0.00945486
Part.ActiveView().RotateAboutCenter -0.0161862, 0.00472743
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.TranslateComponent
Part.ClearSelection
Part.ActiveView().RotateAboutCenter 0.0080931, 0
Part.ActiveView().RotateAboutCenter 0.0728379, -0.0472743
Part.ActiveView().RotateAboutCenter 0.0121396, -0.0803663
Part.ActiveView().RotateAboutCenter 0.0080931, -0.0189097
Part.ActiveView().RotateAboutCenter 0, -0.18437
Part.ActiveView().RotateAboutCenter 0.0080931, 0.00472743
Part.ActiveView().RotateAboutCenter 0.190188, -0.160733
Part.ActiveView().RotateAboutCenter 0.0728379, -0.255281
Part.ActiveView().RotateAboutCenter -0.044512, -0.288373
Part.ActiveView().RotateAboutCenter -0.0404655, -0.033092
Part.ViewZoomTo2 0.0793064, -0.0418671, 0.0194242, 0.143115, -0.102902, 0.0194242
Part.SelectByID "", "FACE", 0.1733603717456, 0.005737483414634, 0.03407994593607
Part.EditRebuild
Part.ClearSelection
Part.ViewDispRefPoints
Part.SelectByID "", "FACE", 0.1747087080718, 0.01511086783017, 0.03324011246877
Part.ShowNamedView2 "*Isométrique", 7
Part.ClearSelection
Part.ActiveView().RotateAboutCenter 0.0121396, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0323724, 0.501108
Part.ActiveView().RotateAboutCenter -0.271119, 0.293101
Part.ActiveView().RotateAboutCenter -0.364189, 0.198552
Part.ActiveView().RotateAboutCenter -0.0364189, 0.0189097
Part.ActiveView().RotateAboutCenter -0.0080931, 0
Part.ActiveView().RotateAboutCenter 0.0080931, -0.00945486
Part.ActiveView().RotateAboutCenter 0.0566517, -0.0520017
Part.ActiveView().RotateAboutCenter 0.0566517, -0.0283646
Part.ActiveView().RotateAboutCenter 0.0526051, -0.0141823
Part.ActiveView().RotateAboutCenter 0.0526051, -0.033092
Part.ActiveView().RotateAboutCenter 0.0202327, -0.00945486
Part.ActiveView().RotateAboutCenter 0.0283258, -0.00472743
Part.ActiveView().RotateAboutCenter 0.00404655, 0
Part.SmartMateComponent
Part.TranslateComponent
Part.SelectByID "", "FACE", -0.1905235910718, 0.1899956401248, 0.1195500000001
Part.ViewZoomTo2 -0.256384, 0.12829, 0.0194242, -0.170381, 0.00159693, 0.0194242
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter -0.137583, 0.0472743
Part.ActiveView().RotateAboutCenter -0.0404655, 0.00945486
Part.ActiveView().RotateAboutCenter -0.044512, 0
Part.ActiveView().RotateAboutCenter -0.0242793, 0
Part.ActiveView().RotateAboutCenter 0.0121396, -0.00472743
Part.ActiveView().RotateAboutCenter 0.0849775, -0.0283646
Part.ActiveView().RotateAboutCenter 0.121396, 0
Part.ActiveView().RotateAboutCenter 0.0283258, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0526051, 0.0283646
Part.ActiveView().RotateAboutCenter 0.0080931, 0.0283646
Part.ActiveView().RotateAboutCenter -0.0080931, 0.137095
Part.ActiveView().RotateAboutCenter -0.0283258, 0.0756389
Part.ActiveView().RotateAboutCenter -0.0323724, 0.0850938
Part.ActiveView().RotateAboutCenter -0.0283258, 0.0614566
Part.ActiveView().RotateAboutCenter -0.0485586, 0.0472743
Part.ActiveView().RotateAboutCenter -0.0080931, 0.0141823
Part.ActiveView().RotateAboutCenter -0.0687913, 0.0709115
Part.ActiveView().RotateAboutCenter -0.125443, 0.033092
Part.ActiveView().RotateAboutCenter -0.0566517, 0.0236372
Part.ActiveView().RotateAboutCenter 0.0242793, 0.0520017
Part.ActiveView().RotateAboutCenter 0.0930706, 0.0520017
Part.ActiveView().RotateAboutCenter 0.10521, -0.0567292
Part.ActiveView().RotateAboutCenter 0.0485586, -0.0756389
Part.ActiveView().RotateAboutCenter 0.044512, -0.108731
Part.ActiveView().RotateAboutCenter 0.0161862, -0.141823
Part.ActiveView().RotateAboutCenter 0.00404655, -0.0850938
Part.ActiveView().RotateAboutCenter 0, -0.0850938
Part.ActiveView().RotateAboutCenter -0.0202327, -0.226917
Part.ActiveView().RotateAboutCenter -0.0121396, -0.0709115
Part.ActiveView().RotateAboutCenter -0.00404655, -0.00945486
Part.ActiveView().RotateAboutCenter 0, 0.066184
Part.ActiveView().RotateAboutCenter 0, 0.141823
Part.ActiveView().RotateAboutCenter 0, 0.0756389
Part.ActiveView().RotateAboutCenter -0.00404655, 0.0283646
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter 0.00404655, -0.0472743
Part.ActiveView().RotateAboutCenter 0.0202327, -0.033092
Part.ActiveView().RotateAboutCenter 0.0202327, -0.0141823
Part.ActiveView().RotateAboutCenter 0.0161862, -0.00472743
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter -0.0161862, 0
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter -0.00404655, 0.00472743
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter -0.0242793, 0.0189097
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter 0.00404655, 0
Part.ActiveView().RotateAboutCenter 0.0161862, 0
Part.ActiveView().RotateAboutCenter 0.0121396, -0.0189097
Part.ActiveView().RotateAboutCenter -0.00404655, -0.0189097
Part.ActiveView().RotateAboutCenter 0, -0.00472743
Part.ActiveView().RotateAboutCenter -0.0080931, 0
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter -0.0526051, 0
Part.ShowNamedView2 "*Isométrique", 7
Part.ActiveView().RotateAboutCenter 0.0080931, 0.00945486
Part.ActiveView().RotateAboutCenter 0.0404655, 0.122913
Part.ActiveView().RotateAboutCenter -0.0606982, 0.189097
Part.ActiveView().RotateAboutCenter -0.0930706, 0.122913
Part.ActiveView().RotateAboutCenter -0.0485586, 0.160733
Part.ActiveView().RotateAboutCenter -0.0080931, 0.0141823
Part.ActiveView().RotateAboutCenter -0.044512, 0.0283646
Part.ActiveView().RotateAboutCenter -0.0323724, 0.0283646
Part.ActiveView().RotateAboutCenter -0.0283258, 0.0236372
Part.ActiveView().RotateAboutCenter -0.0485586, 0.0425469
Part.ActiveView().RotateAboutCenter -0.0080931, 0.0520017
Part.ActiveView().RotateAboutCenter -0.0404655, 0.0709115
Part.ActiveView().RotateAboutCenter -0.0242793, 0.0283646
Part.ActiveView().RotateAboutCenter -0.00404655, 0.0141823
Part.ActiveView().RotateAboutCenter 0.0080931, 0.00472743
Part.ActiveView().RotateAboutCenter 0.0404655, 0.033092
Part.ActiveView().RotateAboutCenter 0.0283258, 0.0236372
Part.ActiveView().RotateAboutCenter 0.0485586, 0
Part.ActiveView().RotateAboutCenter 0.0364189, -0.0567292
Part.ActiveView().RotateAboutCenter 0.0202327, -0.0614566
Part.ActiveView().RotateAboutCenter 0.0202327, -0.0709115
Part.ActiveView().RotateAboutCenter 0.0242793, -0.0283646
Part.ActiveView().RotateAboutCenter 0.0161862, -0.0236372
Part.ActiveView().RotateAboutCenter -0.0526051, -0.00472743
Part.ActiveView().RotateAboutCenter -0.258979, -0.00945486
Part.ActiveView().RotateAboutCenter -0.11735, 0.0614566
Part.ActiveView().RotateAboutCenter -0.121396, 0.0520017
Part.ActiveView().RotateAboutCenter -0.0728379, 0.0472743
Part.ActiveView().RotateAboutCenter -0.0121396, 0.033092
Part.ActiveView().RotateAboutCenter -0.0121396, 0.0283646
Part.ActiveView().RotateAboutCenter -0.00404655, 0.033092
Part.ActiveView().RotateAboutCenter 0, 0.0520017
Part.ActiveView().RotateAboutCenter 0, 0.0472743
Part.ActiveView().RotateAboutCenter 0, 0.0189097
Part.ActiveView().RotateAboutCenter 0, 0.0378194
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter -0.00404655, 0.0283646
Part.ActiveView().RotateAboutCenter 0, 0.0236372
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ViewZoomTo2 0.0469932, 0.0672751, 0.0199205, 0.177794, -0.121659, 0.0199205
Part.ShowNamedView2 "*Isométrique", 7
Part.TranslateComponent
Part.ClearSelection
Part.ShowNamedView2 "*Isométrique", 7
Part.ActiveView().RotateAboutCenter 0.00404655, 0.00945486
Part.ActiveView().RotateAboutCenter 0.0485586, 0.0945486
Part.ActiveView().RotateAboutCenter 0.0080931, 0.151278
Part.ActiveView().RotateAboutCenter 0.0080931, 0.104003
Part.ActiveView().RotateAboutCenter -0.0121396, 0.0803663
Part.ActiveView().RotateAboutCenter -0.0161862, 0.0614566
Part.ActiveView().RotateAboutCenter -0.0485586, 0.0803663
Part.ActiveView().RotateAboutCenter -0.0161862, 0.0898212
Part.ActiveView().RotateAboutCenter 0.0202327, 0.189097
Part.ActiveView().RotateAboutCenter 0.0161862, 0.269464
Part.ActiveView().RotateAboutCenter 0.0080931, 0.0850938
Part.ActiveView().RotateAboutCenter 0.0121396, 0.033092
Part.ActiveView().RotateAboutCenter 0.0121396, 0.0614566
Part.ActiveView().RotateAboutCenter 0.0080931, 0.00472743
Part.ActiveView().RotateAboutCenter 0.00404655, 0
Part.ActiveView().RotateAboutCenter 0.2347, 0.0709115
Part.ActiveView().RotateAboutCenter 0.182095, 0.066184
Part.ActiveView().RotateAboutCenter 0.0364189, 0.0189097
Part.ActiveView().RotateAboutCenter 0.00404655, 0.00472743
Part.ActiveView().RotateAboutCenter -0.0080931, -0.066184
Part.ActiveView().RotateAboutCenter 0, -0.00472743
Part.ActiveView().RotateAboutCenter -0.0323724, -0.0236372
Part.ActiveView().RotateAboutCenter -0.0161862, -0.00945486
Part.ActiveView().RotateAboutCenter -0.0768844, -0.0472743
Part.ActiveView().RotateAboutCenter -0.0687913, -0.066184
Part.ActiveView().RotateAboutCenter -0.230653, -0.160733
Part.ActiveView().RotateAboutCenter -0.0930706, -0.0756389
Part.ActiveView().RotateAboutCenter -0.0485586, -0.0567292
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.AddConfiguration "Pédale gauche basse","","",1,0,0,0,0
Part.TranslateComponent
Part.SelectByID "", "FACE", -0.05354389071212, 0.1323592582472, 0.1195500000001
Part.ActiveView().RotateAboutCenter 0.00404655, 0
Part.ActiveView().RotateAboutCenter 0.0768844, 0.0520017
Part.ActiveView().RotateAboutCenter 0.109257, 0.0614566
Part.ActiveView().RotateAboutCenter 0.113303, 0.0756389
Part.ActiveView().RotateAboutCenter 0.0971171, 0.0850938
Part.ActiveView().RotateAboutCenter 0.080931, 0.0850938
Part.ActiveView().RotateAboutCenter 0.0687913, 0.0614566
Part.ActiveView().RotateAboutCenter 0.0687913, 0.0614566
Part.ActiveView().RotateAboutCenter 0.0161862, 0.00945486
Part.ActiveView().RotateAboutCenter 0.0364189, -0.0520017
Part.ActiveView().RotateAboutCenter 0.0283258, -0.0472743
Part.ActiveView().RotateAboutCenter 0.0283258, -0.0189097
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter -0.0080931, -0.00472743
Part.TranslateComponent
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter -0.194234, 0.00472743
Part.ActiveView().RotateAboutCenter -0.186141, 0
Part.ActiveView().RotateAboutCenter -0.137583, -0.0236372
Part.ActiveView().RotateAboutCenter -0.198281, -0.0425469
Part.ActiveView().RotateAboutCenter -0.101164, -0.0283646
Part.ActiveView().RotateAboutCenter -0.080931, -0.033092
Part.ActiveView().RotateAboutCenter -0.0121396, -0.00472743
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter -0.0566517, -0.00945486
Part.ActiveView().RotateAboutCenter -0.0080931, 0
Part.ActiveView().RotateAboutCenter 0.00404655, 0
Part.ActiveView().RotateAboutCenter 0.044512, 0
Part.ActiveView().RotateAboutCenter 0.0242793, 0
Part.ActiveView().RotateAboutCenter 0.0121396, -0.00472743
Part.ActiveView().RotateAboutCenter 0.0080931, 0
Part.ActiveView().RotateAboutCenter 0.0485586, 0.0378194
Part.ActiveView().RotateAboutCenter 0.267072, 0.505835
Part.ActiveView().RotateAboutCenter 0.0485586, 0.288373
Part.ActiveView().RotateAboutCenter 0.0485586, 0.0945486
Part.ActiveView().RotateAboutCenter 0.0971171, -0.0803663
Part.ActiveView().RotateAboutCenter 0.0606982, -0.264736
Part.ActiveView().RotateAboutCenter 0.0364189, -0.127641
Part.ActiveView().RotateAboutCenter 0.0161862, -0.208007
Part.ActiveView().RotateAboutCenter 0, -0.0614566
Part.ActiveView().RotateAboutCenter 0, -0.16546
Part.ActiveView().RotateAboutCenter 0, -0.0567292
Part.ActiveView().RotateAboutCenter 0, -0.0189097
Part.ActiveView().RotateAboutCenter -0.00404655, 0
Part.ActiveView().RotateAboutCenter 0, 0.00472743
Part.ActiveView().RotateAboutCenter 0.00404655, 0.0141823
Part.ActiveView().RotateAboutCenter 0.00404655, 0.00472743
Part.ActiveView().RotateAboutCenter -0.0647448, 0.0283646
Part.ActiveView().RotateAboutCenter -0.0161862, -0.00472743
Part.ActiveView().RotateAboutCenter -0.080931, -0.00472743
Part.ActiveView().RotateAboutCenter -0.0485586, -0.00945486
Part.ActiveView().RotateAboutCenter -0.0768844, -0.0472743
Part.ActiveView().RotateAboutCenter -0.0728379, -0.0472743
Part.ActiveView().RotateAboutCenter -0.0687913, -0.0378194
Part.ActiveView().RotateAboutCenter -0.0364189, -0.00472743
Part.ActiveView().RotateAboutCenter -0.0202327, -0.0189097
Part.ActiveView().RotateAboutCenter -0.0242793, -0.0472743
Part.ActiveView().RotateAboutCenter -0.0080931, -0.0378194
Part.ActiveView().RotateAboutCenter 0.0768844, 0.137095
Part.ActiveView().RotateAboutCenter 0, -0.00945486
Part.ActiveView().RotateAboutCenter 0.0121396, -0.434924
Part.ActiveView().RotateAboutCenter 0.0202327, -0.274191
Part.ActiveView().RotateAboutCenter 0.0161862, -0.241099
Part.ActiveView().RotateAboutCenter 0.00404655, -0.113458
Part.ActiveView().RotateAboutCenter 0, -0.00472743
Part.ActiveView().RotateAboutCenter 0, -0.00945486
Part.ActiveView().RotateAboutCenter 0.0080931, 0.00945486
Part.ClearSelection
Part.ViewZoomtofit2
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.AddConfiguration "Pédale droite basse","","",1,0,0,0,0
Part.SelectByID "Pédale droite basse", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "Pédale droite basse", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "Pédale gauche basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale gauche basse"
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale droite basse"
Part.SelectByID "Défaut@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Défaut"
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale droite basse"
Part.SelectByID "Pédale gauche basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale gauche basse"
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale droite basse"
Part.SelectByID "Pédale gauche basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale gauche basse"
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale droite basse"
Part.SelectByID "Défaut@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Défaut"
Part.SelectByID "Pédale gauche basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale gauche basse"
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "Pédale gauche basse", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale droite basse"
Part.SelectByID "Pédale droite basse", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "Pédale gauche basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale gauche basse"
Part.TranslateComponent
Part.SelectByID "", "FACE", -0.1768984147951, 0.1741362654863, -0.06715000000003
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.AddConfiguration "aa","","",1,0,0,0,0
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale droite basse"
Part.TranslateComponent
Part.SelectByID "", "FACE", -0.1629879101554, 0.007239853618813, 0.11955
Part.SelectByID "aa@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "aa"
Part.SelectByID "Défaut@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Défaut"
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale droite basse"
Part.SelectByID "Pédale gauche basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Pédale gauche basse"
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.DimPreferences
Part.SelectByID "Emsemble.SLDASM", "COMPONENT", 0, 0, 0
Part.ViewZoomToSelection
Part.ClearSelection
Part.SelectByID "aa@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "Pédale droite basse@Emsemble.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "Pédale gauche basse", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "", "FACE", 0.1712998139487, 0.0674006320159, 0.035220411838
Part.ClearSelection
Part.Save2 FALSE
swApp.ExitApp
End Sub
