cancel
Showing results for 
Search instead for 
Did you mean: 
cancel
Showing results for 
Search instead for 
Did you mean: 
Starting August 6, 2024, TLS 1.2 will be the minimum required protocol version for Graphisoft products and services that require an online connection. Learn more…
Libraries & objects
About Archicad and BIMcloud libraries, their management and migration, objects and other library parts, etc.

2D Only Complex Profile

Lingwisyer
Guru
Hi all,

This is probably an odd request, but is there someway to draw a Complex Profile in 2D?

for _iComp = 1 to _nComponentsT

	if _bShowPart[_iComp] then
		dim _currSurfaces[]
		n = REQUEST{3} ("Profile_component_info", myProfileIdxT, _iComp, "gs_profile_comp_surfaces", _currSurfaces)

		_bmat = 1
		_surface = 1
		_pen = 1

		n = REQUEST{3} ("Profile_component_info", myProfileIdxT, _iComp, "gs_profile_bmat", _bmat)
		n = REQUEST{3} ("Profile_component_info", myProfileIdxT, _iComp, "gs_profile_surface", _surface)
		n = REQUEST{3} ("Profile_component_info", myProfileIdxT, _iComp, "gs_profile_outlinepen", _pen)

		building_material _bmat
		pen _pen

		_surfIdx = 1
		for _i = _contStartPointsT[_iComp] to _contEndPointsT[_iComp] step 5

		put _profileGeometryRawDataT[_i], 
			_profileGeometryRawDataT[_i + 1], 
			!0, 	! angle of sides from the perpendicular plane
			_profileGeometryRawDataT[_i + 2] * 15 + not(_profileGeometryRawDataT[_i + 3]) * 64 + _profileGeometryRawDataT[_i + 4], 
			!_currSurfaces[_surfIdx]	
					
		_surfIdx = _surfIdx + 1
		next _i

		Poly2_b	NSP/3,	15,
				gs_fill_pen2, gs_back_pen2,
				get(NSP)
	endif

next _iComp

It basically comes down to an understanding of how to manipulate _profileGeometryRawData. From it's interaction with cprism_{2} we can see that it follows:
x1, y1, alpha1, s1, mat1,
...
xn, yn, alphan, sn, matn

I had figured that I could just comment out the alpha and mat buffer adds and reflect that in the node count, but I get a missing parameters warning so I am assuming I have overlooked something...



Ling.

AC22-23 AUS 7000Help Those Help You - Add a Signature
Self-taught, bend it till it breaksCreating a Thread
Win11 | i9 10850K | 64GB | RX6600 Win10 | R5 2600 | 16GB | GTX1660
0 REPLIES 0