﻿


	//notes = new Array("","-9 ","add9 ","m ","","","flat5 ","","aug5 ","","7th ","maj7 ")




	function binaar(ttt){ 
	var chord="";	var Q = 1;var V = 0;
	for(c=0; c<12; c++){
	if(ttt[c]==1){V=c;  var chord=P[c];	var sd = "";
	for(j=0; j<12; j++){
	if(ttt[(c+j)%12]==1){chord= chord + notes[j];tt[j] = 1; sd = sd + pam[j];}}
			
	//** "0C ","1C#","2D  ","3D#","4E ","5F   ","6F#","7G ","8G#","9A   ","10A#","11B  "	
	//** "0C ","-9 ","9th ","m3 ","3rd","411th","-5 ","5th","+5 ","613th","b7th","maj7 "	
		
	//**   11th and  7th and  (9th or 3rd)	  
 		
	if (tt[5]&&tt[10]&&(tt[2]||tt[4])){chord=chord + "11th ";}   
 	if (chord.indexOf("11th")=='-1'){if (sd.indexOf("4")>0){chord = chord + "sus4 ";}}
 		
	//**   6th and 7th and (11th or 5th)
 	if (tt[9]&&tt[10]){chord=chord + "13th ";}	
	if (chord.indexOf("13th")=='-1'){if (sd.indexOf("6")>0){chord = chord + "6th ";}}

        if (sd.indexOf("m33")=='1'){chord = chord + "#9 ";}
	
	if (sd=="R235")   {chord = P[c] + "add9 ";}
	if (sd=="R2356")  {chord = P[c] + "6/9 ";}
	if (sd=="R2456")  {chord = P[c] + "6/9 sus4 ";}
	if (sd=="R2m356")  {chord = P[c] + "minor 6/9 ";}
	if (sd=="Rd2m356") {chord = P[c] + "minor 6th flat9 ";}
	if (sd=="R3d5a56") {chord = P[c] + "6th flat5 flat13 ";}
	if (sd=="R35a5")   {chord = P[c] + "flat13 ";}
	if (sd=="R3d55")   {chord = P[c] + "#11th ";}
	
	if (sd=="Rm3d5a56") {chord = P[c] + "minor 6th flat5 flat13 ";}
	if (sd=="Rm3d55") {chord = P[c] + "minor #11th ";}
	if (sd=="Rm33d5") {chord = P[c] + "flat5 #9th ";}
	if ((sd=="Rm335")||(sd=="Rm335")){chord = P[c] + "sharp 9th ";}
	if (sd=="Rm3d5")  {chord = P[c] + "dim ";}
	if (sd=="Rm3d56") {chord = P[c] + "dim7 ";}
	if (sd=="Rm3d5b7"){chord = P[c] + "Ø half dimº  ";}

	if (sd.indexOf("7")>'0' && sd.indexOf("6")=='-1'){
	
	if (sd=="Rm3a5b7"){chord = P[c] + "m7#5 ";}
	if (sd=="R3a5b7"){chord = P[c] + "7#5 ";}
	if (sd=="R3d5b7"){chord = P[c] + "7b5 ";}
	
	if (sd=="Rm33a5b7"){chord = P[c] + "7 #5 #9th ";}
	if (sd=="R3d55b7")   {chord = P[c] + "seventh #11th ";}
	if (sd=="R3d557")   {chord = P[c] + "Maj7 #11th ";}
	if (sd=="Rm33d55b7")   {chord = P[c] + "seventh #9th #11th ";}
	if (sd=="Rm335a5b7")   {chord = P[c] + "seventh #9th flat13 ";}

	if (sd=="Rd23d5b7")   {chord = P[c] + "seventh flat5 flat9 ";}
	if (sd=="Rd235a5b7")   {chord = P[c] + "7th flat9 flat13 ";}
	if (sd=="Rd2m35b7" || sd=="Rd2m3b7")   {chord = P[c] + "minor 7th flat9 ";}
	if (sd=="Rd2m35a5b7")   {chord = P[c] + "minor 7th flat9 flat13 ";}
	if (sd=="Rm35a5b7")   {chord = P[c] + "minor 7th flat13 ";}
	if (sd=="Rd2m3d5b7")   {chord = P[c] + "minor 7th flat5 flat9 ";}


	if ((sd=="Rm335b7")||(sd=="Rm33b7")){chord = P[c] + "7th sharp 9th ";}
	if (sd=="Rm33d5b7") {chord = P[c] + "7th aug9 flat5 ";}

	if (sd.indexOf("2")>'0'){
	if (sd=="Rd23a5b7")   {chord = P[c] + "seventh flat9 flat13 ";}
	if (sd=="R235b7"||sd=="R23b7"||sd=="R2b7") {chord=P[c] + "ninth ";}
	if (sd=="R2m35b7"||sd=="R2m3b7"){chord = P[c] + "minor ninth ";}
	if (sd=="R2357"||sd=="R257")  {chord = P[c] + "major ninth ";}
	if (sd=="Rd2357")   {chord = P[c] + "Maj7 flat9 ";}
	if (sd=="R23a57"||sd=="R2a57")  {chord = P[c] + "major ninth aug5 ";}
	if (sd=="R23d57"||sd=="R2d57")  {chord = P[c] + "major ninth flat5 ";}
	if (sd=="R23d5b7"||sd=="R2d5b7")  {chord = P[c] + "ninth flat5 ";}
	//if (sd=="R23d5b7")  {chord = P[c] + "ninth flat5 ";}
	if (sd=="R23a5b7"||sd=="R2a5b7")  {chord = P[c] + "ninth aug5 ";}
	if (sd=="R23d55b7"||sd=="R2d55b7")  {chord = P[c] + "ninth #11th ";}
	if (sd=="R2m3d5b7")  {chord = P[c] + "minor ninth flat5 ";}
	if (sd=="R2m3a5b7")  {chord = P[c] + "minor ninth aug5 ";}
	if (sd=="R2m357")  {chord = P[c] + "minor ninth maj7th ";}
	if (sd=="Rd235b7")   {chord = P[c] + "seventh flat9 ";}
	if (sd=="R25b7")  {chord = P[c] + "7sus2 ";}	
	}//sd2
	
	if (sd.indexOf("4")>'0'){
	if (sd=="R2345b7"||sd=="R34b7"||sd=="R234b7"||sd=="R24b7"||sd=="R345b7"||sd=="R245b7"){chord = P[c]+ "eleventh ";}
	if (sd=="R234a5b7"||sd=="R34a5b7"||sd=="R24a5b7"){chord = P[c]+ "eleventh aug5 ";}
	if (sd=="R234d5b7"||sd=="R34d5b7"||sd=="R24d5b7"){chord = P[c]+ "eleventh flat5 ";}
	if (sd=="Rd24d5b7"){chord = P[c]+ "eleventh flat5 flat9 ";}
	if (sd=="R23457"||sd=="R347"||sd=="R2347"||sd=="R247"||sd=="R3457"||sd=="R2457"){chord = P[c]+ "major eleventh ";}
	if (sd=="R2m345b7"||sd=="Rm34b7"||sd=="R2m34b7"||sd=="Rm345b7"){chord = P[c] + "minor eleventh ";}
	if (sd=="R2m34a5b7"||sd=="Rm34a5b7"){chord = P[c] + "minor eleventh aug5 ";}
	if (sd=="R2m34d5b7"||sd=="Rm34d5b7"){chord = P[c] + "minor eleventh flat5 ";}
	if (sd=="Rd2345b7"||sd=="Rd245b7"||sd=="Rd234b7"||sd=="Rd24b7"){chord = P[c] + "eleventh flat9 ";}
  	}//sd4    R24d5b7
	}//sd7
	
	if (sd.indexOf("6b7")>'0'){          //R3d556b7
	if (sd=="R234d556b7"||sd=="R23d556b7"||sd=="R24d556b7"||sd=="R2d556b7"||sd=="R34d556b7"||sd=="R3d556b7"||sd=="R4d556b7"||sd=="Rd556b7"){chord = P[c] + "thirteenth #11th ";}
	
	if (sd=="R2m34a56b7"||sd=="R2m3a56b7"||sd=="Rm34a56b7"||sd=="Rm3a56b7"){chord = P[c] + "minor thirteenth #5th ";}
  	if (sd=="R2m34d56b7"||sd=="R2m3d56b7"||sd=="Rm34d56b7"||sd=="Rm3d56b7"){chord = P[c] + "minor thirteenth flat5 ";}
  	if (sd=="R234a56b7"||sd=="R23a56b7"||sd=="R24a56b7"||sd=="R2a56b7"||sd=="R34a56b7"||sd=="R3a56b7"||sd=="R4a56b7"||sd=="Ra56b7"){chord = P[c] + "thirteenth #5th ";}
	if (sd=="R234d56b7"||sd=="R23d56b7"||sd=="R24d56b7"||sd=="R2d56b7"||sd=="R34d56b7"||sd=="R3d56b7"||sd=="R4d56b7"||sd=="Rd56b7"){chord = P[c] + "thirteenth flat5 ";}
	if (sd=="R2m3456b7"||sd=="R2m346b7"||sd=="R2m356b7"||sd=="R2m36b7"||sd=="Rm3456b7"||sd=="Rm346b7"||sd=="Rm356b7"||sd=="Rm36b7"){chord = P[c] + "minor thirteenth ";}
  	if (sd=="R23456b7"||sd=="R2346b7"||sd=="R2356b7"||sd=="R2456b7"||sd=="R246b7"||sd=="R236b7"||sd=="R256b7"||sd=="R26b7"||sd=="R3456b7"||sd=="R346b7"||sd=="R356b7"||sd=="R36b7"||sd=="R46b7"||sd=="R456b7"||sd=="R56b7"||sd=="R6b7"){chord = P[c] + "thirteenth ";}
	
	if (sd=="Rd23456b7"||sd=="Rd2346b7"||sd=="Rd2356b7"||sd=="Rd2456b7"||sd=="Rd246b7"||sd=="Rd236b7"||sd=="Rd256b7"||sd=="Rd26b7"){chord = P[c] + "thirteenth flat9 ";}
	if (sd=="Rd2m3456b7"||sd=="Rd2m346b7"||sd=="Rd2m356b7"||sd=="Rd2m36b7"){chord = P[c] + "minor thirteenth flat9 ";}
			}//sd6b7                                Rd2m356b7


	if (sd.indexOf("67")>'0'){
	if (sd=="Rm3567" || sd=="R2m34567"){chord = P[c] + "minor/major thirteenth ";}
	if (sd=="R234a567"||sd=="R23a567"||sd=="R24a567"||sd=="R2a567"||sd=="R34a567"||sd=="R3a567"||sd=="R4a567"||sd=="Ra567"){chord = P[c] + "major thirteenth aug5 ";}
	if (sd=="R234d567"||sd=="R23d567"||sd=="R24d567"||sd=="R2d567"||sd=="R34d567"||sd=="R3d567"||sd=="R4d567"||sd=="Rd567"){chord = P[c] + "major thirteenth flat5 ";}
	if (sd=="R234567"||sd=="R23467"||sd=="R23567"||sd=="R24567"||sd=="R2467"||sd=="R2367"||sd=="R2567"||sd=="R267"||sd=="R34567"||sd=="R3467"||sd=="R3567"||sd=="R367"||sd=="R467"||sd=="R4567"||sd=="R567"||sd=="R67"){chord = P[c] + "major thirteenth ";}
	if (sd=="Rd234567"||sd=="Rd23467"||sd=="Rd23567"||sd=="Rd24567"||sd=="Rd2467"||sd=="Rd2367"||sd=="Rd2567"||sd=="Rd267"){chord = P[c] + "maj13th flat9 ";}

	
	}//sd67

		if ((tt[4]=='1')&&((tt[3]=='1')||(tt[5]=='1'))){chord=chord + "w3 ";}
		if ((tt[7]=='1')&&((tt[6]=='1')||(tt[8]=='1'))){chord=chord + "w5 ";}
		if ((tt[4]=='0')&&(tt[3]=='0')&&(tt[5]=='0')){chord=chord + "no3 ";}
		if ((tt[7]=='0')&&(tt[6]!='1')&&(tt[8]!='1')){chord=chord + "no5 ";}	
		
		if (sd=="R25")    {chord = P[c] + "sus2 ";}
 		if (sd=="R5")     {chord = P[c] + "5 ";}


		if (sd=="R2m345")  {chord = P[c] + "m add2add4 ";}
		if (sd=="R2345")   {chord = P[c] + "add2add4 ";}
		if (sd=="R345")    {chord = P[c] + "add4 ";}
		if (sd=="Rm345")   {chord = P[c] + "m add4 ";}
		if (sd=="R2m35")   {chord = P[c] + "m add9 ";}

		chord = chord + "||" + sd	
		
				
		if (Q=='1'){document.forms.prima.result1.value =chord;}	
		if (Q=='2'){document.forms.prima.result2.value =chord;}	
		if (Q=='3'){document.forms.prima.result3.value =chord;}
		if (Q=='4'){document.forms.prima.result4.value =chord;}
		if (Q=='5'){document.forms.prima.result5.value =chord;}
		if (Q=='6'){document.forms.prima.result6.value =chord;}
		Q=Q+1;	tt = new Array(0,0,0,0,0,0,0,0,0,0,0,0) }}}
