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,2.54,'cm',' sq cm'); PrimaryUnits(0,1,1,2,6,FALSE,FALSE); SecondaryUnits(4,1,2,FALSE,FALSE); SetPrefLongInt(162,1); 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,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} 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(48.000000000000014); ShowLayer; CopyMode(8); LFillFore(0,0,0); LFillBack(65535,65535,65535); LPenFore(0,0,0); LPenBack(65535,65535,65535); Projection(6,0,1189.939200000000028,-594.969600000000014,594.969600000000014,594.969600000000014,-594.969600000000014); {End of Layer Characteristics} {Object Creation Code} NameClass('None'); PenSize(1); PenPat(2); FillPat(0); PenFore(0,0,0); PenBack(65535,65535,65535); FillFore(0,0,0); FillBack(65535,65535,65535); Rect(3.000000000000001,3.000000000000001,20.000000000000004,2); Rect(3.994967497787409,5.342164372692038,20.99496749778741,4.342164372692038); Rect(5.861452070680869,9.434046449171424,22.861452070680876,8.434046449171424); Rect(5.695953245643483,12.953431806390581,22.695953245643484,11.953431806390579); Rect(5.718417920468765,15.505533005767999,22.718417920468767,14.505533005767999); Rect(6.828562273018588,18.36324655903806,23.828562273018587,17.363246559038057); Rect(8.650550859096041,20.653865169225135,25.650550859096047,19.653865169225135); Rect(8.021781060213019,23.668047120578635,25.021781060213023,22.668047120578635); Rect(9.494485305337685,27.502200384533221,26.49448530533769,26.502200384533221); Rect(11.257145908993804,31.689849543748284,28.257145908993806,30.689849543748284); Rect(11.719168675801871,36.284829248939488,28.719168675801878,35.284829248939488); Rect(0,40.000000000000007,30.000000000000007,0); 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);