' ******************************************************************************
' swxJRNL.swj - journal recorded on 06/21/99 by grma
' ******************************************************************************

Dim swApp As Object
Dim Part As Object
Dim Gtol As Object
Dim FeatureData As Object
Dim Feature As Object
Dim Component As Object
Sub main()
Set swApp = CreateObject ("SldWorks.Application")
Set Part = swApp.OpenDoc ("D:\Projects\dispenser\drawings\baseplate.SLDASM", 2)
Set Part = swApp.ActivateDoc ("baseplate.SLDASM")
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0.0258213, 0.0793286
Part.ActiveView().RotateAboutCenter 0.0215178, 0.0594964
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter -0.0086071, -0.0198321
Part.ActiveView().RotateAboutCenter 0, -0.138825
Part.ActiveView().RotateAboutCenter 0, -0.114035
Part.ActiveView().RotateAboutCenter 0, -0.0942027
Part.ActiveView().RotateAboutCenter 0, -0.133867
Part.ActiveView().RotateAboutCenter 0.00430355, -0.0942027
Part.ActiveView().RotateAboutCenter 0, -0.0198321
Part.ActiveView().RotateAboutCenter 0.00430355, -0.0148741
Part.ActiveView().RotateAboutCenter 0.0129107, -0.00495804
Part.ActiveView().RotateAboutCenter 0.0129107, 0
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.0086071, 0
Part.ActiveView().RotateAboutCenter -0.0344284, 0.0297482
Part.ActiveView().RotateAboutCenter -0.0129107, 0.00991607
Part.ActiveView().RotateAboutCenter -0.0559462, 0.0297482
Part.ActiveView().RotateAboutCenter -0.0129107, 0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00495804
Part.ActiveView().RotateAboutCenter 0.0129107, -0.0396643
Part.ActiveView().RotateAboutCenter 0.0086071, -0.0148741
Part.ActiveView().RotateAboutCenter 0.038732, 0
Part.ActiveView().RotateAboutCenter 0.0688568, 0.0594964
Part.ActiveView().RotateAboutCenter 0.0430355, 0.0793286
Part.ActiveView().RotateAboutCenter 0.0516426, 0.109077
Part.ActiveView().RotateAboutCenter 0.0301249, 0.0644545
Part.ActiveView().RotateAboutCenter 0.0215178, 0.0892447
Part.ActiveView().RotateAboutCenter 0.0086071, 0.510678
Part.ActiveView().RotateAboutCenter 0.0086071, 0.862698
Part.ActiveView().RotateAboutCenter 0.0344284, 0.30244
Part.ActiveView().RotateAboutCenter 0.0430355, 0.20328
Part.ActiveView().RotateAboutCenter 0.0731604, 0.138825
Part.ActiveView().RotateAboutCenter 0.219481, 0.0594964
Part.ActiveView().RotateAboutCenter 0.163535, 0.0594964
Part.ActiveView().RotateAboutCenter 0.111892, 0.0644545
Part.ActiveView().RotateAboutCenter 0.0903746, 0.0842866
Part.ActiveView().RotateAboutCenter 0.0258213, 0.0297482
Part.ActiveView().RotateAboutCenter -0.0172142, -0.0495804
Part.ActiveView().RotateAboutCenter -0.038732, -0.391685
Part.ActiveView().RotateAboutCenter -0.00430355, -0.00991607
Part.ActiveView().RotateAboutCenter -0.0129107, -0.0198321
Part.ActiveView().RotateAboutCenter -0.0086071, 0
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter -0.0086071, 0.00991607
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.0172142, -0.00991607
Part.ActiveView().RotateAboutCenter -0.0559462, -0.109077
Part.ActiveView().RotateAboutCenter 0, -0.0743706
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter 0, -0.00991607
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00495804
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.0086071, 0
Part.ActiveView().RotateAboutCenter -0.0086071, 0
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.SelectByID "ExplView1", "EXPLODEDVIEWS", 0, 0, 0
Part.SelectByID "ExplView1", "EXPLODEDVIEWS", 0, 0, 0
Part.ClearSelection
Part.SelectByID "ExplView1", "EXPLODEDVIEWS", 0, 0, 0
Part.ViewCollapseAssembly
Part.SelectByID "Default", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Default", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "BASEPLATE", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "BASEPLATE"
Part.SelectByID "Default@baseplate.SLDASM", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.ShowConfiguration "Default"
Part.SelectByID "Default", "CONFIGURATIONS", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Default", "CONFIGURATIONS", 0, 0, 0
Part.SelectByID "ExplView1", "EXPLODEDVIEWS", 0, 0, 0
Part.SelectByID "Explode Step1", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Explode Step1", "EXPLODESTEPS", 0, 0, 0
Part.FeatEditDef
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "corner_brace-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "baseplate-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "corner_brace-2@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step1", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.09088644963265, 0.08286581766416, -0.2091963833265
Part.AndSelectByID "dispens3-1@baseplate/clamp_bar-1@dispens3", "COMPONENT", -0.1745228151382, 0.4069697196262, -0.1277793931015
Part.AndSelectByID "dispens3-1@baseplate/tube-2@dispens3", "COMPONENT", -0.1165652072923, 0.2982284309185, -0.1363182688766
Part.AndSelectByID "dispens3-1@baseplate/tube-1@dispens3", "COMPONENT", -0.1323994865356, 0.3221766004257, -0.04203381351238
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/tube-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/tube-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step2", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "corner_brace-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "baseplate-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "corner_brace-2@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step1", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/tube-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/tube-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step2", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Explode Step1", "EXPLODESTEPS", 0, 0, 0
Part.SelectByID "Explode Step1", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Explode Step1", "EXPLODESTEPS", 0, 0, 0
Part.FeatEditDef
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "corner_brace-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "baseplate-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "corner_brace-2@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step1", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.09250559954194, -0.09215906964931, -0.2246313856501
Part.AndSelectByID "dispens3-1@baseplate/clamp_bar-1@dispens3", "COMPONENT", -0.192372500451, 0.4069697196262, -0.1427375497073
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/clamp_bar-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step2", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.09120573238459, -0.09995227540469, -0.2224357027948
Part.AndSelectByID "dispens3-1@baseplate/tube-2@dispens3", "COMPONENT", -0.1247723135309, 0.3192492629033, -0.1646967248933
Part.AndSelectByID "dispens3-1@baseplate/tube-1@dispens3", "COMPONENT", -0.127799916213, 0.2833530287105, -0.03616407472975
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0.0516426, 0
Part.ActiveView().RotateAboutCenter 0.202267, -0.00495804
Part.ActiveView().RotateAboutCenter 0.167839, -0.0347063
Part.ActiveView().RotateAboutCenter 0.0946781, -0.0247902
Part.ActiveView().RotateAboutCenter 0.0989817, -0.0297482
Part.ActiveView().RotateAboutCenter 0.0817675, -0.0297482
Part.ActiveView().RotateAboutCenter 0.0172142, -0.00991607
Part.ActiveView().RotateAboutCenter 0.0430355, -0.0148741
Part.ActiveView().RotateAboutCenter 0.0258213, -0.00991607
Part.ActiveView().RotateAboutCenter 0.0129107, -0.00495804
Part.ActiveView().RotateAboutCenter 0, -0.00495804
Part.ActiveView().RotateAboutCenter -0.00430355, -0.00495804
Part.AndSelectByID "dispens3-1@baseplate/bottle-2@dispens3", "COMPONENT", -0.1875889513181, 0.3070842196262, 0.003922977645246
Part.AndSelectByID "dispens3-1@baseplate/bottle-1@dispens3", "COMPONENT", -0.1865363829492, 0.3070842196262, -0.1091190645571
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/tube-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/tube-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/bottle-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/bottle-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step3", "EXPLODESTEPS", 0, 0, 0
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter -0.103285, 0.193363
Part.ActiveView().RotateAboutCenter -0.111892, 0.0793286
Part.ActiveView().RotateAboutCenter -0.236695, 0.0347063
Part.ActiveView().RotateAboutCenter -0.107589, 0.0297482
Part.ActiveView().RotateAboutCenter -0.0903746, 0.0297482
Part.ActiveView().RotateAboutCenter -0.038732, 0
Part.ActiveView().RotateAboutCenter -0.0731604, -0.0148741
Part.ActiveView().RotateAboutCenter -0.0817675, 0
Part.ActiveView().RotateAboutCenter -0.0731604, 0.00991607
Part.ActiveView().RotateAboutCenter -0.0215178, 0.00495804
Part.ActiveView().RotateAboutCenter -0.0344284, 0.00495804
Part.ActiveView().RotateAboutCenter -0.0344284, 0
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.0301249, 0
Part.ActiveView().RotateAboutCenter -0.0172142, 0
Part.ActiveView().RotateAboutCenter 0.00430355, -0.0148741
Part.ActiveView().RotateAboutCenter 0.0516426, -0.0297482
Part.ActiveView().RotateAboutCenter 0.0344284, -0.0198321
Part.ActiveView().RotateAboutCenter 0.0215178, 0
Part.ActiveView().RotateAboutCenter 0.0086071, 0.00495804
Part.ActiveView().RotateAboutCenter 0.0129107, 0.0148741
Part.ActiveView().RotateAboutCenter -0.0086071, 0
Part.ActiveView().RotateAboutCenter -0.0602497, -0.0247902
Part.ActiveView().RotateAboutCenter -0.0129107, -0.0396643
Part.ActiveView().RotateAboutCenter 0, -0.0198321
Part.ActiveView().RotateAboutCenter 0.0086071, -0.00991607
Part.ActiveView().RotateAboutCenter 0.0086071, -0.0148741
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00991607
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0.0086071, 0.0347063
Part.ActiveView().RotateAboutCenter 0.0129107, 0.0446223
Part.ActiveView().RotateAboutCenter 0.0129107, 0.0297482
Part.ActiveView().RotateAboutCenter 0.0129107, 0.0297482
Part.ActiveView().RotateAboutCenter 0.00430355, 0.0247902
Part.ActiveView().RotateAboutCenter 0.0129107, 0.0347063
Part.ActiveView().RotateAboutCenter 0, 0.0148741
Part.ActiveView().RotateAboutCenter 0, -0.00495804
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.0908041354399, -0.1033924970492, -0.2215454545971
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter -0.189356, 0.128909
Part.ActiveView().RotateAboutCenter -0.120499, 0.109077
Part.ActiveView().RotateAboutCenter -0.197963, 0.123951
Part.ActiveView().RotateAboutCenter -0.0903746, 0.0644545
Part.ActiveView().RotateAboutCenter -0.0086071, 0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00991607
Part.AndSelectByID "dispens3-1@baseplate/bottle-2@dispens3", "COMPONENT", -0.1633920395205, 0.2388886378494, -0.001699105770427
Part.AndSelectByID "dispens3-1@baseplate/bottle-1@dispens3", "COMPONENT", -0.1682718550693, 0.2364512538344, -0.1252818216499
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/bottle-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/bottle-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step4", "EXPLODESTEPS", 0, 0, 0
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0.197963, -0.0892447
Part.ActiveView().RotateAboutCenter 0.120499, -0.0297482
Part.ActiveView().RotateAboutCenter 0.13341, -0.0396643
Part.ActiveView().RotateAboutCenter 0.0645533, -0.0148741
Part.ActiveView().RotateAboutCenter 0.107589, -0.0495804
Part.ActiveView().RotateAboutCenter 0.0688568, -0.0545384
Part.ActiveView().RotateAboutCenter 0.0215178, -0.0694125
Part.ActiveView().RotateAboutCenter -0.0086071, -0.0594964
Part.ActiveView().RotateAboutCenter -0.0774639, -0.0297482
Part.ActiveView().RotateAboutCenter -0.146321, -0.0148741
Part.ActiveView().RotateAboutCenter -0.0258213, -0.0148741
Part.ActiveView().RotateAboutCenter 0.0301249, -0.0495804
Part.ActiveView().RotateAboutCenter 0.00430355, -0.0198321
Part.ActiveView().RotateAboutCenter 0.0129107, -0.0694125
Part.ActiveView().RotateAboutCenter 0.0301249, -0.0396643
Part.ActiveView().RotateAboutCenter 0.0086071, -0.0347063
Part.ActiveView().RotateAboutCenter 0.0258213, -0.0247902
Part.ActiveView().RotateAboutCenter 0.0215178, 0
Part.ActiveView().RotateAboutCenter 0.00430355, 0.00991607
Part.ActiveView().RotateAboutCenter -0.00430355, 0.0148741
Part.ActiveView().RotateAboutCenter 0.00430355, 0.0347063
Part.ActiveView().RotateAboutCenter 0.0086071, 0.0644545
Part.ActiveView().RotateAboutCenter -0.00430355, 0.0396643
Part.ActiveView().RotateAboutCenter -0.00430355, 0.00495804
Part.ActiveView().RotateAboutCenter -0.00430355, 0.00495804
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.223785, -0.00991607
Part.ActiveView().RotateAboutCenter -0.19366, -0.0347063
Part.ActiveView().RotateAboutCenter -0.0086071, 0.00495804
Part.ActiveView().RotateAboutCenter -0.0516426, 0.0594964
Part.ActiveView().RotateAboutCenter -0.0215178, 0.0247902
Part.ActiveView().RotateAboutCenter 0, 0.00991607
Part.ActiveView().RotateAboutCenter 0.0086071, 0.00495804
Part.ActiveView().RotateAboutCenter 0.0688568, 0.0297482
Part.ActiveView().RotateAboutCenter 0.271124, 0.0743706
Part.ActiveView().RotateAboutCenter 0.0430355, 0.0148741
Part.ActiveView().RotateAboutCenter 0.00430355, 0.00495804
Part.ActiveView().RotateAboutCenter 0, -0.00495804
Part.ActiveView().RotateAboutCenter 0.0086071, -0.0247902
Part.ActiveView().RotateAboutCenter 0.0344284, -0.0396643
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00495804
Part.ActiveView().RotateAboutCenter 0.0129107, -0.00991607
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.09246451455357, -0.1076425602107, -0.2252076540272
Part.ActiveView().RotateAboutCenter -0.00430355, 0.00495804
Part.ActiveView().RotateAboutCenter -0.19366, 0.0644545
Part.ActiveView().RotateAboutCenter -0.086071, 0.00991607
Part.ActiveView().RotateAboutCenter -0.0774639, 0.0297482
Part.ActiveView().RotateAboutCenter -0.0946781, 0.0446223
Part.ActiveView().RotateAboutCenter -0.0086071, 0
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.AndSelectByID "dispens3-1@baseplate/ctd-1@dispens3", "COMPONENT", -0.1448494821612, 0.01275895378188, 0.1496040436902
Part.AndSelectByID "", "FACE", -0.1675900381421, 0.03993971962615, -0.03275774952866
Part.AndSelectByID "dispens3-1@baseplate/pump-3@dispens3", "COMPONENT", -0.1442328780103, 0.05594268661258, -0.009595442103119
Part.AndSelectByID "dispens3-1@baseplate/pump-2@dispens3", "COMPONENT", -0.1432183962885, 0.05767938297103, -0.123398468023
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/ctd-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stir_retainer-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/pump-3@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/pump-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step5", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.09059670588738, 0.07822939001386, -0.208459703497
Part.AndSelectByID "dispens3-1@baseplate/ctd-1@dispens3", "COMPONENT", -0.1301747313864, -0.06820481255804, 0.119317870005
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step6", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/ctd-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stir_retainer-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/pump-3@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/pump-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step5", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/bottle-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/bottle-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step4", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/ctd-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stir_retainer-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/pump-3@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/pump-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step5", "EXPLODESTEPS", 0, 0, 0
Part.DeSelectByID "dispens3-1@baseplate/ctd-1@dispens3", "COMPONENT", 0, 0, 0
Part.ActiveView().RotateAboutCenter 0.0086071, 0
Part.ActiveView().RotateAboutCenter 0.107589, -0.00495804
Part.ActiveView().RotateAboutCenter 0.154928, -0.0396643
Part.ActiveView().RotateAboutCenter 0.0903746, -0.0148741
Part.ActiveView().RotateAboutCenter 0.0301249, -0.00991607
Part.ActiveView().RotateAboutCenter 0.038732, -0.0347063
Part.ActiveView().RotateAboutCenter 0.0301249, -0.0347063
Part.ActiveView().RotateAboutCenter 0.0086071, -0.0396643
Part.ActiveView().RotateAboutCenter 0, -0.00991607
Part.ActiveView().RotateAboutCenter 0, -0.0396643
Part.ActiveView().RotateAboutCenter 0, -0.0594964
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter -0.00430355, 0
Part.ActiveView().RotateAboutCenter -0.0258213, -0.00495804
Part.ActiveView().RotateAboutCenter -0.00430355, -0.0198321
Part.ActiveView().RotateAboutCenter -0.00430355, -0.0347063
Part.ActiveView().RotateAboutCenter 0, -0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0, -0.00495804
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0.0129107, 0
Part.ActiveView().RotateAboutCenter 0.0172142, 0
Part.ActiveView().RotateAboutCenter 0.0129107, -0.00991607
Part.ActiveView().RotateAboutCenter 0.0129107, -0.00991607
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00991607
Part.ActiveView().RotateAboutCenter 0, -0.00495804
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.090519745493, -0.102968758888, -0.2214542971756
Part.AndSelectByID "dispens3-1@baseplate/stirbar-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stirbar-2@dispens3", "COMPONENT", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stirbar-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stirbar-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step6", "EXPLODESTEPS", 0, 0, 0
Part.ActiveView().RotateAboutCenter 0, 0.00991607
Part.ActiveView().RotateAboutCenter 0.0430355, 0.0793286
Part.ActiveView().RotateAboutCenter 0.0086071, 0.0297482
Part.ActiveView().RotateAboutCenter 0.0129107, 0.0297482
Part.ActiveView().RotateAboutCenter 0.0086071, 0.0247902
Part.ActiveView().RotateAboutCenter -0.0258213, 0.0347063
Part.ActiveView().RotateAboutCenter -0.180749, 0.148741
Part.ActiveView().RotateAboutCenter -0.103285, 0.0347063
Part.ActiveView().RotateAboutCenter -0.0344284, 0.0198321
Part.ActiveView().RotateAboutCenter 0.0086071, 0.0396643
Part.ActiveView().RotateAboutCenter 0.038732, 0.0991607
Part.ActiveView().RotateAboutCenter 0.0258213, 0.0396643
Part.ActiveView().RotateAboutCenter 0.0731604, 0.0347063
Part.ActiveView().RotateAboutCenter 0.0688568, 0.143783
Part.ActiveView().RotateAboutCenter 0.129107, 0.123951
Part.ActiveView().RotateAboutCenter 0.0430355, 0.128909
Part.ActiveView().RotateAboutCenter 0.124803, 0.133867
Part.ActiveView().RotateAboutCenter 0.0989817, -0.00991607
Part.ActiveView().RotateAboutCenter 0.0430355, -0.114035
Part.ActiveView().RotateAboutCenter 0.0172142, -0.168573
Part.ActiveView().RotateAboutCenter -0.0344284, -0.282608
Part.ActiveView().RotateAboutCenter -0.0215178, -0.0694125
Part.ActiveView().RotateAboutCenter -0.038732, -0.0991607
Part.ActiveView().RotateAboutCenter -0.0301249, -0.0297482
Part.ActiveView().RotateAboutCenter -0.163535, -0.114035
Part.ActiveView().RotateAboutCenter 0, -0.0297482
Part.ActiveView().RotateAboutCenter 0.0086071, -0.133867
Part.ActiveView().RotateAboutCenter 0.00430355, -0.0347063
Part.ActiveView().RotateAboutCenter 0.00430355, -0.0297482
Part.ActiveView().RotateAboutCenter 0.00430355, -0.0148741
Part.ActiveView().RotateAboutCenter 0.0086071, -0.0297482
Part.ActiveView().RotateAboutCenter 0.00430355, -0.00991607
Part.ActiveView().RotateAboutCenter 0.0301249, -0.0148741
Part.ActiveView().RotateAboutCenter 0.0086071, 0
Part.ActiveView().RotateAboutCenter 0.0258213, 0
Part.ActiveView().RotateAboutCenter 0.0086071, 0.00991607
Part.ActiveView().RotateAboutCenter 0.0172142, 0.0247902
Part.ActiveView().RotateAboutCenter 0.00430355, 0.00495804
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0.00495804
Part.ActiveView().RotateAboutCenter 0.00430355, 0
Part.ActiveView().RotateAboutCenter 0.0129107, 0
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0, 0.00495804
Part.ActiveView().RotateAboutCenter 0, 0.00991607
Part.ActiveView().RotateAboutCenter 0, 0.00991607
Part.PrintPreview
Part.ViewZoomTo2 -0.441839, 0.705784, -0.142601, 0.222376, -0.0899713, -0.142601
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 0.980392
Part.ActiveView().ZoomByFactor 0.943396
Part.ActiveView().ZoomByFactor 1.01
Part.ActiveView().ZoomByFactor 1.02
Part.ActiveView().ZoomByFactor 1.02
Part.PrintPreview
Part.PrintDirect
Part.SelectByID "Point1@Origin@baseplate-1@baseplate", "EXTSKETCHPOINT", 0, 0, 0
Part.SelectByID "Point1@Origin@baseplate-1@baseplate", "EXTSKETCHPOINT", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Point1@Origin@baseplate-1@baseplate", "EXTSKETCHPOINT", 0, 0, 0
Part.InsertNewNote3 "ROV ARM ATTACHMENT BRACKET", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "Annotations", "DCABINET", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Annotations", "DCABINET", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Annotations", "DCABINET", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Annotations", "DCABINET", 0, 0, 0
Part.SelectByID "Annotations", "DCABINET", 0, 0, 0
Part.ClearSelection
Part.SelectByID "Annotations", "DCABINET", 0, 0, 0
Part.SelectByID "DetailItem1@Annotations", "NOTE", -0.2525303511672, -0.04990902339557, -0.2850575410062
Part.SelectByID "DetailItem1@Annotations", "NOTE", -0.2963693827407, -0.01120606307691, -0.3298606677966
Part.InsertNewNote3 "ROV ARM ATTACHMENT BRACKET", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem1@Annotations", "NOTE", -0.2780455436497, -0.01287413502165, -0.3019242373331
Part.InsertNewNote3 "ROV ARM ATTACHMENT BRACKET", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "", "EDGE", -0.2449115283413, 0.08295039593318, -0.2117902265196
Part.SelectByID "", "EDGE", -0.2449115283413, 0.08295039593318, -0.2117902265196
Part.SelectByID "", "EDGE", -0.2428562216026, 0.08304829110884, -0.2085379539682
Part.InsertNewNote3 "BASE PLATE", 0, 1, 1, 0, 0, 0, 0, 1
Part.ClearSelection
Part.SelectByID "DetailItem2@Annotations", "NOTE", -0.260366767493, 0.07893040882089, -0.2156765645315
Part.ClearSelection
Part.SelectByID "DetailItem2@Annotations", "NOTE", -0.346740506409, 0.142859769718, -0.3117731637858
Part.InsertNewNote3 "BASE PLATE", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem1@Annotations", "NOTE", -0.3148475069391, -0.01815655303534, -0.3635118892987
Part.InsertNewNote3 "ROV ARM ATTACHMENT BRACKET", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem1@Annotations", "NOTE", -0.3252576685957, -0.02229758058833, -0.3826132295931
Part.ClearSelection
Part.SelectByID "", "EDGE", -0.2155930364602, -0.004338085430675, -0.1445775985289
Part.SelectByID "", "EDGE", -0.2155930364602, -0.004338085430675, -0.1445775985289
Part.ClearSelection
Part.SelectByID "Explode Step6", "EXPLODESTEPS", 0, 0, 0
Part.ActivateSelectedFeature
Part.ClearSelection
Part.SelectByID "Explode Step6", "EXPLODESTEPS", 0, 0, 0
Part.FeatEditDef
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stirbar-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stirbar-2@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step6", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.09226639727723, 0.08129715382054, -0.2114023364707
Part.AndSelectByID "dispens3-1@baseplate/stir_retainer-1@dispens3", "COMPONENT", -0.1469757943927, -0.01281717006853, -0.08123579053665
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/stir_retainer-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step7", "EXPLODESTEPS", 0, 0, 0
Part.ClearSelection
Part.AndSelectByID "", "EDGE", -0.0923324343309, 0.08671376573341, -0.211506832064
Part.AndSelectByID "dispens3-1@baseplate/ctd-1@dispens3", "COMPONENT", -0.1373465307167, 0.02562729794045, 0.1458838412892
Part.ClearSelection
Part.AndSelectByID "", "EDGE", 0, 0, 0
Part.AndSelectByID "dispens3-1@baseplate/ctd-1@dispens3", "COMPONENT", 0, 0, 0
Part.AndSelectByID "Explode Step8", "EXPLODESTEPS", 0, 0, 0
Part.SelectByID "", "FACE", -0.1945587511261, 0.4924106658335, -0.1951575261694
Part.SelectByID "", "FACE", -0.130362767801, 0.5026600160058, 0.03960823994271
Part.InsertNewNote3 "DISPENSER TUBES", 0, 1, 3, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem3@Annotations", "NOTE", -0.2439499575901, 0.4671754243724, 0.05674052870291
Part.ClearSelection
Part.SelectByID "DetailItem3@Annotations", "NOTE", -0.1740486364773, 0.508336878258, 0.1934781899568
Part.InsertNewNote3 "DISPENSER TUBES", 0, 1, 3, 0, 0, 0, 0, 1
Part.SelectByID "", "EDGE", -0.1783323499943, 0.004180403078095, 0.2625522384907
Part.SelectByID "", "EDGE", -0.215039885094, -0.004992592662092, -0.147924707444
Part.InsertNewNote3 "STIRRING MOTORS", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem4@Annotations", "NOTE", -0.2224008038274, -0.001855726508805, -0.2068792525241
Part.ClearSelection
Part.SelectByID "DetailItem4@Annotations", "NOTE", -0.3065901190489, 0.07077999555763, -0.2939928829189
Part.InsertNewNote3 "STIRRING MOTORS", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "", "EDGE", -0.1765170409298, 0.00170266406684, 0.2645122460181
Part.SelectByID "", "EDGE", -0.1765170409298, 0.00170266406684, 0.2645122460181
Part.SelectByID "", "FACE", -0.1756747611458, 0.007091617268202, 0.2578020947004
Part.InsertNewNote3 "STIRRING MOTOR PUMP", 0, 1, 3, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem5@Annotations", "NOTE", -0.02450254873766, 0.07190726631674, 0.1530918732191
Part.SelectByID "DetailItem5@Annotations", "NOTE", 0.06445540644853, 0.09297829141415, 0.3072318868076
Part.InsertNewNote3 "STIRRING MOTOR PUMP", 0, 1, 3, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem5@Annotations", "NOTE", 0.0384808489572, 0.08816413615356, 0.2630745165533
Part.ClearSelection
Part.SelectByID "", "EDGE", -0.206281301436, 0.5815772052948, -0.05432235742865
Part.InsertNewNote3 "TUBE CLAMP BAR", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem6@Annotations", "NOTE", -0.3387037195756, 0.5270515569826, -0.05518923302476
Part.ClearSelection
Part.SelectByID "", "EDGE", -0.1982159183839, 0.1269126015285, -0.1362398893024
Part.InsertNewNote3 "STIRRING BARS", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem7@Annotations", "NOTE", -0.2479860396823, 0.1176042168307, -0.1715372748689
Part.ClearSelection
Part.SelectByID "", "EDGE", -0.2125283506879, 0.2130472760444, -0.17649003577
Part.InsertNewNote3 "COLLAPSIBLE PARTICULATE BOTTLES", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem8@Annotations", "NOTE", -0.3026068658733, 0.1853673649056, -0.2149552516718
Part.ClearSelection
Part.SelectByID "", "EDGE", -0.09366494605018, 0.2458231241868, 0.2321668195627
Part.InsertNewNote3 "HYDRAULICALLY ACTUATED" & Chr(13) & Chr(10) &_
	"FLOW CONTROL VALVE", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem9@Annotations", "NOTE", -0.1012689643518, 0.2408250665759, 0.1388393663703
Part.ClearSelection
Part.SelectByID "", "EDGE", -0.19077265646, 0.2162122333245, 0.133166602727
Part.InsertNewNote3 "VARIABLE SPEED PARTICULATE PUMP", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem10@Annotations", "NOTE", -0.1754479104924, 0.2413077913702, 0.021766630795
Part.ClearSelection
Part.SelectByID "DetailItem3@Annotations", "NOTE", -0.183157964216, 0.5067126488898, 0.1780328048008
Part.ClearSelection
Part.SelectByID "DetailItem8@Annotations", "NOTE", -0.4151443505193, 0.3957975878889, -0.2594610041034
Part.ClearSelection
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.961538
Part.ActiveView().ZoomByFactor 0.934579
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.909091
Part.ActiveView().ZoomByFactor 0.925926
Part.ActiveView().ZoomByFactor 0.952381
Part.ViewZoomTo2 -0.745175, 0.833824, -0.142601, 0.627685, -0.117926, -0.142601
Part.SetPickMode
Part.SelectByID "DetailItem8@Annotations", "NOTE", -0.4319735374158, 0.3214329448826, -0.333294284866
Part.InsertNewNote3 "COLLAPSIBLE PARTICULATE " & Chr(13) & Chr(10) &_
	"BOTTLES", 0, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem1@Annotations", "NOTE", -0.307652285308, 0.01691455626419, -0.3298648534919
Part.InsertNewNote3 "ROV ARM ATTACHMENT" & Chr(13) & Chr(10) &_
	" BRACKET", 0, 1, 1, 0, 0, 0, 0, 1
Part.ViewZoomTo2 -0.685337, 0.78793, -0.142601, 0.528525, -0.13016, -0.142601
Part.SetPickMode
Part.ClearSelection
Part.SelectByID "DetailItem1@Annotations", "NOTE", -0.2911871709206, 0.01529375246854, -0.3048396248805
Part.ClearSelection
Part.EditRebuild
Part.SelectByID "", "EDGE", -0.1273471588346, -0.1420338535821, 0.2686845071989
Part.InsertNewNote3 "PARTICLE DISPENSER ASSEMBLY", 1, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem11@Annotations", "NOTE", -0.03880278243921, -0.08542253692195, 0.03059801057808
Part.ClearSelection
Part.SelectByID "DetailItem11@Annotations", "NOTE", -0.03651383758313, -0.1737588007366, -0.02185167664712
Part.ClearSelection
Part.SelectByID "DetailItem11@Annotations", "NOTE", -0.04288926827653, -0.192881382655, -0.04407812564848
Part.InsertNewNote3 "PARTICLE DISPENSER ASSEMBLY", 1, 1, 1, 0, 0, 0, 0, 1
Part.SelectByID "DetailItem11@Annotations", "NOTE", -0.06442022826988, -0.1938125518373, -0.07873930905646
Part.ClearSelection
Part.PrintPreview
Part.SelectByID "DetailItem11@Annotations", "NOTE", -0.001785855419848, -0.2114003617564, 0.009208050142211
Part.SelectByID "DetailItem11@Annotations", "NOTE", -0.2750063067284, 0.6393896074209, 0.1169110211846
Part.ClearSelection
Part.PrintPreview
Part.SelectByID "DetailItem11@Annotations", "NOTE", -0.00571520870489, -0.195622956873, 0.01300507428862
Part.ClearSelection
Part.SelectByID "DetailItem11@Annotations", "NOTE", 0.001391577406014, -0.154722370951, 0.0502124464737
Part.ViewZoomTo2 -0.659639, 0.754416, -0.142601, 0.443872, -0.170719, -0.142601
Part.ActiveView().ZoomByFactor 1
Part.ActiveView().ZoomByFactor 0.990099
Part.ActiveView().ZoomByFactor 0.952381
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.970874
Part.ActiveView().ZoomByFactor 0.980392
Part.PrintPreview
Part.PrintDirect
Part.Save
Part.ClearSelection
Set Part = Nothing
swApp.CloseDoc "baseplate.SLDASM"
swApp.ExitApp
End Sub