5 0 0 1 1 0 WEATHER WB-[parentid] Material set in combinelines-definition, must have material tag here too WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] Material set in combinelines-definition, must have material tag here too WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-CORNER WBCORNER Material set in combinelines-definition, must have material tag here too WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] Material set in combinelines-definition, must have material tag here too WEATHER-VISOR WEATHER-JAMB WBJAMB-[parentid] WEATHER-JAMB WBJAMB-[parentid] WEATHER-SUPP WBSUPP 0.0005 then -- Changes anchor to exterior side and move comes here (forget about additional wall thickness) gFrameAnchor=1 gFrameMove=sill end end -- # GUID of the libpart, first part only sGuid=string.lower(ac_objectget("#libguid")) -- NOTE! Lowercase i1,i2=string.find( sGuid, "}-{", 1, true ) if i1==nil then error( "Bad guid: " .. sGuid ) end --ac_msgbox( sGuid ) sGuid=string.sub(sGuid, 1, i1) gForceType=gtblForceType[sGuid] -- Openings to skip if gtblSkipOpenings[sGuid]~=nil then return true end -- # Outline gPoints = {} if HandleStandardOpening(sGuid) then return true end s=string.lower(ac_objectget("#libname")) if s=="fw_angle_1" or s=="fw_angle_2" or s=="fw_angle_3" or s=="fw_angle_4" or s=="re-anglewindow" then return DoHonkaAngled() end if s=="fw_triangle_asymmetry_1" or s=="fw_triangle_asymmetry_2" or s=="re-window_triangle" or s=="re-fire-exit" then return DoHonkaTriangleAsym() end if s=="fw_triangle_symmetry_1" or s=="fw_triangle_symmetry_2" or s=="fw_triangle_symmetry_3" or s=="fw_triangle_symmetry_4" or s=="dk-window_triangle" then return DoHonkaTriangleSym() end return false end function AddPoint(x, y) local tblNew tblNew={} tblNew.x = x tblNew.y = y gnPoints=gnPoints+1 gPoints[gnPoints] = tblNew end -- Handles AC standard non-rectangular openings function HandleStandardOpening(sGuid) local xc,yc if sGuid=="{77ce5643-29cb-422b-9f37-0c14188d5f28}" or sGuid=="{f5a82f0c-fa24-4ed7-a165-76378c98d635}" then -- W Triangle fix xc = ac_objectget("tec") if xc==nil then return false end AddPoint( -gA2, 0 ) AddPoint( gA2, 0 ) AddPoint( xc, gB ) return true end if sGuid=="{a668efe1-61ad-4f3c-b91b-2858f72e6e95}" then -- W Puolisuunnikas kiinteä yc = ac_objectget("h") if yc==nil then yc=ac_objectget("gs_shoulderHeight") if yc==nil then return false end end AddPoint( -gA2, 0 ) AddPoint( gA2, 0 ) AddPoint( gA2, gB ) AddPoint( -gA2, yc ) return true end if sGuid=="{53675399-65b4-4441-9957-8f36aac723e1}" then -- W Pentagon yc=ac_objectget("gs_shoulderHeight") if yc==nil then return false end AddPoint( -gA2, 0 ) AddPoint( gA2, 0 ) AddPoint( gA2, yc ) AddPoint( 0, gB ) AddPoint( -gA2, yc ) return true end if sGuid=="{2d19806d-b52d-413b-ac7c-8f5be4770019}" or sGuid=="{ec8938e1-d17a-4198-ac92-8fb2f6f81ace}" or sGuid=="{44fa57e3-7a05-4e54-a4e9-29d38d8788be}" or sGuid=="{c5df0246-6ebc-48f4-bbdb-4c2339c00950}" or sGuid=="{b09d51ec-d205-4631-9edd-04de2fb03a37}" or sGuid=="{abc16a5c-cb71-4a0d-ae9b-3912578a481a}" or sGuid=="{f9d3dbbc-3107-45ad-bee0-4fc516039616}" then -- W1 Trapezoid yc = ac_objectget("h") if yc==nil then yc=ac_objectget("gs_shoulderHeight") if yc==nil then return false end end AddPoint( -gA2, 0 ) AddPoint( gA2, 0 ) AddPoint( gA2, gB ) AddPoint( -gA2, yc ) return true end return false end -- Handles windows having angled top with parameter SR defining left side height function DoHonkaAngled() local h h=ac_objectget("SR") -- Height of edge (defailt if h==nil then return false end AddPoint( -gA2, 0 ) -- left bottom AddPoint( gA2, 0 ) -- right bottom AddPoint( gA2, gB ) -- right top AddPoint( -gA2, h ) -- left top return true end -- Handles windows triangle top asymmetric function DoHonkaTriangleAsym() local yLeft, yRight, xMid yLeft=ac_objectget("SR") yRight=ac_objectget("SL") xMid=ac_objectget("TS") if yLeft==nil or yRight==nil or xMid==nil then return false end AddPoint( -gA2, 0 ) -- left bottom AddPoint( gA2, 0 ) -- right bottom AddPoint( gA2, yRight ) -- right top AddPoint( gA2-xMid, gB ) -- mid top AddPoint( -gA2, yLeft ) -- left top return true end -- Handles windows triangle top asymmetric function DoHonkaTriangleSym() local y y=ac_objectget("SI") if y==nil then return false end AddPoint( -gA2, 0 ) -- left bottom AddPoint( gA2, 0 ) -- right bottom AddPoint( gA2, y ) -- right top AddPoint( 0, gB ) -- mid top AddPoint( -gA2, y ) -- left top return true end ]]>