function genelist_CHICKEN()
{
	var genelist = new Array();
	genelist[genelist.length] = new Array("E","Uitgebreid zwart. Maakt bruine of witte vleugeldriehoek bij de haan zwart zodat een roestig zwart beeld ontstaat; de hen wordt vrijwel zwart.","Extended black. Turns the male duckwing into a crowwing, Male becomes a rusty black; hen less rusty black.");
	genelist[genelist.length] = new Array("E^R","Berken. Maakt bruine of witte vleugeldriehoek bij de haan zwart; laat de halsveren van haan en hen en zadelveren bij de haan netjes in gouden of zilveren grondkleur; zwarte borst kan gezoomd zijn met goud of zilver; verbleekt rode kleur iets.","Birchen. Turns the male duckwing into a crowwing but leaves hackle of male and female and male saddle neatly patterned in gold or silver groundcolor; Black breast can be laced in gold or silver; somewhat flattens red tints.");
	genelist[genelist.length] = new Array("E^Wh","Tarwe. Minst gunstig voor expressie van zwart, en meest gunstig voor rood. Haan als wildtype/patrijs zonder zwarte halsveer schacht streping. Hen tarwekleurig zonder zalmkleurige borst en nauwelijks gepeperd.","Wheaten. Least permissive for black, most permissive for red. Males wildtype without hackle black. Females wheaten colored without salmon breast and almost no stippling on back.");
	genelist[genelist.length] = new Array("e+","Wildtype, bankivapatrijs. Haan is zwart(borstig) met vleugeldriehoek, hals, zadel en schouders in rode/gouden tot zilveren grondkleur; hen is goud of zilver met zalmkleurige borst, zwartgepeperde rugveren en zwarte staart.","Wildtype, bankiva. Males black(breasted) with gold to silver duckwing (wing triangle), hackle, saddle, shoulders; females gold or silver with salmon breast, black stippling on back and black tail.");
	genelist[genelist.length] = new Array("e^b","Aziatisch patrijs. Haan als bankiva/wildtype met wat zwaardere zwarte halsveer schacht streping; hen als wildtype zonder zalmkleurige borst.","Partridge. Males as wildtype/bankiva but somewhat heavier black striping in hackle (hackle black); females as wildtype but without salmon breast.");
	genelist[genelist.length] = new Array("Co","Columbia. Verdringt zwart op lichaam van haan en hen behalve op halsveren en staart; onderdrukt zalmkleurige borst bij hen waardoor beide geslachten voornamelijk goud tot zilver gekleurd zijn. Geen zulk effect onder berken of uitgebreid zwart","Columbian. Restricts black from body of males and females. Supresses salmon breast rendering both sexes gold to silver with hackle pattern and black tails. No such effect under birchen or extended black.");
	genelist[genelist.length] = new Array("co+","Niet Columbia, recessief.","Non Columbian, recessive.");
	genelist[genelist.length] = new Array("Co/co+","Onfokzuiver Columbia, hen mogelijk met tekening op de rug.","Het Columbian, female might be patterned on back.");
	genelist[genelist.length] = new Array("Db","Donker bruin, Naam slaat op kuikendons. Columbia-achtige onderdrukker van zwart, Minder sterk bij de hen (getekende rug). Medeveroorzaker van bepaalde patronen, Werkt ook onder berken.","Dark brown, Name refers to chick down. Columbian-like restrictor of black, Less powerful on hens (patterned back). Co-causer of certain patterns, Acts even under birchen.");
	genelist[genelist.length] = new Array("db+","Niet Donker bruin, recessief.","Non Dark brown, recessive.");
	genelist[genelist.length] = new Array("Pg","Patroon gen. Rangschikt zwart pigment als (meervoudige) zoming bij de hen; bij haan alleen in combinatie met andere genen.","Pattern gene. Orders black pigment in hens to concentric lacing; in males only with help of other genes.");
	genelist[genelist.length] = new Array("pg+","Niet Gezoomd, recessief.","Not laced, recessive.");
	genelist[genelist.length] = new Array("Ml","Melanotisch. Zwartversterker, verschuift ook zwart pigment, actief in patronen. Kan een roestig dier volledig zwart maken. Werkt niet altijd dominant.","Melanotic. Enhances black (melanizer), Also shifts black pigment, Helps to form patterns. Makes a rusty animal more black. Not always behaving dominant.");
	genelist[genelist.length] = new Array("ml+","Niet Melanotisch, recessief.","Non Melanotic, recessive.");
	genelist[genelist.length] = new Array("cha","Charcoal, Houtskool. Zwartversterker, recessief, Minder actief in patronen.","Charcoal. Recessive black enhancer (melanizer), Less active in patterns.");
	genelist[genelist.length] = new Array("Cha+","Niet Charcoal. Dominant.","Non Charcoal. Dominant.");
	genelist[genelist.length] = new Array("Mh","Mahogany. Roodversterker die ook zwart kan inperken.","Mahogany. Red enhancer and limited black restrictor.");
	genelist[genelist.length] = new Array("mh+","Niet Mahogany, recessief.","Non Mahogany, recessive.");
	genelist[genelist.length] = new Array("Di","Dilute. Rood- (en goud-)verdunner.","Dilute. Dilutes red (and gold).");
	genelist[genelist.length] = new Array("di+","Niet Dilute, recessief.","Non Dilute, recessive.");
	genelist[genelist.length] = new Array("ig","Inhibitor of Gold. Recessieve goud-verdunner, Goud naar citroen.","Inhibitor of Gold. Recessive gold diluter, Gold to lemon.");
	genelist[genelist.length] = new Array("Ig+","Niet Inhibitor of Gold. Dominant.","Non Inhibitor of Gold. Dominant.");
	genelist[genelist.length] = new Array("Cb","Champagne Blond. Dominante goud-verdunner.","Champagne Blond. Dominant gold diluter.");
	genelist[genelist.length] = new Array("cb+","Niet Champagne Blond, recessief.","Non Champagne, recessive.");
	genelist[genelist.length] = new Array("S","Silver. Geslachtsgebonden, zilveren grondkleur, Gouden grondkleur wordt wit, Onvolledig dominant.","Silver. Sex-linked, Turns gold groundcolor to white, Incompletely dominant.");
	genelist[genelist.length] = new Array("s+","Niet Zilver, Goud. Geslachtsgebonden, gouden grondkleur, recessief.","Non Silver, Gold. Sex-linked, recessive.");
	genelist[genelist.length] = new Array("S/s+","Onfokzuiver zilver bij haan, Grondkleur gelig wit, Rode schouders niet onderdrukt.","Heterozygote Silver, males only, Groundcolor yellowish white (golden), Red shoulders not suppressed.");
	genelist[genelist.length] = new Array("s^al","Sexlinked Albinisme, onvolledig albino. Recessief ten opzichte van goud en zilver.","Sexlinked Albinism, incomplete albino. Recessive to both silver and gold.");
	genelist[genelist.length] = new Array("B^sd","Sexlinked Dilution, dominant ten opzichte van Koekoek. Fokzuivere hanen zijn vrijwel wit, anders, evenals de hennen, een licht soort koekoek.","Sexlinked Dilution, dominant to plain Barred. Homozygous males are almost white, else, like the females, a lighter form of barring.");
	genelist[genelist.length] = new Array("B","Barred. Koekoek, gestreept, Geslachtsgebonden, dominant.","Barred. Sex-linked, dominant.");
	genelist[genelist.length] = new Array("B/B","Licht koekoek bij haan, Fokzuiver is de kleur lichter dan enkel-factorig.","Purebreed cuckoo on males is lighter than single factor.");
	genelist[genelist.length] = new Array("B/b+","Donker koekoek bij haan, Onfokzuiver en de tint is als bij de hen.","Dark cuckoo on males (heterozygote) is darker than purebreed, and comparable to hen color.");
	genelist[genelist.length] = new Array("b+","Niet Gestreept. Geslachtsgebonden recessief.","Non Barred. Sex-linked recessive.");
	genelist[genelist.length] = new Array("-","Dit is een hen, geen tweede geslachtschromosoom.","This is a hen, no second sex chromosome.");	
	genelist[genelist.length] = new Array("Choc+","Niet Chocolate. Tekening blijft zwart.","Non Chocolate. Pattern remains black.");
	genelist[genelist.length] = new Array("choc","Chocolate. Geslachtsgebonden, recessief, Verdunt zwart tekening tot donkerbruin.","Chocolate. Sex-linked, recessive, Dilutes black pattern to chocolate color.");
	genelist[genelist.length] = new Array("I","Dominant Wit. Verdunt zwarte tekening tot wit, Laat af en toe wat zwart door.","Dominant White. Dilutes black patterns to white, Somewhat leaky.");
	genelist[genelist.length] = new Array("I^d","Dun. Onvolledig dominant. Verdunt zwarte tekening tot bruin of indien fokzuiver tot khaki.","Dun. Incomplete dominant. 1 Dose dilutes black pattern to brown, 2 doses dilute further to khaki.");
	genelist[genelist.length] = new Array("I^s","Smokey. Recessief blauw! Draait effect van dominant wit terug tot een blauwe kleur. Recessief ten opzichte van wildtype allel i+.","Smokey. Recessive blue! Reverts the effects of dominant white to a blue color. Recessive to wildtype allele i+.");
	genelist[genelist.length] = new Array("i+","Niet Dominant Wit. Recessief, laat zwarte delen zwart.","Non Dominant White. Recessive, leaves black areas black.");
	genelist[genelist.length] = new Array("Bl","Blauw. Onvolledig dominant, Verdunt zwarte tekening tot blauwgrijs of indien fokzuiver tot vuilwit.","Blue. Incompletely dominant, 1 Dose dilutes black pattern to blue/grey, 2 doses dilute further to splash/white");
	genelist[genelist.length] = new Array("Bl/Bl","Fokzuiver blauw = vuilwit.","Purebreed blue = splash.");
	genelist[genelist.length] = new Array("Bl/bl+","Typisch blauw.","Typical blue.");
	genelist[genelist.length] = new Array("bl+","Niet blauw. recessief, Tekening blijft zwart.","Non blue. recessive, Pattern remains black.");
	genelist[genelist.length] = new Array("Mo+","Niet Mottled. Niet bont, zonder witgeparelde veertoppen, Dominant.","Non Mottled. No white feathertips, Dominant.");
	genelist[genelist.length] = new Array("mo","Mottled. Bont, witgeparelde veertoppen, Recessief.","Mottled. White feathertips or less regular white patching, Recessive.");
	genelist[genelist.length] = new Array("C+","Niet Recessief Wit. Volledige uiting van kleur, Dominant.","Non Recessive White. Complete expression of color, Dominant.");
	genelist[genelist.length] = new Array("c","Recessief Wit. Onderdrukking van alle kleur, dus witte veren.","Recessive White. No expression of color, thus white feathers.");
	genelist[genelist.length] = new Array("Lav+","Niet Lavendel. Niet parelgrijs, Dominant, Tekening blijft zwart.","Non Lavender. Dominant, Pattern remains black.");
	genelist[genelist.length] = new Array("lav","Lavendel, parelgrijs. Recessief, Verdunt zwarte tekening tot parelgrijze tint. Gouden grondkleur wordt isabel.","Lavender. Recessive, Dilutes black patterns to lavender color. Dilutes gold to isabell.");
	genelist[genelist.length] = new Array("Co,Pg,Ml","Co, Pg en Ml veroorzaken samen enkelvoudige zoming.","Co, Pg and Ml render single lacing.");
	genelist[genelist.length] = new Array("Co,Ml","Co en Ml veroorzaken samen een kwartel-achtige kleur, columbia met rugtekening.","Co and Ml render a quail type pattern, columbian with patterned back.");
	genelist[genelist.length] = new Array("Pg,Ml","Pg en Ml zonder Co veroorzaakt dubbele zoming.","Pg and Ml without Co render double lacing.");
	genelist[genelist.length] = new Array("Db,Pg,Ml","Db, Pg en Ml veroorzaken samen lovering.","Db, Pg and Ml render spangling.");
	genelist[genelist.length] = new Array("Db,Pg","Db en Pg veroorzaken samen een gepeld of geband patroon.","Db and Pg render autosomal barring, quilt pattern.");
	genelist[genelist.length] = new Array("Co,Db,Pg,Ml","Co, Db, Pg en Ml veroorzaken samen enkelvoudige zoming (of toeping) met getekende staart.","Co, Db ,Pg and Ml render single lacing (or half moon spangling) with patterned tail");
	genelist[genelist.length] = new Array("Co,Db,Ml","Co en Ml veroorzaken samen een kwartel-achtige kleur, columbia met rugtekening.","Co and Ml render a quail type pattern, columbian with patterned back.");
	genelist[genelist.length] = new Array("Db,Ml","Db en Ml veroorzaken samen een kwartel-achtige kleur, columbia met rugtekening.","Db and Ml render a quail type pattern, columbian with patterned back.");
	genelist[genelist.length] = new Array("Co,Pg","Co en Pg veroorzaken samen mogelijk een onvolledige enkelvoudige zoming.","Co and Pg possibly render an incomplete single lacing.");
	genelist[genelist.length] = new Array("Ar","Kan rode kleur op (wit) lichaam opleveren. Ook op hals van de hen.","Adds red to (white) body. Also on hackle of female.");
	genelist[genelist.length] = new Array("v/v","Gierhakken zijn alleen zichtbaar bij bevederde poten.","Vulture hocks only show on feathered shanks.");
	genelist[genelist.length] = new Array("D^v/D^v","Fokzuiver duplex kam reduceert kamvolume.","Purebreed duplex comb has reduced comb volume.");
	//genelist[genelist.length] = new Array("","","");
	//genelist[genelist.length] = new Array("","","");
	//genelist[genelist.length] = new Array("","","");
	//genelist[genelist.length] = new Array("","","");
	return genelist;
}
function geneExplain(gen,taal)
{
	var genelst = genelist_CHICKEN(); 
	for(igl in genelst)
	{
		if(gen == genelst[igl][0])
		{
			if(taal=="NL") return gen+" => "+genelst[igl][1]+"<BR>";
			else if(taal=="EN") return gen+" => "+genelst[igl][2]+"<BR>";
			else return "";
		}
	}
	return "";
}
function geneExplainAlert(gen,taal)
{
	alert(geneExplain(gen,taal).replace(/<BR>/g," \n "));
}
function geneExplainFullAlert(gt,taal)
{
	alert(geneExplainFull(gt,taal).replace(/<BR>/g," \n "));
}
function geneExplainPartialAlert(gt,taal)
{
	alert(geneExplainPartial(gt,taal).replace(/<BR>/g," \n "));
}
function geneExplainFull(gt,taal)
{
	var explaintxt = "";
	var gtsplit = gt.split(',');
	for(gts in gtsplit)
	{
		explaintxt += geneExplain(gtsplit[gts].split('/')[0],taal);
		if(gtsplit[gts].split('/')[0]==gtsplit[gts].split('/')[1])
		{
		}
		else if(gtsplit[gts].split('/')[1]!="-")
		{
			explaintxt += geneExplain(gtsplit[gts].split('/')[1],taal);
		}
		if(("B/B,B/b+,S/s+,Bl/Bl,Bl/bl+,Co/co+,v/v,D^v/D^v").indexOf(gtsplit[gts])>=0)
		{
			explaintxt += geneExplain(gtsplit[gts],taal);
		}
	}
	explaintxt += geneExplainPattern(gt,taal);
	return explaintxt;
}
function geneExplainPattern(gt,taal)
{
	var patgenes = "";
	var gtsplit = gt.split(',');
	for(gts in gtsplit)
	{
		if((",Co,Db,Pg,Ml,").indexOf(","+gtsplit[gts].split('/')[0]+",")>=0)
		{
			patgenes += gtsplit[gts].split('/')[0]+",";
		}
	}
	if (patgenes != "")	
	{
		patgenes += ",";
		patgenes = patgenes.replace(",,","");
		if(patgenes.indexOf(',')>=0)
		{
			return geneExplain(patgenes,taal);
		}
	}
	return "";
}
function geneExplainPartialPattern(gt,taal)
{
	var patgenes = "";
	var gtsplit = gt.split(',');
	for(gts in gtsplit)
	{
		var gtsplit2 = gtsplit[gts].split(':')[1];
		if((",Co,Db,Pg,Ml,").indexOf(","+gtsplit2.split('/')[0]+",")>=0)
		{
			patgenes += gtsplit2.split('/')[0]+",";
		}
	}
	if (patgenes != "")	
	{
		patgenes += ",";
		patgenes = patgenes.replace(",,","");
		if(patgenes.indexOf(',')>=0)
		{
			return geneExplain(patgenes,taal);
		}
	}
	return "";
}
function geneExplainAll()
{
	var genelst = genelist_CHICKEN(); 
	var explaintxt = "<TABLE>";
	for(igl in genelst)
	{
		explaintxt += "<TR><TD bgcolor=pink>" + genelst[igl][0] + "</TD><TD>"+genelst[igl][1] + "</TD><TD>&nbsp;&nbsp;</TD><TD>"+genelst[igl][2]+ "</TD></TR>";
	}
	return explaintxt+"</TABLE>";
}
function geneExplainAllTaal(taal)
{
	var genelst = genelist_CHICKEN(); 
	var explaintxt = "<TABLE>";
	var veldnr = 1;
	if (taal=='EN') veldnr = 2;
	for(igl in genelst)
	{
		explaintxt += "<TR><TD bgcolor=yellow>" + genelst[igl][0] + "</TD><TD bgcolor=pink>" + MockUpGT(genelst[igl][0]) + "</TD><TD>"+genelst[igl][veldnr] + "</TD></TR>";
	}
	return explaintxt+"</TABLE>";
}
function geneExplainPartial(gt,taal)
{
	var explaintxt = "";
	var gtsplit = gt.split(',');
	for(gts in gtsplit)
	{
		var gtsplit2 = gtsplit[gts].split(':')[1];
		explaintxt += geneExplain(gtsplit2.split('/')[0],taal);
		if(gtsplit2.split('/')[0]==gtsplit2.split('/')[1])
		{
		}
		else if(gtsplit2.split('/')[1]!="-")
		{
			explaintxt += geneExplain(gtsplit2.split('/')[1],taal);
		}
		if(("B/B,B/b+,S/s+,Bl/Bl,Bl/bl+,Co/co+").indexOf(gtsplit2)>=0)
		{
			explaintxt += geneExplain(gtsplit2,taal);
		}
	}
	explaintxt += geneExplainPartialPattern(gt,taal);
	return explaintxt;
}