' ****************************************************************************** ' swxJRNL.swj - journal recorded on 10/05/00 by grma ' ****************************************************************************** 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.OpenDoc3 ("D:\Projects\altex\drawings\newlinact\micromo_3056_30-1GB.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("micromo_3056_30-1GB.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.LoadFile2 "D:\Projects\altex\drawings\tailcone\tct_newmotor2.SLDASM", "" Set Part = swApp.ActiveDoc Set Part = swApp.OpenDoc3 ("D:\Projects\altex\drawings\tailcone\tct_newmotor2.SLDASM", 2, 0, 0, 0, 0, longstatus) ' MSGBOX ' Unable to locate the file I:\Work In Progress\altex\Program Files\Toolbox\ToolboxSE\partlibs\AI_shss_3.8_5.16-18_0.625_0.5_He_Sim_1.PRT. Would you like to find it yourself? ' MSGBOX ' Unable to locate the file I:\Work In Progress\altex\Program Files\Toolbox\ToolboxSE\partlibs\AI_shcs_#6-32_0.5_0.5_He_Sim_1.PRT. Would you like to find it yourself? ' MSGBOX ' Unable to locate the file I:\Work In Progress\altex\Program Files\Toolbox\ToolboxSE\partlibs\AI_fw0_#6.PRT. Would you like to find it yourself? ' MSGBOX ' Unable to locate the file I:\Work In Progress\altex\Program Files\Toolbox\ToolboxSE\partlibs\AI_shcs_#6-32_0.375_0.375_He_Sim_1.PRT. Would you like to find it yourself? ' MSGBOX ' Unable to locate the file I:\Work In Progress\altex\Program Files\Toolbox\ToolboxSE\partlibs\AI_lws4_5.16.PRT. Would you like to find it yourself? ' MSGBOX ' Unable to locate the file I:\Work In Progress\altex\Program Files\Toolbox\ToolboxSE\partlibs\AI_hnj_5.16-18_0.313_B_1.SLDPRT. Would you like to find it yourself? ' MSGBOX ' Unable to locate the file I:\Work In Progress\altex\Program Files\Toolbox\ToolboxSE\partlibs\AI_ss2_1.4-20_0.375_0.375_He_Sim_1.SLDPRT. Would you like to find it yourself? ' MSGBOX ' Unable to locate the file I:\Work In Progress\altex\Program Files\Toolbox\ToolboxSE\partlibs\AI_hnr_#8-32_0.164_B_1.PRT. Would you like to find it yourself? swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("tct_newmotor2.SLDASM") Set Part = Nothing swApp.CloseDoc "tct_newmotor2.SLDASM" swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("micromo_3056_30-1GB.SLDASM") swApp.LoadFile2 "F:\ATC\thruster\drawings\gimbal.SLDASM", "" Set Part = swApp.ActiveDoc Set Part = swApp.OpenDoc3 ("F:\ATC\thruster\drawings\gimbal.SLDASM", 2, 0, 0, 0, 0, longstatus) swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("gimbal.SLDASM") Set Part = Nothing swApp.CloseDoc "gimbal.SLDASM" swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("micromo_3056_30-1GB.SLDASM") swApp.LoadFile2 "D:\Projects\altex\drawings\newlinact\micromo_3056_30-1GB.SLDASM", "" Set Part = swApp.ActiveDoc Set Part = swApp.OpenDoc3 ("D:\Projects\altex\drawings\newlinact\micromo_3056_30-1GB.SLDASM", 2, 0, 0, 0, 0, longstatus) swApp.LoadFile2 "D:\Projects\altex\drawings\newtc\gimbal.SLDASM", "" Set Part = swApp.ActiveDoc Set Part = swApp.OpenDoc3 ("D:\Projects\altex\drawings\newtc\gimbal.SLDASM", 2, 0, 0, 0, 0, longstatus) swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("gimbal.SLDASM") Part.SelectByID "pancake-1@gimbal", "COMPONENT", 0, 0, 0 Part.SelectByID "duct-1@gimbal/altex-duct-1.0-1@duct", "COMPONENT", 0, 0, 0 Part.SelectByID "duct-1@gimbal/altex-duct-1.0-1@duct", "COMPONENT", 0, 0, 0 Part.ShowComponent2 Part.PrintDirect Part.SelectByID "pancake-1@gimbal", "COMPONENT", 0, 0, 0 Part.SelectByID "pancake-1@gimbal", "COMPONENT", 0, 0, 0 Part.SelectByID "pancake-1@gimbal", "COMPONENT", 0, 0, 0 Part.OpenCompFile swApp.LoadFile2 "D:\Projects\altex\motors\pancake.SLDASM", "" Set Part = swApp.ActiveDoc Set Part = swApp.OpenDoc3 ("D:\Projects\altex\motors\pancake.SLDASM", 2, 0, 0, 0, 0, longstatus) swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("pancake.SLDASM") Part.ClearSelection Part.SelectByID "rbeh004-1@pancake", "COMPONENT", 0, 0, 0 Part.SelectByID "psagcap-1@pancake", "COMPONENT", 0, 0, 0 Part.SelectByID "PSA_8G-1@pancake", "COMPONENT", 0, 0, 0 Part.ClearSelection Part.SelectByID "", "FACE", 0.01076371690311, -0.008813374117778, 0.10795 Part.ActiveView().RotateAboutCenter 0.00364531, 0 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0167959 Part.ActiveView().RotateAboutCenter 0, -0.00419897 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0167959 Part.ActiveView().RotateAboutCenter 0.00364531, -0.0125969 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0209948 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0125969 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0167959 Part.ActiveView().RotateAboutCenter 0.0182265, -0.0419897 Part.ActiveView().RotateAboutCenter 0.0145812, -0.0125969 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0251938 Part.ActiveView().RotateAboutCenter 0.0145812, -0.0209948 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0209948 Part.ActiveView().RotateAboutCenter 0.0182265, -0.0335918 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0125969 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0167959 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0125969 Part.ActiveView().RotateAboutCenter 0.0145812, -0.0167959 Part.ActiveView().RotateAboutCenter 0.0182265, -0.0251938 Part.ActiveView().RotateAboutCenter 0.00364531, -0.00419897 Part.ActiveView().RotateAboutCenter 0.0145812, -0.00419897 Part.ActiveView().RotateAboutCenter 0.00364531, -0.0125969 Part.ActiveView().RotateAboutCenter 0.0109359, -0.00839794 Part.ActiveView().RotateAboutCenter 0.0218718, -0.0293928 Part.ActiveView().RotateAboutCenter 0.00364531, -0.00419897 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0125969 Part.ActiveView().RotateAboutCenter 0.00364531, -0.00419897 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0167959 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0125969 Part.ActiveView().RotateAboutCenter 0.00364531, -0.00419897 Part.ActiveView().RotateAboutCenter 0.00364531, -0.00419897 Part.ActiveView().RotateAboutCenter 0.0109359, -0.00839794 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0251938 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0125969 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0671835 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0209948 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0209948 Part.ActiveView().RotateAboutCenter 0.0145812, -0.117571 Part.ActiveView().RotateAboutCenter 0.0145812, -0.0587856 Part.ActiveView().RotateAboutCenter 0, -0.0671835 Part.ActiveView().RotateAboutCenter 0.00364531, -0.0209948 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0125969 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0293928 Part.ActiveView().RotateAboutCenter 0.00364531, -0.00419897 Part.ActiveView().RotateAboutCenter 0, -0.00419897 Part.ActiveView().RotateAboutCenter 0.00364531, -0.00419897 Part.ActiveView().RotateAboutCenter 0, -0.00419897 Part.AndSelectByID "", "FACE", 0.01305985210928, -0.0109924077077, 0 Part.AddDimension 0.0467585, -0.046932, 0.0736971 Part.ClearSelection Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.0209948 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0293928 Part.ActiveView().RotateAboutCenter 0, 0.0209948 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0125969 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0125969 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0209948 Part.ActiveView().RotateAboutCenter -0.0109359, 0.0377907 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0209948 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0209948 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0125969 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0125969 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0293928 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.0145812, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0145812, 0.00839794 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0109359, 0.00839794 Part.ActiveView().RotateAboutCenter -0.0145812, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0255172, 0.0293928 Part.ActiveView().RotateAboutCenter -0.0182265, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0109359, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0109359, 0.00839794 Part.ActiveView().RotateAboutCenter -0.0328078, 0.0251938 Part.ActiveView().RotateAboutCenter -0.0109359, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0218718, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0291625, 0.0209948 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0.0145812, 0.00839794 Part.ActiveView().RotateAboutCenter 0.0109359, 0.00839794 Part.ActiveView().RotateAboutCenter 0.0182265, 0.0125969 Part.ActiveView().RotateAboutCenter 0.0182265, 0.0167959 Part.ActiveView().RotateAboutCenter 0.0765515, 0.0209948 Part.ActiveView().RotateAboutCenter 0.0182265, 0.0125969 Part.ActiveView().RotateAboutCenter 0.0182265, 0.0167959 Part.ActiveView().RotateAboutCenter 0.0109359, 0.00419897 Part.ActiveView().RotateAboutCenter 0.00729062, 0.00839794 Part.ActiveView().RotateAboutCenter 0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter 0.00364531, 0 Part.ActiveView().RotateAboutCenter 0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter 0.0182265, 0.00839794 Part.ActiveView().RotateAboutCenter 0.0291625, 0.00419897 Part.ActiveView().RotateAboutCenter 0.0510343, 0.00839794 Part.ActiveView().RotateAboutCenter 0.0510343, 0 Part.ActiveView().RotateAboutCenter 0.0583249, 0 Part.ActiveView().RotateAboutCenter 0.0510343, 0 Part.ActiveView().RotateAboutCenter 0.0874874, 0.0167959 Part.ActiveView().RotateAboutCenter 0.0182265, 0 Part.ActiveView().RotateAboutCenter 0.0182265, 0.00419897 Part.ActiveView().RotateAboutCenter 0.0109359, 0.00839794 Part.ActiveView().RotateAboutCenter 0.0109359, 0 Part.ActiveView().RotateAboutCenter 0.0109359, 0.00419897 Part.ActiveView().RotateAboutCenter 0.00364531, 0 Part.ActiveView().RotateAboutCenter 0.00364531, 0 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0167959 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00839794 Part.ActiveView().RotateAboutCenter -0.0109359, 0.0125969 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0109359, 0.00419897 Part.ActiveView().RotateAboutCenter -0.0145812, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0255172, 0.0293928 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0145812, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0109359, 0.0209948 Part.ActiveView().RotateAboutCenter -0.0109359, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0182265, 0.0251938 Part.ActiveView().RotateAboutCenter -0.0145812, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0109359, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0218718, 0.0251938 Part.ActiveView().RotateAboutCenter -0.0182265, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0291625, 0.0209948 Part.ActiveView().RotateAboutCenter -0.0182265, 0.0167959 Part.ActiveView().RotateAboutCenter -0.0182265, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0145812, 0 Part.ActiveView().RotateAboutCenter -0.0182265, 0.00839794 Part.ActiveView().RotateAboutCenter -0.0364531, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0182265, 0 Part.ActiveView().RotateAboutCenter -0.0510343, 0 Part.ActiveView().RotateAboutCenter -0.0218718, 0 Part.ActiveView().RotateAboutCenter -0.0291625, 0 Part.ActiveView().RotateAboutCenter -0.0109359, 0 Part.ActiveView().RotateAboutCenter -0.0182265, 0 Part.ActiveView().RotateAboutCenter -0.0145812, 0 Part.ActiveView().RotateAboutCenter -0.0182265, -0.00419897 Part.ActiveView().RotateAboutCenter -0.0291625, -0.00419897 Part.ActiveView().RotateAboutCenter -0.0182265, -0.00839794 Part.ActiveView().RotateAboutCenter -0.0109359, -0.00839794 Part.ActiveView().RotateAboutCenter -0.0182265, -0.00419897 Part.ActiveView().RotateAboutCenter -0.0145812, -0.00839794 Part.ActiveView().RotateAboutCenter -0.0182265, -0.0209948 Part.ActiveView().RotateAboutCenter -0.0109359, -0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, -0.0167959 Part.ActiveView().RotateAboutCenter -0.0145812, -0.00419897 Part.ActiveView().RotateAboutCenter 0, -0.00419897 Part.ActiveView().RotateAboutCenter -0.0109359, -0.0251938 Part.ActiveView().RotateAboutCenter 0, -0.0125969 Part.ActiveView().RotateAboutCenter -0.00729062, -0.0209948 Part.ActiveView().RotateAboutCenter -0.00364531, -0.0209948 Part.ActiveView().RotateAboutCenter 0, -0.0671835 Part.ActiveView().RotateAboutCenter 0, -0.0797804 Part.ActiveView().RotateAboutCenter 0, -0.0209948 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0587856 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0251938 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0209948 Part.ActiveView().RotateAboutCenter 0.0145812, -0.0419897 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0125969 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0209948 Part.ActiveView().RotateAboutCenter 0.00729062, -0.0167959 Part.ActiveView().RotateAboutCenter 0.0218718, -0.0419897 Part.ActiveView().RotateAboutCenter 0.0145812, -0.0125969 Part.ActiveView().RotateAboutCenter 0.0109359, -0.0167959 Part.ActiveView().RotateAboutCenter 0.0145812, -0.0125969 Part.ActiveView().RotateAboutCenter 0.00364531, -0.0125969 Part.ActiveView().RotateAboutCenter 0.00729062, -0.00419897 Part.ActiveView().RotateAboutCenter 0.00364531, 0 Part.ActiveView().RotateAboutCenter 0.00364531, 0 Part.ActiveView().RotateAboutCenter 0, -0.00419897 Part.ActiveView().RotateAboutCenter 0.00364531, 0 Part.ActiveView().RotateAboutCenter 0.00364531, 0 Part.ActiveView().RotateAboutCenter 0.0145812, 0 Part.ActiveView().RotateAboutCenter 0.0109359, 0 Part.ActiveView().RotateAboutCenter 0.0109359, 0 Part.ActiveView().RotateAboutCenter 0.0182265, 0 Part.ActiveView().RotateAboutCenter 0.0182265, 0 Part.ActiveView().RotateAboutCenter 0.0400984, 0.00839794 Part.ActiveView().RotateAboutCenter 0.0510343, 0.0167959 Part.ActiveView().RotateAboutCenter 0.0656155, 0.0167959 Part.ActiveView().RotateAboutCenter 0.0583249, 0.0251938 Part.ActiveView().RotateAboutCenter 0.0729062, 0.0209948 Part.ActiveView().RotateAboutCenter 0.0692609, 0.0377907 Part.ActiveView().RotateAboutCenter 0.0145812, 0.0167959 Part.ActiveView().RotateAboutCenter 0.0182265, 0.00419897 Part.ActiveView().RotateAboutCenter 0.0109359, 0.0167959 Part.ActiveView().RotateAboutCenter 0.0328078, 0.0335918 Part.ActiveView().RotateAboutCenter 0.0109359, 0.0167959 Part.ActiveView().RotateAboutCenter 0.0109359, 0.00419897 Part.ActiveView().RotateAboutCenter 0.00729062, 0.0167959 Part.ActiveView().RotateAboutCenter 0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00839794 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.00419897 Part.ActiveView().RotateAboutCenter 0, 0.0209948 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0125969 Part.ActiveView().RotateAboutCenter 0, 0.0461887 Part.ActiveView().RotateAboutCenter 0, 0.0209948 Part.ActiveView().RotateAboutCenter 0, 0.0209948 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0587856 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0125969 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0125969 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0145812, 0.0167959 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0125969 Part.ActiveView().RotateAboutCenter -0.0109359, 0.00839794 Part.ActiveView().RotateAboutCenter -0.00364531, 0.0125969 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.0145812, 0.0167959 Part.ActiveView().RotateAboutCenter -0.00729062, 0.0167959 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.0145812, 0.0167959 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.0109359, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.0291625, 0 Part.ActiveView().RotateAboutCenter -0.0182265, 0 Part.ActiveView().RotateAboutCenter -0.0510343, 0 Part.ActiveView().RotateAboutCenter -0.0182265, 0 Part.ActiveView().RotateAboutCenter -0.0182265, -0.00839794 Part.ActiveView().RotateAboutCenter -0.0182265, -0.00419897 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.0145812, 0 Part.ActiveView().RotateAboutCenter -0.0109359, 0 Part.ActiveView().RotateAboutCenter -0.0109359, 0 Part.ActiveView().RotateAboutCenter -0.0109359, -0.00839794 Part.ActiveView().RotateAboutCenter -0.0255172, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.ActiveView().RotateAboutCenter -0.00364531, 0 Part.SelectByID "D1@Sketch2@PSA_8G-1@pancake", "DIMENSION", 0.05382958566679, -0.001244916918654, 0.1084491173062 Part.SelectByID "D1@Sketch2@PSA_8G-1@pancake", "DIMENSION", 0.05412297042567, 0.007047701312147, 0.120464459527 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Sketch2@psaghouse-1@pancake", "DIMENSION", 0.0441815583623, 0.02245208933464, 0.1283815293364 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Sketch3@PSA_8G-1@pancake", "DIMENSION", 0.04062331795915, 0.01565279885083, 0.1139731871299 Part.SelectByID "D1@Sketch3@PSA_8G-1@pancake", "DIMENSION", 0.0201903232803, 0.03822664451597, 0.1175200813928 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Base-Extrude@psaghouse-1@pancake", "DIMENSION", 0.0296551940201, -0.01126466566706, 0.06121561133421 Part.SelectByID "D1@Base-Extrude@psaghouse-1@pancake", "DIMENSION", 0.0296551940201, -0.01126466566706, 0.06121561133421 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Sketch1@psaghouse-1@pancake", "DIMENSION", 0.02165848705429, -0.04264900066971, 0.006284072436537 Part.ClearSelection Part.SelectByID "D1@Sketch2@psagcap-1@pancake", "DIMENSION", 0.04099033194657, -0.001906574699079, 0.08988837445737 Part.SelectByID "D1@Sketch2@psagcap-1@pancake", "DIMENSION", 0.05133501551934, 0.007167447932814, 0.1168029989035 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Base-Extrude@psagcap-1@pancake", "DIMENSION", 0.03818393379167, 0.008222220195451, 0.1002175386459 Part.SelectByID "D1@Base-Extrude@psagcap-1@pancake", "DIMENSION", 0.03823895803517, 0.008336503167698, 0.1004531459638 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Base-Extrude@PSA_8G-1@pancake", "DIMENSION", 0.02356556885523, 0.00327440459095, 0.07321122817168 Part.SelectByID "D1@Base-Extrude@PSA_8G-1@pancake", "DIMENSION", 0.02356556885523, 0.00327440459095, 0.07321122817168 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Base-Extrude@rbeh004-1@pancake", "DIMENSION", 0.007406561042264, -0.008419384565133, 0.03464232670882 Part.SelectByID "D1@Base-Extrude@rbeh004-1@pancake", "DIMENSION", 0.007406561042264, -0.008419384565133, 0.03464232670882 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Distance3@pancake.SLDASM", "DIMENSION", 0.01098301107464, 0.01142018478128, 0.06733635367975 Part.SelectByID "D1@Distance3@pancake.SLDASM", "DIMENSION", 0.01118477262438, 0.01124821395806, 0.0673726494971 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Sketch1@rbeh004-1@pancake", "DIMENSION", 0.002105718534947, -0.002289400969537, 0.03594582118423 Part.SelectByID "D1@Sketch1@rbeh004-1@pancake", "DIMENSION", 0.001848932741713, -0.002231713118572, 0.03567391804902 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Distance4@pancake.SLDASM", "DIMENSION", 0.005829031668593, 0.004852738431011, 0.05106098534423 Part.SelectByID "D1@Distance4@pancake.SLDASM", "DIMENSION", 0.005829031668593, 0.004852738431011, 0.05106098534423 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Sketch1@PSA_8G-1@pancake", "DIMENSION", 0.01067125495007, 0.006044514166965, 0.05938046409366 Part.SelectByID "D1@Sketch1@PSA_8G-1@pancake", "DIMENSION", 0.01067125495007, 0.006044514166965, 0.05938046409366 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Sketch2@rbeh004-1@pancake", "DIMENSION", 0.01549519671944, 0.001288111697693, 0.05934543025597 Part.SelectByID "D1@Sketch2@rbeh004-1@pancake", "DIMENSION", 0.01564193402567, 0.001001857902235, 0.05914611875547 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Sketch1@psagcap-1@pancake", "DIMENSION", 0.02358381442589, 0.01276863312486, 0.08653132684748 Part.SelectByID "D1@Sketch1@psagcap-1@pancake", "DIMENSION", 0.02358381442589, 0.01276863312486, 0.08653132684748 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Boss-Extrude1@PSA_8G-1@pancake", "DIMENSION", 0.02738055911017, 0.01356205755248, 0.09285705960202 Part.ClearSelection Part.SelectByID "D1@Boss-Extrude1@PSA_8G-1@pancake", "DIMENSION", 0.02738055911017, 0.01356205755248, 0.09285705960202 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Boss-Extrude2@PSA_8G-1@pancake", "DIMENSION", 0.02499607339116, 0.01865693801975, 0.09671656974631 Part.SelectByID "D1@Boss-Extrude2@PSA_8G-1@pancake", "DIMENSION", 0.02499607339116, 0.01865693801975, 0.09671656974631 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Boss-Extrude1@rbeh004-1@pancake", "DIMENSION", 0.006819486022287, 0.0051368067671, 0.05281912402126 Part.SelectByID "D1@Boss-Extrude1@rbeh004-1@pancake", "DIMENSION", 0.006672748716051, 0.005423060562558, 0.05301843552177 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Distance1@pancake.SLDASM", "DIMENSION", 0.01083627376841, 0.01170643857673, 0.06753566518026 Part.SelectByID "D1@Distance1@pancake.SLDASM", "DIMENSION", 0.01083627376841, 0.01170643857673, 0.06753566518026 Part.HideDimension Part.ClearSelection Part.SelectByID "D1@Cut-Extrude1@psaghouse-1@pancake", "DIMENSION", 0.01986060911656, -0.005011657261745, 0.05651940442139 Part.SelectByID "D1@Cut-Extrude1@psaghouse-1@pancake", "DIMENSION", 0.01997065760356, -0.004783091317253, 0.0569906190571 Part.HideDimension Part.ClearSelection Part.PrintDirect Part.SelectByID "rbeh004-1@pancake", "COMPONENT", 0, 0, 0 Part.ClearSelection Part.SelectByID "rbeh004-1@pancake", "COMPONENT", 0, 0, 0 Part.SelectByID "PSA_8G-1@pancake", "COMPONENT", 0, 0, 0 Part.ClearSelection swApp.ActiveDoc.ActiveView.FrameState = 1 Part.Save2 FALSE swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("gimbal.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("pancake.SLDASM") swApp.ExitApp End Sub