' ****************************************************************************** ' swxJRNL.swj - journal recorded on 09/18/00 by craig ' ****************************************************************************** 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 ("C:\soliddata\Carousel.Sampler.Cover.New\bucket assembley\3inch.Sampler.Cover.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("3inch.Sampler.Cover.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = Nothing swApp.CloseDoc "3inch.Sampler.Cover.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\Carousel.Sampler.Cover.New\bucket assembley\sampler bucket.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("sampler bucket.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = Nothing swApp.CloseDoc "sampler bucket.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\Carousel.Sampler.Cover.New\bucket assembley\bucket assembley.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("bucket assembley.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ActiveView().RotateAboutCenter 0.00303267, -0.00861209 Part.ActiveView().RotateAboutCenter 0.739972, -0.383238 Part.ActiveView().RotateAboutCenter 0.0242614, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0272941, -0.0215302 Part.ActiveView().RotateAboutCenter 0.0667188, -0.0430604 Part.ActiveView().RotateAboutCenter 0.115242, -0.0516725 Part.ActiveView().RotateAboutCenter 0.0667188, -0.0215302 Part.ActiveView().RotateAboutCenter 0.109176, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0909802, -0.0215302 Part.ActiveView().RotateAboutCenter 0.0272941, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0212287, -0.00430604 Part.ActiveView().RotateAboutCenter 0.018196, 0 Part.ActiveView().RotateAboutCenter 0.00909802, 0 Part.ActiveView().RotateAboutCenter 0.00909802, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0333594, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0606535, -0.155018 Part.ActiveView().RotateAboutCenter 0.0394247, -0.223914 Part.ActiveView().RotateAboutCenter 0.018196, -0.0559786 Part.ActiveView().RotateAboutCenter -0.0303267, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0212287, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0121307, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0151634, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0121307, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0697515, -0.0215302 Part.ActiveView().RotateAboutCenter -0.115242, -0.0387544 Part.ActiveView().RotateAboutCenter -0.103111, -0.0172242 Part.ActiveView().RotateAboutCenter -0.145568, 0.00430604 Part.ActiveView().RotateAboutCenter -0.157699, 0.0387544 Part.ActiveView().RotateAboutCenter -0.0485228, 0.0172242 Part.ActiveView().RotateAboutCenter -0.0272941, 0.0258363 Part.ActiveView().RotateAboutCenter -0.018196, 0.0215302 Part.ActiveView().RotateAboutCenter -0.0212287, 0.0301423 Part.ActiveView().RotateAboutCenter -0.00909802, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00606535, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00303267, 0 Part.ActiveView().RotateAboutCenter 0.00303267, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00606535, 0 Part.ActiveView().RotateAboutCenter 0.0121307, 0 Part.ActiveView().RotateAboutCenter 0.0121307, 0 Part.ActiveView().RotateAboutCenter 0.00606535, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0151634, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0121307, 0.0129181 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00909802, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00303267, 0 Set Part = Nothing swApp.CloseDoc "bucket assembley.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\Carousel.Sampler.Cover.New\sampler bucket\bucket assembley.SLDDRW", 3, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("bucket assembley - Sheet1") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = Nothing swApp.CloseDoc "bucket assembley - Sheet1" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Isus\Isus Eq-pac mount.SLDPRT", 1, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Isus Eq-pac mount.SLDPRT") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ViewDisplayShaded Part.ShowNamedView2 "*Isometric", 7 Part.ActiveView().RotateAboutCenter 0, -0.0129181 Part.ActiveView().RotateAboutCenter 0, -0.0215302 Part.ActiveView().RotateAboutCenter 0, -0.0602846 Part.ActiveView().RotateAboutCenter 0.00917285, -0.16363 Part.ActiveView().RotateAboutCenter 0.00917285, -0.0861209 Part.ActiveView().RotateAboutCenter 0.0183457, -0.189466 Part.ActiveView().RotateAboutCenter 0.0122305, -0.129181 Part.ActiveView().RotateAboutCenter 0.00917285, -0.111957 Part.ActiveView().RotateAboutCenter 0.0244609, -0.16363 Part.ActiveView().RotateAboutCenter 0.00917285, -0.0258363 Part.ActiveView().RotateAboutCenter 0.00917285, -0.0258363 Part.ActiveView().RotateAboutCenter 0.00611523, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00917285, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0244609, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0122305, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0305762, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0183457, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0580947, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0489219, 0 Part.ActiveView().RotateAboutCenter 0.0550371, 0.00861209 Part.ActiveView().RotateAboutCenter 0.165111, 0.0775088 Part.ActiveView().RotateAboutCenter 0.103959, 0.0775088 Part.ActiveView().RotateAboutCenter 0.232379, 0.241138 Part.ActiveView().RotateAboutCenter 0.0917285, 0.137793 Part.ActiveView().RotateAboutCenter 0.0733828, 0.120569 Part.ActiveView().RotateAboutCenter 0.079498, 0.198078 Part.ActiveView().RotateAboutCenter 0.0428066, 0.0688967 Part.ActiveView().RotateAboutCenter 0.0336338, 0.0387544 Part.ActiveView().RotateAboutCenter 0.00917285, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.00305762, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0122305, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0183457, 0.0172242 Part.ActiveView().RotateAboutCenter 0.0550371, 0.0602846 Part.ActiveView().RotateAboutCenter 0.12842, 0.155018 Part.ActiveView().RotateAboutCenter 0.0550371, 0.0861209 Part.ActiveView().RotateAboutCenter 0.0672675, 0.094733 Part.ActiveView().RotateAboutCenter 0.103959, 0.198078 Part.ActiveView().RotateAboutCenter 0.0122305, 0.0688967 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0215302 Part.ActiveView().RotateAboutCenter 0.00611523, 0 Part.ActiveView().RotateAboutCenter 0.0152881, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0428066, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0550371, -0.0129181 Part.ActiveView().RotateAboutCenter 0.116189, -0.0344484 Part.ActiveView().RotateAboutCenter 0.0428066, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0305762, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0122305, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0336338, -0.0387544 Part.ActiveView().RotateAboutCenter 0.0428066, -0.0215302 Part.ActiveView().RotateAboutCenter 0.0152881, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0305762, -0.0387544 Part.ActiveView().RotateAboutCenter 0.0122305, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0214033, -0.0387544 Part.ActiveView().RotateAboutCenter 0.0122305, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0152881, -0.0602846 Part.ActiveView().RotateAboutCenter 0.0366914, -0.120569 Part.ActiveView().RotateAboutCenter 0.0152881, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0305762, -0.0430604 Part.ActiveView().RotateAboutCenter 0.0122305, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0275185, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0122305, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00611523, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0152881, -0.0215302 Part.ActiveView().RotateAboutCenter 0.00917285, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0244609, -0.0430604 Part.ActiveView().RotateAboutCenter 0.0152881, -0.0215302 Part.ActiveView().RotateAboutCenter 0.0183457, -0.0215302 Part.ActiveView().RotateAboutCenter 0.0275185, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0183457, -0.00430604 Part.ActiveView().RotateAboutCenter 0.103959, 0.0172242 Part.ActiveView().RotateAboutCenter 0.0428066, 0.0215302 Part.ActiveView().RotateAboutCenter 0.0214033, 0.120569 Part.ActiveView().RotateAboutCenter 0.00611523, 0.0602846 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0602846 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0172242 Part.ActiveView().RotateAboutCenter 0.00305762, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00305762, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00305762, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0122305, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0611523, 0 Part.ActiveView().RotateAboutCenter -0.0672675, -0.00861209 Part.ActiveView().RotateAboutCenter -0.12842, -0.0430604 Part.ActiveView().RotateAboutCenter -0.0611523, -0.0775088 Part.ActiveView().RotateAboutCenter -0.0183457, -0.0775088 Part.ActiveView().RotateAboutCenter -0.0275185, -0.0818148 Part.ActiveView().RotateAboutCenter -0.00917285, -0.0129181 Part.ActiveView().RotateAboutCenter -0.00917285, -0.0215302 Part.ActiveView().RotateAboutCenter -0.00305762, -0.0215302 Part.ActiveView().RotateAboutCenter -0.00917285, -0.0861209 Part.ActiveView().RotateAboutCenter -0.00305762, -0.0688967 Part.ActiveView().RotateAboutCenter -0.00305762, -0.0602846 Part.ActiveView().RotateAboutCenter -0.00611523, -0.0516725 Part.ActiveView().RotateAboutCenter -0.00305762, -0.0258363 Part.ActiveView().RotateAboutCenter -0.00305762, -0.0301423 Part.ActiveView().RotateAboutCenter -0.00305762, -0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0244609, -0.0387544 Part.ActiveView().RotateAboutCenter -0.0550371, -0.0688967 Part.ActiveView().RotateAboutCenter -0.146766, -0.172242 Part.ActiveView().RotateAboutCenter -0.0733828, -0.0602846 Part.ActiveView().RotateAboutCenter -0.0917285, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0183457, 0 Part.ActiveView().RotateAboutCenter -0.0183457, 0 Part.ActiveView().RotateAboutCenter -0.0183457, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00611523, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0122305, 0 Part.ActiveView().RotateAboutCenter -0.00611523, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.0122305, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0183457, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0366914, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0428066, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0428066, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0672675, 0 Part.ActiveView().RotateAboutCenter -0.0183457, 0 Part.ActiveView().RotateAboutCenter -0.0214033, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00611523, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00611523, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00611523, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0214033, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0122305, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0214033, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00917285, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0122305, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0305762, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0152881, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0611523, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0428066, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0305762, 0 Part.ActiveView().RotateAboutCenter -0.0122305, 0 Part.ActiveView().RotateAboutCenter -0.00917285, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00917285, 0 Part.ActiveView().RotateAboutCenter -0.0244609, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0152881, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0611523, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0183457, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0214033, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00611523, 0.0172242 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0258363 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0602846 Part.ActiveView().RotateAboutCenter 0.0122305, 0.0818148 Part.ActiveView().RotateAboutCenter 0, 0.0129181 Part.ActiveView().RotateAboutCenter 0, 0.0172242 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.0129181 Part.ActiveView().RotateAboutCenter -0.00611523, 0.0344484 Part.ActiveView().RotateAboutCenter -0.00305762, 0.0129181 Part.ActiveView().RotateAboutCenter -0.00611523, 0.0215302 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00917285, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0122305, -0.0172242 Part.ActiveView().RotateAboutCenter -0.00917285, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0214033, -0.0172242 Part.ActiveView().RotateAboutCenter -0.00917285, 0 Part.ActiveView().RotateAboutCenter -0.0152881, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00611523, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Set Part = Nothing swApp.CloseDoc "Isus Eq-pac mount.SLDPRT" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Mounts\Isus Eq-pac mount.SLDPRT", 1, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Isus Eq-pac mount.SLDPRT") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ViewDisplayShaded Set Part = Nothing swApp.CloseDoc "Isus Eq-pac mount.SLDPRT" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\4 leg bridle\4 leg bridle.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("4 leg bridle.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ActiveView().RotateAboutCenter 0.00674896, 0 Part.ActiveView().RotateAboutCenter 0.0404938, -0.0172242 Part.ActiveView().RotateAboutCenter 0.084362, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0404938, -0.0172242 Part.ActiveView().RotateAboutCenter 0.104609, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0337448, 0 Part.ActiveView().RotateAboutCenter 0.0404938, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0539917, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0539917, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0202469, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00337448, 0 Part.ActiveView().RotateAboutCenter 0.0101234, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0134979, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0303703, -0.00861209 Part.ActiveView().RotateAboutCenter 0.111358, -0.0818148 Part.ActiveView().RotateAboutCenter -0.00337448, 0 Part.ActiveView().RotateAboutCenter 0.00674896, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0134979, 0.0387544 Part.ActiveView().RotateAboutCenter 0.0101234, 0.0344484 Part.ActiveView().RotateAboutCenter 0.00674896, 0.0301423 Part.ActiveView().RotateAboutCenter 0.00674896, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0168724, 0.0645907 Part.ActiveView().RotateAboutCenter 0.0168724, 0.0861209 Part.ActiveView().RotateAboutCenter 0.0236214, 0.111957 Part.ActiveView().RotateAboutCenter 0.0337448, 0.111957 Part.ActiveView().RotateAboutCenter 0.0269958, 0.120569 Part.ActiveView().RotateAboutCenter 0.0506172, 0.189466 Part.ActiveView().RotateAboutCenter 0.175473, 0.146405 Part.ActiveView().RotateAboutCenter 0.131605, 0.20669 Part.ActiveView().RotateAboutCenter 0.0101234, 0.107651 Part.ActiveView().RotateAboutCenter -0.0101234, 0.0430604 Part.ActiveView().RotateAboutCenter -0.0337448, 0.142099 Part.ActiveView().RotateAboutCenter -0.0809875, 0.146405 Part.ActiveView().RotateAboutCenter -0.202469, 0.16363 Part.ActiveView().RotateAboutCenter -0.101234, 0.0430604 Part.ActiveView().RotateAboutCenter -0.0337448, 0.0430604 Part.ActiveView().RotateAboutCenter -0.0101234, 0.0516725 Part.ActiveView().RotateAboutCenter -0.00337448, 0.172242 Part.ActiveView().RotateAboutCenter 0, 0.223914 Part.ActiveView().RotateAboutCenter 0, 0.0387544 Part.ActiveView().RotateAboutCenter 0, 0.0258363 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00337448, 0 Part.ActiveView().RotateAboutCenter -0.0202469, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0269958, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0438682, 0 Part.ActiveView().RotateAboutCenter -0.0134979, 0 Part.ActiveView().RotateAboutCenter 0.00337448, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0337448, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0742385, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0236214, 0 Part.ActiveView().RotateAboutCenter 0.0269958, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0978599, 0.00430604 Part.ActiveView().RotateAboutCenter 0.236214, -0.0172242 Part.ActiveView().RotateAboutCenter 0.209218, -0.146405 Part.ActiveView().RotateAboutCenter 0.121481, -0.107651 Part.ActiveView().RotateAboutCenter 0.0404938, -0.0344484 Part.ActiveView().RotateAboutCenter 0.0168724, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0168724, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0438682, 0.0129181 Part.ActiveView().RotateAboutCenter 0.141728, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0337448, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00674896, 0 Part.ActiveView().RotateAboutCenter 0, -0.0387544 Part.ActiveView().RotateAboutCenter 0, -0.241138 Part.ActiveView().RotateAboutCenter -0.0101234, -0.20669 Part.ActiveView().RotateAboutCenter -0.0168724, -0.111957 Part.ActiveView().RotateAboutCenter -0.0269958, -0.258363 Part.ActiveView().RotateAboutCenter -0.0269958, -0.189466 Part.ActiveView().RotateAboutCenter -0.00337448, -0.0215302 Part.ActiveView().RotateAboutCenter -0.00337448, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0708641, -0.0818148 Part.ActiveView().RotateAboutCenter -0.168724, -0.241138 Part.ActiveView().RotateAboutCenter -0.229465, -0.198078 Part.ActiveView().RotateAboutCenter -0.0472427, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0506172, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0134979, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00337448, 0 Part.ActiveView().RotateAboutCenter 0.0708641, 0.00861209 Part.ActiveView().RotateAboutCenter 0.114732, 0.0172242 Part.ActiveView().RotateAboutCenter 0.182222, 0.0516725 Part.ActiveView().RotateAboutCenter 0.0371193, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0168724, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0404938, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0168724, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0134979, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0236214, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0303703, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0404938, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0337448, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0539917, 0.189466 Part.ActiveView().RotateAboutCenter -0.00337448, 0.20669 Part.ActiveView().RotateAboutCenter -0.0371193, 0.16363 Part.ActiveView().RotateAboutCenter -0.0438682, 0.198078 Part.ActiveView().RotateAboutCenter -0.00674896, 0.0258363 Part.ActiveView().RotateAboutCenter 0.0202469, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0404938, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0337448, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0303703, -0.0516725 Part.ActiveView().RotateAboutCenter 0.00337448, -0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.0172242 Part.ActiveView().RotateAboutCenter 0, -0.0301423 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00337448, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00674896, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00337448, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00337448, 0 Part.ActiveView().RotateAboutCenter -0.0101234, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0134979, 0 Part.ActiveView().RotateAboutCenter -0.0101234, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00337448, 0 Part.ActiveView().RotateAboutCenter -0.0134979, 0 Part.ActiveView().RotateAboutCenter -0.0168724, 0 Part.ActiveView().RotateAboutCenter -0.0168724, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00337448, 0 Part.ActiveView().RotateAboutCenter -0.00674896, 0 Part.ActiveView().RotateAboutCenter -0.00674896, 0 Part.ActiveView().RotateAboutCenter -0.00674896, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00674896, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0202469, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0134979, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0404938, 0 Part.ActiveView().RotateAboutCenter -0.0269958, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0236214, -0.0129181 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00337448, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00337448, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0101234, -0.0258363 Part.ActiveView().RotateAboutCenter -0.0371193, -0.0473665 Part.ActiveView().RotateAboutCenter -0.0134979, -0.0215302 Part.ActiveView().RotateAboutCenter -0.00337448, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.0172242 Part.ActiveView().RotateAboutCenter 0.00337448, -0.0172242 Part.ActiveView().RotateAboutCenter 0.00337448, -0.0172242 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00337448, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0101234, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0202469, -0.0301423 Part.ActiveView().RotateAboutCenter 0.00674896, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0101234, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00674896, 0.00861209 Part.Save2 FALSE Set Part = Nothing swApp.CloseDoc "4 leg bridle.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\ELEVATOR ROD.SLDDRW", 3, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("ELEVATOR ROD - Sheet1") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.PrintDirect Set Part = Nothing swApp.CloseDoc "ELEVATOR ROD - Sheet1" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing Guide.SLDDRW", 3, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Bearing Guide - Sheet1") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = Nothing swApp.CloseDoc "Bearing Guide - Sheet1" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\4 leg bridle\4 leg bridle.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("4 leg bridle.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 ' MSGBOX ' There are parts that have features defined in the context of C:\soliddata\mooring\4 leg bridle\4 leg bridle.SLDASM. If you select OK to continue this operation, these features will not update in the context of the newly saved assembly . It is highly recommended that you consider saving new versions of these parts now which will update in the context of this newly saved assembly. To do this, select Cancel, select References from the Save As dialog box, then input new names for those parts that you want to update in the new assembly. ' MSGBOX ' There are parts that have features defined in the context of C:\soliddata\mooring\4 leg bridle\4 leg bridle.SLDASM. If you select OK to continue this operation, these features will not update in the context of the newly saved assembly . It is highly recommended that you consider saving new versions of these parts now which will update in the context of this newly saved assembly. To do this, select Cancel, select References from the Save As dialog box, then input new names for those parts that you want to update in the new assembly. ' MSGBOX ' There are parts that have features defined in the context of C:\soliddata\mooring\4 leg bridle\4 leg bridle.SLDASM. If you select OK to continue this operation, these features will not update in the context of the newly saved assembly . It is highly recommended that you consider saving new versions of these parts now which will update in the context of this newly saved assembly. To do this, select Cancel, select References from the Save As dialog box, then input new names for those parts that you want to update in the new assembly. ' MSGBOX ' There are parts that have features defined in the context of C:\soliddata\mooring\4 leg bridle\4 leg bridle.SLDASM. If you select OK to continue this operation, these features will not update in the context of the newly saved assembly . It is highly recommended that you consider saving new versions of these parts now which will update in the context of this newly saved assembly. To do this, select Cancel, select References from the Save As dialog box, then input new names for those parts that you want to update in the new assembly. Part.SaveAs2 "C:\soliddata\mooring\4 leg bridle\4 leg bridle with cage.SLDASM", 0, FALSE, FALSE Part.SelectByID "ElevCage-1-1@4 leg bridle with cage", "COMPONENT", 0, 0, 0 Part.HideComponent2 Part.ClearSelection Part.SelectByID "hobieLabs-1@4 leg bridle with cage", "COMPONENT", 0, 0, 0 Part.HideComponent2 Part.ClearSelection Part.ShowNamedView2 "*Front", 1 Part.ShowNamedView2 "*Back", 2 Part.ShowNamedView2 "*Left", 3 Part.ShowNamedView2 "*Right", 4 Part.ShowNamedView2 "*Top", 5 Part.ViewZoomTo2 -0.423124, 0.516264, -0.7239, 0.439091, -0.383207, -0.7239 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.0231486, 0 Part.ActiveView().RotateAboutCenter -0.0396833, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0363763, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0330694, 0 Part.ActiveView().RotateAboutCenter -0.0330694, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0165347, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0 Part.ActiveView().RotateAboutCenter -0.0198416, 0 Part.ActiveView().RotateAboutCenter -0.0363763, 0 Part.ActiveView().RotateAboutCenter -0.0760596, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0363763, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0429902, 0 Part.ActiveView().RotateAboutCenter -0.0297625, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0297625, 0 Part.ActiveView().RotateAboutCenter -0.11905, 0 Part.ActiveView().RotateAboutCenter -0.0826735, 0.00861209 Part.ActiveView().RotateAboutCenter -0.112436, 0.0129181 Part.ActiveView().RotateAboutCenter -0.158733, 0.00430604 Part.ActiveView().RotateAboutCenter -0.158733, -0.00430604 Part.ActiveView().RotateAboutCenter -0.105822, -0.00430604 Part.ActiveView().RotateAboutCenter -0.145505, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0727527, -0.0215302 Part.ActiveView().RotateAboutCenter -0.0661388, -0.0258363 Part.ActiveView().RotateAboutCenter -0.052911, -0.0430604 Part.ActiveView().RotateAboutCenter -0.0132278, -0.0129181 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.0258363 Part.ActiveView().RotateAboutCenter 0, -0.0473665 Part.ActiveView().RotateAboutCenter 0, -0.0516725 Part.ActiveView().RotateAboutCenter -0.0165347, -0.146405 Part.ActiveView().RotateAboutCenter -0.00661388, -0.0430604 Part.ActiveView().RotateAboutCenter -0.00661388, -0.0344484 Part.ActiveView().RotateAboutCenter -0.00330694, -0.0172242 Part.ActiveView().RotateAboutCenter -0.00330694, -0.0215302 Part.ActiveView().RotateAboutCenter -0.00661388, -0.0258363 Part.ActiveView().RotateAboutCenter -0.00661388, -0.0387544 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00330694, -0.0129181 Part.ActiveView().RotateAboutCenter 0, -0.0129181 Part.ActiveView().RotateAboutCenter 0.00330694, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0760596, 0.00861209 Part.ActiveView().RotateAboutCenter 0.171961, 0.172242 Part.ActiveView().RotateAboutCenter 0.152119, 0.335871 Part.ActiveView().RotateAboutCenter 0.0132278, 0.0732027 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00992082, -0.0258363 Part.ActiveView().RotateAboutCenter -0.00661388, -0.0301423 Part.ActiveView().RotateAboutCenter -0.00661388, -0.0172242 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00661388, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00330694, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0132278, -0.0215302 Part.ActiveView().RotateAboutCenter -0.00992082, -0.0215302 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0.0132278, 0 Part.ActiveView().RotateAboutCenter 0.0330694, 0.00861209 Part.ActiveView().RotateAboutCenter 0.052911, 0.0301423 Part.ActiveView().RotateAboutCenter 0.105822, 0.0344484 Part.ActiveView().RotateAboutCenter 0.171961, 0.0473665 Part.ActiveView().RotateAboutCenter 0.0826735, 0.0301423 Part.ActiveView().RotateAboutCenter 0.056218, 0.0301423 Part.ActiveView().RotateAboutCenter 0.125664, 0.0215302 Part.ActiveView().RotateAboutCenter 0.125664, 0 Part.ActiveView().RotateAboutCenter 0.0132278, 0 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0.00661388, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0297625, -0.0258363 Part.ActiveView().RotateAboutCenter 0.052911, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0429902, -0.0129181 Part.ActiveView().RotateAboutCenter 0.00330694, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0165347, 0 Part.ActiveView().RotateAboutCenter 0.052911, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0231486, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0.00992082, 0 Part.ActiveView().RotateAboutCenter 0.0198416, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0231486, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00992082, 0 Part.ActiveView().RotateAboutCenter 0.00661388, 0 Part.ActiveView().RotateAboutCenter 0.00330694, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0.0231486, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0264555, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0231486, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00992082, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00992082, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00661388, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00661388, -0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00661388, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0165347, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00992082, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00992082, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00992082, 0 Part.ActiveView().RotateAboutCenter 0.0132278, 0 Part.ActiveView().RotateAboutCenter 0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00330694, 0.00430604 Part.ShowNamedView2 "*Bottom", 6 Part.ShowNamedView2 "*Top", 5 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.952381 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.943396 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1.05 Part.ActiveView().ZoomByFactor 1.14 Part.ActiveView().ZoomByFactor 1.18 Part.ActiveView().ZoomByFactor 1.42 Part.ActiveView().ZoomByFactor 1.22 Part.ActiveView().ZoomByFactor 1.05 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1.04 Part.ActiveView().ZoomByFactor 1.04 Part.ActiveView().ZoomByFactor 1.07 Part.ActiveView().ZoomByFactor 1.06 Part.ActiveView().ZoomByFactor 1.02 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.952381 Part.ActiveView().ZoomByFactor 1 Part.ViewDisplayHiddengreyed Part.ViewDisplayHiddenremoved Part.ViewDisplayShaded Part.PrintDirect Part.ViewDisplayHiddengreyed Part.ViewDisplayHiddenremoved Part.SelectByID "", "EDGE", 0.211438689544, -0.5842, -0.200269797018 Part.AndSelectByID "", "EDGE", -0.2037360050433, -0.5842, 0.2118238237691 Part.AddDimension 0.207587, -0.7239, -0.195648 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "RD1@Annotations", "DIMENSION", 0.188330636042, -0.7239, -0.1971887232178 Part.SelectByID "RD1@Annotations", "DIMENSION", 0.1867900991418, -0.7239, -0.1964184547677 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "RD1@Annotations", "DIMENSION", 0.1875603675919, -0.7239, -0.1987292601179 Part.SetPickMode Part.ClearSelection Part.EditRebuild Part.SetPickMode Part.SelectByID "RD1@Annotations", "DIMENSION", 0.2021954681432, -0.7239, -0.2018103339182 Part.SelectByID "RD1@Annotations", "DIMENSION", 0.1813982199913, -0.7239, -0.1971887232178 Part.SetPickMode Part.ClearSelection Part.SelectByID "RD1@Annotations", "DIMENSION", 0.1852495622417, -0.7239, -0.1979589916678 Part.EditDelete Part.SelectByID "", "EDGE", 0.2052765419435, -0.5842, -0.1964184547677 Part.AndSelectByID "", "FACE", -0.2021954681432, -0.5842, 0.2102832868689 ' MSGBOX ' Could not create reference dimension from current set of selected items. Part.AddDimension -0.30079, -0.7239, -0.0993646 Part.ClearSelection Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.SelectByID "4 leg bridle with cage.SLDASM", "COMPONENT", 0, 0, 0 Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0 Part.ActiveView().RotateAboutCenter -0.0892874, -0.0215302 Part.ActiveView().RotateAboutCenter -0.0661388, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0595249, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0727527, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0661388, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0661388, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0661388, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0595249, -0.00861209 Part.ActiveView().RotateAboutCenter -0.052911, -0.00430604 Part.ActiveView().RotateAboutCenter -0.052911, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0462972, 0 Part.ActiveView().RotateAboutCenter -0.052911, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0198416, 0 Part.ActiveView().RotateAboutCenter -0.0165347, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00992082, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00661388, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0 Part.ActiveView().RotateAboutCenter -0.0165347, 0 Part.ActiveView().RotateAboutCenter -0.0198416, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0 Part.ActiveView().RotateAboutCenter -0.0165347, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00661388, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.0132278, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.00992082, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00330694, 0 Part.ActiveView().RotateAboutCenter -0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00661388, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00330694, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00661388, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00661388, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00330694, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00330694, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.SetPickMode Part.ClearSelection Part.SelectByID "", "FACE", -0.202986631682, -0.6457313911052, 0.2344346830884 Part.SelectByID "", "FACE", -0.2023312902527, -0.6348000480631, 0.2264383864882 Part.SetPickMode Part.ClearSelection Part.SetPickMode Set Part = Nothing swApp.CloseDoc "4 leg bridle with cage.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\4 leg bridle\vert support tubes.SLDPRT", 1, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("vert support tubes.SLDPRT") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ActiveView().RotateAboutCenter -0.00302856, 0 Part.ActiveView().RotateAboutCenter -0.0121142, 0 Part.ActiveView().RotateAboutCenter -0.0181713, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0484569, -0.00430604 Part.ActiveView().RotateAboutCenter -0.054514, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0969138, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0242284, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00908567, 0 Part.ActiveView().RotateAboutCenter -0.00605711, 0 Part.ActiveView().RotateAboutCenter -0.00605711, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00605711, 0 Part.ActiveView().RotateAboutCenter -0.00302856, 0 Part.ActiveView().RotateAboutCenter -0.00302856, 0 Part.ActiveView().RotateAboutCenter -0.00302856, 0 Part.ActiveView().RotateAboutCenter -0.00302856, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00302856, 0.0258363 Part.ActiveView().RotateAboutCenter -0.00605711, 0.0688967 Part.ActiveView().RotateAboutCenter -0.00605711, 0.094733 Part.ActiveView().RotateAboutCenter -0.0121142, 0.111957 Part.ActiveView().RotateAboutCenter -0.0121142, 0.094733 Part.ActiveView().RotateAboutCenter -0.0121142, 0.0602846 Part.ActiveView().RotateAboutCenter -0.00908567, 0.0258363 Part.ActiveView().RotateAboutCenter -0.00605711, 0.0129181 Part.ActiveView().RotateAboutCenter -0.00605711, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00605711, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00908567, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0121142, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00908567, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0121142, 0.0172242 Part.ActiveView().RotateAboutCenter -0.0121142, 0.0129181 Part.ActiveView().RotateAboutCenter -0.00302856, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0151428, 0.0215302 Part.ActiveView().RotateAboutCenter -0.0181713, 0.0301423 Part.ActiveView().RotateAboutCenter -0.0151428, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00302856, 0 Part.ActiveView().RotateAboutCenter -0.00302856, 0 Part.ShowNamedView2 "*Left", 3 Part.ShowNamedView2 "*Back", 2 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1.04 Part.ActiveView().ZoomByFactor 1.06 Part.ActiveView().ZoomByFactor 1.06 Part.ActiveView().ZoomByFactor 1.14 Part.ActiveView().ZoomByFactor 1.05 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.990099 Part.PrintDirect Part.ShowNamedView2 "*Front", 1 Part.ShowNamedView2 "*Right", 4 Part.ShowNamedView2 "*Top", 5 Part.ViewDisplayHiddengreyed Part.ViewDisplayShaded Part.ViewZoomTo2 -0.344243, 0.0644138, 0.0381, -0.193155, -0.0639402, 0.0381 Part.SelectByID "", "EDGE", -0.2739647690386, 0.04686299999997, -0.02786514391184 Part.AddDimension -0.248567, 0.0381, -0.0468209 Part.ClearSelection Part.SelectByID "", "EDGE", -0.2755753890776, 0.06984999999997, -0.01981204371648 Part.AddDimension -0.265788, 0.0381, -0.0465731 Part.ClearSelection Part.SelectByID "", "EDGE", -0.2775576906642, 0.09842500000002, -0.009281066537944 Part.AddDimension -0.23085, 0.0381, -0.0334404 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SelectByID "RD3@Annotations", "DIMENSION", -0.2315930726261, 0.0381, -0.03331647327485 Part.EditDelete Part.SelectByID "RD1@Annotations", "DIMENSION", -0.2496815746033, 0.0381, -0.04706869053153 Part.EditDelete Part.SelectByID "RD2@Annotations", "DIMENSION", -0.2662833503907, 0.0381, -0.04731647822985 Part.EditDelete Part.ShowNamedView2 "*Front", 1 Part.ViewZoomTo2 -0.348032, 0.151298, -7.90457e-016, -0.122584, -0.0163676, 3.80345e-016 Part.SelectByID "", "EDGE", -0.258046695286, 0.04772074598416, -0.009844608076037 ' MSGBOX ' Please select a planar face. Part.SetPickMode Part.ClearSelection Part.SelectByID "", "EDGE", -0.2590177304727, 0.04788258518196, -0.01223826646918 ' MSGBOX ' Please select a planar face. Part.ViewDisplayHiddengreyed Part.ClearSelection Part.SelectByID "", "EDGE", -0.2620926752308, 0.04772074598416, -0.01745624200726 Part.AndSelectByID "", "EDGE", -0.2722885446919, 0.03493544935837, -0.01347930714053 Part.AddDimension -0.228592, 0.0410853, -2.08465e-017 Part.ClearSelection Part.SelectByID "", "EDGE", -0.2586940520771, 0.04788258518196, -0.01150500248787 Part.AndSelectByID "", "EDGE", -0.2700227959228, 0.07345317843354, -0.01074976985399 Part.AddDimension -0.229563, 0.0608297, -1.58721e-016 Part.ClearSelection Part.SelectByID "", "EDGE", -0.2781147558125, 0.101451359652, 0.00569461773938 Part.AndSelectByID "", "EDGE", -0.2784384342081, 0.07312950003795, -0.01038417091877 Part.AddDimension -0.254324, 0.0901226, -3.63272e-016 Part.ClearSelection Part.SelectByID "", "AXIS", -0.2463942730447, 0.0004637002280825, 0 Part.AndSelectByID "", "EDGE", -0.2779529166147, 0.1019368772454, -0.005470933712161 Part.AddDimension -0.19056, 0.0580785, -1.39509e-016 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SetPickMode Set Part = Nothing swApp.CloseDoc "vert support tubes.SLDPRT" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\E-CAGE-1.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("E-CAGE-1.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ShowNamedView2 "*Front", 1 Part.SelectByID "", "EDGE", -0.2781945929832, -0.02222941518547, 0.001587500000028 Part.AndSelectByID "", "EDGE", 0.2880016879179, -0.02549844683039, 0.001587500000028 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.ViewDispTempRefaxes Part.SelectByID "@E-Cage-1-1@E-CAGE-1", "AXIS", -0.2919245258918, -0.001961418986929, -0.236140625 Part.AndSelectByID "@E-Cage-1-1@E-CAGE-1", "AXIS", 0.2886554942469, 0.0006538063290109, -0.236140625 Part.SetPickMode Part.ClearSelection Part.ActiveView().RotateAboutCenter 0.00308724, 0 Part.ActiveView().RotateAboutCenter 0.00308724, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00617448, -0.00430604 Part.ActiveView().RotateAboutCenter 0.012349, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0277852, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0432214, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0926172, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0493958, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0154362, -0.00861209 Part.ActiveView().RotateAboutCenter 0.012349, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.SetPickMode Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00308724, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00617448, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0185234, -0.0215302 Part.ActiveView().RotateAboutCenter 0.012349, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0216107, -0.0258363 Part.ActiveView().RotateAboutCenter 0.00926172, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0185234, -0.0172242 Part.ActiveView().RotateAboutCenter 0.012349, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00308724, 0 Part.ActiveView().RotateAboutCenter 0.00617448, 0 Part.ActiveView().RotateAboutCenter 0.00617448, 0 Part.ActiveView().RotateAboutCenter 0.0185234, 0 Part.ActiveView().RotateAboutCenter 0.012349, 0 Part.ActiveView().RotateAboutCenter 0.0246979, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0308724, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0277852, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00926172, 0 Part.ActiveView().RotateAboutCenter 0.0216107, 0 Part.ActiveView().RotateAboutCenter 0.0216107, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0246979, -0.00861209 Part.ActiveView().RotateAboutCenter 0.012349, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0246979, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0216107, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00617448, -0.00430604 Part.SelectByID "@E-Cage-1-1@E-CAGE-1", "AXIS", -0.3171769868581, -0.0745022516248, -0.09326901759721 Part.AndSelectByID "@E-Cage-1-1@E-CAGE-1", "AXIS", 0.2408578935035, -0.1479326696739, -0.1889562862716 Part.AddDimension -0.034312, -0.111715, -0.141779 Part.ClearSelection Part.ClearSelection Set Part = Nothing swApp.CloseDoc "E-CAGE-1.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\4 leg bridle\4 leg bridle with cage.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("4 leg bridle with cage.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ShowNamedView2 "*Top", 5 Part.ViewZoomTo2 -0.39119, 0.468364, -0.638379, 0.387642, -0.30692, -0.638379 Part.ViewDisplayHiddengreyed Part.SelectByID "", "EDGE", 0.2096328753127, -0.5842, -0.1989599930184 Part.AndSelectByID "", "EDGE", -0.1989625617025, -0.5842, 0.2126288171618 Part.SetPickMode Part.ClearSelection Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.ClearSelection Set Part = Nothing swApp.CloseDoc "4 leg bridle with cage.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing_Guide.SLDPRT", 1, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Bearing_Guide.SLDPRT") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ShowNamedView2 "*Front", 1 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.FeatEdit Part.ClearSelection Part.ActiveView().ZoomByFactor 1 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.943396 Part.ActiveView().ZoomByFactor 0.943396 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.952381 Part.ActiveView().ZoomByFactor 0.909091 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 1 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.990099 Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.306646732221, -0.07886341619168, 0.0127 Part.Parameter("D4@Sketch1").SystemValue = 0.0333375 Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.2329066934153, 0.04592741871024, 0.0127 Part.Parameter("D1@Sketch1").SystemValue = 0.03556 Part.EditRebuild Part.ClearSelection Part.Save2 FALSE Set Part = Nothing swApp.CloseDoc "Bearing_Guide.SLDPRT" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\ElevCage-1.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ActiveView().RotateAboutCenter -0.00611523, 0 Part.ActiveView().RotateAboutCenter -0.0672675, 0 Part.ActiveView().RotateAboutCenter -0.214033, -0.00861209 Part.ActiveView().RotateAboutCenter -0.311877, -0.00430604 Part.ActiveView().RotateAboutCenter -0.214033, -0.00430604 Part.ActiveView().RotateAboutCenter -0.287416, -0.00430604 Part.ActiveView().RotateAboutCenter -0.207918, -0.0172242 Part.ActiveView().RotateAboutCenter -0.183457, -0.0129181 Part.ActiveView().RotateAboutCenter -0.171226, -0.00861209 Part.ActiveView().RotateAboutCenter -0.158996, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0366914, -0.00430604 Part.ActiveView().RotateAboutCenter -0.039749, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0183457, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00917285, 0 Part.ActiveView().RotateAboutCenter -0.00917285, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0152881, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00917285, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0580947, -0.00861209 Part.ActiveView().RotateAboutCenter -0.226264, -0.0215302 Part.ActiveView().RotateAboutCenter -0.0305762, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00611523, 0 Part.ActiveView().RotateAboutCenter -0.00611523, 0 Part.ActiveView().RotateAboutCenter -0.00611523, 0 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0152881, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0122305, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00917285, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0183457, 0 Part.ActiveView().RotateAboutCenter -0.0305762, 0 Part.ActiveView().RotateAboutCenter -0.0305762, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0458642, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0244609, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0244609, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00611523, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.00611523, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0122305, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0122305, 0.0172242 Part.ActiveView().RotateAboutCenter 0.00917285, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00611523, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.0129181 Part.ActiveView().RotateAboutCenter -0.00611523, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00917285, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00611523, 0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00611523, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00611523, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00611523, 0 Part.ActiveView().RotateAboutCenter 0.0336338, 0.00861209 Part.ActiveView().RotateAboutCenter 0.12842, 0.0215302 Part.ActiveView().RotateAboutCenter 0.25684, 0.0172242 Part.ActiveView().RotateAboutCenter 0.25684, -0.00861209 Part.ActiveView().RotateAboutCenter 0.238494, -0.0258363 Part.ActiveView().RotateAboutCenter 0.158996, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0519795, 0 Part.ActiveView().RotateAboutCenter 0.0917285, 0.00430604 Part.ActiveView().RotateAboutCenter 0.244609, 0.0215302 Part.ActiveView().RotateAboutCenter 0.311877, 0.0344484 Part.ActiveView().RotateAboutCenter 0.214033, 0.0258363 Part.ActiveView().RotateAboutCenter 0.0214033, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0366914, 0 Part.ActiveView().RotateAboutCenter 0.165111, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0825556, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00917285, 0 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.0122305, 0 Part.ActiveView().RotateAboutCenter 0.0611523, 0.00430604 Part.ActiveView().RotateAboutCenter 0.103959, 0 Part.ActiveView().RotateAboutCenter 0.0733828, -0.00861209 Part.ActiveView().RotateAboutCenter 0.039749, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0366914, -0.00861209 Part.ActiveView().RotateAboutCenter 0.103959, -0.0129181 Part.ActiveView().RotateAboutCenter 0.12842, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0703252, 0 Part.ActiveView().RotateAboutCenter 0.0152881, 0 Part.ActiveView().RotateAboutCenter 0.0122305, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0244609, 0.0172242 Part.ActiveView().RotateAboutCenter 0.0305762, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0122305, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.00611523, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0152881, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00611523, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0172242 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00611523, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.0861209 Part.ActiveView().RotateAboutCenter -0.00305762, 0.215302 Part.ActiveView().RotateAboutCenter -0.0183457, 0.335871 Part.ActiveView().RotateAboutCenter -0.00305762, 0.258363 Part.ActiveView().RotateAboutCenter 0, 0.344484 Part.ActiveView().RotateAboutCenter 0, 0.327259 Part.ActiveView().RotateAboutCenter 0, 0.310035 Part.ActiveView().RotateAboutCenter 0, 0.189466 Part.ActiveView().RotateAboutCenter -0.00611523, 0.232526 Part.ActiveView().RotateAboutCenter -0.00611523, 0.111957 Part.ActiveView().RotateAboutCenter -0.00611523, 0.0602846 Part.ActiveView().RotateAboutCenter -0.00611523, 0.0430604 Part.ActiveView().RotateAboutCenter -0.0122305, 0.241138 Part.ActiveView().RotateAboutCenter -0.00611523, 0.189466 Part.ActiveView().RotateAboutCenter -0.00305762, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ViewZoomTo2 0.195666, 0.112045, 0.243537, 0.382682, -0.116164, 0.243537 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0258363 Part.ActiveView().RotateAboutCenter 0.00611523, 0.0301423 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00305762, 0.0215302 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00917285, 0 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.00305762, -0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0122305, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0.00305762, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.0122305, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0275185, -0.0387544 Part.ActiveView().RotateAboutCenter -0.0305762, -0.167936 Part.ActiveView().RotateAboutCenter -0.0428066, -0.37032 Part.ActiveView().RotateAboutCenter -0.0152881, -0.335871 Part.ActiveView().RotateAboutCenter 0, -0.387544 Part.ActiveView().RotateAboutCenter 0.00917285, -0.258363 Part.ActiveView().RotateAboutCenter 0.00305762, -0.0301423 Part.ActiveView().RotateAboutCenter 0.00305762, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00305762, -0.0172242 Part.ActiveView().RotateAboutCenter 0.00305762, -0.0387544 Part.ActiveView().RotateAboutCenter 0.00305762, -0.111957 Part.ActiveView().RotateAboutCenter 0, -0.0258363 Part.ActiveView().RotateAboutCenter 0, -0.0473665 Part.ActiveView().RotateAboutCenter -0.00611523, -0.0732027 Part.ActiveView().RotateAboutCenter 0, -0.0172242 Part.ActiveView().RotateAboutCenter 0, -0.0172242 Part.ActiveView().RotateAboutCenter -0.00611523, -0.0904269 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00917285, 0.0516725 Part.ActiveView().RotateAboutCenter 0.0244609, 0.387544 Part.ActiveView().RotateAboutCenter 0.00305762, 0.0775088 Part.ActiveView().RotateAboutCenter 0.0244609, 0.266975 Part.ActiveView().RotateAboutCenter 0.0244609, 0.533949 Part.ActiveView().RotateAboutCenter 0, 0.0688967 Part.ActiveView().RotateAboutCenter -0.00917285, -0.00430604 Part.ViewZoomtofit2 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00917285, -0.129181 Part.ActiveView().RotateAboutCenter -0.0152881, -0.335871 Part.ActiveView().RotateAboutCenter -0.00611523, -0.387544 Part.ActiveView().RotateAboutCenter -0.00305762, -0.275587 Part.ActiveView().RotateAboutCenter -0.00305762, -0.103345 Part.ActiveView().RotateAboutCenter 0, -0.0344484 Part.ActiveView().RotateAboutCenter -0.00305762, -0.0473665 Part.ActiveView().RotateAboutCenter -0.00611523, -0.129181 Part.ActiveView().RotateAboutCenter -0.00917285, -0.129181 Part.ActiveView().RotateAboutCenter -0.00611523, -0.0473665 Part.ActiveView().RotateAboutCenter -0.00611523, -0.0258363 Part.ActiveView().RotateAboutCenter 0, -0.0129181 Part.ActiveView().RotateAboutCenter -0.00305762, -0.0387544 Part.ActiveView().RotateAboutCenter -0.0122305, -0.215302 Part.ActiveView().RotateAboutCenter -0.0122305, -0.137793 Part.ActiveView().RotateAboutCenter -0.0152881, -0.120569 Part.ActiveView().RotateAboutCenter -0.0214033, -0.0818148 Part.ActiveView().RotateAboutCenter -0.0214033, -0.0430604 Part.ActiveView().RotateAboutCenter -0.0305762, -0.0387544 Part.ActiveView().RotateAboutCenter -0.0244609, -0.0387544 Part.ActiveView().RotateAboutCenter -0.0152881, -0.0172242 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0122305, -0.0129181 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0152881, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0183457, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00917285, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00917285, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00917285, -0.0172242 Part.ActiveView().RotateAboutCenter -0.00611523, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0122305, -0.0215302 Part.ActiveView().RotateAboutCenter -0.0122305, -0.0215302 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00611523, 0 Part.ActiveView().RotateAboutCenter -0.00305762, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00611523, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00917285, -0.0129181 Part.ActiveView().RotateAboutCenter -0.00917285, -0.0129181 Part.ActiveView().RotateAboutCenter -0.00611523, -0.0215302 Part.ActiveView().RotateAboutCenter -0.00305762, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.SelectByID "Bearing_Guide-4@ElevCage-1", "COMPONENT", 0, 0, 0 Part.SelectByID "Bearing_Guide-3@ElevCage-1", "COMPONENT", 0, 0, 0 Part.SelectByID "Bearing_Guide-2@ElevCage-1", "COMPONENT", 0, 0, 0 Part.Save2 FALSE Part.ClearSelection Set Part = Nothing swApp.CloseDoc "ElevCage-1.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing Guide.SLDDRW", 3, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Bearing Guide - Sheet1") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.PrintDirect Part.SelectByID "Sheet1", "SHEET", 0.3208238116343, 0.1122490027701, 0 Part.SelectByID "Drawing View4", "DRAWINGVIEW", 0.3879262493075, 0.2339484238227, 0 Part.SelectByID "Sheet1", "SHEET", 0.2369457645429, 0.247063900277, 0 Part.EditTemplate Part.EditSketch Part.ClearSelection Part.ViewZoomTo2 0.303438, 0.280005, -3.7546e-015, 0.441608, 0.235778, -3.44577e-015 Part.SelectByID "DetailItem1@Template1", "NOTE", 0.33922459782, 0.2622933316426, 0 Part.EditCopy Part.SelectByID "Template1", "SHEET", 0.3344403173702, 0.2585615928918, 0 Part.Paste Part.SelectByID "DetailItem91@Template1", "NOTE", 0.338937540993, 0.2576086585366, 0 Part.SelectByID "DetailItem91@Template1", "NOTE", 0.3353014878512, 0.2595184489817, 0 Part.SelectByID "Template1", "SHEET", 0.3508025565085, 0.2444958083693, 0 Part.SelectByID "DetailItem91@Template1", "NOTE", 0.3524292118615, 0.2592313921548, 0 Part.EditCopy Part.SelectByID "Template1", "SHEET", 0.3497500148096, 0.2371280164766, 0 Part.ClearSelection Part.Paste ' MSGBOX ' The item on the clipboard cannot be pasted here. Part.SelectByID "DetailItem91@Template1", "NOTE", 0.3536731247784, 0.2596141345907, 0 Part.EditCopy Part.SelectByID "Template1", "SHEET", 0.3442959350968, 0.2448785508053, 0 Part.Paste Part.SelectByID "DetailItem92@Template1", "NOTE", 0.3510896133355, 0.2439216947154, 0 Part.SelectByID "Template1", "SHEET", 0.3499413860276, 0.2334919633348, 0 Part.SelectByID "DetailItem92@Template1", "NOTE", 0.3461139616677, 0.2435389522794, 0 Part.EditCopy Part.SelectByID "Template1", "SHEET", 0.3619977727611, 0.2398072135285, 0 Part.Paste Part.SelectByID "DetailItem93@Template1", "NOTE", 0.3632416856781, 0.2384676150026, 0 Part.SelectByID "Template1", "SHEET", 0.3882156296261, 0.2427734674074, 0 Part.ClearSelection Part.SelectByID "DetailItem93@Template1", "NOTE", 0.3688871366088, 0.2383719293936, 0 Part.SelectByID "Template1", "SHEET", 0.4043864975464, 0.2413381832725, 0 Part.SelectByID "Template1", "SHEET", 0.3851536901382, 0.07781147749787, 0 Part.Paste Part.SelectByID "DetailItem94@Template1", "NOTE", 0.3857278037922, 0.07599345092694, 0 Part.SelectByID "Template1", "SHEET", 0.3872587735361, 0.08068204576776, 0 Part.ViewZoomtofit2 Part.SelectByID "Template1", "SHEET", 0.1969893130194, 0.2366935235457, 0 Part.EditSheet Part.EditSketch Part.ClearSelection Part.SelectByID "Sheet1", "SHEET", 0.2162050110803, 0.2476739224377, 0 Part.Save2 FALSE Part.ClearSelection Part.Save2 FALSE Set Part = Nothing swApp.CloseDoc "Bearing Guide - Sheet1" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\4 leg bridle\4 leg bridle.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("4 leg bridle.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ViewZoomTo2 -0.327151, 0.188533, -0.177493, 0.190084, -0.419217, -0.177493 Part.ShowNamedView2 "*Bottom", 6 Part.ShowNamedView2 "*Top", 5 Part.ViewZoomTo2 -0.33087, -0.00887052, -0.638379, -0.0612066, -0.372562, -0.638379 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.934579 Part.ActiveView().ZoomByFactor 0.884956 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.900901 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.917431 Part.ActiveView().ZoomByFactor 0.884956 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.934579 Part.ActiveView().ZoomByFactor 0.990099 Part.EditRebuild Part.SelectByID "", "EDGE", 0.2181278767514, -0.1159023847913, -0.2167584508788 Part.AddDimension 0.282728, -0.638379, -0.293838 Part.ClearSelection Part.ClearSelection Set Part = Nothing swApp.CloseDoc "4 leg bridle.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\ElevCage-1.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ViewZoomTo2 -0.460127, 0.2126, 0.243537, 0.486449, -0.10225, 0.243537 Part.ViewDispTempRefaxes Part.SelectByID "@E-CAGE-1-1@ElevCage-1/E-Cage-1-1@E-CAGE-1", "AXIS", 0.3212502505115, 0.0440285655121, -0.307430146312 Part.AndSelectByID "@Bearing_Guide-2@ElevCage-1", "AXIS", -0.2419397559981, 0.06836963869901, -0.2202612832688 ' MSGBOX ' Could not create reference dimension from current set of selected items. Part.AddDimension 0.320677, 0.044731, -0.307507 Part.ClearSelection Part.ViewDisplayHiddengreyed Part.SelectByID "@Bearing_Guide-1@ElevCage-1", "AXIS", 0.3214277046976, 0.04588880337589, -0.3079146631168 Part.AndSelectByID "@Bearing_Guide-2@ElevCage-1", "AXIS", -0.2476922095215, 0.06849062998731, -0.2193397065063 ' MSGBOX ' Could not create reference dimension from current set of selected items. Part.AddDimension 0.321369, 0.0452687, -0.307753 Part.ClearSelection Part.ViewDispRefaxes Part.SelectByID "@Bearing_Guide-1@ElevCage-1", "AXIS", 0.3235029262597, 0.04750201771427, -0.3086525369752 Part.AndSelectByID "@Bearing_Guide-2@ElevCage-1", "AXIS", -0.2463678798754, 0.06894602692497, -0.2196701168104 ' MSGBOX ' Could not create reference dimension from current set of selected items. Part.AddDimension -0.243146, 0.0691544, -0.220254 Part.ClearSelection Part.SelectByID "", "EDGE", -0.2813157083497, 0.01628628368698, -0.4987468808306 Part.AndSelectByID "", "EDGE", 0.2816530975772, -0.01343568756646, -0.4989729663689 Part.AddDimension 0.196941, 0.244776, -0.335995 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "RD1@Annotations", "DIMENSION", 0.1953207100513, 0.2412205060166, -0.3348575281985 Part.EditDelete Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.ClearSelection Set Part = Nothing swApp.CloseDoc "ElevCage-1.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing_Guide.SLDPRT", 1, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Bearing_Guide.SLDPRT") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.FeatEdit Part.ClearSelection Part.SetPickMode Part.SetPickMode Set Part = Nothing swApp.CloseDoc "Bearing_Guide.SLDPRT" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\4 leg bridle\4 leg bridle with cage.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("4 leg bridle with cage.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ShowNamedView2 "*Bottom", 6 Part.ShowNamedView2 "*Top", 5 Part.SelectByID "ElevCage-1-1@4 leg bridle with cage", "COMPONENT", 0, 0, 0 Part.HideComponent2 Part.ClearSelection Part.ViewZoomTo2 -0.407157, 0.37611, -0.638379, 0.616501, -0.484331, -0.638379 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0097474, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0129965, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0129965, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0129965, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0097474, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00649827, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00649827, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0194948, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0259931, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0552353, -0.0258363 Part.ActiveView().RotateAboutCenter -0.048737, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0454879, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ViewDispTempRefaxes ' MSGBOX ' Please select a planar face. Part.SelectByID "@vert support tubes-1@4 leg bridle with cage", "AXIS", 0.2027055131706, -0.6068863962002, -0.2077615165645 Part.AndSelectByID "@vert support tubes-2@4 leg bridle with cage", "AXIS", -0.2154080298846, -0.6528700420204, 0.1868057673782 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SetPickMode Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.SetPickMode Part.ClearSelection Part.ShowNamedView2 "*Top", 5 Part.SelectByID "D1@Distance11@4 leg bridle with cage.SLDASM", "DIMENSION", -0.1073333199271, -0.7239, -0.3033718629344 Part.ClearSelection Part.SelectByID "D6@Sketch1@hobieLabs-1@4 leg bridle with cage/hobielabs mount-1@hobieLabs", "DIMENSION", -0.2829696616259, -0.7239, -0.1224132078507 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.SelectByID "Annotations", "DCABINET", 0, 0, 0 Part.ActiveView().RotateAboutCenter -0.0129965, 0 Part.ActiveView().RotateAboutCenter -0.0162457, 0 Part.ActiveView().RotateAboutCenter -0.123467, 0 Part.ActiveView().RotateAboutCenter -0.110471, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0617336, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0162457, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00649827, 0 Part.ActiveView().RotateAboutCenter -0.00649827, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0097474, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0194948, 0.0215302 Part.ActiveView().RotateAboutCenter -0.0162457, 0.0258363 Part.ActiveView().RotateAboutCenter -0.0129965, 0.0215302 Part.ActiveView().RotateAboutCenter -0.0097474, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0129965, 0.0215302 Part.ActiveView().RotateAboutCenter -0.0162457, 0.0258363 Part.ActiveView().RotateAboutCenter -0.0259931, 0.0215302 Part.ActiveView().RotateAboutCenter -0.0227439, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0259931, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0194948, 0 Part.ActiveView().RotateAboutCenter -0.0129965, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0097474, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0194948, -0.0301423 Part.ActiveView().RotateAboutCenter -0.0194948, -0.0344484 Part.ActiveView().RotateAboutCenter -0.0097474, -0.0172242 Part.ActiveView().RotateAboutCenter -0.00324913, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0129965, -0.00430604 Part.SelectByID "ElevCage-1-1@4 leg bridle with cage", "COMPONENT", 0, 0, 0 Part.ShowComponent2 Part.ClearSelection Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0259931, -0.0387544 Part.ActiveView().RotateAboutCenter -0.201446, -0.258363 Part.ActiveView().RotateAboutCenter -0.207945, -0.167936 Part.ActiveView().RotateAboutCenter -0.0292422, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0259931, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0552353, -0.0172242 Part.ActiveView().RotateAboutCenter -0.071481, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0812284, 0 Part.ActiveView().RotateAboutCenter -0.0584844, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0162457, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0324913, 0.193772 Part.ActiveView().RotateAboutCenter -0.0292422, 0.301423 Part.ActiveView().RotateAboutCenter -0.00324913, 0.176548 Part.ActiveView().RotateAboutCenter 0, 0.0258363 Part.ActiveView().RotateAboutCenter -0.00324913, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00649827, 0.0172242 Part.ActiveView().RotateAboutCenter 0.0682318, 0.0344484 Part.ActiveView().RotateAboutCenter 0.100723, 0.0430604 Part.ActiveView().RotateAboutCenter 0.168955, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0682318, 0.0387544 Part.ActiveView().RotateAboutCenter 0.0779792, 0.0430604 Part.ActiveView().RotateAboutCenter 0.194948, 0.0473665 Part.ActiveView().RotateAboutCenter 0.0747301, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0617336, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0227439, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.00324913, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0259931, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0129965, -0.0258363 Part.ActiveView().RotateAboutCenter 0.00649827, -0.0129181 Part.ActiveView().RotateAboutCenter 0.00649827, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00649827, -0.0258363 Part.ActiveView().RotateAboutCenter -0.0194948, -0.22822 Part.ActiveView().RotateAboutCenter -0.0454879, -0.155018 Part.ActiveView().RotateAboutCenter -0.0259931, -0.0344484 Part.ActiveView().RotateAboutCenter -0.0162457, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0194948, -0.0215302 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00649827, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0097474, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00649827, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0097474, 0 Part.ActiveView().RotateAboutCenter -0.0357405, 0 Part.ActiveView().RotateAboutCenter -0.00649827, 0 Part.ActiveView().RotateAboutCenter -0.0227439, 0.0904269 Part.ActiveView().RotateAboutCenter -0.00324913, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0324913, 0.0430604 Part.ActiveView().RotateAboutCenter -0.0519862, 0.0602846 Part.ActiveView().RotateAboutCenter -0.0389896, 0.0387544 Part.ActiveView().RotateAboutCenter -0.0422387, 0.0775088 Part.ActiveView().RotateAboutCenter -0.0454879, 0.142099 Part.ActiveView().RotateAboutCenter -0.0292422, 0.0559786 Part.ActiveView().RotateAboutCenter -0.0519862, 0.0688967 Part.ActiveView().RotateAboutCenter -0.0292422, 0.0559786 Part.ActiveView().RotateAboutCenter -0.0227439, 0.124875 Part.ActiveView().RotateAboutCenter 0, 0.232526 Part.ActiveView().RotateAboutCenter 0, 0.172242 Part.ActiveView().RotateAboutCenter -0.00324913, 0.0258363 Part.ActiveView().RotateAboutCenter -0.0292422, 0.120569 Part.ActiveView().RotateAboutCenter -0.0292422, 0.266975 Part.ActiveView().RotateAboutCenter -0.0162457, 0.490889 Part.ActiveView().RotateAboutCenter 0.00649827, 0.198078 Part.ActiveView().RotateAboutCenter 0.00324913, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00649827, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00649827, 0.00430604 Part.ActiveView().RotateAboutCenter 0.142962, 0.193772 Part.ActiveView().RotateAboutCenter 0.214443, 0.198078 Part.ActiveView().RotateAboutCenter 0.0162457, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0.0194948, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0324913, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0454879, -0.0172242 Part.ActiveView().RotateAboutCenter 0.048737, -0.0129181 Part.ActiveView().RotateAboutCenter 0.071481, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0357405, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0194948, -0.0344484 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0097474, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0097474, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0162457, -0.0344484 Part.ActiveView().RotateAboutCenter 0.0097474, -0.0344484 Part.ActiveView().RotateAboutCenter 0.00649827, -0.0129181 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0552353, -0.0215302 Part.ViewZoomTo2 -0.0239504, 0.61384, -0.7239, 0.605857, -0.383207, -0.7239 Part.ViewZoomTo2 0.154773, 0.331857, -0.7239, 0.580154, 0.0287008, -0.7239 Part.ViewDispTempRefaxes Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0877266, -0.0344484 Part.ActiveView().RotateAboutCenter 0.0454879, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0422387, -0.0129181 Part.ActiveView().RotateAboutCenter 0.048737, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0292422, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00324913, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0292422, -0.0818148 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.0129181 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.SelectByID "", "FACE", -0.2730362593965, -0.1990311321116, 0.006846353804463 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SetPickMode Part.SetPickMode Part.SetPickMode Part.ActiveView().RotateAboutCenter -0.00649827, 0 Part.ActiveView().RotateAboutCenter -0.0779792, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0617336, 0.0129181 Part.ActiveView().RotateAboutCenter -0.0324913, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.0129965, 0.0129181 Part.ActiveView().RotateAboutCenter -0.240436, 0.116263 Part.ActiveView().RotateAboutCenter -0.389896, 0.142099 Part.ActiveView().RotateAboutCenter -0.107221, 0.0602846 Part.ActiveView().RotateAboutCenter -0.071481, 0.0430604 Part.ActiveView().RotateAboutCenter -0.0422387, 0.0258363 Part.ActiveView().RotateAboutCenter -0.0097474, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0812284, 0.0732027 Part.ActiveView().RotateAboutCenter -0.0422387, 0.0430604 Part.ActiveView().RotateAboutCenter -0.0324913, 0.0430604 Part.ActiveView().RotateAboutCenter -0.0259931, 0.0301423 Part.ActiveView().RotateAboutCenter -0.00649827, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00649827, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0519862, 0.0387544 Part.ActiveView().RotateAboutCenter -0.214443, 0.0516725 Part.ActiveView().RotateAboutCenter -0.0844775, 0.0215302 Part.ActiveView().RotateAboutCenter -0.0324913, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0259931, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0162457, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00649827, 0 Part.ActiveView().RotateAboutCenter -0.0389896, 0.0172242 Part.ActiveView().RotateAboutCenter -0.168955, 0.0473665 Part.ActiveView().RotateAboutCenter -0.0942249, 0.0344484 Part.ActiveView().RotateAboutCenter -0.0162457, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0259931, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0292422, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0162457, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0097474, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0129965, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0162457, 0.0258363 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0259931, 0 Part.ActiveView().RotateAboutCenter 0.0389896, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0162457, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0129965, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0162457, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0194948, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0097474, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0324913, -0.0387544 Part.ActiveView().RotateAboutCenter 0.0292422, -0.0473665 Part.ActiveView().RotateAboutCenter 0.0097474, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0129965, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0129965, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00649827, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0129965, 0 Part.ActiveView().RotateAboutCenter 0.0422387, 0.0172242 Part.ActiveView().RotateAboutCenter 0.0227439, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0.0519862, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0454879, -0.0215302 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0324913, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0357405, -0.0172242 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.SetPickMode Part.SetPickMode Part.SelectByID "", "FACE", -0.1627797723199, -0.3038575949664, -0.01131717673707 Part.ClearSelection Part.ViewZoomtofit2 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0292422, -0.0301423 Part.ActiveView().RotateAboutCenter 0.071481, -0.0516725 Part.ActiveView().RotateAboutCenter 0.194948, -0.120569 Part.ActiveView().RotateAboutCenter 0.227439, -0.0645907 Part.ActiveView().RotateAboutCenter 0.279426, -0.0602846 Part.ActiveView().RotateAboutCenter 0.292422, -0.0430604 Part.ActiveView().RotateAboutCenter 0.246934, -0.0387544 Part.ActiveView().RotateAboutCenter 0.136464, -0.0301423 Part.ActiveView().RotateAboutCenter 0.120218, -0.0602846 Part.ActiveView().RotateAboutCenter 0.0422387, -0.0732027 Part.ActiveView().RotateAboutCenter 0.0519862, -0.146405 Part.ActiveView().RotateAboutCenter 0.0747301, -0.0430604 Part.ActiveView().RotateAboutCenter 0.0129965, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0259931, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0227439, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0454879, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0422387, -0.0172242 Part.ActiveView().RotateAboutCenter 0.00649827, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0227439, -0.0215302 Part.ActiveView().RotateAboutCenter 0.0227439, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0194948, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0162457, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0162457, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0129965, 0 Part.ActiveView().RotateAboutCenter 0.0162457, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0.00649827, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0194948, -0.0473665 Part.ActiveView().RotateAboutCenter 0.0227439, -0.0387544 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.00649827, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0129965, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00649827, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0.00649827, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ShowNamedView2 "*Top", 5 Part.ViewZoomTo2 -0.387642, 0.40627, -0.638379, 0.400061, -0.347724, -0.638379 Part.ActiveView().RotateAboutCenter -0.00649827, 0 Part.ActiveView().RotateAboutCenter -0.30217, 0 Part.ActiveView().RotateAboutCenter -0.851273, 0.0258363 Part.ActiveView().RotateAboutCenter -0.695315, -0.0301423 Part.ActiveView().RotateAboutCenter -0.279426, -0.0215302 Part.ActiveView().RotateAboutCenter -0.0649827, -0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0129965, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0357405, 0.129181 Part.ActiveView().RotateAboutCenter 0.00324913, 0.099039 Part.ActiveView().RotateAboutCenter 0.00324913, 0.0559786 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00649827, 0.0344484 Part.ActiveView().RotateAboutCenter -0.0129965, 0.0602846 Part.ActiveView().RotateAboutCenter -0.00324913, 0.00430604 Part.ActiveView().RotateAboutCenter 0.048737, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0259931, 0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.0344484 Part.ActiveView().RotateAboutCenter -0.289173, -0.378932 Part.ActiveView().RotateAboutCenter -0.0422387, -0.0215302 Part.ActiveView().RotateAboutCenter -0.0552353, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0454879, 0 Part.ActiveView().RotateAboutCenter -0.0324913, 0 Part.ActiveView().RotateAboutCenter -0.0292422, 0.00861209 Part.ActiveView().RotateAboutCenter -0.0292422, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0194948, 0 Part.ActiveView().RotateAboutCenter -0.048737, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0227439, -0.0129181 Part.ActiveView().RotateAboutCenter -0.00324913, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0129965, -0.0258363 Part.ActiveView().RotateAboutCenter -0.00649827, -0.00861209 Part.ActiveView().RotateAboutCenter -0.00649827, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0129965, -0.0344484 Part.ActiveView().RotateAboutCenter -0.00649827, -0.0301423 Part.ActiveView().RotateAboutCenter 0, -0.0129181 Part.ActiveView().RotateAboutCenter 0, -0.0129181 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0129965, -0.00861209 Part.ActiveView().RotateAboutCenter 0.100723, -0.0215302 Part.ActiveView().RotateAboutCenter 0.415889, -0.00430604 Part.ActiveView().RotateAboutCenter 0.142962, 0.00430604 Part.ActiveView().RotateAboutCenter 0.220941, 0.00861209 Part.ActiveView().RotateAboutCenter 0.133215, 0.00430604 Part.ActiveView().RotateAboutCenter 0.285924, 0.00861209 Part.ActiveView().RotateAboutCenter 0.311917, 0.0215302 Part.ActiveView().RotateAboutCenter 0.097474, 0.0301423 Part.ActiveView().RotateAboutCenter 0.136464, 0.0387544 Part.ActiveView().RotateAboutCenter 0.250183, 0.0602846 Part.ActiveView().RotateAboutCenter 0.00324913, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0649827, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0747301, 0.0430604 Part.ActiveView().RotateAboutCenter 0.0292422, 0.0172242 Part.ActiveView().RotateAboutCenter 0.00324913, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0519862, -0.0473665 Part.ActiveView().RotateAboutCenter 0.0357405, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0357405, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0779792, -0.0602846 Part.ActiveView().RotateAboutCenter 0.0877266, -0.0559786 Part.ActiveView().RotateAboutCenter 0.0519862, -0.0172242 Part.ActiveView().RotateAboutCenter 0.0227439, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0877266, -0.0818148 Part.ActiveView().RotateAboutCenter 0.00324913, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0389896, 0 Part.ActiveView().RotateAboutCenter 0.0389896, 0 Part.ActiveView().RotateAboutCenter -0.00649827, 0 Part.ActiveView().RotateAboutCenter -0.0292422, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0162457, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0162457, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0357405, -0.0172242 Part.ActiveView().RotateAboutCenter -0.048737, -0.0258363 Part.ActiveView().RotateAboutCenter -0.0194948, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0194948, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0259931, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0129965, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0129965, -0.0473665 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00324913, -0.0258363 Part.ActiveView().RotateAboutCenter 0.0162457, -0.0387544 Part.ActiveView().RotateAboutCenter 0.0357405, -0.0129181 Part.ActiveView().RotateAboutCenter 0.0909758, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0097474, 0.0129181 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0194948, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0129965, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0357405, 0.0172242 Part.ActiveView().RotateAboutCenter 0.0162457, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0227439, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0292422, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0129965, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0259931, 0.0473665 Part.ActiveView().RotateAboutCenter -0.048737, 0.0602846 Part.ActiveView().RotateAboutCenter -0.00324913, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00649827, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter 0, -0.0129181 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0097474, -0.00861209 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.0097474, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0097474, 0 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.00324913, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.0097474, 0 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.0259931, 0 Part.ActiveView().RotateAboutCenter 0.0129965, 0 Part.ActiveView().RotateAboutCenter 0.0162457, 0 Part.ActiveView().RotateAboutCenter 0.0162457, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.0129965, 0.0129181 Part.ActiveView().RotateAboutCenter -0.00649827, 0.00861209 Part.ShowNamedView2 "*Bottom", 6 Set Part = Nothing swApp.CloseDoc "4 leg bridle with cage.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\ElevCage-1.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ShowNamedView2 "*Bottom", 6 Part.ShowNamedView2 "*Top", 5 Part.ShowNamedView2 "*Left", 3 Part.ShowNamedView2 "*Back", 2 Part.ViewZoomTo2 -0.346844, 0.0745339, 0.243537, -0.183393, -0.0836872, 0.243537 Part.ShowNamedView2 "*Front", 1 Part.ViewZoomTo2 -0.362536, 0.0679959, -0.243537, -0.213468, -0.0921867, -0.243537 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 1 Part.ActiveView().ZoomByFactor 0.952381 Part.ActiveView().ZoomByFactor 0.917431 Part.ActiveView().ZoomByFactor 0.877193 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.952381 Part.ActiveView().ZoomByFactor 0.900901 Part.ActiveView().ZoomByFactor 0.943396 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.909091 Part.ActiveView().ZoomByFactor 0.909091 Part.ActiveView().ZoomByFactor 0.943396 Part.ActiveView().ZoomByFactor 0.934579 Part.ActiveView().ZoomByFactor 0.892857 Part.ActiveView().ZoomByFactor 0.934579 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.925926 Part.ActiveView().ZoomByFactor 0.862069 Part.ActiveView().ZoomByFactor 0.8 Part.ActiveView().ZoomByFactor 0.934579 Part.ActiveView().ZoomByFactor 0.961538 Part.ActiveView().ZoomByFactor 0.952381 Part.ActiveView().ZoomByFactor 0.934579 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 1 Set Part = Nothing swApp.CloseDoc "ElevCage-1.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\Benthos LBL\LBL transponder.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("LBL transponder.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.SelectByID "Default", "CONFIGURATIONS", 0, 0, 0 Part.ClearSelection Part.ShowConfiguration "Default" Part.ShowNamedView2 "*Front", 1 Part.ShowNamedView2 "*Left", 3 Part.ViewDisplayHiddenremoved Part.ViewDisplayHiddengreyed Part.ViewZoomTo2 0.160387, 0.109626, -0.0267791, 0.295218, -0.0801979, -0.0267791 Part.SelectByID "", "EDGE", -0.0007602002580143, 0.05905489481208, 0.2266116218347 Part.AndSelectByID "", "EDGE", 0.05469704545845, 0.05795553089004, 0.2099379356837 Part.AddDimension 0.0267791, 0.100464, 0.219099 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SetPickMode Set Part = Nothing swApp.CloseDoc "LBL transponder.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\ElevCage-1.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ShowNamedView2 "*Back", 2 Part.ViewDisplayHiddengreyed Part.ViewZoomTo2 -0.370381, 0.1203, 0.243537, -0.199084, -0.0954557, 0.243537 Part.ShowNamedView2 "*Front", 1 Part.ViewZoomTo2 -0.365805, 0.0967633, -0.243537, -0.235043, -0.113762, -0.243537 Part.SetPickMode Part.SetPickMode Part.SelectByID "UHMW-Clamp-1-1@ElevCage-1", "COMPONENT", 0, 0, 0 Part.SelectByID "Bearing_Guide-1@ElevCage-1", "COMPONENT", 0, 0, 0 Part.SelectByID "Base-Extrude@Bearing_Guide-1@ElevCage-1", "BODYFEATURE", 0, 0, 0 Part.SelectByID "Sketch1@Bearing_Guide-1@ElevCage-1", "SKETCH", 0, 0, 0 Part.SelectByID "Sketch1@Bearing_Guide-1@ElevCage-1", "SKETCH", 0, 0, 0 Part.EditSketch ' MSGBOX ' This part has features defined in the context of another assembly . You can edit the part, but cannot create any external references to the components of the current assembly. Part.SelectedFeatureProperties 0, 0, 0, 0, 0, 0, 0, 1, 0, "Sketch1" Part.ClearSelection Part.SetPickMode Set Part = Nothing swApp.CloseDoc "ElevCage-1.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing_Guide.SLDPRT", 1, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Bearing_Guide.SLDPRT") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.SelectByID "Cut-Extrude1", "BODYFEATURE", 0, 0, 0 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.FeatEdit Part.ClearSelection Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3049999323469, -0.07831448290033, 0.0127 Part.Parameter("D4@Sketch1").SystemValue = 0.03175 Part.ClearSelection Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3064073774426, -0.04554772189853, 0 Part.AndSelectByID "Line11", "SKETCHSEGMENT", 0.3222625, -0.04007213026909, 0 Part.AddDimension 0.312502, -0.0358636, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Part.SetPickMode Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3039020657642, -0.07776554960897, 0.0127 Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3049278083259, -0.01040803948249, 0 Part.SketchConstraintsDelAll Part.ClearSelection Set Part = Nothing swApp.CloseDoc "Bearing_Guide.SLDPRT" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing_Guide.SLDPRT", 1, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Bearing_Guide.SLDPRT") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.FeatEdit Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3068693579853, -0.00697004998901, 0 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3068693579853, -0.00697004998901, 0 Part.SketchConstraintsDel 0, "sgDIAMETER" Part.SetPickMode Part.ClearSelection Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3049999323469, -0.07813150513654, 0.0127 Part.EditDelete Part.SelectByID "D6@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3536720175139, -0.03622959722959, 0.0127 Part.SelectByID "D6@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3505613955296, -0.04080404132423, 0.0127 Part.EditDelete Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2984899499981, -0.01588989274754, 0 Part.AndSelectByID "Line6", "SKETCHSEGMENT", 0.3115871318432, -0.053975, 0 Part.AddDimension 0.3566, -0.0309232, 0 Part.ClearSelection Part.Parameter("D1@Sketch1").SystemValue = 0.053975 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3051417350818, -0.01010514131127, 0 Part.AndSelectByID "Line11", "SKETCHSEGMENT", 0.32385, -0.005672310677359, 0 Part.AddDimension 0.300974, -0.0730081, 0 Part.ClearSelection Part.Parameter("D4@Sketch1").SystemValue = 0.0333375 Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3044198712272, -0.04760507368529, 0 Part.AndSelectByID "Line10", "SKETCHSEGMENT", 0.3154296648827, 0, 0 Part.AddDimension 0.343425, -0.0192127, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.305062473964, -0.04162337098782, 0 Part.AndSelectByID "Arc1", "SKETCHSEGMENT", 0.3007658610644, -0.01452573533018, 0 Part.AddDimension 0.296583, -0.049587, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Part.SetPickMode Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3009744215436, -0.07264217222297, 0.0127 Part.EditDelete Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3037281404504, -0.04111138499285, 0 Part.AndSelectByID "Arc1", "SKETCHSEGMENT", 0.2993789770865, -0.01541148870405, 0 Part.AddDimension 0.296217, -0.0744719, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Part.SetPickMode Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2961656979861, -0.01685733527371, 0 Part.SketchConstraintsDel 0, "sgDISTANCE" Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2994952917284, -0.01534398425323, 0 Part.AndSelectByID "Arc3", "SKETCHSEGMENT", 0.3055030585984, -0.04196694209751, 0 Part.AddDimension 0.301157, -0.0503189, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Part.SetPickMode Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3008162063166, -0.01449006680944, 0 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3008162063166, -0.01449006680944, 0 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3008162063166, -0.01449006680944, 0 Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3008162063166, -0.01449006680944, 0 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2813338090488, -0.01522760757385, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2806295505966, -0.01478024732843, 0 Part.ClearSelection Part.SetPickMode Part.SetPickMode Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2996302761573, -0.01526415926102, 0 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3031921671356, -0.01246412617597, 0 Part.SelectByID "Point2", "SKETCHPOINT", 0.2905125, 0, 0 Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3071938646345, 0.006153086536939, 0 Part.AndSelectByID "Arc3", "SKETCHSEGMENT", 0.3053531726948, -0.04183661987957, 0 Part.AddDimension 0.300791, -0.049404, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Part.SetPickMode Part.SelectByID "Line10", "SKETCHSEGMENT", 0.296399977449, 0, 0 Part.EditDelete Part.SetPickMode Part.SetPickMode Part.ViewDispOrigins Part.SetPickMode Part.SetPickMode Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3045558105187, -0.0413503625873, 0 Part.AndSelectByID "Arc1", "SKETCHSEGMENT", 0.2930579237845, -0.01759685249575, 0 Part.AddDimension 0.302804, -0.0515997, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Set Part = Nothing swApp.CloseDoc "Bearing_Guide.SLDPRT" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing_Guide.SLDPRT", 1, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("Bearing_Guide.SLDPRT") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.FeatEdit Part.ClearSelection Part.SetPickMode Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2926828922005, 0.0176470336798, 0 Part.SketchConstraintsDel 1, "sgDISTANCE" Part.SketchConstraintsDel 0, "sgDIAMETER" Part.ClearSelection Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3070126877485, -0.07904639395547, 0.0127 Part.EditDelete Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3059812828684, -0.04251452159203, 0 Part.AndSelectByID "Arc1", "SKETCHSEGMENT", 0.2934969953211, -0.01752772625524, 0 Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3019091277714, -0.04756664179424, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.301815796022, -0.04137405246502, 0 Part.AndSelectByID "Arc1", "SKETCHSEGMENT", 0.2932607977159, -0.01756631036003, 0 Part.AddDimension 0.302438, -0.04977, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Part.SetPickMode Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3055370802193, -0.009507386035789, 0 Part.AndSelectByID "Line6", "SKETCHSEGMENT", 0.3152466871189, -0.053975, 0 Part.AddDimension 0.363919, -0.032936, 0 Part.ClearSelection Part.Parameter("D1@Sketch1").SystemValue = 0.053975 Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3052754114867, -0.04712518811264, 0 Part.AndSelectByID "Line6", "SKETCHSEGMENT", 0.3086594876226, -0.053975, 0 Part.AddDimension 0.340132, -0.049221, 0 Part.ClearSelection ' MSGBOX ' This dimension is over defined. Its value cannot be changed. ' MSGBOX ' The sketch is no longer over defined. Part.SetPickMode Part.SetPickMode Part.SetPickMode Part.SetPickMode Part.SetPickMode Part.SetPickMode Set Part = Nothing swApp.CloseDoc "Bearing_Guide.SLDPRT" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\ElevCage-1.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.SelectByID "Coincident4", "MATE", 0, 0, 0 Part.SelectByID "Coincident4", "MATE", 0, 0, 0 Part.SelectByID "Coincident4", "MATE", 0, 0, 0 Part.ClearSelection Part.SelectByID "Coincident4", "MATE", 0, 0, 0 Part.SelectByID "Concentric13", "MATE", 0, 0, 0 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "Bearing_Guide-1@ElevCage-1", "COMPONENT", 0, 0, 0 Part.SelectByID "Bearing_Guide-1@ElevCage-1", "COMPONENT", 0, 0, 0 Part.ClearSelection Part.SelectByID "Bearing_Guide-2@ElevCage-1", "COMPONENT", 0, 0, 0 Part.ClearSelection Part.SelectByID "Bearing_Guide-1@ElevCage-1", "COMPONENT", 0, 0, 0 Part.ClearSelection swApp.LoadFile2 "C:\soliddata\mooring\Bearing_Guide.SLDPRT", "" Set Part = swApp.ActiveDoc Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing_Guide.SLDPRT", 1, 0, 0, 0, 0, longstatus) swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("Bearing_Guide.SLDPRT") Part.SelectByID "", "EDGE", 0.303170154709, 0.01225951017365, 0.02063750000002 Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.FeatEdit Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3014758686741, -0.01399760505643, 0 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3013833341128, -0.01406959010388, 0 Part.SketchConstraintsDel 0, "sgDIAMETER" Part.SketchConstraintsDel 0, "sgDISTANCE" Part.ClearSelection Part.SelectByID "Point2", "SKETCHPOINT", 0.2905125, 0, 0 Part.SketchConstraintsDel 0, "sgCOINCIDENT" Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3004821559772, -0.0147219006822, 0 Part.DeSelectByID "Arc1", "SKETCHSEGMENT", 0.3004821559772, -0.0147219006822, 0 Part.AndSelectByID "Line10", "SKETCHSEGMENT", 0.3463529069625, 0, 0 Part.EditDelete Part.ClearSelection Part.SelectByID "Line10", "SKETCHSEGMENT", 0.3361061521905, 0, 0 Part.EditDelete Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3046339768193, -0.07922937171926, 0.0127 Part.EditDelete Part.SelectByID "Point2", "SKETCHPOINT", 0.2905125, 0, 0 Part.SelectByID "Point2", "SKETCHPOINT", 0.2905125, 0, 0 Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.294685004757, -0.01728347777655, 0 Part.ClearSelection Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3037910998272, -0.04112171853956, 0 Part.AndSelectByID "Arc1", "SKETCHSEGMENT", 0.297173853182, -0.01648498631434, 0 Part.AddDimension 0.298962, -0.0459274, 0 Part.ClearSelection Part.Parameter("D1@Sketch1").SystemValue = 0.0127 Part.SelectByID "Line11", "SKETCHSEGMENT", 0.32385, -0.01921266519751, 0 Part.AndSelectByID "Arc1", "SKETCHSEGMENT", 0.3011715016185, -0.01423074434093, 0 Part.AddDimension 0.308294, -0.024336, 0 Part.ClearSelection Part.Parameter("D4@Sketch1").SystemValue = 0.0333375 Part.SetPickMode Part.ClearSelection Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.2967659329765, -0.04684230752917, 0.0127 Part.EditDelete Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3081105543313, -0.02415306481973, 0.0127 Part.Parameter("D4@Sketch1").SystemValue = 0.03175 Part.ClearSelection Part.EditUndo 1 Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3104892652605, -0.02525093140244, 0.0127 Part.EditDelete Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3041519279337, -0.04120504847533, 0 Part.AndSelectByID "Arc1", "SKETCHSEGMENT", 0.2978831689705, -0.01618028550203, 0 Part.AddDimension 0.295485, -0.0455615, 0 Part.ClearSelection Part.Parameter("D1@Sketch1").SystemValue = 0.0127 Part.SelectByID "Point8", "SKETCHPOINT", 0.3032125, -0.04445, 0 Part.AndSelectByID "Arc3", "SKETCHSEGMENT", 0.3065906704601, -0.04446412735697, 0 ' MSGBOX ' Cannot dimension between an arc and its center point. Part.ClearSelection Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3065730577439, -0.0441052002175, 0 Part.AndSelectByID "Line11", "SKETCHSEGMENT", 0.32385, -0.03970617474152, 0 Part.AddDimension 0.312319, -0.0334849, 0 Part.ClearSelection Part.Parameter("D4@Sketch1").SystemValue = 0.0206375 Part.SetPickMode Part.ClearSelection Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.2953021108663, -0.04574444094645, 0.0127 Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.2976808217955, -0.02817857562301, 0.0127 Part.EditDelete Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.313416909481, -0.03403386406416, 0.0127 Part.SetPickMode Part.ClearSelection Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3123190428983, -0.03330195300902, 0.0127 Part.SetPickMode Part.ClearSelection Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3125020206621, -0.03311897524523, 0.0127 Part.Parameter("D4@Sketch1").SystemValue = 0.0206375 Part.SetPickMode Part.ClearSelection Part.SelectByID "D4@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3139658427724, -0.03366790853659, 0.0127 Part.EditDelete Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2878982967353, -0.01758676608394, 0 Part.AndSelectByID "Arc3", "SKETCHSEGMENT", 0.3004119419283, -0.04256079124312, 0 Part.AddDimension 0.296949, -0.0506848, 0 Part.ClearSelection Part.Parameter("D1@Sketch1").SystemValue = 0.0127 Part.SetPickMode Part.ClearSelection Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.296399977449, -0.04976995174974, 0.0127 Part.SetPickMode Part.ClearSelection Set Part = Nothing swApp.CloseDoc "Bearing_Guide.SLDPRT" swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") ' MSGBOX ' Models contained within the assembly have changed. Would you like to rebuild the assembly now? swApp.LoadFile2 "C:\soliddata\mooring\Bearing_Guide.SLDPRT", "" Set Part = swApp.ActiveDoc Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing_Guide.SLDPRT", 1, 0, 0, 0, 0, longstatus) swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("Bearing_Guide.SLDPRT") Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.FeatEdit Part.ClearSelection Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.2991446439058, -0.02854453115059, 0.0127 Part.EditDelete Set Part = Nothing swApp.CloseDoc "Bearing_Guide.SLDPRT" swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") ' MSGBOX ' Models contained within the assembly have changed. Would you like to rebuild the assembly now? swApp.LoadFile2 "C:\soliddata\mooring\Bearing_Guide.SLDPRT", "" Set Part = swApp.ActiveDoc Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing_Guide.SLDPRT", 1, 0, 0, 0, 0, longstatus) swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("Bearing_Guide.SLDPRT") Part.SelectByID "Base-Extrude", "BODYFEATURE", 0, 0, 0 Part.FeatEdit Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3061147880771, -0.008526253969874, 0 Part.AndSelectByID "Line11", "SKETCHSEGMENT", 0.32385, -0.00914888818929, 0 Part.AddDimension 0.305366, -0.0757528, 0 Part.ClearSelection Part.Parameter("D1@Sketch1").SystemValue = 0.0333375 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3047043635427, -0.01071071469065, 0 Part.AndSelectByID "Line6", "SKETCHSEGMENT", 0.3095743764415, -0.053975, 0 Part.AddDimension 0.378191, -0.0292764, 0 Part.ClearSelection Part.Parameter("D4@Sketch1").SystemValue = 0.053975 Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3049669158952, -0.04733691186333, 0 Part.AndSelectByID "Line6", "SKETCHSEGMENT", 0.3075616210399, -0.053975, 0 Part.AddDimension 0.349829, -0.049404, 0 Part.ClearSelection Part.Parameter("D6@Sketch1").SystemValue = 0.009525 Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3057328060556, -0.04669950941898, 0 Part.AndSelectByID "Line11", "SKETCHSEGMENT", 0.32385, -0.03842533039502, 0 Part.AddDimension 0.312502, -0.0342168, 0 Part.ClearSelection Part.Parameter("D7@Sketch1").SystemValue = 0.0206375 Part.SetPickMode Part.ClearSelection Part.SelectByID "D7@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3123190428983, -0.03421684182795, 0.0127 Part.EditDelete Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.2964395856864, -0.01676299660759, 0 Part.AndSelectByID "Arc3", "SKETCHSEGMENT", 0.301012831695, -0.04188607827968, 0 Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3016058298497, -0.04742167398416, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3068693579853, -0.00697004998901, 0 Part.AndSelectByID "Arc3", "SKETCHSEGMENT", 0.304772182194, -0.04145339747485, 0 Part.AddDimension 0.297498, -0.0503189, 0 Part.ClearSelection Part.Parameter("D7@Sketch1").SystemValue = 0.0127 Part.SetPickMode Part.ClearSelection Part.SelectByID "D6@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3498294844744, -0.04958697398595, 0.0127 Part.EditDelete Part.SelectByID "Arc4", "SKETCHSEGMENT", 0.3050258948921, 0.04159976593848, 0 Part.AndSelectByID "Arc3", "SKETCHSEGMENT", 0.3056754464989, -0.04213783007033, 0 Part.AddDimension 0.225222, 1.02154e-015, 0 Part.ClearSelection Part.Parameter("D6@Sketch1").SystemValue = 0.0889 Part.SelectByID "Arc1", "SKETCHSEGMENT", 0.3018600348651, -0.01368801857414, 0 Part.AndSelectByID "Arc3", "SKETCHSEGMENT", 0.3046216868621, -0.0413797512108, 0 Part.AddDimension 0.243885, -0.0279956, 0 Part.ClearSelection Part.Parameter("D8@Sketch1").SystemValue = 0.04445 Part.SelectByID "Line6", "SKETCHSEGMENT", 0.316893486993, -0.053975, 0 Part.AndSelectByID "Line12", "SKETCHSEGMENT", 0.3123190428983, 0.053975, 0 Part.AddDimension 0.401246, 0.0124425, 0 Part.ClearSelection Part.Parameter("D9@Sketch1").SystemValue = 0.10795 Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3063157190343, -0.04578501567983, 0 Part.AndSelectByID "Line11", "SKETCHSEGMENT", 0.32385, -0.04281679672588, 0 Part.AddDimension 0.314332, -0.0347658, 0 Part.ClearSelection Part.Parameter("D10@Sketch1").SystemValue = 0.01905 Part.ClearSelection Part.EditUndo 1 Part.SetPickMode Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3044509990555, -0.07630172749868, 0.0127 Part.Parameter("D1@Sketch1").SystemValue = 0.03175 Part.ClearSelection Part.EditUndo 1 Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3070126877485, -0.0761187497349, 0.0127 Part.Parameter("D1@Sketch1").SystemValue = 0.03175 Part.SetPickMode Part.ClearSelection Part.SelectByID "D1@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.3077445988037, -0.07648470526247, 0.0127 Part.EditDelete Part.SelectByID "Arc3", "SKETCHSEGMENT", 0.3065462723227, -0.04499607448235, 0 Part.AndSelectByID "Line11", "SKETCHSEGMENT", 0.3222625, -0.04281679672588, 0 Part.AddDimension 0.313966, -0.0371445, 0 Part.ClearSelection Part.Parameter("D1@Sketch1").SystemValue = 0.01905 Part.SetPickMode Part.ClearSelection Part.SelectByID "D7@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.2987786883782, -0.05068484056867, 0.0127 Part.SelectByID "D7@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.2987786883782, -0.07227621669539, 0.0127 Part.Parameter("D7@Sketch1").SystemValue = 0.0127 Part.SetPickMode Part.ClearSelection Part.SelectByID "D7@Sketch1@Bearing_Guide.SLDPRT", "DIMENSION", 0.2984127328506, -0.07172728340404, 0.0127 Part.Parameter("D7@Sketch1").SystemValue = 0.0142875 Part.EditRebuild Part.ClearSelection Part.Save2 FALSE Set Part = Nothing swApp.CloseDoc "Bearing_Guide.SLDPRT" swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") ' MSGBOX ' Models contained within the assembly have changed. Would you like to rebuild the assembly now? Part.ActiveView().RotateAboutCenter 0.0460582, 0.0602846 Part.ActiveView().RotateAboutCenter 0.217131, 0.258363 Part.ActiveView().RotateAboutCenter 0.177653, 0.198078 Part.ActiveView().RotateAboutCenter 0.572437, 0.843985 Part.ActiveView().RotateAboutCenter 0.184233, 0.361708 Part.ActiveView().RotateAboutCenter 0.0230291, 0.111957 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0, -0.0172242 Part.ActiveView().RotateAboutCenter -0.00986961, -0.0645907 Part.ActiveView().RotateAboutCenter -0.00328987, -0.0344484 Part.ActiveView().RotateAboutCenter -0.0197392, -0.0473665 Part.ActiveView().RotateAboutCenter -0.0657974, -0.180854 Part.ActiveView().RotateAboutCenter -0.0394784, -0.20669 Part.ActiveView().RotateAboutCenter -0.0986961, -0.172242 Part.ActiveView().RotateAboutCenter -0.164493, -0.241138 Part.ActiveView().RotateAboutCenter -0.105276, -0.172242 Part.ActiveView().RotateAboutCenter -0.0986961, -0.198078 Part.ActiveView().RotateAboutCenter -0.0394784, -0.232526 Part.ActiveView().RotateAboutCenter -0.0263189, -0.241138 Part.ActiveView().RotateAboutCenter -0.0197392, -0.20669 Part.ActiveView().RotateAboutCenter -0.0164493, -0.124875 Part.ActiveView().RotateAboutCenter 0, -0.0215302 Part.ActiveView().RotateAboutCenter 0.00986961, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0230291, -0.00861209 Part.ActiveView().RotateAboutCenter 0.0328987, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0986961, 0.00861209 Part.ActiveView().RotateAboutCenter 0.0328987, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00986961, 0 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00986961, 0.0215302 Part.ActiveView().RotateAboutCenter -0.00657974, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00328987, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00657974, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00657974, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00657974, 0.0387544 Part.ActiveView().RotateAboutCenter 0, 0.0172242 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00328987, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00657974, 0.0301423 Part.ActiveView().RotateAboutCenter 0.00328987, 0.0430604 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00328987, 0.0387544 Part.ActiveView().RotateAboutCenter -0.00328987, 0.0301423 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00328987, 0 Part.ActiveView().RotateAboutCenter -0.00328987, 0 Part.ActiveView().RotateAboutCenter -0.00328987, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00328987, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00328987, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00657974, 0.0129181 Part.ActiveView().RotateAboutCenter -0.00328987, 0 Part.ActiveView().RotateAboutCenter -0.00328987, 0 Part.ActiveView().RotateAboutCenter -0.00328987, 0 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00328987, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00328987, -0.00861209 Part.ActiveView().RotateAboutCenter 0, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00328987, 0 Part.ActiveView().RotateAboutCenter 0.00328987, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00328987, 0 Part.ActiveView().RotateAboutCenter -0.00657974, 0 Part.ShowNamedView2 "*Bottom", 6 Part.ShowNamedView2 "*Top", 5 Part.ShowNamedView2 "*Left", 3 Part.ShowNamedView2 "*Back", 2 Part.ShowNamedView2 "*Front", 1 Part.Save2 FALSE Set Part = Nothing swApp.CloseDoc "ElevCage-1.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\4 leg bridle\4 leg bridle with cage.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("4 leg bridle with cage.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ShowNamedView2 "*Bottom", 6 Part.ShowNamedView2 "*Top", 5 Part.ViewZoomTo2 -0.506507, 0.278534, -0.638379, 0.423124, -0.351273, -0.638379 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.305419, 0.0430604 Part.ActiveView().RotateAboutCenter -0.282675, 0.0172242 Part.ActiveView().RotateAboutCenter -0.0584844, 0.0301423 Part.ActiveView().RotateAboutCenter -0.0812284, 0.0559786 Part.ActiveView().RotateAboutCenter -0.0324913, 0.0172242 Part.ActiveView().RotateAboutCenter -0.0097474, 0 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter 0.14946, -0.103345 Part.ActiveView().RotateAboutCenter 0.048737, -0.0258363 Part.ActiveView().RotateAboutCenter 0.29892, 0.0904269 Part.ActiveView().RotateAboutCenter 0.120218, 0.0215302 Part.ActiveView().RotateAboutCenter 0.0812284, 0.0301423 Part.ActiveView().RotateAboutCenter 0.0812284, 0.0258363 Part.ActiveView().RotateAboutCenter 0.0292422, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00649827, -0.0344484 Part.ActiveView().RotateAboutCenter 0.00324913, -0.0559786 Part.ActiveView().RotateAboutCenter -0.0097474, -0.0516725 Part.ActiveView().RotateAboutCenter -0.0097474, -0.0473665 Part.ActiveView().RotateAboutCenter 0, -0.00861209 Part.ActiveView().RotateAboutCenter -0.0097474, -0.0129181 Part.ActiveView().RotateAboutCenter -0.0129965, -0.0172242 Part.ActiveView().RotateAboutCenter -0.0194948, -0.0129181 Part.ActiveView().RotateAboutCenter -0.00649827, -0.00430604 Part.ActiveView().RotateAboutCenter 0.0097474, 0.0129181 Part.ActiveView().RotateAboutCenter 0.0162457, 0.0172242 Part.ActiveView().RotateAboutCenter 0.0097474, 0.0129181 Part.ActiveView().RotateAboutCenter 0.00324913, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter 0.0357405, -0.0258363 Part.ActiveView().RotateAboutCenter 0.00649827, 0 Part.ActiveView().RotateAboutCenter -0.0162457, 0 Part.ActiveView().RotateAboutCenter -0.0129965, -0.00430604 Part.ActiveView().RotateAboutCenter -0.0357405, 0.0172242 Part.ActiveView().RotateAboutCenter -0.00324913, 0.00430604 Part.ActiveView().RotateAboutCenter 0.0097474, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00649827, 0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, -0.00430604 Part.ActiveView().RotateAboutCenter 0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.00324913, -0.0129181 Part.ActiveView().RotateAboutCenter -0.00324913, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00649827, -0.00430604 Part.ActiveView().RotateAboutCenter -0.00324913, 0 Part.ActiveView().RotateAboutCenter -0.00324913, 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 Set Part = Nothing swApp.CloseDoc "4 leg bridle with cage.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\ElevCage-1.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("ElevCage-1.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.SelectByID "Concentric5", "MATE", 0, 0, 0 Part.ClearSelection Part.SelectByID "Concentric13", "MATE", 0, 0, 0 Part.EditDelete Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.EditDelete Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.ActiveView().RotateAboutCenter 0.003235, 0 Part.ActiveView().RotateAboutCenter 0.01941, 0.00861209 Part.ActiveView().RotateAboutCenter 0.16175, 0.0516725 Part.ActiveView().RotateAboutCenter 0.23939, 0.20669 Part.ActiveView().RotateAboutCenter 0.22645, 0.223914 Part.ActiveView().RotateAboutCenter 0.0905799, 0.0516725 Part.ActiveView().RotateAboutCenter 0.042055, 0.0258363 Part.ActiveView().RotateAboutCenter 0.03235, 0.0172242 Part.ActiveView().RotateAboutCenter 0.03235, 0.0129181 Part.ActiveView().RotateAboutCenter 0.03235, 0.00430604 Part.ActiveView().RotateAboutCenter 0.01294, -0.00430604 Part.ActiveView().RotateAboutCenter 0.18116, -0.0301423 Part.ActiveView().RotateAboutCenter 0.0938149, -0.00430604 Part.ActiveView().RotateAboutCenter 0.41408, 0.0559786 Part.ActiveView().RotateAboutCenter 0.14881, 0.223914 Part.ActiveView().RotateAboutCenter 0.003235, 0.150712 Part.ActiveView().RotateAboutCenter 0.003235, 0.0387544 Part.ActiveView().RotateAboutCenter 0.00647, 0.0258363 Part.ActiveView().RotateAboutCenter 0.02588, 0.0430604 Part.ActiveView().RotateAboutCenter 0.022645, 0.0344484 Part.ActiveView().RotateAboutCenter 0.022645, 0.0387544 Part.ActiveView().RotateAboutCenter 0.035585, 0.0602846 Part.ActiveView().RotateAboutCenter 0.00647, 0.0172242 Part.ActiveView().RotateAboutCenter 0.01941, 0.0473665 Part.ActiveView().RotateAboutCenter 0.02588, 0.0904269 Part.ActiveView().RotateAboutCenter 0.01941, 0.0430604 Part.ActiveView().RotateAboutCenter 0.029115, 0.0301423 Part.ActiveView().RotateAboutCenter 0.016175, 0.0129181 Part.ActiveView().RotateAboutCenter 0.022645, 0.00861209 Part.ActiveView().RotateAboutCenter 0.022645, 0.00861209 Part.ActiveView().RotateAboutCenter 0.022645, 0.0129181 Part.ActiveView().RotateAboutCenter 0.029115, 0.0172242 Part.ActiveView().RotateAboutCenter 0.01941, 0.0172242 Part.ActiveView().RotateAboutCenter 0.00970499, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0, 0.00861209 Part.ActiveView().RotateAboutCenter 0, 0.00430604 Part.ActiveView().RotateAboutCenter 0.003235, 0 Part.ActiveView().RotateAboutCenter 0.00647, 0.0172242 Part.ActiveView().RotateAboutCenter 0.029115, 0.0430604 Part.ActiveView().RotateAboutCenter 0.029115, 0.0430604 Part.ActiveView().RotateAboutCenter 0.03882, 0.0387544 Part.ActiveView().RotateAboutCenter 0.016175, 0.00861209 Part.ActiveView().RotateAboutCenter 0.01941, 0.00861209 Part.ActiveView().RotateAboutCenter 0.016175, 0.00861209 Part.ActiveView().RotateAboutCenter 0.00647, 0 Part.ActiveView().RotateAboutCenter 0.022645, 0.0129181 Part.ActiveView().RotateAboutCenter 0.01941, 0.0129181 Part.ActiveView().RotateAboutCenter 0.02588, 0.0215302 Part.ActiveView().RotateAboutCenter 0.016175, 0.0258363 Part.ActiveView().RotateAboutCenter 0.01294, 0.0344484 Part.ActiveView().RotateAboutCenter 0.01294, 0.0301423 Part.ActiveView().RotateAboutCenter 0.016175, 0.0301423 Part.ActiveView().RotateAboutCenter 0.00970499, 0.0172242 Part.ActiveView().RotateAboutCenter 0.00647, 0.00430604 Part.ActiveView().RotateAboutCenter 0.003235, 0.00430604 Part.ActiveView().RotateAboutCenter 0.01294, 0.00861209 Part.ActiveView().RotateAboutCenter 0.01941, 0.0172242 Part.ActiveView().RotateAboutCenter 0.01941, 0.0258363 Part.ActiveView().RotateAboutCenter 0.016175, 0.0215302 Part.ActiveView().RotateAboutCenter 0.00970499, 0.0129181 Part.ActiveView().RotateAboutCenter 0.003235, 0.00430604 Part.ActiveView().RotateAboutCenter -0.00647, 0 Part.ActiveView().RotateAboutCenter -0.029115, 0.00861209 Part.ActiveView().RotateAboutCenter -0.00647, 0.00430604 Part.ClearSelection Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.ActivateSelectedFeature Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.SelectedFeatureProperties 0, 0, 0, 0, 0, 0, 0, 1, 0, "Concentric11" Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.SelectedFeatureProperties 0, 0, 0, 0, 0, 0, 0, 1, 0, "Concentric11" Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Concentric11", "MATE", 0, 0, 0 Part.EditDelete Part.SelectByID "Concentric9", "MATE", 0, 0, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Concentric9", "MATE", 0, 0, 0 Part.EditDelete Part.SelectByID "Concentric6", "MATE", 0, 0, 0 Part.ClearSelection Part.SelectByID "Concentric6", "MATE", 0, 0, 0 Part.EditDelete Part.EditRebuild Part.Save2 FALSE Set Part = Nothing swApp.CloseDoc "ElevCage-1.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\4 leg bridle\4 leg bridle with cage.SLDASM", 2, 0, 0, 0, 0, longstatus) Set Part = swApp.ActivateDoc ("4 leg bridle with cage.SLDASM") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.ShowNamedView2 "*Top", 5 Part.ShowNamedView2 "*Bottom", 6 Part.ShowNamedView2 "*Top", 5 Part.ActiveView().ZoomByFactor 0.980392 Part.ActiveView().ZoomByFactor 0.925926 Part.ActiveView().ZoomByFactor 0.909091 Part.ActiveView().ZoomByFactor 0.970874 Part.ActiveView().ZoomByFactor 0.943396 Part.ActiveView().ZoomByFactor 0.943396 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.06 Part.ActiveView().ZoomByFactor 1.16 Part.ActiveView().ZoomByFactor 1.11 Part.ActiveView().ZoomByFactor 1.05 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.04 Part.ActiveView().ZoomByFactor 1.05 Part.ActiveView().ZoomByFactor 1.06 Part.ActiveView().ZoomByFactor 1.08 Part.ActiveView().ZoomByFactor 1.06 Part.ActiveView().ZoomByFactor 1.04 Part.ActiveView().ZoomByFactor 1.06 Part.ActiveView().ZoomByFactor 1.06 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1 Part.ActiveView().ZoomByFactor 1.02 Part.ActiveView().ZoomByFactor 1.07 Part.ActiveView().ZoomByFactor 1.02 Part.ActiveView().ZoomByFactor 1.01 Part.ActiveView().ZoomByFactor 1.1 Part.ActiveView().ZoomByFactor 1.05 Part.ActiveView().ZoomByFactor 1.1 Part.ActiveView().ZoomByFactor 1.04 Part.ActiveView().ZoomByFactor 1.03 Part.ActiveView().ZoomByFactor 0.990099 Part.ActiveView().ZoomByFactor 0.925926 Part.ActiveView().ZoomByFactor 0.925926 Part.ActiveView().ZoomByFactor 1 Part.ActiveView().ZoomByFactor 1.01 Part.SetPickMode Part.Save2 FALSE Set Part = Nothing swApp.CloseDoc "4 leg bridle with cage.SLDASM" Set Part = swApp.OpenDoc3 ("C:\soliddata\mooring\Bearing Guide.SLDDRW", 3, 0, 0, 0, 0, longstatus) ' MSGBOX ' Some dimensions are no longer in the model. Missing dimensions will be deleted from drawing. Set Part = swApp.ActivateDoc ("Bearing Guide - Sheet1") swApp.ActiveDoc.ActiveView.FrameLeft = 0 swApp.ActiveDoc.ActiveView.FrameTop = 0 swApp.ActiveDoc.ActiveView.FrameState = 1 swApp.ActiveDoc.ActiveView.FrameState = 1 Part.SelectByID "Drawing View2", "DRAWINGVIEW", 0.07452548148148, 0.2152205761317, 0 Part.ClearSelection Part.SelectByID "Drawing View2", "DRAWINGVIEW", 0.07392131687243, 0.2152205761317, 0 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SetPickMode Part.SelectByID "Drawing View2", "DRAWINGVIEW", 0.07452548148148, 0.2103872592593, 0 Part.SelectByID "Sheet1", "SHEET", 0.2385561728395, 0.2481475473251, 0 Part.SelectByID "RD1@Drawing View2", "DIMENSION", 0.159712691358, 0.218845563786, 0 Part.SelectByID "D3@Sketch1@Bearing_Guide-2@Drawing View2", "DIMENSION", 0.1107753580247, 0.2408975720165, 0 Part.ViewZoomTo2 0.0198486, 0.205252, -3.38222e-015, 0.218317, 0.00859628, -2.00898e-015 Part.SelectByID "D5@Sketch1@Bearing_Guide-1@Drawing View1", "DIMENSION", 0.1264856789567, 0.04010672995217, 0 Part.ClearSelection Part.SelectByID "", "EDGE", 0.122499417195, 0.07237646802358, 0.006349999999998 Part.AddDimension 0.139014, 0.0793999, 0 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SelectByID "RD4@Drawing View1", "DIMENSION", 0.1447085898676, 0.07977952558114, 0 Part.EditDelete Part.SelectByID "", "EDGE", 0.1232587051496, 0.06782074029585, 0.006349999999998 Part.AndSelectByID "", "EDGE", 0.1393935741853, 0.06706145234123, 0.0127 Part.AddDimension 0.129713, 0.0452319, 0 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SelectByID "D5@Sketch1@Bearing_Guide-1@Drawing View1", "DIMENSION", 0.128004254866, 0.03934744199755, 0 Part.SelectByID "RD4@Drawing View1", "DIMENSION", 0.1291431867979, 0.04485227966856, 0 Part.SelectByID "RD4@Drawing View1", "DIMENSION", 0.1278144328773, 0.04390316972528, 0 Part.ClearSelection Part.SelectByID "", "EDGE", 0.1238281711156, 0.1111001537093, 0.007937500000025 Part.AndSelectByID "", "EDGE", 0.1392037521966, 0.1080630018908, 0.0127 Part.AddDimension 0.124777, 0.0271988, 0 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SelectByID "RD2@Drawing View1", "DIMENSION", 0.1038968623068, 0.02245328500723, 0 Part.SelectByID "RD5@Drawing View1", "DIMENSION", 0.1249671030475, 0.02909705461017, 0 Part.SelectByID "RD5@Drawing View1", "DIMENSION", 0.1221197732177, 0.02662936875765, 0 Part.SelectByID "D5@Sketch1@Bearing_Guide-1@Drawing View1", "DIMENSION", 0.1300922967412, 0.03479171426983, 0 Part.SelectByID "Sheet1", "SHEET", 0.1765986839617, 0.02795812267823, 0 Part.SelectByID "Section Line1", "SECTIONLINE", 0.1097813439551, 0.05282480319208, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1031375743521, 0.05491284506729, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1056052602046, 0.05320444716939, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1156658256034, 0.05206551523746, 0 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1010495324769, 0.05206551523746, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.0930770089534, 0.05282480319208, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.09459558486264, 0.05206551523746, 0 Part.EditSketch Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "Section Line1", "SECTIONLINE", 0.1204113753198, 0.07996934756979, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1044663282727, 0.05434337910132, 0 Part.ClearSelection Part.SetPickMode Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1040866842954, 0.05415355711267, 0 Part.EditSketch Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.105415438216, 0.0535840911467, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1044663282727, 0.05320444716939, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1035172183294, 0.05339426915805, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1029477523635, 0.05339426915805, 0 Part.EditSketch Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1156658256034, 0.05206551523746, 0 Part.EditSketch Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.115855647592, 0.05206551523746, 0 Part.EditSketch Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.115855647592, 0.05206551523746, 0 Part.SetPickMode Part.ClearSelection Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1154760036147, 0.05225533722612, 0 Part.EditSketch Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1154760036147, 0.05225533722612, 0 Part.SelectByID "Sheet1", "SHEET", 0.1784969038483, 0.04447263569125, 0 Part.SelectByID "Sheet1", "SHEET", 0.1779274378823, 0.04447263569125, 0 Part.ClearSelection Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1448984118563, 0.05054693932822, 0 Part.EditSketch Part.SetPickMode Part.ClearSelection Part.SelectByID "Section Line1", "SECTIONLINE", 0.1135777837282, 0.08224721143366, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.09915131259037, 0.05946857279502, 0 Part.ClearSelection Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.10484597225, 0.05377391313536, 0 Part.EditSketch Part.SelectByID "Section Line1", "SECTIONLINE", 0.1086424120231, 0.05244515921477, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.1042765062841, 0.05472302307863, 0 Part.ClearSelection Part.SetPickMode Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.09383629690802, 0.05263498120343, 0 Part.SelectByID "Drawing View1", "DRAWINGVIEW", 0.09345665293071, 0.05225533722612, 0 Part.EditSketch Part.ClearSelection Part.SelectByID "", "EDGE", 0.1217401292404, 0.1234385829719, 0.007937500000025 Part.AddDimension 0.0646037, 0.144509, 0 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SelectByID "RD6@Drawing View1", "DIMENSION", 0.06764086247358, 0.1441291797353, 0 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "RD6@Drawing View1", "DIMENSION", 0.06327495673451, 0.1433698917807, 0 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "RD3@Drawing View1", "DIMENSION", 0.1578063070849, 0.1334991483706, 0 Part.SelectByID "RD5@Drawing View1", "DIMENSION", 0.1228790611723, 0.02662936875765, 0 Part.EditDelete Part.SelectByID "", "EDGE", 0.1133879617395, 0.09762279251474, 0.007937500000025 Part.AndSelectByID "", "EDGE", 0.1236383491269, 0.07161718006896, 0.006349999999998 Part.AddDimension 0.118323, 0.0626955, 0 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SelectByID "RD5@Drawing View1", "DIMENSION", 0.1166149355467, 0.06136679268157, 0 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SelectByID "RD5@Drawing View1", "DIMENSION", 0.09079914508953, 0.06098714870426, 0 Part.SetPickMode Part.ClearSelection Part.SetPickMode Part.SetPickMode Part.SelectByID "", "EDGE", 0.2267116889667, 0.1312212845067, -0.01746249999997 Part.AndSelectByID "", "EDGE", 0.2242440031142, 0.0964838605828, -0.01746249999997 Part.AddDimension 0.266384, 0.113568, 0 Part.ClearSelection Part.SetPickMode Part.ClearSelection Part.SelectByID "D1@Sketch2@Section-1@Drawing View5", "DIMENSION", 0.1887472912357, 0.1595047608164, 0 Part.SelectByID "D2@Sketch2@Section-1@Drawing View5", "DIMENSION", 0.1948215948727, 0.07028842614837, 0 Part.SelectByID "D2@Sketch2@Section-1@Drawing View5", "DIMENSION", 0.1914047990769, 0.06990878217106, 0 Part.ViewZoomtofit2 ' 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.ClearSelection Part.Save2 FALSE swApp.ExitApp End Sub