var GalMode;
var AVar;
var Counter;
var ColCount;
var Entry;
var EntryCount;
var Active;
var RowMode;
var BackUpCounter;
var BackUpRow;
var EndCol;
var AddBits;
var PickMenu;
var MenuImage;

// Gal Code:
// Title
// Entry Type (0=Unknown 1=Image 2=Flash Video 3=Flash Movie 4=Quicktime Video)
// Location
// Thumbnail Filename
// Filename
// Bool: Open in new window?

var Gal = new Array();
Gal[0] = "Sculpture*2*Sculpt*Sculpt_Thumb.GIF*Sculpt.htm*0";
Gal[1] = "RedZee XMas*2*RedZee*RedZee_XMas_Thumb.GIF*RedZee_XMas.htm*0";
Gal[2] = "Glass Phone*1*MailSting*MailStingMobile_Glass_Thumb.GIF*MailStingMobile_Glass.htm*0";
Gal[3] = "Janette Expressions*2*Janette*Janette_Thumb.GIF*JanetteExpressions.htm*0";
Gal[4] = "Textured Hands*1*Carm3D2009*Hands_Textured_Thumb.GIF*Hands_Textured.htm*0";
Gal[5] = "Fireball*4*Fireball*Fireball_05b_Thumb.GIF*Fireball.htm*0";
Gal[6] = "WNYPortal Commercial*4*WNYPortal*WNYPortal_Thumb.GIF*WNYPortal.htm*0";
Gal[7] = "RedZee Commercial*2*RedZee*RedZee_Thumb.GIF*RedZeeCommercial.htm*0";
Gal[8] = "Core Pro*3*CorePro*CorePro_Thumb.GIF*CorePro.htm*1";
Gal[9] = "Cannula*2*Cannula*Cannula_Thumb.GIF*Cannula.htm*0";
Gal[10] = "Dr. Attitude*2*DrAttitude*DrAttitude_Thumb.GIF*DrAttitude.htm*0";
Gal[11] = "Fortune Fine Art*3*FFA*FFA_Thumb.GIF*FFA.htm*1";
Gal[12] = "Ancient Keris*2*Keris*Keris_Thumb.GIF*Keris.htm*0";
Gal[13] = "MailSting Intro*2*MailSting*Wasp_Thumb.GIF*Presentation.htm*0";
Gal[14] = "MailSting Bumper*2*MailSting*Wasp_Thumb.GIF*MailSting_Bumper.htm*0";
Gal[15] = "Mani Zone*2*ManiZone*ManiZone_Thumb.GIF*ManiZone.htm*0";
Gal[16] = "Prodigy*2*Prodigy*Prodigy_Thumb.GIF*Prodigy.htm*0";
Gal[17] = "Smileys*3*Smiley*Smiley_Thumb.GIF*Smileys.htm*0";
Gal[18] = "Arizona*4*Tuscon*ArizonaTour_Thumb.GIF*ArizonaTour.htm*0";
Gal[19] = "Video Search*2*VideoSearch*VideoSearch_Thumb.GIF*VideoSearch.htm*1";
Gal[20] = "Bloid Startled*2*Bloid*Bloid_Thumb.GIF*Bloid_Startled.htm*0";
Gal[21] = "HairBall*4*HairBall*HairBall_Thumb.GIF*HairBall.htm*0";
Gal[22] = "Bloid Finger*2*Bloid*Bloid_Thumb.GIF*Bloid_Finger.htm*0";
Gal[23] = "Manakin*2*Manakin*Manakin_Thumb.GIF*Manakin.htm*0";
Gal[24] = "Van*1*Van*Van_Thumb.GIF*Van.htm*0";
Gal[25] = "Carm3D On The Tube*3*Carm3DOnTheTube*Carm3DOnTheTube_Thumb.GIF*Carm3DOnTheTube.htm*0";
Gal[26] = "BioDigital*2*BioDigital*BioDigital_Thumb.GIF*BioDigital.htm*0";
Gal[27] = "Sterling Litigation*1*SterlingLitigation*SterlingLogo_Thumb.GIF*SterlingLitigation.htm*0";

var GalList = new Array();
// Character Gallery
GalList[0] = "20*22*23*1*7*3*13*14*17*0*00";
// Commercial Gallery
GalList[1] = "26*24*7*9*13*14*16*12*15*19*00";
// Flash Gallery
GalList[2] = "17*11*8*00";
// Misc Gallery
GalList[3] = "25*24*23*5*21*4*0*2*18*00";

var PreloadData = new Array();
PreloadData[0] = "/WebFrame2009/WebFrame_E-Stretch.GIF";
PreloadData[1] = "/WebFrame2009/WebFrame_N.JPG";
PreloadData[2] = "/WebFrame2009/WebFrame_NE.JPG";
PreloadData[3] = "/WebFrame2009/WebFrame_NW.JPG";
PreloadData[4] = "/WebFrame2009/WebFrame_SE.JPG";
PreloadData[5] = "/WebFrame2009/WebFrame_SSE.JPG";
PreloadData[6] = "/WebFrame2009/WebFrame_SSW.JPG";
PreloadData[7] = "/WebFrame2009/WebFrame_S-Stretch.GIF";
PreloadData[8] = "/WebFrame2009/WebFrame_SW.JPG";
PreloadData[9] = "/WebFrame2009/WebFrame_W-Stretch.GIF";
PreloadData[10] = "/WebFrame2009/WebFrame_N-Stretch.GIF";
PreloadData[11] = "*";

var TableScript = new Array();
TableScript[0] = "<TABLE BORDER=\"0\" CELLPADDING=\"0\" CELLSPACING=\"0\" WIDTH=\"100%\" HEIGHT=\"100%\"><TR><TD WIDTH=\"242\">";
TableScript[1] = "<TABLE BORDER=\"0\" CELLPADDING=\"0\" CELLSPACING=\"0\" WIDTH=\"242\" HEIGHT=\"100%\"><TR>";
TableScript[2] = "<TD HEIGHT=\"330\" BACKGROUND=\"/WebFrame2009/WebFrame_W-Stretch.GIF\"><IMG SRC=\"/WebFrame2009/WebFrame_NW.JPG\" WIDTH=\"242\" HIEGHT=\"330\">";
TableScript[3] = "</TD></TR><TR><TD HEIGHT=\"100%\" BACKGROUND=\"/WebFrame2009/WebFrame_W-Stretch.GIF\"></TD></TR><TR>";
TableScript[4] = "<TD HEIGHT=\"148\" VALIGN=\"BOTTOM\" BACKGROUND=\"/WebFrame2009/WebFrame_W-Stretch.GIF\"><IMG SRC=\"/WebFrame2009/WebFrame_SW.JPG\" WIDTH=\"242\" HEIGHT=\"148\">";
TableScript[5] = "</TD></TR></TABLE></TD><TD WIDTH=\"100%\"><TABLE BORDER=\"0\" CELLPADDING=\"0\" CELLSPACING=\"0\" WIDTH=\"100%\" HEIGHT=\"100%\"><TR>";
TableScript[6] = "<TD WIDTH=\"100%\" HEIGHT=\"106\" BACKGROUND=\"/WebFrame2009/WebFrame_N-Stretch.GIF\" ALIGN=\"CENTER\" COLSPAN=\"2\"><IMG SRC=\"/WebFrame2009/WebFrame_N.JPG\" WIDTH=\"282\" HIEGHT=\"106\">";
TableScript[7] = "</TD></TR><TR><TD WIDTH=\"100%\" HIEGHT=\"100%\" COLSPAN=\"2\" ALIGN=\"CENTER\" VALIGN=\"MIDDLE\">";
TableScript[8] = "*";

TableScript[30] = "</TD></TR></TABLE></TD></TR><TR><TD WIDTH=\"50%\" HEIGHT=\"76\" ALIGN=\"LEFT\" BACKGROUND=\"/WebFrame2009/WebFrame_S-Stretch.GIF\">";
TableScript[31] = "<IMG SRC=\"/WebFrame2009/WebFrame_SSW.JPG\" WIDTH=\"130\" HIEGHT=\"76\"></TD><TD WIDTH=\"50%\" HEIGHT=\"76\" ALIGN=\"RIGHT\" BACKGROUND=\"/WebFrame2009/WebFrame_S-Stretch.GIF\">";
TableScript[32] = "<IMG SRC=\"/WebFrame2009/WebFrame_SSE.JPG\" WIDTH=\"137\" HIEGHT=\"76\"></TD></TR></TABLE></TD><TD WIDTH=\"241\">";
TableScript[33] = "<TABLE BORDER=\"0\" CELLPADDING=\"0\" CELLSPACING=\"0\" WIDTH=\"241\" HEIGHT=\"100%\"><TR><TD HEIGHT=\"355\" BACKGROUND=\"/WebFrame2009/WebFrame_E-Stretch.GIF\">";
TableScript[34] = "<IMG SRC=\"/WebFrame2009/WebFrame_NE.JPG\" WIDTH=\"241\" HIEGHT=\"355\"></TD></TR><TR><TD HEIGHT=\"100%\" BACKGROUND=\"/WebFrame2009/WebFrame_E-Stretch.GIF\">";
TableScript[35] = "</TD></TR><TR><TD HEIGHT=\"123\" VALIGN=\"BOTTOM\" BACKGROUND=\"/WebFrame2009/WebFrame_E-Stretch.GIF\">";
TableScript[36] = "<IMG SRC=\"/WebFrame2009/WebFrame_SE.JPG\" WIDTH=\"241\" HEIGHT=\"123\"></TD></TR></TABLE></TD></TR></TABLE>";
TableScript[37] = "*"

// HR Upper
TableScript[200] = "<TABLE CELLPADDING=\"0\" CELLSPACING=\"0\" BORDER=\"0\" WIDTH=\"100%\" HEIGHT=\"20px\"><TR>";
TableScript[201] = "<TD WIDTH=\"50%\" BACKGROUND=\"/WebFrame2009/HR_Upper_L-Bkg.GIF\" ALIGN=\"LEFT\">";
TableScript[202] = "<IMG SRC=\"/WebFrame2009/HR_Upper_L.GIF\" WIDTH=\"52\"></TD>";
TableScript[203] = "<TD WIDTH=\"455\"><IMG SRC=\"/WebFrame2009/HR_Upper_C.GIF\" WIDTH=\"455\"></TD>";
TableScript[204] = "<TD WIDTH=\"50%\" BACKGROUND=\"/WebFrame2009/HR_Upper_R-Bkg.GIF\" ALIGN=\"RIGHT\">";
TableScript[205] = "<IMG SRC=\"/WebFrame2009/HR_Upper_R.GIF\" WIDTH=\"52\"></TD></TR></TABLE>";
TableScript[206] = "*";

// HR Lower
TableScript[210] = "<TABLE CELLPADDING=\"0\" CELLSPACING=\"0\" BORDER=\"0\" WIDTH=\"100%\" HEIGHT=\"20px\"><TR>";
TableScript[211] = "<TD WIDTH=\"50%\" BACKGROUND=\"/WebFrame2009/HR_Lower_L-Bkg.GIF\" ALIGN=\"LEFT\">";
TableScript[212] = "<IMG SRC=\"/WebFrame2009/HR_Lower_L.GIF\" WIDTH=\"52\"></TD>";
TableScript[213] = "<TD WIDTH=\"455\"><IMG SRC=\"/WebFrame2009/HR_Lower_C.GIF\" WIDTH=\"455\"></TD>";
TableScript[214] = "<TD WIDTH=\"50%\" BACKGROUND=\"/WebFrame2009/HR_Lower_R-Bkg.GIF\" ALIGN=\"RIGHT\">";
TableScript[215] = "<IMG SRC=\"/WebFrame2009/HR_Lower_R.GIF\" WIDTH=\"52\"></TD></TR></TABLE>";
TableScript[216] = "*";

// MenuPod_A
TableScript[300] = "<MAP NAME=\"MENUPOD\" ID=\"MENUPOD\">";
TableScript[301] = "<AREA HREF=\"/Home.htm\" SHAPE=\"CIRCLE\" COORDS=\"35,62,27\" ID=\"Home\" ALT=\"Home Page\">";
TableScript[302] = "<AREA HREF=\"/Contact.htm\" SHAPE=\"POLY\" COORDS=\"83,49,84,49,202,64,203,82,136,77,74,67\" ID=\"Contact\" ALT=\"Contact Carmen\">";
TableScript[303] = "<AREA HREF=\"/Services.htm\" SHAPE=\"POLY\" COORDS=\"75,72,130,80,202,87,201,106,132,101,68,89\" ID=\"Services\" ALT=\"Services I Offer\">";
TableScript[304] = "<AREA HREF=\"/Links.htm\" SHAPE=\"POLY\" COORDS=\"65,95,123,104,203,111,203,130,58,115\" ID=\"Links\" ALT=\"Various Links\">";
TableScript[305] = "<AREA HREF=\"/Gal_Character.htm\" SHAPE=\"POLY\" COORDS=\"219,74,240,37,287,18,286,52,246,86\" ID=\"Char\" ALT=\"Character Gallery\">";
TableScript[306] = "<AREA HREF=\"/Gal_Commercial.htm\" SHAPE=\"POLY\" COORDS=\"306,54,316,26,348,39,379,93,342,96\" ID=\"Comm\" ALT=\"Commercial Gallery\">";
TableScript[307] = "<AREA HREF=\"/Gal_Flash.htm\" SHAPE=\"POLY\" COORDS=\"216,104,245,104,282,147,274,172,233,147\" ID=\"Fla\" ALT=\"Flash Gallery\">";
TableScript[308] = "<AREA HREF=\"/Gal_Misc.htm\" SHAPE=\"POLY\" COORDS=\"299,148,341,115,370,122,350,166,305,174\" ID=\"Misc\" ALT=\"Miscellany Gallery\"></MAP>";
TableScript[309] = "*";

// MenuPod_B
TableScript[320] = "<MAP NAME=\"MENUPOD\" ID=\"MENUPOD\">";
TableScript[321] = "<AREA HREF=\"/Home.htm\" SHAPE=\"CIRCLE\" COORDS=\"42,51,29\" ID=\"Home\" ALT=\"Home Page\">";
TableScript[322] = "<AREA HREF=\"/Contact.htm\" SHAPE=\"POLY\" COORDS=\"83,55,85,33,213,49,213,68,145,59\" ID=\"Contact\" ALT=\"Contact Carmen\">";
TableScript[323] = "<AREA HREF=\"/Services.htm\" SHAPE=\"POLY\" COORDS=\"76,77,83,58,154,63,211,72,212,92,145,82\" ID=\"Services\" ALT=\"Services I Offer\">";
TableScript[324] = "<AREA HREF=\"/Links.htm\" SHAPE=\"POLY\" COORDS=\"72,81,150,86,213,96,215,117,66,101\" ID=\"Links\" ALT=\"Various Links\">";
TableScript[325] = "<AREA HREF=\"/Gal_Character.htm\" SHAPE=\"POLY\" COORDS=\"228,62,247,19,292,11,299,36,259,71\" ID=\"Char\" ALT=\"Character Gallery\">";
TableScript[326] = "<AREA HREF=\"/Gal_Commercial.htm\" SHAPE=\"POLY\" COORDS=\"316,40,322,13,367,35,380,80,357,79,316,40\" ID=\"Comm\" ALT=\"Commercial Gallery\">";
TableScript[327] = "<AREA HREF=\"/Gal_Flash.htm\" SHAPE=\"POLY\" COORDS=\"227,89,258,85,295,127,286,159,236,131\" ID=\"Fla\" ALT=\"Flash Gallery\">";
TableScript[328] = "<AREA HREF=\"/Gal_Misc.htm\" SHAPE=\"POLY\" COORDS=\"313,129,354,96,380,108,360,151,315,161\" ID=\"Misc\" ALT=\"Miscellany Gallery\"></MAP>";
TableScript[329] = "*";

// MenuPod_C
TableScript[340] = "<MAP NAME=\"MENUPOD\" ID=\"MENUPOD\">";
TableScript[341] = "<AREA HREF=\"/Home.htm\" SHAPE=\"CIRCLE\" COORDS=\"35,101,29\" ID=\"Home\" ALT=\"Home Page\">";
TableScript[342] = "<AREA HREF=\"/Contact.htm\" SHAPE=\"POLY\" COORDS=\"73,97,77,76,202,67,202,86,137,89\" ID=\"Contact\" ALT=\"Contact Carmen\">";
TableScript[343] = "<AREA HREF=\"/Services.htm\" SHAPE=\"POLY\" COORDS=\"68,120,74,99,131,92,202,90,202,110,137,113\" ID=\"Services\" ALT=\"Services I Offer\">";
TableScript[344] = "<AREA HREF=\"/Links.htm\" SHAPE=\"POLY\" COORDS=\"59,145,65,124,132,117,204,114,206,135,137,140\" ID=\"Links\" ALT=\"Various Links\">";
TableScript[345] = "<AREA HREF=\"/Gal_Character.htm\" SHAPE=\"POLY\" COORDS=\"216,78,235,30,281,12,283,38,246,79\" ID=\"Char\" ALT=\"Character Gallery\">";
TableScript[346] = "<AREA HREF=\"/Gal_Commercial.htm\" SHAPE=\"POLY\" COORDS=\"302,36,309,10,362,24,370,67,342,70\" ID=\"Comm\" ALT=\"Commercial Gallery\">";
TableScript[347] = "<AREA HREF=\"/Gal_Flash.htm\" SHAPE=\"POLY\" COORDS=\"219,103,246,95,285,130,282,163,231,145\" ID=\"Fla\" ALT=\"Flash Gallery\">";
TableScript[348] = "<AREA HREF=\"/Gal_Misc.htm\" SHAPE=\"POLY\" COORDS=\"302,128,340,89,375,92,355,142,311,159\" ID=\"Misc\" ALT=\"Miscellany Gallery\"></MAP>";
TableScript[349] = "*";

// MenuPod_D
TableScript[360] = "<MAP NAME=\"MENUPOD\" ID=\"MENUPOD\">";
TableScript[361] = "<AREA HREF=\"/Home.htm\" SHAPE=\"CIRCLE\" COORDS=\"43,111,30\" ID=\"Home\" ALT=\"Home Page\">";
TableScript[362] = "<AREA HREF=\"/Contact.htm\" SHAPE=\"POLY\" COORDS=\"82,96,84,74,211,66,213,86,152,88\" ID=\"Contact\" ALT=\"Contact Carmen\">";
TableScript[363] = "<AREA HREF=\"/Services.htm\" SHAPE=\"POLY\" COORDS=\"79,120,82,99,146,91,213,89,217,109,150,113\" ID=\"Services\" ALT=\"Services I Offer\">";
TableScript[364] = "<AREA HREF=\"/Links.htm\" SHAPE=\"POLY\" COORDS=\"74,146,77,123,146,117,218,112,224,134\" ID=\"Links\" ALT=\"Various Links\">";
TableScript[365] = "<AREA HREF=\"/Gal_Character.htm\" SHAPE=\"POLY\" COORDS=\"224,77,242,31,281,10,292,36,260,78\" ID=\"Char\" ALT=\"Character Gallery\">";
TableScript[366] = "<AREA HREF=\"/Gal_Commercial.htm\" SHAPE=\"POLY\" COORDS=\"310,37,310,6,356,26,382,64,355,70\" ID=\"Comm\" ALT=\"Commercial Gallery\">";
TableScript[367] = "<AREA HREF=\"/Gal_Flash.htm\" SHAPE=\"POLY\" COORDS=\"230,105,260,93,304,130,304,163,257,146\" ID=\"Fla\" ALT=\"Flash Gallery\">";
TableScript[368] = "<AREA HREF=\"/Gal_Misc.htm\" SHAPE=\"POLY\" COORDS=\"322,128,355,87,385,92,371,138,331,157\" ID=\"Misc\" ALT=\"Miscellany Gallery\"></MAP>";
TableScript[369] = "*";

// MenuPod_E
TableScript[380] = "<MAP NAME=\"MENUPOD\" ID=\"MENUPOD\">";
TableScript[381] = "<AREA HREF=\"/Home.htm\" SHAPE=\"CIRCLE\" COORDS=\"39,98,30\" ID=\"Home\" ALT=\"Home Page\">";
TableScript[382] = "<AREA HREF=\"/Contact.htm\" SHAPE=\"RECT\" COORDS=\"81,75,211,97\" ID=\"Contact\" ALT=\"Contact Carmen\">";
TableScript[383] = "<AREA HREF=\"/Services.htm\" SHAPE=\"RECT\" COORDS=\"76,100,212,122\" ID=\"Services\" ALT=\"Services I Offer\">";
TableScript[384] = "<AREA HREF=\"/Links.htm\" SHAPE=\"RECT\" COORDS=\"69,125,215,147\" ID=\"Links\" ALT=\"Various Links\">";
TableScript[385] = "<AREA HREF=\"/Gal_Character.htm\" SHAPE=\"POLY\" COORDS=\"229,83,244,40,289,22,297,50,257,92\" ID=\"Char\" ALT=\"Character Gallery\">";
TableScript[386] = "<AREA HREF=\"/Gal_Commercial.htm\" SHAPE=\"POLY\" COORDS=\"315,50,320,20,370,40,383,81,359,88\" ID=\"Comm\" ALT=\"Commercial Gallery\">";
TableScript[387] = "<AREA HREF=\"/Gal_Flash.htm\" SHAPE=\"POLY\" COORDS=\"228,114,258,110,298,147,294,175,249,159\" ID=\"Fla\" ALT=\"Flash Gallery\">";
TableScript[388] = "<AREA HREF=\"/Gal_Misc.htm\" SHAPE=\"POLY\" COORDS=\"316,149,357,108,384,109,370,160,325,174\" ID=\"Misc\" ALT=\"Miscellany Gallery\"></MAP>";
TableScript[389] = "*";

function HR_Upper() {
	var AVar = 200;
	do {
	if (AVar != "*") document.write(TableScript[AVar]);
	AVar ++;
	} while (TableScript[AVar] != "*");
}

function HR_Lower() {
	var AVar = 210;
	do {
	if (AVar != "*") document.write(TableScript[AVar]);
	AVar ++;
	} while (TableScript[AVar] != "*");
}

function BeginPageFrame() {
	AVar = 0;
	do {
	if (AVar != "*") document.write(TableScript[AVar]);
	AVar ++;
	} while (TableScript[AVar] != "*");
	
	// Select random menu
	PickMenu = Math.floor(Math.random()*4)

	AVar = 300;
	MenuImage = "MenuPod_A.JPG";
	if (PickMenu == 1) {
		AVar = 320;
		}
	if (PickMenu == 2) {
		AVar = 340;
		}
	if (PickMenu == 3) {
		AVar = 360;
		}
	if (PickMenu == 4) {
		AVar = 380;
		}
	do {
	if (AVar != "*") document.write(TableScript[AVar]);
	AVar ++;
	} while (TableScript[AVar] != "*");

	document.write("<TABLE CELLPADDING=\"0\" CELLSPACING=\"0\" WIDTH=\"100%\" HEIGHT=\"100%\" BORDER=\"0\">");
	document.write("<TR><TD ALIGN=\"CENTER\" VALIGN=\"MIDDLE\" HEIGHT=\"188\">");
	if (PickMenu == 0) {
		document.write("<IMG SRC=\"/WebFrame2009/MenuPod_A.JPG\" BORDER=\"0\" WIDTH=\"393\" HEIGHT=\"185\" USEMAP=\"#MENUPOD\">");
	}
	if (PickMenu == 1) {
		document.write("<IMG SRC=\"/WebFrame2009/MenuPod_B.JPG\" BORDER=\"0\" WIDTH=\"390\" HEIGHT=\"181\" USEMAP=\"#MENUPOD\">");
	}
	if (PickMenu == 2) {
		document.write("<IMG SRC=\"/WebFrame2009/MenuPod_C.JPG\" BORDER=\"0\" WIDTH=\"393\" HEIGHT=\"183\" USEMAP=\"#MENUPOD\">");
	}
	if (PickMenu == 3) {
		document.write("<IMG SRC=\"/WebFrame2009/MenuPod_D.JPG\" BORDER=\"0\" WIDTH=\"395\" HEIGHT=\"181\" USEMAP=\"#MENUPOD\">");
	}
	if (PickMenu == 4) {
		document.write("<IMG SRC=\"/WebFrame2009/MenuPod_E.JPG\" BORDER=\"0\" WIDTH=\"402\" HEIGHT=\"188\" USEMAP=\"#MENUPOD\">");
	}
	document.write("</TD></TR><TR><TD HEIGHT=\"100% VALIGN=\"TOP\" ALIGN=\"CENTER\" COLSPAN=\"2\">");
}

function EndPageFrame() {

	var AVar = 30;
	do {
	if (AVar != "*") document.write(TableScript[AVar]);
	AVar ++;
	} while (TableScript[AVar] != "*");
}

function CreateCookie(CookieName,CookieValue,CookieDays) {
	if (CookieDays) {
		var date = new Date();
		date.setTime(date.getTime()+(days*24*60*60*1000));
		var CookieExpires = "; expires="+date.toGMTString();
	}
	else var CookieExpires = "";
	document.cookie = CookieName+"="+CookieValue+CookieExpires+"; path=/";
}

function ReadCookie(CookieName) {
	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	for(var i=0;i < ca.length;i++) {
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
		if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
	}
	return null;
}

function EraseCookie(CookieName) {
	CreateCookie(CookieName,"",-1);
}

function BuildGallery(AVar) {
	GalMode = AVar;
	AVar = GalList[GalMode];
	Entry = AVar.split("*");
	Counter = 0;

	// Count Gallery Entries
	Active = 1;
	do {
		//alert(Entry[Counter]);
		if (Entry[Counter] == "00") {
			Active = 0;
		}
		if (Active == 1) {
			Counter ++;
		}
	} while (Active == 1);
	EntryCount = Counter - 1;

	document.write("<BR><TABLE CELLPADDING=\"0\" CELLSPACING=\"2\" BORDER=\"0\" WIDTH=\"470\">");
	ColCount = 0;
	Counter = 0;
	RowMode = 0;
	Active = 1;
	EndCol = 5;
	AddBits = 1;
	var SerialNum = 0;
	do {
		if (ColCount == 0) {
			document.write("<TR>");
		}

		AddBits = 1;
		if (Counter > EntryCount) AddBits = 0;
		if (AddBits == 1) {
			AVar = Entry[Counter];
			BVar = parseInt(AVar);
			AVar = Gal[BVar];
			var GalBit = AVar.split("*");

			if (RowMode == 0) {
				document.write("<TD ALIGN=\"Center\" VALIGN=\"Bottom\" WIDTH=\"25%\">");
				document.write("<A HREF=\"/Media/" + GalBit[2] + "/" + GalBit[4] + "\"");
				if (GalBit[5] == "1") document.write(" TARGET=\"_blank\"");
				document.write("><IMG SRC=\"/Media/" + GalBit[2] + "/" + GalBit[3] + "\" BORDER=\"0\"></TD>");
			}
			if (RowMode == 1) {
				document.write("<TD ALIGN=\"Center\" VALIGN=\"Top\" WIDTH=\"25%\"><P><FONT COLOR=\"#e7c353\">");
				if (GalBit[5] == "1") document.write("<IMG SRC=\"/WebFrame2009/NewWindow.GIF\">");
				if (GalBit[1] == 1) document.write("<IMG SRC=\"/WebFrame2009/Label_Image.GIF\">");
				if (GalBit[1] == 2) document.write("<IMG SRC=\"/WebFrame2009/Label_Flash_Vid.GIF\">");
				if (GalBit[1] == 3) document.write("<IMG SRC=\"/WebFrame2009/Label_Flash_Movie.GIF\">");
				if (GalBit[1] == 4) document.write("<IMG SRC=\"/WebFrame2009/Label_QuicktimeVid.GIF\">");
				document.write("</FONT></P></TD>");
			}
			if (RowMode == 2) {
				document.write("<TD ALIGN=\"Center\" VALIGN=\"Top\" WIDTH=\"25%\">");
				document.write("<P><B>" + GalBit[0] + "</B>");
				document.write("</P></TD>");
			}
		}
		if (AddBits == 0) {
			document.write("<TD>&nbsp;</TD>");
		}

		BackUpCounter = 0;
		BackUpRow = 0;
		if (ColCount == 3) {
			document.write("</TR>");
			if (RowMode == 0) {
				BackUpCounter = 1;
				BackUpRow = 0;
				}
			if (RowMode == 1) {
				BackUpCounter = 1;
				BackUpRow = 0;
				}
			if (RowMode == 2) {
				BackUpCounter = 0;
				BackUpRow = 1;
				if (Counter == EntryCount) Active = 0;
				}
			if (BackUpCounter == 1) Counter = Counter - 3;
			if (BackUpCounter == 0) Counter ++;
			if (BackUpRow == 1) RowMode = 0;
			if (BackUpRow == 0) RowMode ++;
			ColCount = 0;
			} else {
			if (RowMode == 2 && Counter == EntryCount) Active = 0;
			ColCount ++;
			Counter ++;
			}
		SerialNum ++;
		//if (SerialNum > 30) Active = 0;
	} while (Active == 1);

	document.write("</TABLE>");
}