' ******************************************************************************
' C:\Users\aznabavi\AppData\Roaming\SolidWorks\SOLIDWORKS 2016\swxJRNL.swj - journal recorded on 08/01/18 by aznabavi
' *****************************************************************************
Dim swApp As Object

Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Sub main()

Set swApp = _
Application.SldWorks

Dim myModelView As Object
boolstatus = swApp.LoadFile2("C:\Users\aznabavi\Downloads\All-Assem_v1 (1).igs", "r")
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
boolstatus = Part.Extension.SelectByID2("V_Foot_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("V_Foot_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("V_Bast_v2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Flang_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Box_3_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("User Library-WE-RJ45 LAN HPLE RJ45 LAN Transformer_799111614_WürthElektronik_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("User Library-WE-RJ45 LAN HPLE RJ45 LAN Transformer_799111614_WürthElektronik_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("User Library-WE-RJ45 LAN HPLE RJ45 LAN Transformer_799111614_WürthElektronik_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("User Library-WE-RJ45 LAN HPLE RJ45 LAN Transformer_799111614_WürthElektronik_1-4@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("HUBER+SUHNER_24_N-50-2-1-133_N_3dModel_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("HUBER+SUHNER_24_N-50-2-1-133_N_3dModel_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 6_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.DeSelectByID("Box_3_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0)
boolstatus = Part.DeSelectByID("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0)
Part.EditDelete
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.EditUndo2 1
boolstatus = Part.Extension.SelectByID2("HUBER+SUHNER_24_N-50-2-1-133_N_3dModel_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("HUBER+SUHNER_24_N-50-2-1-133_N_3dModel_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 6_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 6_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-4@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-5@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-6@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-7@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-8@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-9@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-10@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-11@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-12@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-13@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-14@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-15@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-16@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-17@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 5_1-18@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 6_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 6_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-4@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-5@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-6@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-7@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-8@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-9@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-10@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-11@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-12@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-13@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-14@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-15@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-16@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-17@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-18@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-4@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-5@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-6@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-7@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-8@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-9@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-10@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-11@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-12@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-13@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-14@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-15@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-16@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-17@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 4 x 0.7 x 16 SBHCS --N_1-18@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("formed hex screw_am_B18.2.3.2M - Formed hex screw, M6 x 1.0 x 14 --14WN_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("formed hex screw_am_B18.2.3.2M - Formed hex screw, M6 x 1.0 x 14 --14WN_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Cap_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Cap_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Cap_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Cap_1-4@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers for clevis pins gb_GB_ROUND_WASHERS_TYPE7 5_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers for clevis pins gb_GB_ROUND_WASHERS_TYPE7 5_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers for clevis pins gb_GB_ROUND_WASHERS_TYPE7 5_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers for clevis pins gb_GB_ROUND_WASHERS_TYPE7 5_1-4@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-19@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-20@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-21@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 5_1-22@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 5 x 0.8 x 16 SBHCS --N_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 5 x 0.8 x 16 SBHCS --N_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 5 x 0.8 x 16 SBHCS --N_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("socket button head cap screw_am_B18.3.4M - 5 x 0.8 x 16 SBHCS --N_1-4@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 8_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 8_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("plain washers-s series-grade a gb_GB_FASTENER_WASHER_PWSA 8_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 8_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 8_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("single coil lock washers light type gb_GB_FASTENER_WASHER_SSWL 8_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("formed hex screw_am_B18.2.3.2M - Formed hex screw, M8 x 1.25 x 50 --22WN_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("formed hex screw_am_B18.2.3.2M - Formed hex screw, M8 x 1.25 x 50 --22WN_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("formed hex screw_am_B18.2.3.2M - Formed hex screw, M8 x 1.25 x 60 --22WN_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("User Library-WE-RJ45 LAN HPLE RJ45 LAN Transformer_799111614_WürthElektronik_1-4@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("User Library-WE-RJ45 LAN HPLE RJ45 LAN Transformer_799111614_WürthElektronik_1-3@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("User Library-WE-RJ45 LAN HPLE RJ45 LAN Transformer_799111614_WürthElektronik_1-2@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("User Library-WE-RJ45 LAN HPLE RJ45 LAN Transformer_799111614_WürthElektronik_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("V_Foot_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, 0.062356753993748397, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.01247135079874968, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, 0.087299455591247757, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.02494270159749936, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.037414052396249044, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.037414052396249044, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, 0.02494270159749936, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.037414052396249044, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.037414052396249044, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.02494270159749936, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, 0.04988540319499872, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.01247135079874968, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, 0.02494270159749936, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, 0.01247135079874968, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, 0.02494270159749936, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.01247135079874968, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, 0.02494270159749936, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.037414052396249044, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.02494270159749936, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, 0.037414052396249044, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, 0.01247135079874968, 0.32425189162921697, 2.5142261802856751, 0.54926878265274581
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("Pipe50_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.EditDelete
boolstatus = Part.Extension.SelectByID2("Flang_v2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("V_Foot_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("V_Bast_v2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Flang_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Box_3_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.DeSelectByID("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0)
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
comp = Part.SelectionManager.GetSelectedObject3(1)
matChangingModel = comp.GetModelDoc()
matChangingModel.SetMaterialPropertyName2 "Default", "C:/Program Files/SOLIDWORKS Corp/SOLIDWORKS/lang/english/sldmaterials/SOLIDWORKS Materials.sldmat", "1060 Alloy"
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
comp = Part.SelectionManager.GetSelectedObject3(1)
matChangingModel = comp.GetModelDoc()
matChangingModel.SetMaterialPropertyName2 "Default", "C:/Program Files/SOLIDWORKS Corp/SOLIDWORKS/lang/english/sldmaterials/SOLIDWORKS Materials.sldmat", "1060 Alloy"
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
comp = Part.SelectionManager.GetSelectedObject3(1)
matChangingModel = comp.GetModelDoc()
matChangingModel.SetMaterialPropertyName2 "Default", "C:/Program Files/SOLIDWORKS Corp/SOLIDWORKS/lang/english/sldmaterials/SOLIDWORKS Materials.sldmat", "1060 Alloy"
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
comp = Part.SelectionManager.GetSelectedObject3(1)
matChangingModel = comp.GetModelDoc()
matChangingModel.SetMaterialPropertyName2 "Default", "C:/Program Files/SOLIDWORKS Corp/SOLIDWORKS/lang/english/sldmaterials/SOLIDWORKS Materials.sldmat", "1060 Alloy"
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
comp = Part.SelectionManager.GetSelectedObject3(1)
matChangingModel = comp.GetModelDoc()
matChangingModel.SetMaterialPropertyName2 "Default", "C:/Program Files/SOLIDWORKS Corp/SOLIDWORKS/lang/english/sldmaterials/SOLIDWORKS Materials.sldmat", "1060 Alloy"
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
comp = Part.SelectionManager.GetSelectedObject3(1)
matChangingModel = comp.GetModelDoc()
matChangingModel.SetMaterialPropertyName2 "Default", "C:/Program Files/SOLIDWORKS Corp/SOLIDWORKS/lang/english/sldmaterials/SOLIDWORKS Materials.sldmat", "1060 Alloy"
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
comp = Part.SelectionManager.GetSelectedObject3(1)
matChangingModel = comp.GetModelDoc()
matChangingModel.SetMaterialPropertyName2 "Default", "C:/Program Files/SOLIDWORKS Corp/SOLIDWORKS/lang/english/sldmaterials/SOLIDWORKS Materials.sldmat", "ABS PC"
Part.ClearSelection2 True
Dim motionStudyMgr As Object
Set motionStudyMgr = Part.Extension.GetMotionStudyManager()
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Box_3_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("V_Bast_v2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("V_Foot_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Flang_v2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("Flang_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.010405906265833723, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.010405906265833723, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.04162362506333489, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.020811812531667445, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.026014765664584306, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.036420671930418036, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.020811812531667445, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.036420671930418036, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.036420671930418036, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.031217718797501171, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.015608859398750586, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.020811812531667445, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.0052029531329168613, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.031217718797501171, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.0052029531329168613, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.010405906265833723, -0.01249497078132307
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.35988001424738059, 2.4743786481764118, 0.42170238008799288, False, 0, Nothing, 0)
Part.HideComponent2
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.313975364030739, 2.4423600922482365, 0.37383297288783979, True, 0, Nothing, 0)
boolstatus = Part.DeSelectByID("", "FACE", 0.313975364030739, 2.4423600922482365, 0.37383297288783979)
boolstatus = Part.DeSelectByID("Imported1@V_Bast_v2_1-1@All-Assem_v1 (1)", "SOLIDBODY", 0, 0, 0)
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.30864227998193883, 2.4334382183653247, 0.38727978359548842, True, 0, Nothing, 0)
boolstatus = Part.DeSelectByID("", "FACE", 0.31621106180745073, 2.4413961768681247, 0.36634601235823538)
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.031217718797501171, -0.1249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.099959766250584559
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.074969824687938419
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.062474853906615349
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, -0.11245473703190761
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.062474853906615349
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.036420671930418036, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.020811812531667445, 0, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.031217718797501171, -0.02498994156264614, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.031217718797501171, 0, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.020811812531667445, -0.01249497078132307, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.052029531329168613, -0.049979883125292279, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.046826578196251759, -0.049979883125292279, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, -0.037484912343969209, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.072841343860836072, -0.11245473703190761, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, -0.049979883125292279, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, -0.037484912343969209, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, -0.02498994156264614, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, -0.01249497078132307, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, -0.01249497078132307, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, -0.02498994156264614, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, 0, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, -0.02498994156264614, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.04162362506333489, -0.062474853906615349, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.04162362506333489, -0.099959766250584559, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, -0.01249497078132307, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, -0.01249497078132307, 0.2776312105951888, 2.3936539592943404, 0.44337968471715783
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.020811812531667445, 0.02498994156264614, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.026014765664584306, 0.049979883125292279, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.031217718797501171, 0.02498994156264614, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.020811812531667445, 0.062474853906615349, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.031217718797501171, 0.062474853906615349, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.026014765664584306, 0.049979883125292279, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.052029531329168613, 0.11245473703190761, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.04162362506333489, 0.062474853906615349, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.046826578196251759, 0.1249497078132307, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.015608859398750586, 0.02498994156264614, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.010405906265833723, 0.02498994156264614, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.0052029531329168613, 0.01249497078132307, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.0052029531329168613, 0.01249497078132307, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.010405906265833723, 0.02498994156264614, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.046826578196251759, 0.1249497078132307, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.010405906265833723, 0.037484912343969209, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.0052029531329168613, 0.01249497078132307, 0.34634571532069458, 2.5172762186444402, 0.31646442163247457
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.33395938336173003, 2.4890695841770594, 0.32866681097611661, True, 0, Nothing, 0)
boolstatus = Part.DeSelectByID("", "FACE", 0.33395938336173003, 2.4890695841770594, 0.32866681097611661)
boolstatus = Part.Extension.SelectByID2("Imported1@V_Bast_v2_1-1@All-Assem_v1 (1)", "SOLIDBODY", 0, 0, 0, True, 0, Nothing, 0)
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.32347912579319882, 2.4685691628635027, 0.35392463235289995, False, 0, Nothing, 0)
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.32347912579319882, 2.4685691628635027, 0.35392463235289995, False, 0, Nothing, 0)
Part.ClearSelection2 True
Part.EditUndo2 1
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
boolstatus = Part.Extension.SelectByID2("Box_3_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.FixComponent
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.31188700277749604, 2.4475159617197733, 0.38249999955520764, False, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.271308808820379, 2.3659849861770681, 0.45259949631869745, False, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("", "EDGE", 0.27802124772443904, 2.3715060060536075, 0.50026663751583555, False, 0, Nothing, 0)
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, -0.01249497078132307
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.26768257072274082, 2.3596832555620608, 0.48383733534599571, False, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.26907199818884919, 2.3779558717059217, 0.4917752657299701, False, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("", "EDGE", 0.26112016982170871, 2.3837894722908004, 0.50372715861794859, False, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, 0.099959766250584559, 0.33440966510454473, 2.6099592586074323, 0.54257301479002251
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, 0.21241450328249217, 0.33440966510454473, 2.6099592586074323, 0.54257301479002251
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.10926201579125411, 0.41233403578366129, 0.33440966510454473, 2.6099592586074323, 0.54257301479002251
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.150885640854589, 0.41233403578366129, 0.33440966510454473, 2.6099592586074323, 0.54257301479002251
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.14568268772167214, 0.1249497078132307, 0.33440966510454473, 2.6099592586074323, 0.54257301479002251
Part.ClearSelection2 True
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.ClearSelection2 True
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, 0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, 0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.031217718797501171, 0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, 0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, 0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, 0.062474853906615349
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.057232484462085481, 0.11245473703190761
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.036420671930418036, 0.087464795469261489
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.046826578196251759, 0.099959766250584559
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.04162362506333489, 0.087464795469261489
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.067638390727919204, 0.16243462015719989
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.078044296993752926, 0.19991953250116912
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.052029531329168613, 0.13744467859455375
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.052029531329168613, 0.14993964937587684
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.04162362506333489, 0.14993964937587684
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, 0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, 0.062474853906615349
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.031217718797501171, 0.062474853906615349
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, 0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, 0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.010405906265833723, -0.11245473703190761
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.16243462015719989
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.11245473703190761
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.062474853906615349
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, -0.062474853906615349
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.099959766250584559
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, -0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.036420671930418036, -0.049979883125292279
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.031217718797501171, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.026014765664584306, 0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, 0.01249497078132307
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.30851344135112413, 2.5609131847633648, 0.5226112354546899, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.3164427507862797, 2.5409034338430843, 0.5322670556263347, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.33391065474904735, 2.6458847450232668, 0.40433836482003471, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.35746969109408155, 2.66190107569156, 0.33473706845796869, True, 0, Nothing, 0)
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.309281842683788, 2.6629824088137468, 0.49502161381190035, True, 0, Nothing, 0)
boolstatus = Part.DeSelectByID("", "FACE", 0.28181081878153691, 2.6260524236603544, 0.49136010174947842)
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.31639993976506275, 2.6231598700063614, 0.40977879685982543, True, 0, Nothing, 0)
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.31360455791138975, 2.6256701158166038, 0.39317504104826639, True, 0, Nothing, 0)
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.30726206683021928, 2.4454729859663473, 0.34400657863301376, True, 0, Nothing, 0)
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.29983269566548643, 2.4369180278640954, 0.38884328033935844, True, 0, Nothing, 0)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.27606573272629475, 2.4296363626658035, 0.44426570907336327, True, 0, Nothing, 0)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.26680395522481604, 2.4101119760111942, 0.45407104096273088, True, 0, Nothing, 0)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.28287674822712461, 2.4006016595909898, 0.41495901630349863, True, 0, Nothing, 0)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.28359015339157168, 2.4000279593838343, 0.39673753807301182, True, 0, Nothing, 0)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.27044946651409418, 2.5484747297498416, 0.42991958159990418, True, 0, Nothing, 0)
Part.TranslateComponent
boolstatus = Part.DeSelectByID("", "FACE", 0.26462414502293541, 2.5486971924310069, 0.42808730225368663)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.23463704660446183, 2.5594551766610607, 0.41026884674414532, True, 0, Nothing, 0)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.21579007619214963, 2.5706351338537843, 0.38128459299605311, True, 0, Nothing, 0)
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.21419381105431512, 2.5565057260975834, 0.35451896132730099, True, 0, Nothing, 0)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.TranslateComponent
boolstatus = Part.Extension.SelectByID2("", "FACE", 0.16041641113105243, 2.5552370055082463, 0.38875219272682671, True, 0, Nothing, 0)
boolstatus = Part.Extension.SketchBoxSelect("0.000000", "0.000000", "0.000000", "0.000000", "0.000000", "0.000000")
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.067638390727919204, -0.82466807156732258
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.046826578196251759, -0.62474853906615346
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.099959766250584559
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.10405906265833723, -0.4373239773463074
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.072841343860836072, -0.099959766250584559
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.026014765664584306, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.020811812531667445, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.093653156392503517, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.13007382832292153, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.10926201579125411, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.093653156392503517, -0.037484912343969209
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.015608859398750586, 0
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.031217718797501171, 0
Part.ClearSelection2 True
boolstatus = Part.Extension.SelectByID2("PCB Board_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, True, 0, Nothing, 0)
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.057232484462085481, -0.39983906500233823, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.0052029531329168613, -0.29987929875175368, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, -0.22490947406381523, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, -0.099959766250584559, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, -0.074969824687938419, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.11966792205708783, -0.22490947406381523, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.046826578196251759, -0.074969824687938419, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, -0.049979883125292279, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, -0.062474853906615349, 0.38649250583841877, 2.4497614371069574, 0.31398936405952327
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.036420671930418036, -0.37484912343969207
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter -0.0052029531329168613, -0.38734409422101518
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.010405906265833723, -0.14993964937587684
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, -0.14993964937587684
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.0052029531329168613, -0.02498994156264614
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, 0.01249497078132307
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, 0.14993964937587684
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, 0.17492959093852298
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, 0.23740444484513834
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0, 0.21241450328249217
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0.13744467859455375
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.015608859398750586, 0.062474853906615349
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.052029531329168613, 0.28738432797043062
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.036420671930418036, 0.23740444484513834
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, 0.13744467859455375
Set myModelView = Part.ActiveView
myModelView.RotateAboutCenter 0.020811812531667445, 0.11245473703190761
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, 0.099959766250584559, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.020811812531667445, 0.14993964937587684, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.031217718797501171, 0.26239438640778445, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.020811812531667445, 0.23740444484513834, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, -0.01249497078132307, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.036420671930418036, -0.062474853906615349, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.046826578196251759, -0.02498994156264614, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.067638390727919204, -0.049979883125292279, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.036420671930418036, -0.037484912343969209, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.026014765664584306, -0.037484912343969209, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.0052029531329168613, 0, 0.3223961246288809, 2.5201380870745567, 0.41353536368862365
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.062435437595002342, -0.92462783781790703, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.015608859398750586, -0.6872233929727688, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, -0.037484912343969209, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, 0.01249497078132307, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.020811812531667445, 0.22490947406381523, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.031217718797501171, 0.3373642110957229, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, 0.38734409422101518, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, 0.23740444484513834, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.020811812531667445, 0.16243462015719989, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.046826578196251759, 0.16243462015719989, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, 0.037484912343969209, 0.35206478181169132, 2.3277729378950021, 0.37643461571083492
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.24974175038000937, -0.73720327609806113, 0.3254274086471014, 2.5522494076576336, 0.55098445205323188
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.0052029531329168613, -0.01249497078132307, 0.34128450366824836, 2.6284400752402561, 0.52450369356211013
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, 0.32486924031439979, 0.34128450366824836, 2.6284400752402561, 0.52450369356211013
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.057232484462085481, 0.53728374359689202, 0.34128450366824836, 2.6284400752402561, 0.52450369356211013
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.083247250126669781, 0.47480888969027668, 0.34128450366824836, 2.6284400752402561, 0.52450369356211013
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, 0.21241450328249217, 0.34128450366824836, 2.6284400752402561, 0.52450369356211013
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.010405906265833723, 0.01249497078132307, 0.38854904218885622, 2.4813125025895602, 0.31985855161354948
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.29656832857626109, 0, 0.38854904218885622, 2.4813125025895602, 0.31985855161354948
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.23413289098125878, -0.1249497078132307, 0.38854904218885622, 2.4813125025895602, 0.31985855161354948
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.11966792205708783, -0.099959766250584559, 0.38854904218885622, 2.4813125025895602, 0.31985855161354948
Part.ClearSelection2 True
Part.ClearSelection2 True
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.14568268772167214, -0.56227368515953813, 0.39368212069712172, 2.4928609640789148, 0.30886112362804852
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.301771281709178, -0.61225356828483035, 0.39368212069712172, 2.4928609640789148, 0.30886112362804852
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.18210335965209015, -0.2498994156264614, 0.39368212069712172, 2.4928609640789148, 0.30886112362804852
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.ClearSelection2 True
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.0052029531329168613, 0.02498994156264614, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.036420671930418036, 0.22490947406381523, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.036420671930418036, 0.19991953250116912, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, 0.6872233929727688, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.020811812531667445, 0.19991953250116912, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.062435437595002342, 0.049979883125292279, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.062435437595002342, 0.01249497078132307, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.026014765664584306, -0.16243462015719989, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint -0.010405906265833723, -0.11245473703190761, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, -0.19991953250116912, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.020811812531667445, -0.17492959093852298, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.015608859398750586, -0.14993964937587684, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.031217718797501171, -0.16243462015719989, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.010405906265833723, -0.062474853906615349, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, -0.01249497078132307, 0.30265833089174521, 2.3756882159497081, 0.51657638512330095
boolstatus = Part.Extension.SelectByID2("Door2_1-1@All-Assem_v1 (1)", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
Part.ShowComponent2
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, -0.28738432797043062, 0.37151308157604035, 2.5792949019196953, 0.4259760579485885
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0.026014765664584306, -0.37484912343969207, 0.37151308157604035, 2.5792949019196953, 0.4259760579485885
Set myModelView = Part.ActiveView
myModelView.RotateAboutPoint 0, -0.01249497078132307, 0.37151308157604035, 2.5792949019196953, 0.4259760579485885
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
Set Part = swApp.OpenDoc6("C:\Users\aznabavi\Desktop\anabavi\tutorial\a\3d-printed-electric-supercharger-1.snapshot.3\compressor wheel.SLDPRT", 1, 0, "", longstatus, longwarnings)
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameLeft = 0
myModelView.FrameTop = 22
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
swApp.ActivateDoc2 "compressor wheel", False, longstatus
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
Set Part = swApp.OpenDoc6("C:\Users\aznabavi\Desktop\anabavi\tutorial\a\car-turbocharger-2.snapshot.5\Assieme1.SLDASM", 2, 0, "", longstatus, longwarnings)
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameLeft = 0
myModelView.FrameTop = 22
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
swApp.ActivateDoc2 "Assieme1", False, longstatus
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
' MSGBOX
' Save changes to Assieme1?

Set Part = Nothing
swApp.CloseDoc "Assieme1"
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameLeft = 0
myModelView.FrameTop = 22
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
swApp.ActivateDoc2 "compressor wheel", False, longstatus
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
Set Part = Nothing
swApp.CloseDoc "compressor wheel"
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameLeft = 0
myModelView.FrameTop = 0
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
swApp.ActivateDoc2 "All-Assem_v1 (1)", False, longstatus
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView
myModelView.FrameState = swWindowState_e.swWindowMaximized
Part.ClearSelection2 True
Set Part = Nothing
swApp.CloseDoc "All-Assem_v1 (1)"
swApp.ExitApp
End Sub