Procedure LoadFile; VAR hatchName, gradientName, objectName:STRING; result, index, segmentIndex:INTEGER; boolResult:BOOLEAN; top, left, bottom, right:REAL; tempHandle, tempHandle1, tempHandle2, gradientHandle, objectHandle, layerHandle, viewportHandle:HANDLE; hatchName1:STRING; BEGIN {VectorWorks Version 11.0.0 (29707)} {Global Characteristics} DrwSize(1,1); SetUnits(0,1,0,25.400000000000006,'mm',' sq mm'); PrimaryUnits(0,1,1,2,6,FALSE,FALSE); SecondaryUnits(1,3,1,TRUE,TRUE); SetPrefLongInt(162,1); SetPrefLongInt(169,1); SetPrefLongInt(171,3); SetPrefLongInt(172,3); SetPrefLongInt(212,3); SetPrefLongInt(219,3); SetPrefLongInt(221,3); SetPrefLongInt(222,3); SetPrefInt(174,0); SetPrefInt(224,0); SetPref(167,FALSE); SetPref(173,TRUE); SetPref(223,FALSE); SetPref(175,FALSE); SetPref(225,TRUE); GridLines(0.5); PenGrid(0.125); DoubLines(0); SetPrefReal(73,0); SetOriginAbsolute(-204.000000000000057,144.000000000000028); SetPref(37,TRUE); SetPref(38,TRUE); SetPref(5,TRUE); OpenPoly; SetDashStyle(TRUE,2,0.041656,0.041672); SetDashStyle(TRUE,2,0.097214,0.041671); SetDashStyle(TRUE,2,0.208328,0.041672); SetDashStyle(TRUE,2,0.263885,0.041657); SetDashStyle(TRUE,2,0.013885,0.027771); SetDashStyle(TRUE,4,0.125,0.041656,0.013886,0.027786); SetDashStyle(TRUE,6,0.125,0.041656,0.125,0.041672,0.013886,0.027786); SetDashStyle(TRUE,6,0.125,0.041656,0.013886,0.027786,0.013886,0.027786); SetDashStyle(TRUE,4,0.75,0.055557,0.138886,0.055557); SetDashStyle(TRUE,6,0.75,0.055557,0.138886,0.055557,0.125,0.0625); SetPrefInt(121,0); SetPrefReal(68,0); SetPrefReal(69,0); SetPrefReal(70,1); {End of Global Characteristics} {Record Format Entries} {Begin Visible Record Format Entries} {End of Visible Record Format Entries} {Begin Hidden Record Format Entries} {End of Hidden Record Format Entries} {End of Record Format Entries} {Worksheet Entries} {End of Worksheet Entries} {Gradient Definition Entries} {End of GradientDefinition Entries} {Hatch Definition Entries} hatchName1:= 'Default Hatch'; BeginVectorFillN(hatchName1,TRUE,FALSE,0); AddVectorFillLayer(0,0,1,1,0.176776695,-0.176776695,1,1,255); EndVectorFill; {End of Hatch Definition Entries} {Symbol Library Entries} {End of Symbol Library Entries} {Layer Characteristics} layerHandle := CreateLayer('Design Layer-1', 1); SetScale(1); ShowLayer; CopyMode(8); LFillFore(0,0,0); LFillBack(65535,65535,65535); LPenFore(0,0,0); LPenBack(65535,65535,65535); Projection(6,0,247.904000000000025,80.04800000000003,-20.04800000000002,327.952000000000055,-267.952000000000055); {End of Layer Characteristics} {Object Creation Code} NameClass('Dimension'); PenSize(1); PenPat(2); Marker(0,0.125,15); PenFore(0,0,0); PenBack(65535,65535,65535); MoveTo(1.000000000000057,-101.000000000000057); LineTo(1.000000000000057,-11.000000000000002); MoveTo(1.000000000000057,-101.000000000000057); LineTo(89.462019147507604,-147.631225250319233); MoveTo(89.462019147507604,-147.631225250319233); LineTo(109.462019147507618,-147.631225250319233); PenFore(65535,0,65535); MoveTo(89.462019147507604,-147.631225250319233); LineTo(89.462019147507604,-47.631225250319218); MoveTo(266.38605744252277,-147.631225250319233); LineTo(346.001874675279623,-105.66312252503198); MoveTo(177.924038295015208,-101.000000000000057); LineTo(177.924038295015208,-11.000000000000002); PenFore(0,0,0); MoveTo(177.924038295015208,-101.000000000000057); LineTo(266.38605744252277,-147.631225250319233); PenFore(65535,0,65535); MoveTo(266.38605744252277,-147.631225250319233); LineTo(266.38605744252277,-47.631225250319218); MoveTo(354.848076590030303,-101.000000000000057); LineTo(354.848076590030303,-10.99999999999986); MoveTo(89.462019147507604,-147.631225250319233); LineTo(169.077836380264472,-105.66312252503198); PenFore(0,0,0); MoveTo(266.38605744252277,-147.631225250319233); LineTo(286.38605744252277,-147.631225250319233); MoveTo(169.077836380264472,-105.66312252503198); LineTo(169.077836380264472,-116.205777033643869); MoveTo(346.001874675279623,-105.66312252503198); LineTo(346.001874675279623,-116.205777033643926); PenFore(65535,0,65535); MoveTo(9.846201914751589,-5.663122525032635); LineTo(80.615817232756868,-42.968102725287288); PenFore(0,0,0); MoveTo(266.38605744252277,-47.631225250319218); LineTo(346.001874675279737,-5.663122525031839); PenFore(65535,0,65535); MoveTo(186.770240209765944,-5.663122525031953); LineTo(257.539855527772147,-42.968102725287288); PenFore(0,0,0); MoveTo(89.462019147507604,-47.631225250319218); LineTo(169.077836380264529,-5.663122525032181); MoveTo(80.615817232756868,-42.968102725287288); LineTo(80.615817232756868,-32.42544821667537); MoveTo(11.000000000000286,-1); LineTo(21.00000000000006,-1); MoveTo(187.924038295015208,-1); LineTo(197.924038295015237,-1); MoveTo(354.848076590030303,-101.000000000000057); LineTo(364.848076590030303,-95.226497308103873); MoveTo(257.539855527772147,-42.968102725287288); LineTo(257.539855527772147,-32.42544821667537); MoveTo(197.924038295015237,-1); LineTo(257.539855527772147,-32.42544821667537); MoveTo(109.462019147507618,-147.631225250319233); LineTo(169.077836380264472,-116.205777033643869); MoveTo(21.00000000000006,-1); LineTo(80.615817232756868,-32.42544821667537); MoveTo(286.38605744252277,-147.631225250319233); LineTo(346.001874675279623,-116.205777033643926); MoveTo(80.615817232756868,-42.968102725287288); LineTo(89.462019147507604,-47.631225250319218); MoveTo(169.077836380264472,-105.66312252503198); LineTo(177.924038295015208,-101.000000000000057); MoveTo(257.539855527772147,-42.968102725287288); LineTo(266.38605744252277,-47.631225250319218); MoveTo(346.001874675279623,-105.66312252503198); LineTo(354.848076590030303,-101.000000000000057); FillPat(0); PenFore(65535,0,65535); FillFore(0,0,0); FillBack(65535,65535,65535); Arc(-99.000000000000028,99.000000000000057,101.000000000000114,-101.000000000000057,#270.0000000000d,#62.20481811698d); Arc(-10.537980852492355,-47.631225250319297,189.462019147507561,-247.631225250319261,#27.79518188302d,#62.20481811698d); Arc(77.924038295015166,99.000000000000057,277.924038295015237,-101.000000000000057,#270.0000000000d,#62.20481811698d); Arc(166.386057442522912,-47.631225250319297,366.386057442522826,-247.631225250319261,#27.79518188302d,#62.20481811698d); PenFore(0,0,0); MoveTo(364.848076590030303,-1); LineTo(364.848076590030303,-95.226497308103873); Arc(-9.000000000000229,9.000000000000286,11.000000000000345,-11.000000000000286,#270.0000000000d,#90.00000000000d); Arc(167.924038295015265,8.999999999999945,187.924038295015151,-10.999999999999945,#207.7951818830d,#152.2048181170d); Arc(344.848076590030416,8.999999999999945,364.848076590030303,-10.999999999999945,#207.7951818830d,#152.2048181170d); SetZVals(0,0); {End of Creation Code} {Classes} NameClass('None'); SetClFillFore('None',0,0,0); SetClFillBack('None',65535,65535,65535); SetClPenFore('None',0,0,0); SetClPenBack('None',65535,65535,65535); SetClFPat('None',1); SetClLS('None',2); SetClLW('None',1); SetClUseGraphic('None',FALSE); NameClass('Dimension'); SetClFillFore('Dimension',0,0,0); SetClFillBack('Dimension',65535,65535,65535); SetClPenFore('Dimension',0,0,0); SetClPenBack('Dimension',65535,65535,65535); SetClFPat('Dimension',1); SetClLS('Dimension',2); SetClLW('Dimension',1); SetClUseGraphic('Dimension',FALSE); {End of Class Entries} {Default Attributes} PenSize(1); PenPat(2); FillPat(1); Marker(0,0.125,15); PenFore(0,0,0); PenBack(65535,65535,65535); FillFore(0,0,0); FillBack(65535,65535,65535); {End of Default Attributes} END; Run(LoadFile);