

function calcwordvalue(word)
{

	var wordvalue = 0;
	for (var c = 0; c < word.length; c++)
	{	
		var a=0;
		//document.write('<BR>' + c + ' - ' + word.charAt(c) );

		switch (word.charAt(c))
		{
			case "A": wordvalue = wordvalue +1; 
			break;
			case "B": wordvalue = wordvalue +2; 
			break;
			case "C": 	if ( word.charAt(c+1) == "H") 
					{
						// Chi
						wordvalue = wordvalue + 4;
						a=1;
					}
					else wordvalue = wordvalue +3; 
			break;
			case "D": wordvalue = wordvalue +4; 
			break;
			case "E": wordvalue = wordvalue +5; 
			break;
			case "F": wordvalue = wordvalue +6; 
			break;	
			case "G": wordvalue = wordvalue +7; 
			break;
			case "H": wordvalue = wordvalue +8; 
			break;	
			case "I": wordvalue = wordvalue +9; 
			break;
			case "J": wordvalue = wordvalue +1; 
			break;
			case "K": wordvalue = wordvalue +2; 
			break;
			case "L": wordvalue = wordvalue +3; 
			break;
			case "M": wordvalue = wordvalue +4; 
			break;
			case "N": wordvalue = wordvalue +5; 
			break;
			case "O": wordvalue = wordvalue +6; 
			break;
			case "P": 	if ( word.charAt(c+1) == "H") 
					{
						// PHi
						wordvalue = wordvalue + 3;
						a=1;
					};
			
					if ( word.charAt(c+1) == "S")
					{
						//PSi
						wordvalue = wordvalue + 5;
						a=1;
					};
			
					if ( a!=1) wordvalue = wordvalue +7; 
			break;
			case "Q": wordvalue = wordvalue +8; 
			break;	
			case "R": wordvalue = wordvalue +9; 
			break;
			case "S": wordvalue = wordvalue +1; 
			break;
			case "T":	 if ( word.charAt(c+1) == "H") 
					{
						// THeta
						wordvalue = wordvalue + 8;
						a=1;
					}
					else wordvalue = wordvalue +2;
			break;
			case "U": wordvalue = wordvalue +3; 
			break;
			case "V": wordvalue = wordvalue +4; 
			break;
			case "W": wordvalue = wordvalue +5; 
			break;
			case "X": wordvalue = wordvalue +6; 
			break;
			case "Y": wordvalue = wordvalue +7; 
			break;
			case "Z": wordvalue = wordvalue +8; 
			break;	
			
		}
		
		if (a == 1) c++; //een letter overslaan

	}
	
	return wordvalue;

}

function calckabvalue(decvalue)
{
	var kabvalue = 10 ;
	var valuestring ="";
	valuestring = String(decvalue);	
//	document.write('<BR> New decvalue:' + valuestring + ' <BR>');


	while (kabvalue > 9)
	{
		kabvalue = 0;
		for ( var t=0 ; t < valuestring.length; t++)
		{
			p= parseInt(valuestring.charAt(t));
			if (!p && p!=0) return 0;
			kabvalue = kabvalue + p;
//			document.write(' kabvalue:' + t + '=' + kabvalue + "<BR>" );
		}
		valuestring = String(kabvalue);
	}
	
	return kabvalue;
}

function calculatename(name1)
{
// separate words

	var words = new Array();
	var wordvalue = new Array();
	var wordkabvalue = new Array();
	var wordcounter = 0;
	var sub = 0;
	var counter = 0;

	//words = name1.split(' ');
	//wordcounter = words.length;

	while (counter >= 0)
	{	
		counter = name1.indexOf(' ',sub);
		//document.write('counter = ' + counter );
		//document.write('woord: ' + name1.substring(sub,((counter<0) ? name1.length : counter) ));

		if (name1.substring(sub,((counter<0) ? name1.length : counter) ) != "") 
		{
			words[wordcounter] = name1.substring(sub,((counter<0) ? name1.length : counter) );
			wordcounter++;
		}
		sub = counter+1;
	}


	// calculate word values

	//document.write('<BR><B>aantal woorden: </B>' +wordcounter);
	for ( var t = 0; t < wordcounter; t++)
	{
		wordvalue[t] = calcwordvalue(words[t]);
		wordkabvalue[t] = calckabvalue(wordvalue[t]);
		//document.write('<BR>Naam ' + t + ':"' + words[t] + '" wordValue:' + wordvalue[t] + '" kabValue:' + wordkabvalue[t]);
	}

	

	// calculate total word value

	var totalkabvalue = 0;
	for ( var t = 0; t < wordcounter; t++)
	{
		totalkabvalue = totalkabvalue + wordkabvalue[t];
	}

	//document.write('<BR>TOTAAL: ' + totalkabvalue + '-> Huwelijksgetal : ' + calckabvalue(totalkabvalue) + '<BR>');

	return calckabvalue(totalkabvalue);
}

function calculate(name1,name2,date1,date2)
{

	document.open();
	document.write('<HTML><HEAD><TITLE></TITLE></HEAD><BODY bgcolor="White" TEXT="Black" BACKGROUND="pics/back2.gif"><FONT FACE="Arial">	<DIV ALIGN=CENTER><TABLE border=1 WIDTH=85%><TR><TD>');

	document.write('<BR>Huwelijksgetal ' + name1 + ' = ' + calculatename(name1.toUpperCase())+'<BR>');
	document.write('Karakter of primair getal ' + name1 + ' = ' + calckabvalue(date1)+'<BR>');

	document.write('<BR>Huwelijksgetal ' + name2 + ' = ' + calculatename(name2.toUpperCase())+'<BR>');
	document.write('Karakter of primair getal ' + name2 + ' = ' + calckabvalue(date2)+'<BR>');
	document.write('</TD></TABLE></BODY></HTML>');
	document.close();

//	return;
}

function PrintDit() {
	// IE5.0 geeft ook 4.0 in navigator.appVersion, in ASP afvangen
	
	window.print()
	
}

