' ******************************************************************************
' swxJRNL.swj - journal recorded on 12/06/02 by hamilton
' ******************************************************************************

Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long
Dim Annotation As Object
Dim Gtol As Object
Dim DatumTag As Object
Dim FeatureData As Object
Dim Feature As Object
Dim Component As Object
Sub main()
Set swApp = CreateObject ("SldWorks.Application")
Set Part = swApp.OpenDoc4 ("C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Drop Weight\DROP WEIGHT, BURN WIRE.SLDASM", 2, 0, "", longstatus)
Set Part = swApp.ActivateDoc ("DROP WEIGHT, BURN WIRE")
swApp.ActiveDoc.ActiveView.FrameWidth = 945
swApp.ActiveDoc.ActiveView.FrameHeight = 677
Set Part = Nothing
swApp.CloseDoc "DROP WEIGHT, BURN WIRE"
Set Part = swApp.OpenDoc4 ("C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Without Kearfott\MidBody.SLDASM", 2, 0, "", longstatus)
Set Part = swApp.OpenDoc4 ("C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Recieve Ring\Muck up interface.SLDASM", 2, 0, "", longstatus)
Set Part = swApp.ActivateDoc ("Muck up interface")
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 2
Set Part = swApp.ActivateDoc ("MidBody")
swApp.ActiveDoc.ActiveView.FrameWidth = 945
swApp.ActiveDoc.ActiveView.FrameHeight = 677
Part.ShowNamedView2 "*Right", 4
Part.TranslateComponent
Part.SetPickMode
Part.SetPickMode
Part.AddComponent "C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Drop Weight\DROP WEIGHT, BURN WIRE.SLDASM", -0.01017722377023, -0.5380908090641, 0.9892436716793
Part.ShowNamedView2 "*Isometric", 7
Part.ViewZoomTo2 -1.00069, -0.576689, 0.385268, -0.555977, -1.1337, 0.385268
Part.ShowNamedView2 "*Right", 4
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PIN, DOWEL, .1875 NOM, X .50L-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PIN, DOWEL, .1875 NOM, X .50L-2@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/DROPWEIGHT LATCH-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PARALLEL BURN WIRE BRACKET-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/L-LEVER-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/BURN WIRE, PARALLEL-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/STOP SLEEVE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/END CAST, BURN WIRE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/Washer, SAE #6-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/BURN WIRE, PARALLEL-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/STOP SLEEVE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/END CAST, BURN WIRE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/Washer, SAE #6-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/SLEEVE, BURN WIRE-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.TranslateComponent
Part.ClearSelection
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PIN, DOWEL, .1875 NOM, X .50L-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PIN, DOWEL, .1875 NOM, X .50L-2@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/DROPWEIGHT LATCH-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PARALLEL BURN WIRE BRACKET-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/L-LEVER-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/BURN WIRE, PARALLEL-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/STOP SLEEVE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/END CAST, BURN WIRE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/Washer, SAE #6-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/BURN WIRE, PARALLEL-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/STOP SLEEVE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/END CAST, BURN WIRE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/Washer, SAE #6-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/SLEEVE, BURN WIRE-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.ShowNamedView2 "*Isometric", 7
Part.ActiveView().RotateAboutCenter -0.0130382, 0
Part.ActiveView().RotateAboutCenter 0, -0.314159
Part.ActiveView().RotateAboutCenter -0.0912676, -0.230383
Part.ActiveView().RotateAboutCenter -0.0912676, -0.261799
Part.ActiveView().RotateAboutCenter -0.0391147, -0.188496
Part.ActiveView().RotateAboutCenter 0.0130382, -0.115192
Part.ActiveView().RotateAboutCenter 0.104306, -0.146608
Part.ActiveView().RotateAboutCenter 0.0912676, -0.15708
Part.ActiveView().RotateAboutCenter 0.143421, -0.178024
Part.ActiveView().RotateAboutCenter 0.117344, -0.198968
Part.ActiveView().RotateAboutCenter 0.0651912, -0.136136
Part.ActiveView().RotateAboutCenter 0.0130382, -0.0418879
Part.SetPickMode
Part.ClearSelection
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Part.SetPickMode
Part.AndSelectByID "Right", "PLANE", 0, 0, 0
Part.AndSelectByID "Front@DROP WEIGHT, BURN WIRE-1@MidBody", "PLANE", 0, 0, 0
Part.AddMate 0, 2, 0, 0, 1.570796326795
Part.ClearSelection
Part.ShowNamedView2 "*Right", 4
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.01879859729337, -0.4711170109628, 0.1940548511873
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0.0541321, -0.0689018
Part.ActiveView().RotateAboutCenter 0.0202995, -0.0344509
Part.ActiveView().RotateAboutCenter 0.027066, -0.0344509
Part.ActiveView().RotateAboutCenter 0.00676651, -0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0.040599, -0.00861272
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.0338325, 0
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ViewZoomTo2 -0.320206, -0.132204, -0.0101772, -0.194055, -0.284715, -0.0101772
Part.AndSelectByID "", "FACE", 0.0004927524473146, -0.2330493556994, 0.2507035693175
Part.AndSelectByID "", "FACE", 0.1317750547261, -0.155575, 0.1579718378663
Part.ClearSelection
Part.SelectByID "", "FACE", 0.01879859729337, -0.4711170109628, 0.1940548511873
Part.SetPickMode
Part.ClearSelection
Part.SelectByID "", "FACE", 0.1784115986745, -0.1506052315817, 0.136525
Part.SetPickMode
Part.ClearSelection
Part.SelectByID "", "FACE", 0.1759015243064, -0.1494914755872, 0.136525
Part.SelectByID "", "FACE", 0.1466896725237, -0.155575, 0.1413900067938
Part.SelectByID "", "FACE", -0.004325224624949, -0.2330493556994, 0.2438290594364
Part.AndSelectByID "", "FACE", 0.0540020864841, -0.155575, 0.1653329387799
Part.AddMate 0, 2, 0, 0.07747435569937, 0
Part.ClearSelection
Part.ShowNamedView2 "*Right", 4
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.01879859729337, -0.2383823937262, 0.2674860921026
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.0473656, -0.146416
Part.ActiveView().RotateAboutCenter 0.013533, -0.172254
Part.ActiveView().RotateAboutCenter 0.0202995, -0.103353
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0516763
Part.ActiveView().RotateAboutCenter 0, -0.0430636
Part.ActiveView().RotateAboutCenter 0, -0.0947399
Part.ActiveView().RotateAboutCenter -0.00676651, -0.266994
Part.ActiveView().RotateAboutCenter 0.0608986, -0.180867
Part.ActiveView().RotateAboutCenter 0.0338325, -0.111965
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0344509
Part.ActiveView().RotateAboutCenter 0.00676651, -0.00861272
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.027066, -0.0344509
Part.ActiveView().RotateAboutCenter 0.0338325, -0.0344509
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter -0.027066, -0.0430636
Part.ActiveView().RotateAboutCenter -0.0608986, -0.0516763
Part.ActiveView().RotateAboutCenter -0.0541321, -0.0344509
Part.ActiveView().RotateAboutCenter -0.0473656, -0.0172254
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.0541321, -0.0172254
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.0947311, 0
Part.ActiveView().RotateAboutCenter -0.121797, 0.060289
Part.ActiveView().RotateAboutCenter -0.0541321, 0.172254
Part.ActiveView().RotateAboutCenter -0.0202995, 0.0516763
Part.ActiveView().RotateAboutCenter -0.00676651, 0.00861272
Part.ActiveView().RotateAboutCenter -0.027066, 0.0172254
Part.ActiveView().RotateAboutCenter -0.040599, 0.060289
Part.ActiveView().RotateAboutCenter -0.040599, 0.060289
Part.ActiveView().RotateAboutCenter -0.0541321, 0.120578
Part.ActiveView().RotateAboutCenter -0.0338325, 0.137804
Part.ActiveView().RotateAboutCenter -0.0202995, 0.111965
Part.ActiveView().RotateAboutCenter -0.0473656, 0.172254
Part.ActiveView().RotateAboutCenter -0.0202995, 0.0430636
Part.ActiveView().RotateAboutCenter -0.013533, 0.0258382
Part.ActiveView().RotateAboutCenter -0.027066, 0.0430636
Part.ActiveView().RotateAboutCenter -0.013533, 0.0689018
Part.ActiveView().RotateAboutCenter -0.00676651, 0.0775145
Part.ActiveView().RotateAboutCenter -0.00676651, 0.0430636
Part.ActiveView().RotateAboutCenter 0, 0.0430636
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.060289
Part.ActiveView().RotateAboutCenter 0.00676651, 0.0172254
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0172254
Part.ActiveView().RotateAboutCenter 0.0811981, -0.0258382
Part.ActiveView().RotateAboutCenter 0.115031, 0
Part.ActiveView().RotateAboutCenter 0.013533, 0
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0, -0.18948
Part.ActiveView().RotateAboutCenter 0.027066, -0.137804
Part.ActiveView().RotateAboutCenter 0.0202995, -0.0947399
Part.ActiveView().RotateAboutCenter 0.0202995, -0.060289
Part.ActiveView().RotateAboutCenter 0.040599, -0.0689018
Part.ActiveView().RotateAboutCenter 0.040599, -0.0775145
Part.ActiveView().RotateAboutCenter 0.040599, -0.0516763
Part.ActiveView().RotateAboutCenter 0.0473656, -0.0516763
Part.ActiveView().RotateAboutCenter 0.0338325, -0.0344509
Part.ActiveView().RotateAboutCenter 0.0541321, -0.0258382
Part.ActiveView().RotateAboutCenter 0.040599, -0.0172254
Part.ActiveView().RotateAboutCenter 0.0202995, -0.0172254
Part.ActiveView().RotateAboutCenter 0.0338325, -0.0258382
Part.ActiveView().RotateAboutCenter 0.0202995, -0.0430636
Part.ActiveView().RotateAboutCenter 0.013533, -0.060289
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0258382
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.0258382
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.0172254
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter -0.027066, 0.111965
Part.ActiveView().RotateAboutCenter -0.027066, 0.137804
Part.ActiveView().RotateAboutCenter -0.040599, 0.232543
Part.ActiveView().RotateAboutCenter -0.027066, 0.180867
Part.ActiveView().RotateAboutCenter -0.00676651, 0.0775145
Part.ActiveView().RotateAboutCenter -0.00676651, 0.0258382
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.0202995, 0.103353
Part.ActiveView().RotateAboutCenter 0, 0.0258382
Part.ActiveView().RotateAboutCenter 0, 0.0172254
Part.ActiveView().RotateAboutCenter -0.027066, 0.0516763
Part.ActiveView().RotateAboutCenter -0.0202995, 0.0258382
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.0608986, 0.00861272
Part.ActiveView().RotateAboutCenter -0.0608986, -0.0344509
Part.ActiveView().RotateAboutCenter -0.0202995, 0
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.013533, 0.00861272
Part.ActiveView().RotateAboutCenter -0.027066, 0.111965
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter -0.00676651, 0.0947399
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter -0.0202995, -0.111965
Part.ActiveView().RotateAboutCenter -0.013533, -0.0775145
Part.ActiveView().RotateAboutCenter 0, -0.0258382
Part.ActiveView().RotateAboutCenter -0.00676651, -0.00861272
Part.ActiveView().RotateAboutCenter 0, -0.0775145
Part.ActiveView().RotateAboutCenter 0.00676651, -0.060289
Part.ActiveView().RotateAboutCenter 0.00676651, -0.00861272
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.013533, -0.0172254
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0.013533, 0.0689018
Part.ClearSelection
Part.SetPickMode
Part.AddComponent "C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Drop Weight\DROP WEIGHT ROUND SLUG.SLDPRT", -0.1175696203016, -0.3603489709977, 0.2656866037602
Part.AndSelectByID "Top", "PLANE", 0, 0, 0
Part.AndSelectByID "Top@DROP WEIGHT ROUND SLUG-1@MidBody", "PLANE", 0, 0, 0
Part.AddMate 3, 2, 0, 0.4873489709977, 0
Part.ClearSelection
Part.TranslateComponent
Part.SelectByID "", "FACE", -0.08610399547678, -0.4168776272152, 0.2871697239802
Part.ClearSelection
Part.SetPickMode
Part.SelectByID "Parallel3", "MATE", 0, 0, 0
Part.EditDelete
Part.AndSelectByID "Right", "PLANE", 0, 0, 0
Part.AndSelectByID "Front@DROP WEIGHT ROUND SLUG-1@MidBody", "PLANE", 0, 0, 0
Part.AddMate 0, 2, 0, 0, 1.570796326795
Part.ClearSelection
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.03493195806442, -0.4229828874878, 0.3392022945391
Part.ViewZoomTo2 -0.194055, 0.0233341, -0.0101772, -0.00765247, -0.100934, -0.0101772
Part.ClearSelection
Part.SetPickMode
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.03736737152326, -0.2541748885097, 0.09892957387574
Part.ClearSelection
Part.SetPickMode
Part.AndSelectByID "", "FACE", -0.001150998216758, -0.253516857394, 0.1265787338339
Part.AndSelectByID "", "EDGE", 0.01882782994278, -0.2201879819958, 0.1438008742298
Part.ActiveView().RotateAboutCenter 0.013533, 0.00861272
Part.ActiveView().RotateAboutCenter 0.0541321, 0.060289
Part.ActiveView().RotateAboutCenter 0.0338325, 0.0344509
Part.ActiveView().RotateAboutCenter 0.0202995, 0.00861272
Part.ActiveView().RotateAboutCenter 0.0202995, 0.0172254
Part.ActiveView().RotateAboutCenter 0.027066, 0.0172254
Part.ActiveView().RotateAboutCenter 0.0473656, 0.0344509
Part.ActiveView().RotateAboutCenter 0.0202995, 0.0258382
Part.ActiveView().RotateAboutCenter 0.040599, 0.0344509
Part.ActiveView().RotateAboutCenter 0.027066, 0.0172254
Part.ActiveView().RotateAboutCenter 0.013533, 0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.AddMate 0, 2, 0, 0.01, 0.5235987755983
Part.ClearSelection
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.0336474099426, -0.2388000300208, 0.1108401477806
Part.ClearSelection
Part.SetPickMode
Part.SelectByID "Coincident50", "MATE", 0, 0, 0
Part.DeSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "", "FACE", -0.002119775845017, -0.2554182585567, 0.1401509996372
Part.ClearSelection 
Part.SelectByMark "", "FACE", -0.0351536, -0.253516857394, 0.09296665332204, 8
Part.AndSelectByMark "", "FACE", -0.0002514027066058, -0.2553963660566, 0.1382785823965, 8
Part.AndSelectByID "Coincident50", "MATE", 0, 0, 0
Part.EditMate 0, 2, 0, 0.01, 0.5235987755983
Part.ClearSelection
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.02697936738929, -0.2228284014905, 0.1202294187129
Part.ShowNamedView2 "*Isometric", 7
Part.ActiveView().RotateAboutCenter -0.00676651, -0.00861272
Part.ActiveView().RotateAboutCenter -0.744316, -0.404798
Part.ActiveView().RotateAboutCenter -0.236828, -0.180867
Part.ActiveView().RotateAboutCenter -0.15563, -0.0947399
Part.ActiveView().RotateAboutCenter -0.0811981, -0.0689018
Part.ActiveView().RotateAboutCenter -0.0338325, -0.0258382
Part.ActiveView().RotateAboutCenter 0, -0.0861272
Part.ActiveView().RotateAboutCenter -0.0473656, -0.120578
Part.ActiveView().RotateAboutCenter -0.0879646, -0.120578
Part.ActiveView().RotateAboutCenter -0.0811981, -0.137804
Part.ActiveView().RotateAboutCenter 0, -0.0172254
Part.ActiveView().RotateAboutCenter 0.0338325, -0.0172254
Part.ActiveView().RotateAboutCenter 0.013533, 0.0344509
Part.ActiveView().RotateAboutCenter 0.027066, 0.0775145
Part.ActiveView().RotateAboutCenter 0.00676651, 0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0.0473656, 0.0172254
Part.ActiveView().RotateAboutCenter 0.013533, 0
Part.ActiveView().RotateAboutCenter 0.0473656, 0.0172254
Part.ActiveView().RotateAboutCenter 0.0473656, 0.0258382
Part.ActiveView().RotateAboutCenter 0.040599, 0.00861272
Part.ActiveView().RotateAboutCenter 0.0202995, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0.027066, 0
Part.ClearSelection
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.0356687331124, -0.2147931677804, 0.1253761154257
Part.ClearSelection
Part.SetPickMode
Part.SetPickMode
Part.SetPickMode
Part.SelectByID "Coincident50", "MATE", 0, 0, 0
Part.EditDelete
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody", "COMPONENT", 0, 0, 0
Part.TranslateComponent
Part.SelectByID "", "VERTEX", 0.009273597293394, -0.2650506347076, 0.7093014248974
Part.ClearSelection
Part.SelectByID "DROP WEIGHT, BURN WIRE-1@MidBody", "COMPONENT", 0, 0, 0
Part.SetPickMode
Part.ClearSelection
Part.SetPickMode
Part.ViewZoomTo2 -0.0720056, -0.404988, 0.445234, 0.145089, -0.606295, 0.445234
Part.SetPickMode
Part.AndSelectByID "", "FACE", 0.004191787629679, -0.1958444432196, 0.1383486139568
Part.AndSelectByID "", "FACE", -0.04015752127373, -0.1466015271243, 0.136525
Part.AddMate 0, 2, 0, 0.00182361395677, 0
Part.ClearSelection
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.03808168303408, -0.2360215763321, 0.05561839488571
Part.ClearSelection
Part.SetPickMode
Part.SetPickMode
Part.AndSelectByID "", "FACE", 0.01939267833183, -0.2509143141705, 0.1225821177948
Part.AndSelectByID "", "FACE", 0.007263940435053, -0.2553610603417, 0.1335622534196
Part.AddMate 0, 2, 0, 0.004318070124409, 0
Part.ClearSelection
Part.TranslateComponent
Part.SelectByID "", "FACE", 0.03429126414983, -0.2269106467587, 0.1091932411697
Part.ShowNamedView2 "*Isometric", 7
Part.ShowNamedView2 "*Right", 4
Part.ClearSelection
Part.SetPickMode
' MSGBOX
' C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Without Kearfott\MidBody.SLDASM has not been rebuilt successfully since the last feature change or an externally referenced model has changed.
' 	It is safest to rebuild before saving.
' 		Rebuild now?

' MSGBOX
' Some of the models referenced in this document have been modified.  They must be saved when the document is saved.
' 		Save the document and the referenced models now?

Part.Save2 FALSE
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.0473656, -0.439249
Part.ActiveView().RotateAboutCenter 0, -0.223931
Part.ActiveView().RotateAboutCenter 0.013533, -0.223931
Part.ActiveView().RotateAboutCenter 0, -0.0344509
Part.ActiveView().RotateAboutCenter -0.013533, -0.146416
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0258382
Part.ActiveView().RotateAboutCenter -0.013533, -0.0430636
Part.ActiveView().RotateAboutCenter 0, -0.0172254
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0344509
Part.ActiveView().RotateAboutCenter 0, -0.0947399
Part.ActiveView().RotateAboutCenter 0, -0.060289
Part.ActiveView().RotateAboutCenter 0, -0.0430636
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0516763
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0344509
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, 0.00861272
Part.ActiveView().RotateAboutCenter 0.027066, 0.129191
Part.ActiveView().RotateAboutCenter 0, 0.18948
Part.ActiveView().RotateAboutCenter 0, 0.146416
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.0689018
Part.ActiveView().RotateAboutCenter 0, 0.0258382
Part.ActiveView().RotateAboutCenter -0.00676651, 0.0516763
Part.ActiveView().RotateAboutCenter -0.00676651, 0.00861272
Part.ActiveView().RotateAboutCenter -0.00676651, 0.0430636
Part.ActiveView().RotateAboutCenter -0.00676651, 0.060289
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter -0.013533, 0.0689018
Part.ActiveView().RotateAboutCenter 0, 0.0516763
Part.ActiveView().RotateAboutCenter -0.00676651, 0.0689018
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.0689018
Part.ActiveView().RotateAboutCenter -0.00676651, 0.103353
Part.ActiveView().RotateAboutCenter -0.00676651, 0.155029
Part.ActiveView().RotateAboutCenter 0, 0.0430636
Part.ActiveView().RotateAboutCenter 0.00676651, 0.206705
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, -0.00861272
Part.ActiveView().RotateAboutCenter 0.0202995, -0.111965
Part.ActiveView().RotateAboutCenter 0.027066, -0.120578
Part.ActiveView().RotateAboutCenter 0.027066, -0.180867
Part.ActiveView().RotateAboutCenter 0.0541321, -0.215318
Part.ActiveView().RotateAboutCenter 0.0202995, -0.0689018
Part.ActiveView().RotateAboutCenter 0.027066, -0.129191
Part.ActiveView().RotateAboutCenter 0.0541321, -0.18948
Part.ActiveView().RotateAboutCenter 0.040599, -0.223931
Part.ActiveView().RotateAboutCenter 0.013533, -0.0344509
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0430636
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter -0.108264, 0.499538
Part.ActiveView().RotateAboutCenter -0.013533, 0.060289
Part.ActiveView().RotateAboutCenter -0.013533, 0.0430636
Part.ActiveView().RotateAboutCenter -0.013533, 0.0344509
Part.ActiveView().RotateAboutCenter -0.0744316, 0.28422
Part.ActiveView().RotateAboutCenter -0.0202995, 0.0947399
Part.ActiveView().RotateAboutCenter -0.013533, 0.0775145
Part.ActiveView().RotateAboutCenter -0.00676651, 0.00861272
Part.ActiveView().RotateAboutCenter -0.040599, 0.155029
Part.ActiveView().RotateAboutCenter -0.027066, 0.0775145
Part.ActiveView().RotateAboutCenter -0.040599, 0.120578
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0344509
Part.ActiveView().RotateAboutCenter 0.0338325, -0.060289
Part.ActiveView().RotateAboutCenter 0.0473656, -0.00861272
Part.ActiveView().RotateAboutCenter 0.0744316, 0.0258382
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0, 0.0172254
Part.ActiveView().RotateAboutCenter 0.554854, 1.12827
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, -0.137804
Part.ActiveView().RotateAboutCenter -0.0947311, -0.98185
Part.ActiveView().RotateAboutCenter -0.0676651, -1.56752
Part.ActiveView().RotateAboutCenter -0.00676651, -0.060289
Part.ActiveView().RotateAboutCenter -0.0744316, -0.0344509
Part.ActiveView().RotateAboutCenter -0.027066, -0.0172254
Part.ActiveView().RotateAboutCenter -0.027066, -0.120578
Part.ActiveView().RotateAboutCenter -0.0541321, -0.111965
Part.ActiveView().RotateAboutCenter -0.0676651, -0.0861272
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0172254
Part.ActiveView().RotateAboutCenter 0, -0.0258382
Part.ActiveView().RotateAboutCenter -0.00676651, -0.00861272
Part.ActiveView().RotateAboutCenter 0.013533, -0.0689018
Part.ActiveView().RotateAboutCenter 0.0541321, -0.137804
Part.ActiveView().RotateAboutCenter 0.0473656, -0.0861272
Part.ActiveView().RotateAboutCenter 0.0879646, -0.120578
Part.ActiveView().RotateAboutCenter 0.013533, -0.0172254
Part.ActiveView().RotateAboutCenter 0.0744316, -0.0344509
Part.ActiveView().RotateAboutCenter 0.0879646, -0.0430636
Part.ActiveView().RotateAboutCenter 0.0744316, -0.0258382
Part.ActiveView().RotateAboutCenter 0.0541321, -0.00861272
Part.ActiveView().RotateAboutCenter 0.040599, -0.0172254
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0430636
Part.ActiveView().RotateAboutCenter -0.040599, -0.258382
Part.ActiveView().RotateAboutCenter -0.0473656, -0.241156
Part.ActiveView().RotateAboutCenter -0.040599, -0.155029
Part.ActiveView().RotateAboutCenter -0.027066, -0.129191
Part.ActiveView().RotateAboutCenter -0.0202995, -0.0689018
Part.ActiveView().RotateAboutCenter -0.0338325, -0.146416
Part.ActiveView().RotateAboutCenter -0.0202995, -0.163642
Part.ActiveView().RotateAboutCenter -0.0338325, -0.120578
Part.ActiveView().RotateAboutCenter -0.101498, -0.215318
Part.ActiveView().RotateAboutCenter -0.0676651, -0.155029
Part.ActiveView().RotateAboutCenter -0.0744316, -0.172254
Part.ActiveView().RotateAboutCenter -0.0473656, -0.120578
Part.ActiveView().RotateAboutCenter -0.0338325, -0.223931
Part.ActiveView().RotateAboutCenter -0.0338325, -0.275607
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0947399
Part.ActiveView().RotateAboutCenter -0.013533, -0.155029
Part.ActiveView().RotateAboutCenter -0.013533, -0.120578
Part.ActiveView().RotateAboutCenter -0.040599, -0.0689018
Part.ActiveView().RotateAboutCenter -0.0541321, -0.0861272
Part.ActiveView().RotateAboutCenter 0, -0.0172254
Part.ActiveView().RotateAboutCenter -0.013533, -0.060289
Part.ActiveView().RotateAboutCenter 0, -0.0861272
Part.ActiveView().RotateAboutCenter 0, -0.0861272
Part.ActiveView().RotateAboutCenter 0, -0.103353
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0344509
Part.ActiveView().RotateAboutCenter 0, -0.103353
Part.ActiveView().RotateAboutCenter 0, -0.0172254
Part.ActiveView().RotateAboutCenter 0, -0.060289
Part.ActiveView().RotateAboutCenter 0, -0.0516763
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0516763
Part.ActiveView().RotateAboutCenter -0.00676651, -0.00861272
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0430636
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.SetPickMode
Part.SelectByID "", "FACE", 0.03316486072242, -0.1600060771829, 0.1116566244811
Part.OpenCompFile
swApp.LoadFile2 "C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Drop Weight\DROP WEIGHT ROUND SLUG.SLDPRT", ""
Set Part = swApp.ActiveDoc
Set Part = swApp.OpenDoc4 ("C:\Documents and Settings\hamilton\My Documents\MyDorado\MultiBeam MidBodies\Drop Weight\DROP WEIGHT ROUND SLUG.SLDPRT", 1, 0, "", longstatus)
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("DROP WEIGHT ROUND SLUG")
Part.ClearSelection
Part.ToolsMassProps
Part.AndSelectByID "DROP WEIGHT ROUND SLUG.SLDPRT", "COMPONENT", 0, 0, 0
Part.ClearSelection
Set Part = Nothing
swApp.CloseDoc "DROP WEIGHT ROUND SLUG"
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("MidBody")
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter -0.0879646, -0.301445
Part.ActiveView().RotateAboutCenter -0.101498, -0.18948
Part.ActiveView().RotateAboutCenter -0.0541321, -0.0947399
Part.ActiveView().RotateAboutCenter -0.013533, -0.0258382
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.101498, -0.155029
Part.ActiveView().RotateAboutCenter 0.040599, -0.120578
Part.ActiveView().RotateAboutCenter 0.00676651, -0.0861272
Part.ActiveView().RotateAboutCenter 0, -0.0258382
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter -0.013533, -0.335896
Part.ActiveView().RotateAboutCenter -0.00676651, -0.155029
Part.ActiveView().RotateAboutCenter 0, -0.0516763
Part.ActiveView().RotateAboutCenter -0.00676651, -0.0258382
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.027066, 0.0689018
Part.ActiveView().RotateAboutCenter -0.040599, 0.0344509
Part.ActiveView().RotateAboutCenter -0.00676651, 0.00861272
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.108264, 0.120578
Part.ActiveView().RotateAboutCenter -0.0473656, 0.198093
Part.ActiveView().RotateAboutCenter 0.027066, 0.292833
Part.ActiveView().RotateAboutCenter 0, 0.0172254
Part.ActiveView().RotateAboutCenter 0.040599, 0.111965
Part.ActiveView().RotateAboutCenter 0.013533, 0.0344509
Part.ActiveView().RotateAboutCenter 0.0608986, 0.163642
Part.ActiveView().RotateAboutCenter 0.0202995, 0.0258382
Part.ActiveView().RotateAboutCenter 0.0676651, 0.155029
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0.040599, 0.0947399
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0.00676651, 0.00861272
Part.ActiveView().RotateAboutCenter 0.040599, 0.0516763
Part.ActiveView().RotateAboutCenter 0.040599, 0.0516763
Part.ActiveView().RotateAboutCenter 0, 0.0172254
Part.ActiveView().RotateAboutCenter 0.00676651, 0.0430636
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0.013533, 0.180867
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.101498, 0.0258382
Part.ActiveView().RotateAboutCenter -0.108264, 0.155029
Part.ActiveView().RotateAboutCenter -0.128564, 0.180867
Part.ActiveView().RotateAboutCenter -0.0202995, 0.060289
Part.ActiveView().RotateAboutCenter -0.0338325, 0.172254
Part.ActiveView().RotateAboutCenter -0.00676651, 0.060289
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.013533, -0.0172254
Part.ActiveView().RotateAboutCenter 0.027066, 0.206705
Part.ActiveView().RotateAboutCenter 0.0202995, 0.223931
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0.0811981, -0.163642
Part.ActiveView().RotateAboutCenter 0.0608986, -0.129191
Part.ActiveView().RotateAboutCenter 0.0608986, -0.120578
Part.ActiveView().RotateAboutCenter 0.027066, -0.0775145
Part.ActiveView().RotateAboutCenter 0.027066, -0.103353
Part.ActiveView().RotateAboutCenter 0.027066, -0.111965
Part.ActiveView().RotateAboutCenter 0.0202995, -0.103353
Part.ActiveView().RotateAboutCenter 0.013533, -0.0861272
Part.ActiveView().RotateAboutCenter 0.0338325, -0.146416
Part.ActiveView().RotateAboutCenter 0.027066, -0.120578
Part.ActiveView().RotateAboutCenter 0.040599, -0.111965
Part.ActiveView().RotateAboutCenter 0.027066, -0.060289
Part.ActiveView().RotateAboutCenter 0.040599, -0.120578
Part.ActiveView().RotateAboutCenter 0.027066, -0.0775145
Part.ActiveView().RotateAboutCenter 0.00676651, 0
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter -0.0202995, 0.0516763
Part.ActiveView().RotateAboutCenter 0, 0.0172254
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.0811981, 0
Part.ActiveView().RotateAboutCenter -0.013533, 0
Part.ActiveView().RotateAboutCenter -0.0202995, 0
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.00676651, 0
Part.ActiveView().RotateAboutCenter -0.013533, 0
' MSGBOX
' Some of the models referenced in this document have been modified.  They must be saved when the document is saved.
' 		Save the document and the referenced models now?

Part.Save2 FALSE
Part.ShowNamedView2 "*Right", 4
Part.Save2 FALSE
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PIN, DOWEL, .1875 NOM, X .50L-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PIN, DOWEL, .1875 NOM, X .50L-2@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/DROPWEIGHT LATCH-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/PARALLEL BURN WIRE BRACKET-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/L-LEVER-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/BURN WIRE, PARALLEL-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/STOP SLEEVE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/END CAST, BURN WIRE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-1@DROP WEIGHT, BURN WIRE/Washer, SAE #6-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/BURN WIRE, PARALLEL-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/STOP SLEEVE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/END CAST, BURN WIRE-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/BURN WIRE ASSY-2@DROP WEIGHT, BURN WIRE/Washer, SAE #6-1@BURN WIRE ASSY", "COMPONENT", 0, 0, 0
Part.AndSelectByID "DROP WEIGHT, BURN WIRE-1@MidBody/SLEEVE, BURN WIRE-1@DROP WEIGHT, BURN WIRE", "COMPONENT", 0, 0, 0
Part.SetPickMode
Part.ClearSelection
Part.SetPickMode
Part.SetPickMode
Part.ViewZoomTo2 -0.278783, -0.0802228, -0.0101772, -0.077318, -0.313696, -0.0101772
Part.ShowNamedView2 "*Right", 4
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter 0.0947311, -0.223931
Part.ActiveView().RotateAboutCenter 0.040599, -0.422023
Part.ActiveView().RotateAboutCenter 0.0541321, -0.318671
Part.ActiveView().RotateAboutCenter 0, -0.0947399
Part.ActiveView().RotateAboutCenter -0.0202995, -0.111965
Part.ActiveView().RotateAboutCenter -0.00676651, -0.060289
Part.ActiveView().RotateAboutCenter -0.027066, -0.0947399
Part.ActiveView().RotateAboutCenter 0, -0.00861272
Part.ActiveView().RotateAboutCenter -0.0202995, -0.0689018
Part.ActiveView().RotateAboutCenter -0.0202995, -0.060289
Part.ActiveView().RotateAboutCenter -0.0338325, -0.111965
Part.ActiveView().RotateAboutCenter -0.0202995, -0.0258382
Part.ActiveView().RotateAboutCenter 0, 0.00861272
Part.ActiveView().RotateAboutCenter 0.0338325, 0.0861272
Part.ActiveView().RotateAboutCenter 0.0473656, 0.206705
Part.ActiveView().RotateAboutCenter 0.040599, 0.318671
Part.ActiveView().RotateAboutCenter 0.0202995, 0.275607
Part.ActiveView().RotateAboutCenter -0.013533, 0.241156
Part.ActiveView().RotateAboutCenter -0.0879646, 0.129191
Part.ActiveView().RotateAboutCenter -0.108264, 0.103353
Part.ActiveView().RotateAboutCenter -0.0541321, 0.0775145
Part.ActiveView().RotateAboutCenter -0.013533, 0.0258382
Part.ActiveView().RotateAboutCenter -0.00676651, 0.00861272
Part.ShowNamedView2 "*Right", 4
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameState = 1
swApp.ActiveDoc.ActiveView.FrameLeft = 0
swApp.ActiveDoc.ActiveView.FrameTop = 0
swApp.ActiveDoc.ActiveView.FrameState = 1
Set Part = swApp.ActivateDoc ("Muck up interface")
swApp.ExitApp
End Sub