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,2,0,2.54,'cm',' sq cm'); PrimaryUnits(0,2,1,2,6,FALSE,FALSE); SecondaryUnits(4,1,2,FALSE,FALSE); SetPrefLongInt(162,2); SetPrefLongInt(169,1); SetPrefLongInt(171,3); SetPrefLongInt(172,3); SetPrefLongInt(212,1); SetPrefLongInt(219,1); SetPrefLongInt(221,3); SetPrefLongInt(222,3); SetPrefInt(174,0); SetPrefInt(224,0); SetPref(167,FALSE); SetPref(173,TRUE); SetPref(223,TRUE); SetPref(175,FALSE); SetPref(225,FALSE); GridLines(1); PenGrid(0.2); DoubLines(13.970000000000002); SetPrefReal(73,0); SetOriginAbsolute(0,0); SetPref(37,TRUE); SetPref(38,TRUE); SetPref(5,FALSE); 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} NewField('NNA_SelectWallType','Current Wall Type','Frame-Wd 2x6 to 96" H.',4,0); SetObjectVariableBoolean(GetObject('NNA_SelectWallType'),900,FALSE); NewField('NNA_SelectWallType','Class','Wall-Ext-Frame',4,0); SetObjectVariableBoolean(GetObject('NNA_SelectWallType'),900,FALSE); NewField('NNA_SelectWallType','Height','96.00000000',4,0); SetObjectVariableBoolean(GetObject('NNA_SelectWallType'),900,FALSE); NewField('NNA_PrefSetPointer','Path','Plug-Ins\VW_Arch\Data\Prefs_Def\',4,0); SetObjectVariableBoolean(GetObject('NNA_PrefSetPointer'),900,FALSE); NewField('NNA_PrefSetPointer','Name','VA Defaults',4,0); SetObjectVariableBoolean(GetObject('NNA_PrefSetPointer'),900,FALSE); {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,24.790400000000002,-12.395200000000001,12.395200000000001,12.395200000000001,-12.395200000000001); {End of Layer Characteristics} {Object Creation Code} NameClass('None'); PenSize(1); PenPat(2); FillPat(1); PenFore(0,0,0); PenBack(65535,65535,65535); FillFore(0,0,0); FillBack(65535,65535,65535); Rect(50.200000000000017,25.000000000000007,75.200000000000017,10.000000000000002); Marker(0,0.125,15); Arc(51.900000000000013,23.300000000000004,52.500000000000014,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(51.900000000000013,12.300000000000004,52.500000000000014,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(72.90000000000002,12.300000000000004,73.500000000000014,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(72.90000000000002,23.300000000000004,73.500000000000014,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(54.283333333333019,20.000000000000004,59.283333333333019,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(25.000000000000007,25.000000000000007,50.000000000000014,10.000000000000002); Arc(26.700000000000006,23.300000000000004,27.300000000000008,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(26.700000000000006,12.300000000000004,27.300000000000008,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(47.70000000000001,12.300000000000004,48.300000000000011,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(47.70000000000001,23.300000000000004,48.300000000000011,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(28.500000000000007,20.000000000000004,33.500000000000007,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(75.40000000000002,25.000000000000007,100.400000000000034,10.000000000000002); Arc(77.100000000000009,23.300000000000004,77.700000000000017,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(77.100000000000009,12.300000000000004,77.700000000000017,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(98.100000000000023,12.300000000000004,98.700000000000031,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(98.100000000000023,23.300000000000004,98.700000000000031,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(80.066666663333038,20.000000000000004,85.066666663333038,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(100.600000000000023,25.000000000000007,125.600000000000023,10.000000000000002); Arc(102.300000000000026,23.300000000000004,102.900000000000034,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(102.300000000000026,12.300000000000004,102.900000000000034,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(123.300000000000026,12.300000000000004,123.900000000000034,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(123.300000000000026,23.300000000000004,123.900000000000034,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(105.853333333333026,20.000000000000004,110.853333333333026,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(125.800000000000026,25.000000000000007,150.80000000000004,10.000000000000002); Arc(127.500000000000028,23.300000000000004,128.100000000000023,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(127.500000000000028,12.300000000000004,128.100000000000023,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(148.500000000000028,12.300000000000004,149.100000000000023,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(148.500000000000028,23.300000000000004,149.100000000000023,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(131.633333333333042,20.000000000000004,136.633333333333042,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(151.000000000000028,25.000000000000007,176.000000000000028,10.000000000000002); Arc(152.700000000000017,23.300000000000004,153.30000000000004,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(152.700000000000017,12.300000000000004,153.30000000000004,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(173.700000000000017,12.300000000000004,174.30000000000004,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(173.700000000000017,23.300000000000004,174.30000000000004,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(157.413333333333014,20.000000000000004,162.413333333333014,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(176.200000000000017,25.000000000000007,201.200000000000045,10.000000000000002); Arc(177.900000000000034,23.300000000000004,178.500000000000028,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(177.900000000000034,12.300000000000004,178.500000000000028,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(198.900000000000063,12.300000000000004,199.500000000000057,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(198.900000000000063,23.300000000000004,199.500000000000057,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(183.193333333333044,20.000000000000004,188.193333333333044,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(201.400000000000063,25.000000000000007,226.400000000000063,10.000000000000002); Arc(203.100000000000051,23.300000000000004,203.700000000000045,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(203.100000000000051,12.300000000000004,203.700000000000045,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(224.100000000000051,12.300000000000004,224.700000000000045,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(224.100000000000051,23.300000000000004,224.700000000000045,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(208.973333333333045,20.000000000000004,213.973333333333045,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(226.600000000000051,25.000000000000007,251.600000000000051,10.000000000000002); Arc(228.300000000000068,23.300000000000004,228.900000000000063,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(228.300000000000068,12.300000000000004,228.900000000000063,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(249.300000000000068,12.300000000000004,249.900000000000063,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(249.300000000000068,23.300000000000004,249.900000000000063,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(234.753333333333046,20.000000000000004,239.753333333333046,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(251.800000000000068,25.000000000000007,276.800000000000068,10.000000000000002); Arc(253.500000000000057,23.300000000000004,254.100000000000051,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(253.500000000000057,12.300000000000004,254.100000000000051,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(274.500000000000057,12.300000000000004,275.10000000000008,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(274.500000000000057,23.300000000000004,275.10000000000008,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(260.533333333332962,20.000000000000004,265.533333333332962,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(277.000000000000057,25.000000000000007,302.000000000000057,10.000000000000002); Arc(278.700000000000045,23.300000000000004,279.300000000000068,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(278.700000000000045,12.300000000000004,279.300000000000068,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(299.700000000000045,12.300000000000004,300.300000000000068,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(299.700000000000045,23.300000000000004,300.300000000000068,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(286.313333333333048,20.000000000000004,291.313333333333048,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(302.200000000000045,25.000000000000007,327.200000000000045,10.000000000000002); Arc(303.900000000000034,23.300000000000004,304.500000000000057,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(303.900000000000034,12.300000000000004,304.500000000000057,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(324.900000000000034,12.300000000000004,325.500000000000057,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(324.900000000000034,23.300000000000004,325.500000000000057,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(312.093333333333021,20.000000000000004,317.093333333333021,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(327.400000000000034,25.000000000000007,352.400000000000034,10.000000000000002); Arc(329.10000000000008,23.300000000000004,329.700000000000045,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(329.10000000000008,12.300000000000004,329.700000000000045,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(350.10000000000008,12.300000000000004,350.700000000000045,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(350.10000000000008,23.300000000000004,350.700000000000045,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(337.873333333333051,20.000000000000004,342.873333333333051,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(352.60000000000008,25.000000000000007,377.60000000000008,10.000000000000002); Arc(354.300000000000068,23.300000000000004,354.900000000000034,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(354.300000000000068,12.300000000000004,354.900000000000034,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(375.300000000000068,12.300000000000004,375.900000000000034,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(375.300000000000068,23.300000000000004,375.900000000000034,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(363.653333333333023,20.000000000000004,368.653333333333023,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(377.800000000000068,25.000000000000007,402.800000000000125,10.000000000000002); Arc(379.500000000000057,23.300000000000004,380.10000000000008,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(379.500000000000057,12.300000000000004,380.10000000000008,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(400.500000000000114,12.300000000000004,401.100000000000136,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(400.500000000000114,23.300000000000004,401.100000000000136,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(389.43333333333311,20.000000000000004,394.43333333333311,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(403.000000000000114,25.000000000000007,428.000000000000114,10.000000000000002); Arc(404.700000000000102,23.300000000000004,405.300000000000125,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(404.700000000000102,12.300000000000004,405.300000000000125,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(425.700000000000102,12.300000000000004,426.300000000000125,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(425.700000000000102,23.300000000000004,426.300000000000125,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(415.213333333333026,20.000000000000004,420.213333333333026,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(428.200000000000102,25.000000000000007,453.200000000000102,10.000000000000002); Arc(429.900000000000091,23.300000000000004,430.500000000000114,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(429.900000000000091,12.300000000000004,430.500000000000114,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(450.900000000000091,12.300000000000004,451.500000000000114,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(450.900000000000091,23.300000000000004,451.500000000000114,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(440.993333333333112,20.000000000000004,445.993333333333112,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(453.400000000000091,25.000000000000007,478.400000000000091,10.000000000000002); Arc(455.100000000000136,23.300000000000004,455.700000000000102,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(455.100000000000136,12.300000000000004,455.700000000000102,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(476.100000000000136,12.300000000000004,476.700000000000102,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(476.100000000000136,23.300000000000004,476.700000000000102,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(466.773333333333085,20.000000000000004,471.773333333333085,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(478.600000000000136,25.000000000000007,503.600000000000136,10.000000000000002); Arc(480.300000000000125,23.300000000000004,480.900000000000091,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(480.300000000000125,12.300000000000004,480.900000000000091,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(501.300000000000125,12.300000000000004,501.900000000000091,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(501.300000000000125,23.300000000000004,501.900000000000091,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(492.553333333333114,20.000000000000004,497.553333333333114,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(503.800000000000125,25.000000000000007,528.800000000000068,10.000000000000002); Arc(505.500000000000114,23.300000000000004,506.100000000000136,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(505.500000000000114,12.300000000000004,506.100000000000136,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(526.500000000000114,12.300000000000004,527.100000000000136,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(526.500000000000114,23.300000000000004,527.100000000000136,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(518.333333333333144,20.000000000000004,523.333333333333144,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(529.000000000000114,25.000000000000007,554.000000000000114,10.000000000000002); Arc(530.700000000000159,23.300000000000004,531.300000000000068,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(530.700000000000159,12.300000000000004,531.300000000000068,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(551.700000000000159,12.300000000000004,552.300000000000068,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(551.700000000000159,23.300000000000004,552.300000000000068,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(544.113333333333117,20.000000000000004,549.113333333333117,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(554.200000000000159,25.000000000000007,579.200000000000159,10.000000000000002); Arc(555.900000000000091,23.300000000000004,556.500000000000114,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(555.900000000000091,12.300000000000004,556.500000000000114,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(576.900000000000091,12.300000000000004,577.500000000000114,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(576.900000000000091,23.300000000000004,577.500000000000114,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(569.893333333333089,20.000000000000004,574.893333333333089,15.000000000000004,#360.0000000000d,#360.0000000000d); Rect(579.400000000000091,25.000000000000007,604.400000000000091,10.000000000000002); Arc(581.100000000000136,23.300000000000004,581.700000000000159,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(581.100000000000136,12.300000000000004,581.700000000000159,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(602.100000000000136,12.300000000000004,602.700000000000159,11.700000000000001,#360.0000000000d,#360.0000000000d); Arc(602.100000000000136,23.300000000000004,602.700000000000159,22.700000000000003,#360.0000000000d,#360.0000000000d); Arc(595.673333333333289,20.000000000000004,600.673333333333289,15.000000000000004,#360.0000000000d,#360.0000000000d); 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(0); 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);