Procedure LoadFile;
VAR
	hatchName, gradientName, tileName, objectName:STRING;
	result, index, segmentIndex:INTEGER;
	boolResult:BOOLEAN;
	top, left, bottom, right:REAL;
	tileRepPoint, tileOffPoint:POINT;
	tempHandle, tempHandle1, tempHandle2, tempHandle3, tempHandle4, tempHandle5, tempHandle6, gradientHandle, objectHandle, layerHandle, classHandle, viewportHandle, tileHandle, tileGroupHandle, textHandle:HANDLE;
   dynCharArray, tempDescriptionText:DYNARRAY [] OF CHAR;

BEGIN
{VectorWorks Version 25.0.2(530873)}

{Global Characteristics}

DrwSize(1,1);
SetUnits(0,3,0,25.399999999999999,'mm',' sq mm');
PrimaryUnits(0,3,3,2,6,FALSE,FALSE);
SecondaryUnits(1,3,1,TRUE,TRUE);
SetPrefLongInt(162,3);
SetPrefLongInt(169,3);
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(10);
PenGrid(2);
SetPrefReal(73,0);
SetOriginAbsolute(0,0);
SetPref(37,FALSE);
SetPref(38,TRUE);
SetPref(5,FALSE);
OpenPoly;
SetPrefInt(121,0);
SetPrefReal(68,0);
SetPrefReal(69,0);
SetPrefReal(70,1);

{End of Global Characteristics}

SetDocDrpShadowData(FALSE,0,0.1,0.05,#315.0000000000d,75,0,0,0);

{Record Format Entries}

{Begin Visible Record Format Entries}

{End of Visible Record Format Entries}

{Begin Hidden Record Format Entries}
NewField('NNA__MassAndForceUnits','Mass Unit','2',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Mass Precision','2',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Show Mass Mark','True',2,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Mass Unit Name','Kilograms',4,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Mass Unit Mark','kg',4,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Mass Unit Scale','1000',3,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Mass Unit Link','2',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Mass Unit Type','-1',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Mass Distr Unit','1',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Mass Distr Precision','2',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Show Mass Distr Mark','True',2,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom MassDistr Unit Name','',4,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom MassDistr Unit Mark','kg/m',4,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom MassDistr Unit Scale','1',3,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom MassDistr Mass Unit','2',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom MassDistr Lenght Unit','9',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Force Unit','1',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Force Precision','2',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Show Force Mark','True',2,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Force Unit Name','Kilonewton',4,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Force Unit Mark','kN',4,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Force Unit Scale','1000',3,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Force Unit Link','1',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);
NewField('NNA__MassAndForceUnits','Custom Force Unit Type','-1',1,0);
SetObjectVariableBoolean(GetObject('NNA__MassAndForceUnits'),900,FALSE);

{End of Hidden Record Format Entries}

{End of Record Format Entries}

{LineType Definition Entries}

SetDashStyleN('VW-01 Short Dashed',TRUE,2,0.041656,0.041656);
SetDashStyleN('ISO-07 Dotted',TRUE,2,0.005,0.03);
SetDashStyleN('ISO-02 Dashed',TRUE,2,0.12,0.03);
{End of LineTypeDefinition Entries}

{Worksheet Entries}

{End of Worksheet Entries}

{Gradient Definition Entries}

{End of GradientDefinition Entries}

{Tile Definition Entries}

{End of TileDefinition Entries}

{LayerLevelType Entries}

tempHandle := GetObject('Foundation');
IF tempHandle = nil THEN
	boolResult := CreateLayerLevelType('Foundation');
tempHandle := GetObject('Ledge');
IF tempHandle = nil THEN
	boolResult := CreateLayerLevelType('Ledge');
tempHandle := GetObject('Bottom of Structure');
IF tempHandle = nil THEN
	boolResult := CreateLayerLevelType('Bottom of Structure');
tempHandle := GetObject('Top of Structure');
IF tempHandle = nil THEN
	boolResult := CreateLayerLevelType('Top of Structure');
tempHandle := GetObject('Finish Floor');
IF tempHandle = nil THEN
	boolResult := CreateLayerLevelType('Finish Floor');
tempHandle := GetObject('Ceiling');
IF tempHandle = nil THEN
	boolResult := CreateLayerLevelType('Ceiling');
{End of LayerLevelType Entries}

{Story Entries}

{End of Story Entries}

{Hatch Definition Entries}

{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.903999999999968,-143.594666666666654,143.594666666666654,143.594666666666654,-143.594666666666654);

{End of Layer Characteristics}

{Object Creation Code}

SetZVals(0,0);

{Layer Characteristics}

layerHandle := CreateLayer('Design Layer-2', 1);
SetScale(1);
ShowLayer;
LFillFore(0,0,0);
LFillBack(65535,65535,65535);
LPenFore(0,0,0);
LPenBack(65535,65535,65535);

Projection(6,0,247.903999999999968,-143.594666666666654,143.594666666666654,143.594666666666654,-143.594666666666654);

{End of Layer Characteristics}

{Object Creation Code}

SetZVals(0,0);

{Layer Characteristics}

layerHandle := CreateLayer('Design Layer-3', 1);
SetScale(1);
ShowLayer;
LFillFore(0,0,0);
LFillBack(65535,65535,65535);
LPenFore(0,0,0);
LPenBack(65535,65535,65535);

Projection(6,0,247.903999999999968,-143.594666666666654,143.594666666666654,143.594666666666654,-143.594666666666654);

{End of Layer Characteristics}

{Object Creation Code}

SetZVals(0,0);

{Layer Characteristics}

layerHandle := CreateLayer('Design Layer-4', 1);
SetScale(1);
ShowLayer;
LFillFore(0,0,0);
LFillBack(65535,65535,65535);
LPenFore(0,0,0);
LPenBack(65535,65535,65535);

Projection(6,0,247.903999999999968,-143.594666666666654,143.594666666666654,143.594666666666654,-143.594666666666654);

{End of Layer Characteristics}

{Object Creation Code}

SetZVals(0,0);

{Layer Characteristics}

layerHandle := CreateLayer('Design Layer-5', 1);
SetScale(1);
ShowLayer;
LFillFore(0,0,0);
LFillBack(65535,65535,65535);
LPenFore(0,0,0);
LPenBack(65535,65535,65535);

Projection(6,0,247.903999999999968,-143.594666666666654,143.594666666666654,143.594666666666654,-143.594666666666654);

{End of Layer Characteristics}

{Object Creation Code}

SetZVals(0,0);

{Layer Characteristics}

layerHandle := CreateLayer('Design Layer-6', 1);
SetScale(1);
ShowLayer;
LFillFore(0,0,0);
LFillBack(65535,65535,65535);
LPenFore(0,0,0);
LPenBack(65535,65535,65535);

Projection(6,0,247.903999999999968,-143.594666666666654,143.594666666666654,143.594666666666654,-143.594666666666654);

{End of Layer Characteristics}

{Object Creation Code}

SetZVals(0,0);

{Layer Characteristics}

layerHandle := CreateLayer('Design Layer-7', 1);
SetScale(1);
ShowLayer;
LFillFore(0,0,0);
LFillBack(65535,65535,65535);
LPenFore(0,0,0);
LPenBack(65535,65535,65535);

Projection(6,0,247.903999999999968,-143.594666666666654,143.594666666666654,143.594666666666654,-143.594666666666654);

{End of Layer Characteristics}

{Object Creation Code}

SetZVals(0,0);

{Layer Characteristics}

layerHandle := CreateLayer('Design Layer-8', 1);
SetScale(6);
ShowLayer;
LFillFore(0,0,0);
LFillBack(65535,65535,65535);
LPenFore(0,0,0);
LPenBack(65535,65535,65535);

Projection(6,0,247.903999999999968,-143.594666666666654,143.594666666666654,143.594666666666654,-143.594666666666654);

{End of Layer Characteristics}

{Object Creation Code}

NameClass('None');
BeginGroup;
ClosePoly;
PenSize(14);
PenPatN(2);
FillPat(0);
PenFore(65535,0,0);
PenBack(65535,65535,65535);
FillFore(0,0,0);
FillBack(65535,65535,65535);
boolResult := SetDefaultBeginningMarker(0,15,0.125,0,34,0.05,FALSE);
boolResult := SetDefaultEndMarker(0,15,0.125,0,34,0.05,FALSE);
BeginPoly;
  MoveTo(-380,265.756471538039307);
  Add2DVertex(-334.038059222874381,284.794530760913801,4,65.000000000000171);
  LineTo(-315,330.756471538039307);
  LineTo(-315,342.363530361568678);
  Add2DVertex(-104.999999999999545,552.363530361568678,4,210.000000000000341);
  LineTo(105.000000000000455,342.363530361568849);
  LineTo(105.000000000000455,330.75647153803925);
  Add2DVertex(124.038059222874836,284.794530760914029,4,65);
  LineTo(170,265.756471538039307);
  LineTo(170,-606.681175520783995);
  LineTo(-380,-606.681175520784222);
EndPoly;
objectHandle := LNewObj;
SetDropShadowData(objectHandle, 0,0.1,0.05,#315.0000000000d,75,0,0,0);
EnableDropShadow(objectHandle, FALSE);

objectHandle := LNewObj;
SetObjectVariableBoolean(objectHandle, 1160, FALSE);

OpenPoly;
PenSize(7);
PenFore(0,0,0);
BeginPoly;
  MoveTo(-327.48522675535969,217.322796683241279);
  Add2DVertex(-274.668744772550781,263.448770104919561,4,125.00000000000027);
  LineTo(-255,330.75647153803925);
  LineTo(-255,342.363530361568621);
  Add2DVertex(-211.066017177981848,448.429547539550811,4,0);
  LineTo(-105,492.363530361568621);
  Add2DVertex(1.066017177982303,448.429547539550583,4,0);
  LineTo(45,342.363530361568621);
  LineTo(45,330.756471538039307);
  Add2DVertex(64.668744772551236,263.448770104919561,4,150.000000000000227);
  LineTo(117.485226755360145,217.322796683241279);
EndPoly;
SetVertexVisibility(LNewObj,10,false);
objectHandle := LNewObj;
SetDropShadowData(objectHandle, 0,0.1,0.05,#315.0000000000d,75,0,0,0);
EnableDropShadow(objectHandle, FALSE);

objectHandle := LNewObj;
SetObjectVariableBoolean(objectHandle, 1160, FALSE);

PenSize(2);
OvalN(-195,293.318824479215834,1,0,180,150);
objectHandle := LNewObj;
SetDropShadowData(objectHandle, 0,0.1,0.05,#315.0000000000d,75,0,0,0);
EnableDropShadow(objectHandle, FALSE);

objectHandle := LNewObj;
SetObjectVariableBoolean(objectHandle, 1160, FALSE);

EndGroup;
objectHandle := LNewObj;
SetDropShadowData(objectHandle, 0,0.1,0.05,#315.0000000000d,75,0,0,0);
EnableDropShadow(objectHandle, FALSE);


SetZVals(0,0);

OpacityN(100,100);

{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);
boolResult := SetClassBeginningMarker('None',0,15,0.125,0,34,0.05);
boolResult := SetClassEndMarker('None',0,15,0.125,0,34,0.05);
SetClFPat('None',1);
SetClLSN('None',2);
SetClLW('None',2);
SetCLDrpShadowData('None',0,0.1,0.05,#315.0000000000d,75,0,0,0);
EnableCLDropShadow('None',FALSE);

SetClUseGraphic('None',FALSE);
classHandle := GetObject('None');
NameClass('Dimension');
SetClFillFore('Dimension',0,0,0);
SetClFillBack('Dimension',65535,65535,65535);
SetClPenFore('Dimension',0,0,0);
SetClPenBack('Dimension',65535,65535,65535);
boolResult := SetClassBeginningMarker('Dimension',0,15,0.125,0,34,0.05);
boolResult := SetClassEndMarker('Dimension',0,15,0.125,0,34,0.05);
SetClFPat('Dimension',1);
SetClLSN('Dimension',2);
SetClLW('Dimension',2);
SetCLDrpShadowData('Dimension',0,0.1,0.05,#315.0000000000d,75,0,0,0);
EnableCLDropShadow('Dimension',FALSE);

SetClUseGraphic('Dimension',FALSE);
classHandle := GetObject('Dimension');

{End of Class Entries}

{Default Attributes}

PenSize(2);
PenPatN(2);
FillPat(0);
boolResult := SetDefaultBeginningMarker(0,15,0.125,0,34,0.05,FALSE);
boolResult := SetDefaultEndMarker(0,15,0.125,0,34,0.05,FALSE);
PenFore(0,0,0);
PenBack(65535,65535,65535);
FillFore(0,0,0);
FillBack(65535,65535,65535);
SetDocDrpShadwByCls(True);

{End of Default Attributes}


END;

Run(LoadFile);