// FolderTree intelligent reading structure v1.0 by Lawrence Curwood. 21/Dec/2000
//
// Contact the authour at lawrence@paradicesoftware.com
// This FolderTree based upon the one available from javascript.internet.com, with improvements.
// From the website www.paradicesoftware.com
//
// gLnkType (LINKTYPE,NAME,LINK,ICON) function takes following parameters:
//
// LINKTYPE: What sort of hyperlink is this going to?
//	0	=	HTML file on this site (open in right frame)
//	1	=	HTML file on this site (open in full screen)
//	2	=	Web page on a global site (use full path, excluding http://)
//	3	=	ZIP/EXE/other binary file in STORAGE/ on this site.

// NAME: The text appearing beside this node in the tree.

// LINK: The hyperlink to the appropriate file (blank quotes will generate a plain folder)

// ICON: What icon should appear beside this node (*ONLY* works on Paradice FolderTree JScript!)
//	0	=	HTML document
//	1	=	ZIP file icon. 
//	2	=	EXE "package" (e.g. setup) icon.
//	3	=	Reserved, probably EXE "program" icon in future.
//	4	=	Pascal source file (.pp, .inc, .pas)
//	5-9	=	Reserved for expansion by Paradice Software.
//	10	=	Broken document link.


foldersTree = gFld("<i><b><font color='#00ffff'>Lx5Suite</font></b></i>", "")
	aux1 = insFld(foldersTree, gFld("<b><font color='white'>Package</b></font>", ""))
		insDoc(aux1, gLnkType(0, "About","lx5suite_main.htm",0))
		insDoc(aux1, gLnkType(0, "What's New","lx5suite_whatsnew.html",0))
		insDoc(aux1, gLnkType(0, "Version v0.76","lx5suite_version.html",0))
		insDoc(aux1, gLnkType(3, "lx5suite_0760.zip","lx5suite_0760.zip",1))


	aux1 = insFld(foldersTree, gFld("<b><font color='white'>Demos</b></font>", ""))
                insDoc(aux1, gLnkType(0, "About Demos","lx5suite_demos.html",0))
		insDoc(aux1, gLnkType(3, "lx5demo1.zip","lx5demo1.zip",1))
		insDoc(aux1, gLnkType(3, "lx5demo2.zip","lx5demo2.zip",1))
		insDoc(aux1, gLnkType(3, "lx5demo3.zip","lx5demo3.zip",1))
		insDoc(aux1, gLnkType(3, "lx5demo4.zip","lx5demo4.zip",1))

	aux1 = insFld(foldersTree, gFld("<b><font color='white'>Units</b></font>",""))


		insDoc(aux1, gLnkType(0, "lx5alpha","docs/lx5alpha.htm",0))
		insDoc(aux1, gLnkType(0, "lx5array","docs/lx5array.htm",0))
		insDoc(aux1, gLnkType(0, "lx5audio","docs/lx5audio.htm",0))
		insDoc(aux1, gLnkType(0, "lx5color","docs/lx5color.htm",0))
		insDoc(aux1, gLnkType(0, "lx5con","docs/lx5con.htm",0))
		insDoc(aux1, gLnkType(0, "lx5cpu","docs/lx5cpu.htm",0))
		insDoc(aux1, gLnkType(0, "lx5crt","docs/lx5crt.htm",0))
		insDoc(aux1, gLnkType(0, "lx5debug","docs/lx5debug.htm",0))
		insDoc(aux1, gLnkType(0, "lx5drive","docs/lx5drive.htm",0))
		insDoc(aux1, gLnkType(0, "lx5error","docs/lx5error.htm",0))
		insDoc(aux1, gLnkType(0, "lx5files","docs/lx5files.htm",0))
		insDoc(aux1, gLnkType(0, "lx5fonts","docs/lx5fonts.htm",0))
		insDoc(aux1, gLnkType(0, "lx5graph","docs/lx5graph.htm",0))
		insDoc(aux1, gLnkType(0, "lx5gui","docs/lx5gui.htm",0))
		insDoc(aux1, gLnkType(0, "lx5image","docs/lx5image.htm",0))
		insDoc(aux1, gLnkType(0, "lx5keybd","docs/lx5keybd.htm",0))
		insDoc(aux1, gLnkType(0, "lx5maths","docs/lx5maths.htm",0))
		insDoc(aux1, gLnkType(0, "lx5mem","docs/lx5mem.htm",0))
		insDoc(aux1, gLnkType(0, "lx5mouse","docs/lx5mouse.htm",0))
		insDoc(aux1, gLnkType(0, "lx5os","docs/lx5os.htm",0))
		insDoc(aux1, gLnkType(0, "lx5strng","docs/lx5strng.htm",0))
		insDoc(aux1, gLnkType(0, "lx5suite","docs/lx5suite.htm",0))
		insDoc(aux1, gLnkType(0, "lx5text","docs/lx5text.htm",0))
		insDoc(aux1, gLnkType(0, "lx5timer","docs/lx5timer.htm",0))
		insDoc(aux1, gLnkType(0, "lx5web","docs/lx5web.htm",0))
		insDoc(aux1, gLnkType(0, "lx5win32","docs/lx5win32.htm",0))

	aux1 = insFld(foldersTree, gFld("<font color='white'><b>Extra Libraries</b></font>",""))
		insDoc(aux1, gLnkType(3, "BASS 2.0 FPC","bass20fpc.zip",1))
		insDoc(aux1, gLnkType(3, "DirectX FPC","dx.zip",1))
		insDoc(aux1, gLnkType(3, "Freetype FPC","freetype_May04.zip",1))

	aux1 = insFld(foldersTree, gFld("<font color='white'><b>Specifications</b></font>",""))
		insDoc(aux1, gLnkType(1, "CPUID","../specs/cpuid/index.htm",0))
		insDoc(aux1, gLnkType(0, "IPX Network","construction.htm",10))
		insDoc(aux1, gLnkType(0, "Vesa VBE","construction.htm",10))
		insDoc(aux1, gLnkType(0, "DirectDraw","construction.htm",10))
