We value your input!
Please participate in Archicad 28 Home Screen and Tooltips/Quick Tutorials survey

Libraries & objects
About Archicad and BIMcloud libraries, their management and migration, objects and other library parts, etc.

Sliding aluminum doors with bottom track.. does this exist???

And7777
Participant

Am I missing something? But why does ArchiCAD still not provide a sliding external glass door without with a bottom track/frame? 

 

In most countries around the world it is standard that an aluminum framed glass door or even a timber framed glass sliding door has a bottom track. I am trying to use the doors provided in ArchiCAD without going to third party CAD doors. 

 

It seems an extremely basic option to provide a bottom track without having to trick the software with thresholds. Has anyone heard anything or discovered something I'm missing? 

 

 

Operating system used: Windows

1 REPLY 1
Lingwisyer
Guru

I added a basic sill to a bifold by adding a new BLOCK and WALLNICHE to the 3D script of the top level object. You could possibly do the same if need be if you know some basic GDL.

 

Lingwisyer_0-1729235143891.png

 

Ammended Master

 

!===================  UI Pages  ===================

TABID_ROOT = -1

tabIDx = 1
TABID_GENERAL		= tabIDx		: tabIDx = tabIDx + 1

 

 

3D Script

 

 

DEL TOP

Addx -a/2

ADDz gs_sill_ovhg_left + gs_frame_thk - gs_sill_thk

	IF gs_trim_outside then
			Addz -gs_trim_thk_out
		ELSE
			gs_trim_thk_out = 0
	endIF
	IF gs_trim_inside then
			Addz WIDO_SILL
		ELSE
			gs_trim_thk_in = 0
	endIF
	
		MATERIAL gs_frame_mat
		Block A, gs_frame_width, gs_sill_thk !gs_frame_thk + gs_trim_thk_out + gs_trim_thk_in
	
	IF gs_trim_onside then DEL 1
	IF gs_trim_outside then DEL 1

DEL 1



!==============  Wall Hole  =================

PEN WALL_VIEW_PEN
SET MATERIAL WALL_MAT_B

WallNiche 4, 1, 2,
	0,	0,	1,	-WIDO_SILL,
	0,	0,	15,
	A,	0,	15,
	A,	B,	15,
	0,	B,	1


SET MATERIAL WALL_MAT_A


If WIDO_SILL <= 0 then
	WallHole 4, 2,
		0,	0,	15,
		A,	0,	15,
		A,	B,	15,
		0,	B,	1
endIF

WallNiche 4, 1, 2,
	0,	0,	1,	WALL_THICKNESS,
	0,	0,	15,
	A,	0,	15,
	A,	B,	15,
	0,	B,	1

 

 

 

Parameter Script

 

 

IF GLOB_MODPAR_NAME = "gs_sill_thk" | GLOB_MODPAR_NAME = "gs_frame_thk" | GLOB_MODPAR_NAME = "gs_sill_ovhg_left" | GLOB_MODPAR_NAME = "gs_sill_ovhg_right" then
	IF gs_sill_thk < gs_frame_thk + gs_sill_ovhg_left & gs_sill_thk > EPS then
		gs_sill_thk = gs_frame_thk + gs_sill_ovhg_left
		PARAMETERS gs_sill_thk = gs_sill_thk
	endIF
endIF

IF GLOB_MODPAR_NAME = "gs_trim_outside" | GLOB_MODPAR_NAME = "gs_trim_inside" | GLOB_MODPAR_NAME = "gs_sill_thk" then
	IF gs_trim_outside then
			IF gs_trim_inside then	
					gs_sill_thk = WALL_THICKNESS
					PARAMETERS gs_sill_thk = gs_sill_thk
				ELSE
					gs_sill_thk = gs_frame_thk + WIDO_SILL
					PARAMETERS gs_sill_thk = gs_sill_thk	
			endIF
		ELSE
			IF gs_trim_inside then
					gs_sill_thk = WALL_THICKNESS - WIDO_SILL
					PARAMETERS gs_sill_thk = gs_sill_thk
			endIF
	endIF
	!VALUES "gs_sill_thk"	range[WALL_THICKNESS,]
endIF

 

 

 

Interface Script

 

 

tabIDx = tabIDx + 1
TABID_GENERAL			= tabIDx		: tabIDx = tabIDx + 1
TABID_RETURN			= tabIDx		: tabIDx = tabIDx + 1

ui_page TABID_GENERAL, 100, `Sill`,  "uiTab_Style_hl(1)"
gosub "pageGeneral"

!ui_page TABID_RETURN, TABID_ROOT, `Return Settings`,  "uiTab_Style_hl(1)"
!gosub "pageReturn"

!========================================================================================================

"InterfaceEnd":

END

!========================================================================================================

"pageGeneral":

unL = 1

IF gs_trim_outside & gs_trim_inside then
		ui_outfield			"Exterior Overhang",	10,		15+25*unL,	150,	20,	1
			ui_infield{2}	"gs_sill_ovhg_left",	170,	11+25*unL,	80,		20		: unL = unL + 1	
	ELSE
		ui_outfield			"Sill Depth",	10,		15+25*unL,	150,	20,	1
			ui_infield{2}	"gs_sill_thk",			170,	11+25*unL,	80,		20		: unL = unL + 1
endIF				
ui_outfield			"Interior Overhang",	10,		15+25*unL,	150,	20,	1
	ui_infield{2}	"gs_sill_ovhg_right",		170,	11+25*unL,	80,		20			: unL = unL + 1	

return



!========================================================================================================

 

 

 

 

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

Setup info provided by author