// van input NOTEN naar output AKKOORDEN
// Serge Girard - - - - - - oktober 2006 


var max = 0;

var volgorder = new Array(11);	// een array met 12 volgorde 
var volgorderN = new Array(11);	// een array met 12 volgorde 



//==============================// 
// definitie van de akkoorden   //
//==============================//
var teller = 0; 
var juist;
var atl_copy = 0;
var sbt;



function Test(form) 
{ 
// hierooo
SortVolgorde() ;

for (var ax=0; ax<=6; ax++) { zakkoord [ax] = " "; }	// ff uitblanken

var bb = 1;
for (var ax=0; ax<=11; ax++)	// tot aantal sorteermogelijkheden
{				
   if ( volgorder [ax] > 0 )
	{
		zakkoord [bb] = volgorderN [ax];
		bb++;
	} // endif
} // endfor ax
// hierooo
// hierooo
// hierooo


atl_copy=0
aantal_akkoorden_gevonden=0;


}    // end function Test(form)





function SorteerTabel()
{
for (a=0; a < maxnoten-1; a++ )
	{
	for (b=a; b < maxnoten; b++ )
		{

// # klanken + bouw
//		a1 = akkoord [a] [9] + akkoord [a] [1] + akkoord [a] [2] + akkoord [a] [3] + akkoord [a] [4] + akkoord [a] [5] + akkoord [a] [6];
//		b1 = akkoord [b] [9] + akkoord [b] [1] + akkoord [b] [2] + akkoord [b] [3] + akkoord [b] [4] + akkoord [b] [5] + akkoord [b] [6];

//  naam 
//		a1 = akkoord [a] [8];
//		b1 = akkoord [b] [8];

//  bouw + naam
//		a1 = akkoord [a] [1] + akkoord [a] [2] + akkoord [a] [3] + akkoord [a] [4] + akkoord [a] [5] + akkoord [a] [6] + akkoord [a] [8];
//		b1 = akkoord [b] [1] + akkoord [b] [2] + akkoord [b] [3] + akkoord [b] [4] + akkoord [b] [5] + akkoord [b] [6] + akkoord [b] [8];

//  fam + bouw + naam
		a1 = akkoord [a] [10] + akkoord [a] [1] + akkoord [a] [2] + akkoord [a] [3] + akkoord [a] [4] + akkoord [a] [5] + akkoord [a] [6] + akkoord [a] [8];
		b1 = akkoord [b] [10] + akkoord [b] [1] + akkoord [b] [2] + akkoord [b] [3] + akkoord [b] [4] + akkoord [b] [5] + akkoord [b] [6] + akkoord [b] [8];


		if (b1 < a1)
		{
			// verwissel boeltje
			hulp = akkoord [b];
			akkoord [b] = akkoord [a];
	        akkoord [a] = hulp;
		} // endif
	  } // next b
   } // next a
} // end function SorteerTabel



function bt_sort1()
{
sbt  = 1; 
sort1();
} // end function bt_sort1



function bt_sort2()
{
sbt  = 2; 
sort1();
} // end function bt_sort1


function bt_sort3()
{
sbt  = 3; 
sort1();
} // end function bt_sort1



function bt_sort4()
{
sbt  = 4; 
sort1();
} // end function bt_sort1



function sort1()
{
aantal_akkoorden_gevonden_juist = 0;
aantal_akkoorden_gevonden_juist2 = aantal_akkoorden_gevonden_juist;

//alert('sort' +atl_copy);

for (a=1; a <= atl_copy-1; a++ )
	{
	c= a+1
	for (b=c; b <= atl_copy; b++ )
		{


		if (sbt==1)
		{
		//  naam 
			a1 = cakkoord [a] [0] + cakkoord [a] [8];
			b1 = cakkoord [b] [0] + cakkoord [b] [8];
		}

		
		if (sbt==2)
		{
		//  bouw + naam
			a1 = cakkoord [a] [1] + cakkoord [a] [2] + cakkoord [a] [3] + cakkoord [a] [4] + cakkoord [a] [5] + cakkoord [a] [6] +
				 cakkoord [a] [8];
			b1 = cakkoord [b] [1] + cakkoord [b] [2] + cakkoord [b] [3] + cakkoord [b] [4] + cakkoord [b] [5] + cakkoord [b] [6] + 
				 cakkoord [b] [8];
		}


		if (sbt==3)
		{
		//  fam + bouw + naam
			a1 = cakkoord [a] [10] + cakkoord [a] [9] + cakkoord [a] [0] + cakkoord [a] [1] + cakkoord [a] [2] + cakkoord [a] [3] + 
				 cakkoord [a] [4]  + cakkoord [a] [5] + cakkoord [a] [6] + cakkoord [a] [8];
			b1 = cakkoord [b] [10] + cakkoord [b] [9] + cakkoord [b] [0] + cakkoord [b] [1] + cakkoord [b] [2] + cakkoord [b] [3] + 
				 cakkoord [b] [4]  + cakkoord [b] [5] + cakkoord [b] [6] + cakkoord [b] [8];
//			alert('sbt <br/>' +a1 + '<br/>' + b1);

		}


		if (sbt==4)
		{
		// # klanken + bouw
			a1 = cakkoord [a] [9] + cakkoord [a] [0] + cakkoord [a] [1] + cakkoord [a] [2] + cakkoord [a] [3] + cakkoord [a] [4] + 
				 cakkoord [a] [5] + cakkoord [a] [6];
			b1 = cakkoord [b] [9] + cakkoord [b] [0] + cakkoord [b] [1] + cakkoord [b] [2] + cakkoord [b] [3] + cakkoord [b] [4] + 
				 cakkoord [b] [5] + cakkoord [b] [6];
		}



		if (b1 < a1)
		{
			// verwissel boeltje
			hulp = cakkoord [b];
			cakkoord [b] = cakkoord [a];
	        cakkoord [a] = hulp;
		} // endif
	  } // next b
   } // next a

build_chord_table();

} // end function sort1



// http://www.joelmabus.com/improvisation_2.htm
function SortVolgorde() 
{ 

for (a=0; a < 10; a++ )
	{
	for (b=a; b < 11; b++ )
		{

		a1 = volgorder [a] ;
		b1 = volgorder [b] ;

		if (b1 < a1)
		{
			// verwissel boeltje
			hulp = volgorder  [b];
			volgorder [b] = volgorder [a];
	        volgorder [a] = hulp;

			hulp = volgorderN  [b];
			volgorderN [b] = volgorderN [a];
	        volgorderN [a] = hulp;

		} // endif
	  } // next b
   } // next a
} // end function SortVolgorde




function ClearAll(form) 
{ 
document.getElementById('Inp').innerHTML = " ";
document.getElementById('Zoek').innerHTML = " ";
document.getElementById('Tab1').innerHTML = " ";
max = 0;
form.reset(); 
} // end function ClearAll 




function Reset_Volgorde(form) 
{ 
//form.reset(); 
//form.reset.volgC();
//form.volgC.clear();
form.volgC.value = "0";


} // end function ClearAll 






function Volgorde(varia) 
{ 

// de selectie volgorde vastleggen -----------------------------------------------------------------------------
// -------------------------------------------------------------------------------------------------------------

ww1 = isNaN(form1.txt1); 
ww2 = isNaN(form1.txt2); 
ww3 = isNaN(form1.txt3); 
ww4 = isNaN(form1.txt4); 
ww5 = isNaN(form1.txt5); 
ww6 = isNaN(form1.txt6); 
ww7 = isNaN(form1.txt7); 
ww8 = isNaN(form1.txt8); 
ww9 = isNaN(form1.txt9); 
ww10 = isNaN(form1.txt10); 
ww11 = isNaN(form1.txt11); 
ww12 = isNaN(form1.txt12); 

if (varia ==1)  { if ( ( ! form1.box1.checked) && (ww1) )   {form1.txt1.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==2)  { if ( ( ! form1.box2.checked) && (ww2) )   {form1.txt2.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==3)  { if ( ( ! form1.box3.checked) && (ww3) )   {form1.txt3.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==4)  { if ( ( ! form1.box4.checked) && (ww4) )   {form1.txt4.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==5)  { if ( ( ! form1.box5.checked) && (ww5) )   {form1.txt5.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==6)  { if ( ( ! form1.box6.checked) && (ww6) )   {form1.txt6.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==7)  { if ( ( ! form1.box7.checked) && (ww7) )   {form1.txt7.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==8)  { if ( ( ! form1.box8.checked) && (ww8) )   {form1.txt8.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==9)  { if ( ( ! form1.box9.checked) && (ww9) )   {form1.txt9.value = 0;max=max-2;} }	   // deze wordt een ontbrekende
if (varia ==10) { if ( ( ! form1.box10.checked) && (ww10) ) {form1.txt10.value = 0;max=max-2;} }	// deze wordt een ontbrekende
if (varia ==11) { if ( ( ! form1.box11.checked) && (ww11) ) {form1.txt11.value = 0;max=max-2;} }	// deze wordt een ontbrekende
if (varia ==12) { if ( ( ! form1.box12.checked) && (ww12) ) {form1.txt12.value = 0;max=max-2;} }	// deze wordt een ontbrekende

volgorder [0]  = form1.txt1.value;
volgorder [1]  = form1.txt2.value;
volgorder [2]  = form1.txt3.value;
volgorder [3]  = form1.txt4.value;
volgorder [4]  = form1.txt5.value;
volgorder [5]  = form1.txt6.value;
volgorder [6]  = form1.txt7.value;
volgorder [7]  = form1.txt8.value;
volgorder [8]  = form1.txt9.value;
volgorder [9]  = form1.txt10.value;
volgorder [10]  = form1.txt11.value;
volgorder [11]  = form1.txt12.value;


for (var a=0; a<=11; a++ )
{
	if (volgorder [a] > 0)
	{
		if (volgorder [a] > max)
		{
			max = volgorder [a];
		}
	}
}

var zont = 0;
var ont = 1;

for (var b=1; b<=max; b++ )   // we zoeken B
{
	var ont = 0;

	for (var a=0; a<=11; a++ )  // in rij A
	{
		if (volgorder [a] == b)  // we zoeken B
		{
		//	GEVONDEN 
			ont = 1;		// gevonden
			break;
		}    // endif
	}		// endfor a
	
	if (ont==0)
	{
		// B ONTBREEKT EN WORDT HERGEBRUIKT	
		max = b-1;
		break;
	}	// ENDIF
}		// endfor b



max++;

if (varia ==1)  { if ( (form1.box1.checked) && (ww1) ) {form1.txt1.value = max;} }
if (varia ==2)  { if ( (form1.box2.checked) && (ww2) ) {form1.txt2.value = max;} }
if (varia ==3)  { if ( (form1.box3.checked) && (ww3) ) {form1.txt3.value = max;} }
if (varia ==4)  { if ( (form1.box4.checked) && (ww4) ) {form1.txt4.value = max;} }
if (varia ==5)  { if ( (form1.box5.checked) && (ww5) ) {form1.txt5.value = max;} }
if (varia ==6)  { if ( (form1.box6.checked) && (ww6) ) {form1.txt6.value = max;} }
if (varia ==7)  { if ( (form1.box7.checked) && (ww7) ) {form1.txt7.value = max;} }
if (varia ==8)  { if ( (form1.box8.checked) && (ww8) ) {form1.txt8.value = max;} }
if (varia ==9)  { if ( (form1.box9.checked) && (ww9) ) {form1.txt9.value = max;} }
if (varia ==10) { if ( (form1.box10.checked) && (ww10) ) {form1.txt10.value = max;} }
if (varia ==11) { if ( (form1.box11.checked) && (ww11) ) {form1.txt11.value = max;} }
if (varia ==12) { if ( (form1.box12.checked) && (ww12) ) {form1.txt12.value = max;} }

volgorder [0]  = form1.txt1.value;
volgorder [1]  = form1.txt2.value;
volgorder [2]  = form1.txt3.value;
volgorder [3]  = form1.txt4.value;
volgorder [4]  = form1.txt5.value;
volgorder [5]  = form1.txt6.value;
volgorder [6]  = form1.txt7.value;
volgorder [7]  = form1.txt8.value;
volgorder [8]  = form1.txt9.value;
volgorder [9]  = form1.txt10.value;
volgorder [10]  = form1.txt11.value;
volgorder [11]  = form1.txt12.value;

volgorderN [0]  = nt [1];
volgorderN [1]  = nt [2];
volgorderN [2]  = nt [3];
volgorderN [3]  = nt [4];
volgorderN [4]  = nt [5];
volgorderN [5]  = nt [6];
volgorderN [6]  = nt [7];
volgorderN [7]  = nt [8];
volgorderN [8]  = nt [9];
volgorderN [9]  = nt [10];
volgorderN [10]  = nt [11];
volgorderN [11]  = nt [12];


//form1.txt1.style.fontSize = "large";  
//form1.txt1.style.fontFamily = 'sans-serif';
//form1.txt1.style.fontSize = "18px";  

//document.getElementById('txt1').innerHTML = "1";
//form.txt1.value = "1";
//ais0.value = n0;  // akkoord


} // end function Volgorde 


function overxy(x,y){document.images[y].src = x};
function uitxy(x,y) {document.images[y].src = x};