//////////////////////////////////////////////////////
// GENERATOR 6 with Sound in JAVASCRIPT Version 4.01 
// by Jim Cranwell (cranwell @ yahoo.com) 
// This program is Copyright 2006 by Jim Cranwell.
// You may not reprint or redistribute this code.
////////////////////////////////////////////////////

function fixDate(date) {
var base = new Date(0);
var skew = base.getTime();
if (skew > 0) date.setTime(date.getTime() - skew);}//

var current = new Date(); // a new instance
fixDate(current);
var capolist = "zero,one,two,three,four,five,six,seven,eight,nine,ten,eleven,twelve,thirteen,fourteen,fifteen,sixteen,seventeen,eighteen,nineteen,twenty,twentyone,twentytwo,blank,fret,xx,xxf,blue,r1,r2,r3,r4,r5,r6,r7,r8,r9,r10,r11,r12,r1,s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,s11,s12,s1,xxx,pblue,pgreen,pred,purp,pgrey4,bar0,bars" 
var capo = capolist.split(",")
var imageDB = new Array()
for (i = 0; i < capo.length; i++) {
	imageDB[i]=new Image
	imageDB[i].src= "../gen2/" + capo[i] + ".gif"	}

var alerttt = 0;
var pxx =""
var strng = 0;
var FR = 0;


var notelist = "c1,cs1,d1,ds1,e1,f1,fs1,g1,gs1,a1,as1,b1,c2,cs2,d2,ds2,e2,f2,fs2,g2,gs2,a2,as2,b2,c3,cs3,d3,ds3,e3,f3,fs3,g3,gs3,a3,as3,b3,c4,cs4,d4,ds4,e4,f4,fs4,g4,gs4,a4,as4,b4,c5,cs5,d5,ds5,e5,c1,df1,d1,ef1,e1,f1,gf1,g1,af1,a1,bf1,b1,c2,df2,d2,ef2,e2,f2,gf2,g2,af2,a2,bf2,b2,c3,df3,d3,ef3,e3,f3,gf3,g3,af3,a3,bf3,b3,c4,df4,d4,ef4,e4,f4,gf4,g4,af4,a4,bf4,b4,c5,df5,d5,ef5,e5,blank" 
var noto = notelist.split(",")
var inote = new Array()
for (i = 0; i < noto.length; i++) {
	inote[i]=new Image
	inote[i].src= "../notes/" + noto[i] + ".gif"	}//

var nameit="";
var titleit="";

	//  23=blank 24=fret 25=xxx 26=xxxf 27=blue	


var tiidd = null; //
var tmd=  166; 	 //
var durit=  0; 	 //

	
	function durr(){z =document.forms.primax.dur.selectedIndex; 
	if (z==0){tmd=0};	
	if (z==1){tmd=100};
	if (z==2){tmd=166};
	if (z==3){tmd=250};
	if (z==4){tmd=500};
	if (z==5){tmd=1000};						 
	}//	



function modes3(){ clearTimeout(tiidd);
	durit=0; modes2();
				}//modes



function modes2(){ 							

		 playit(zzzsound[durit]);  

	if (zzzsound[durit] > 0){   //122
	
	//document.images[durit + 6 * y + 8].src = imageDB[60].src;   
	//document.images[durit + 6 * y + 8].src = imageDB[61].src;   

	}//;

		 durit++;  			 

		tiidd = setTimeout("modes2()", tmd);          
 		if (durit>zzzsound.length){clearTimeout(tiidd);}
				

		}//modes




function modes(aaa){ 							 
	if (zzzsound[aaa] !=-1 && zzzsound[aaa] < 80){ 
	playit(zzzsound[aaa]);
	
	//document.images[aaa + 6 * y + 8].src = imageDB[60].src;    
	//document.images[aaa + 6 * y + 8].src = imageDB[61].src;   

			}//

  	if (aaa == 6 && 3==4){
  	for(d=0;d<(6);d++){						
	if (zzzsound[d] !=-1 && zzzsound[d] < 80){
	playit(zzzsound[d]);;}//if
	}//for
	}//if
	}//modes
	

	
function quote(){ppp=eval(document.primax.result4.selectedIndex) }//
function quotex(){sss=eval(document.primax.result5.selectedIndex) }//

			
function docitx(){
	for(d=0; d<6; d++){ notead[d] = P[13]; 
	if(savirt[d]==199){ // num2[d]==88;
	for(ee=0; ee<y; ee++){
	if(ee<y){document.images[ee + (y*5) - (d*y) + fix].src = imageDB[24].src }
	  	// if(ee>y){document.images[ee*6+d+fix].src = imageDB[23].src}
	}//foree
	document.images[(y*5) - (d*y) + fix].src = imageDB[25].src; zzzsound[d]=-1; }//if
	}//for
	}//doc

function docnote(dcn){  if(alerttt){ alert('in docnote = '+V)};  // alert(zzzsound);
	for(d=0;d<6;d++){

	 
	
	if (zzzsound[d]>=0){  
	zpx[d]=zzzsound[d]+sf
	//document.images[6*y + d + fix].src = inote[zpx[5]].src;
		
	} else { zpx[d] = 106} //else
	
	};//for
	
	
	//if (dcn==0 || dcn ==6){document.forms.primax.noto6.src = inote[zpx[0]].src;}
	//if (dcn==1 || dcn ==6){document.forms.primax.noto5.src = inote[zpx[1]].src;}
	//if (dcn==2 || dcn ==6){document.forms.primax.noto4.src = inote[zpx[2]].src;}
	//if (dcn==3 || dcn ==6){document.forms.primax.noto3.src = inote[zpx[3]].src;}
	//if (dcn==4 || dcn ==6){document.forms.primax.noto2.src = inote[zpx[4]].src;}	
	//if (dcn==5 || dcn ==6){document.forms.primax.noto1.src = inote[zpx[5]].src;} 
	
	
		}//


	
function number(z ,k) {		 strng = 5- Math.floor(z/y); FR = Math.floor(z%y);

	//if ((k=='3')&&((notal[z])!=(199))){ alert(notal[z]);}//


				// shows tones correctly                       add 13 to open
	//if (notal[z]!=199){ document.images[z+fix].src=imageDB[(MMM[strng]+FR+12-D)%12+rrr+13].src;}
					
	 if (k==1){
	document.images[6*y + 15 + fix + 1].src = inote[MMM[strng]+FR+sf].src;	
	document.forms.primax.result7.value =P[(MMM[strng]+FR)%12];}

	//newenk
	   if (enkzzz[z]!=199 && enkzzz[z]>=0){	
		 if (k==1){playit(enkzzz[z]);	return false;}//
		 if (k==2){			return false;}//
				}//	

	
       	


	//FR mouseover place including FRT select
	
	 		
	
	
  if ((z=='-1')&&(k=='4')){ //for(d=0;d<6;d++){zpx[d] = inote[53].src;}
	
	// took out hand wasenk
	//if (document.forms.primax.hand.checked==0){ 
	
	 num2=new Array(4,9,2,7,11,4)  
	//}; 

	z=-2; RIGHT=0}
	
	 if ((z=='-2')&&(k=='4')){	// enk document.forms.primax.tuning.selectedIndex=0;		
	
	tunit();
	
	document.forms.primax.result.value =" ";
	document.forms.primax.result2.value =" ";

	setune=""; 
	for(b=0;b<(6);b++){setune=setune+P[MMM[b]%12];}
	 z=0; k=='2';	}//if-1

 	

	 return false;
	alert("didn't return");


	 
	if ((z%y == 0)&&(savirt[strng]==199)&&(op)){} ;				
	
	  ; //

	

	if ((k=='3')&&((savirt[strng])!=(199))){ zzzsound[strng]=-1;
	docnote(strng); // document.forms.primax.noto[strng].src = inote[53].src;
	if ((num2[strng])==((MMM[strng]+FR)%12)){
	 k=2; num2[strng]=88; zip(z,k);}
			
	if ((savirt[strng]%y >= 0))    {document.images[savirt[strng]+fix].src=imageDB[24].src;}
	
			//maybe no G enk &&(G==0)
	if ((savirt[strng]%y == 0) && (G==0)){document.images[savirt[strng]+fix].src=imageDB[23].src;}
	 savirt[strng]=(199);							//binaar(ttt);	
					}//if k=3 && savert
											//alert(savirt);
	W=(zzz[strng]); 

		
									
	if ((k==1) && (document.forms.primax.onmousex.checked==1 || (savirt[strng]==z))){
	 playit(MMM[strng]+FR);   
	//   wasenk zzz[strng]+FR      
   		
	
	//document.images[strng + 6*y + 8].src = imageDB[60].src
	//document.images[strng + 6*y + 8].src = imageDB[61].src
		
			}//

	if (k==3){							
	zzzsound[strng]=W; zpx[strng]=W;	
	docnote(strng);	//document.forms.primax.noto[strng].src = inote[zpx[strng]].src;
	 playit(zzz[strng]+FR); 
			
		}// k==3

 									

	
	 if ((num2[strng])!=((MMM[strng]+FR)%12)){ docit(z,k) ;   } 
	
	if ((rrr)&&(k=='2')&&(savirt[strng]!=199)){ 		 			//alert(savirt)
		
	
 if (((num2[strng])%12==((MMM[strng]+FR)%12))&&(z%y == 0)){  				
	document.images[z+fix].src=imageDB[(MMM[strng]+FR+12-D)%12+rrr+13].src;}
 
						 		
if (((num2[strng])%12==((MMM[strng]+FR)%12))&&((z%y != 0) || G  )){			
	document.images[z+fix].src=imageDB[(MMM[strng]+FR+12-D)%12+rrr].src;}
              	}//
 	
	}//number




function zip(z,k) { 
	document.forms.primax.result.value =" <---- ";
	savirt[strng]=z; 	//tookout (5-strng)*y+FR 0812	
	//document.forms.primax.chords.selectedIndex=0;
						//wasenk
	if (k=='3'){num2[strng]=(MMM[strng]+FR);   //%12;
							}//
	Q2 = " "; P[88]=  "x ";  // needs not j
	for(j=0; j<6; j++){Q2 = Q2 + P[(num2[j])%12] + " ";}
	document.forms.primax.result2.value = Q2;
	



	ttt = new Array(0,0,0,0,0,0,0,0,0,0,0,0); tsave=1;    				
	for (j=0;j<6;j++) { if (num2[j]!=88){ttt[num2[j]] =1 }} ;
											//alert(num2);alert(ttt);
	 }//**zip

		
function docit(z,k){
   									
   	if (num2[strng]==88){ Q1[strng] = P[20];}
   
	 if (k=='1'){     
			// z+fix was enk (5-strng)*y+FR+fix
	
	if (!rrr){document.images[z+fix].src=imageDB[FR].src;}  //  
   
	       //021805 was document.images[(5-strng)*y+FR+fix].src=imageDB[(MMM[strng]+FR)%12+rrr].src;
		
	//  was z<6 enk

	if ((rrr && (z%y == 0))){document.images[z+fix].src=imageDB[(MMM[strng]+FR+12-D)%12+rrr+13].src;}
	if ((rrr && (z%y != 0))||(G && ((num2[strng]+FR)==(MMM[strng]+FR)%12))){
	document.images[z+fix].src=imageDB[(MMM[strng]+FR+12-D)%12+rrr].src;}
	
	}//k==1       									 

	if (k=='2'){	 document.images[z+fix].src=imageDB[24].src;

	//frets is on and the num2 stored equals the tuning ....blue string
	if ((G!=0)&&(num2[strng]==MMM[strng]%12)){document.images[z+fix].src=imageDB[27].src;}
        
	if ((z%y == 0)&&(G==0))	{document.images[z+fix].src=imageDB[23].src;   
				}//
	if ((z%y == 0)&&(G!=0)&&(num2[strng]==MMM[strng]%12)){			
		//alert(MMM[strng]%12)

		if (!rrr){document.images[z+fix].src=imageDB[0].src;}
		if (rrr){document.images[z+fix].src=imageDB[(MMM[strng]+12-D)%12+rrr+13].src;}
				}//
			}//k==2

	if ((k=='3')){ 
  	if (num2[strng]!=88){ Q1[strng] = P[(MMM[strng]+FR)%12];}
	zip(z,k); document.images[z+fix].src=imageDB[FR].src;}//k==3
	 }//docit ¯ ® § € ¦¦³³³·×‡†    ///tookout FR 081209 (5-strng)*y+FR+fix


	
function process2(callingElement) {
	//chordname[pr] = document.forms.primax.pichord.value = callingElement.value;
				}//

	
function tunit(){

var tuner = document.forms.primax.tuning.selectedIndex;
var tutext = document.forms.primax.tuning.options[tuner].text;
toon = tutext;
//RIGHT = document.forms.primax.hand.selectedIndex;

if (tutext=="EADGBE") {MMM = new Array(4, 9,2,7,11,4)};
if (tutext=="EBEG#BE"){MMM = new Array(4,11,4,8,11,4)};
if (tutext=="EAEAC#E"){MMM = new Array(4, 9,4,9, 13,4)};
if (tutext=="EAC#EAE"){MMM = new Array(4, 9,1,4, 9,4)};
 
if (tutext=="EBC#F#BE"){MMM = new Array(4,11,1,6,11,4)};

if (tutext=="EADF#BE"){MMM = new Array(4, 9,2,6,11,4)};
if (tutext=="EADGCF") {MMM = new Array(4, 9,2,7, 12,5)};
if (tutext=="DADGAD") {MMM = new Array(2, 9,2,7, 9,2)};
if (tutext=="DGCGCD") {MMM = new Array(2, 7,0,7, 12,2)};
if (tutext=="DADF#AD"){MMM = new Array(2, 9,2,6, 9,2)};
if (tutext=="DADGBE") {MMM = new Array(2, 9,2,7,11,4)};
if (tutext=="DGDGBD") {MMM = new Array(2, 7,2,7,11,2)};

if (tutext=="DACGCD") {MMM = new Array(2, 9,0,7, 12,2)};

if (tutext=="DADACD") {MMM = new Array(2, 9,2,9, 12,2)};
if (tutext=="CGCGAE") {MMM = new Array(0, 7,0,7, 9,4)};
if (tutext=="CGDAEG") {MMM = new Array(0, 7,2,9, 16,7)};

if (tutext=="CGDGCD") {MMM = new Array(0, 7,2,7, 12,2)};
if (tutext=="CGCDGC") {MMM = new Array(0, 7,0,2, 7,0)};

if (tutext=="FADGBE") {MMM = new Array(5, 9,2,7,11,4)};
if (tutext=="Gminor") {MMM = new Array(7,10,2,7,10,2)};
if (tutext=="GCFADG") {MMM = new Array(7,12,5,9,14,7)};
if (tutext=="BEADF#B"){MMM = new Array(11, 16, 9,14,18,11)};
if (tutext=="Drop2")  {MMM = new Array(2, 7,0,5, 9,2)};
if (tutext=="Drop1")  {MMM = new Array(3, 8,1,6,10,3)};
if (tutext=="Capo1") {MMM = new Array(5,10,3, 8,12,5)};
if (tutext=="Capo2") {MMM = new Array(6,11,4, 9,13,6)};
if (tutext=="Capo3") {MMM = new Array(7, 12,5,10,14,7)};
if (tutext=="Capo4") {MMM = new Array(8, 13,6,11,15,8)};
if (tutext=="Capo5") {MMM = new Array(9, 14,7, 12,16,9)};
if (tutext=="Capo6") {MMM = new Array(10,15,8, 13,17,10)};   ///zzzplus = new Array(0, 12,12,24,24,24);
if (tutext=="Capo7") {MMM = new Array(11,16, 9,14,18,11)};
if (tutext=="Capo8") {MMM = new Array(12,17,10,15,19,12)};

	 for(bz=0;bz<(6);bz++){if (MMM[bz] > MMM[bz+1]){ MMM[bz+1] = MMM[bz+1]+12}}
	 for(bz=0;bz<(6);bz++){if (MMM[bz+1] > MMM[bz]+12){MMM[bz+1] = MMM[bz+1]-12}}
	 for(bz=0;bz<(6);bz++){if (MMM[bz] > MMM[bz+1]){ MMM[bz+1] = MMM[bz+1]+12}}
	 for(bz=0;bz<(6);bz++){if (MMM[bz+1] > MMM[bz]+12){MMM[bz+1] = MMM[bz+1]-12}}

if (tutext=="nashvil") {MMM = new Array(16, 21,26,19,23,28)};


	pmmm();


	notal = new Array();
	enkzzz	= new Array();
	for(j=0;j<(y*6);j++){		notal[j] = 199; enkzzz[j] = 199;
	if (j%y == 0){document.images[j+fix].src=imageDB[23].src;}   //blank
	        else {document.images[j+fix].src=imageDB[24].src;}   //fret
			}//forj

//was (RIGHT) enk serious lefty bug
if((RIGHT % 2)!=0){MMM.reverse();} 
setune=" "
for(d=0;d<(6);d++){setune=setune+P[MMM[d]%12];  zzz[d]= MMM[d]  }   //+ zzzplus[d];
	 document.forms.primax.result2.value =setune;
	
}//

function pmmm(){ 
	
	document.forms.primax.PMMM0.value = P[(MMM[5])%12];  				//alert()
	document.forms.primax.PMMM1.value = P[(MMM[4])%12];
	document.forms.primax.PMMM2.value = P[(MMM[3])%12];
	document.forms.primax.PMMM3.value = P[(MMM[2])%12];
	document.forms.primax.PMMM4.value = P[(MMM[1])%12];
	document.forms.primax.PMMM5.value = P[(MMM[0])%12];
			}//



	function tickx() { clearTimeout(tiid); }//
	function tickxxx() {pppp=abc+1; }//




function rever(){
	MMM.reverse();zzz.reverse(); zzzplus.reverse(); setune=" ";lefty = " ";
	RIGHT += 1; 
	if ((RIGHT % 2)!=0){lefty = "lefty"}
	for(d=0;d<(xxx);d++){setune=setune+P[MMM[d]%12];}
	document.forms.primax.result2.value =setune;
		pmmm();
			}//

	
	
function clearitx(){pr=0; titleit="";	num = new Array(); number(-1,4);}


	
function savit(){ 	

	// chordname[pr]=document.forms.primax.result.value
	QQ = Q;
	if (y != 7){QQ = y -1 };
	num[pr] = new Array(); prst[pr] = (QQ+1)*6 
										
	

if(flagit==2){	var enker = (QQ+1);			

	
for(i=0;i<y;i++ ){
for(b=0; b<6 ; b++ ){	
				
	num[pr][i*6+b] = "| ";
	
	if((i==0)&&(!G)){ num[pr][i*6+b] = "__" }//ifi

	if(notal[(5-b)*y +i]!=199 && document.forms.primax.shownote.checked==1){
	num[pr][i*6+b] =  P[notal[(5-b)*y +i]%12];
				}; //ifnotal

	if(notal[(5-b)*y +i]!=199 && document.forms.primax.shownote.checked==0){
	
			    //wasenk /6	                         /6
	num[pr][i*6+b]=Math.floor(i); if(Math.floor(i) < 10){
	num[pr][i*6+b]+= " " } 

	 }//	
	
	 } //fori	 
	 } //forb


	 } //if flag2

	if(chordname[pr]){pr = pr + 1;} 
										
	} // savit

	
function fs(fff){rrr=0; 
	if (document.forms.primax.shownote.checked==1){rrr=28}
	if (fff=='1'){sf=0
	P=new Array("C ","C#","D ","D#","E ","F ","F#","G ","G#","A ","A#","B ","C ","x ")}
	if (fff=='0'){sf=53
	P=new Array("C ","Db","D ","Eb","E ","F ","Gb","G ","Ab","A ","Bb","B ","C ","x ")}
	 P[20] = "x ";// binaar(ttt); number(); 
	}//




var enkfix = 0;
var enkzzz = new Array();
var tiiiiid = null




function showal(){	//FRT = document.forms.primax.frets.selectedIndex;		

	 rrr=0; flagit=2; // 
	//chordname[pr]=document.forms.primax.pichord.value +" "
	
//chordname[pr]= ""+ P[DDD] +" "+ document.forms.primax.scale.options[document.forms.primax.scale.selectedIndex].text + " ";

	chordnotes[pr]= document.forms.primax.result2.value = "scale";

	if (document.forms.primax.shownote.checked==1){rrr=28}
 	
	notal = new Array();
	enkzzz	= new Array();
	zzzsound = new Array();
	ttt = new Array(0,0,0,0,0,0,0,0,0,0,0,0);


 	for(j=0; j<y*6; j++){notal[j]=199; enkzzz[j]=199};

	treen = 0;									//alert(MMM);
	
 	for(c=0; c<13; c++){   
	
	document.images[6*y + c + fix + 3].src = inote[noto.length-1].src;      //alert(c);
	
	//if ( TT[c]==1 ){

	if ( tttenk[1][document.forms.primax.scale.selectedIndex][c%12]==1 ){   ttt[c%12]=1;

	///fixbelow enk
	
	
	zpx[c] = c+DDD+sf;								 
	document.images[6*y + treen + fix + 1].src = inote[zpx[c]].src;		//alert(zpx);
	zzzsound[treen] = c+DDD;
	treen++ ;

	

//was 0 071009
 	
for(i=0; i<6; i++){   
for(j=0; j<y; j++){  
			//mayne no FRT wasenk 081009
 	if((MMM[i] + Math.floor(j)  )%12 == (c+DDD)%12){   
	 
	enk = y * (5-i) + j ; 

	notal[enk]= MMM[i] + (j%y) ;	//alert(notal[j]);enk
	enkzzz[enk]= MMM[i] + (j%y);  //	 + zzzplus[i];;				 
	
	
			
	}}//forj
	}//fori

	}//if
	} //forc
		
//document.forms.primax.display.value = "z="+z +"\n enkzzz="+ enkzzz +"\n notal=" + notal +"\n num2="+ num2 +"\n savirt="+ savirt;
								
	clearTimeout(tiidd);						//alert(MMM);					

	enkfix = 0;  timmmer(); 
	
		
	} // showal			savirt[b]=199;num2[b]=88

									
		
function timmmer(){ 
	
	enk = (5 - Math.floor(enkfix/y))*y  + (enkfix % y) ;  		//D = (D%12);
	 //(enkfix % y)*6 + (Math.floor(enkfix/y)); 	
	//enk = enkfix; 	

	if(tmd!=0){   }//
	tiidd = setTimeout("timmmer()", tmd);				
	//alert("enkfix % (y) = " + enkfix % y)
	//alert("Math.floor(enkfix/6)*6 = " + Math.floor(enkfix/6)*6)
	//alert("enkfix = " + enkfix)

		//for(enk=0; enk<y*6 ; enk++ ){  

	if((notal[enk]==199)) 	  {document.images[enk+fix].src = imageDB[24].src;}
	if((enk%y==0)&&(!G))	  {document.images[enk+fix].src = imageDB[23].src;}
					
	
 if((notal[enk]!=199)&&(rrr)&&(enk%y==0)){document.images[enk+fix].src=imageDB[(notal[enk]+12-(D%12))%12+rrr+13].src;
	if (document.forms.primax.onmousex.checked==1){ playit(enkzzz[enk]);}// 		
		}//
	
 if((notal[enk]!=199)&&(rrr)&&(enk%y!=0 || G)){document.images[enk+fix].src=imageDB[(notal[enk]+12-(D%12))%12+rrr].src;
	if (document.forms.primax.onmousex.checked==1){ playit(enkzzz[enk]);}// 		
		}//
	
	if((notal[enk]!=199)&&(!rrr)){document.images[enk+fix].src = imageDB[(Math.floor(enk%y))].src;
	if (document.forms.primax.onmousex.checked==1){ playit(enkzzz[enk]);}// 		
		}//
	
	enkfix++; 
	if (enkfix > y*6-1){clearTimeout(tiidd);}	
	
		}; //timmmer







function titler(){titleit=window.prompt("name or title?",titleit);}


function scales(){
		z =document.forms.primax.scale.selectedIndex;
		DDD = D = document.forms.primax.notes.selectedIndex ;


        //var sch =document.forms.primax.scale.selectedIndex;
	schxt = document.forms.primax.scale.options[z].text;   

			//document.forms.primax.pichord.value=
chordname[pr]=document.forms.primax.result.value =""+
	P[DDD%12]+" "+ document.forms.primax.scale.options[z].text + " " ;
	
	tt = new Array(1,0,1,0,1,1,0,1,0,1,0,1);	 	  z=12; 
	

											//prompt("tttenk",tttenk);	

// tttenk[0][0] = "Major" ; 	tttenk[1][0] = new Array(1,0,1,0,1,1,0,1,0,1,0,1);    


			// nedd change tttenk into ttand TT


	//enk TT = new Array(0,0,0,0,0,0,0,0,0,0,0,0);
	
	//enk for(d=0; d<12 ; d++ ){ if (tt[(d+z)%12]=='1'){TT[(d)%12]=1}}
	showal();	
	}//sc

function enkerx (){	//alert(" tttenk[1].length= " + tttenk[1].length)

		document.forms.primax.display.value =  "Scale Name...\n----------------";

	//ttt = new Array(1,1,0,0,1,1,0,1,1,0,1,0);				alert(ttt);
	
	for (i=0;i<tttenk[1].length;i++){
		
	if (tttenk[1][i].toString() == ttt.toString() ){
	// alert ("tttostring=" + ttt.toString() + "\n tttenk[1][i]= " + tttenk[0][i].toString() )
	
	document.forms.primax.display.value +=  "\n" + tttenk[0][i].toString() ;; 

			}//if
	
	}//for
	//alert("nada")
	//alert("ttt= " +ttt+ "  tttenk[1][i]= " + tttenk[1][i])
	}//enkerx



 tttenk = new Array(); 

 tttenk[0] = new Array(); 
 tttenk[1] = new Array(); 
//tttenk[1][1] = new Array(); 

 								       //c   d   e f   g   a   b
 tttenk[0][0] = "Ionian" ; 			tttenk[1][0] = new Array(1,0,1,0,1,1,0,1,0,1,0,1);  
 tttenk[0][1] = "Dorian" ; 			tttenk[1][1] = new Array(1,0,1,1,0,1,0,1,0,1,1,0);  
 tttenk[0][2] = "Phrygian" ; 			tttenk[1][2] = new Array(1,1,0,1,0,1,0,1,1,0,1,0);  
 tttenk[0][3] = "Lydian" ; 			tttenk[1][3] = new Array(1,0,1,0,1,0,1,1,0,1,0,1);  
 tttenk[0][4] = "Mixolydian" ; 			tttenk[1][4] = new Array(1,0,1,0,1,1,0,1,0,1,1,0);  
 tttenk[0][5] = "Aeolian" ; 			tttenk[1][5] = new Array(1,0,1,1,0,1,0,1,1,0,1,0);  
 tttenk[0][6] = "Locrian" ; 			tttenk[1][6] = new Array(1,1,0,1,0,1,1,0,1,0,1,0);  

 tttenk[0][7] = "Major" ; 			tttenk[1][7] = new Array(1,0,1,0,1,1,0,1,0,1,0,1);    
 tttenk[0][8] = "Pentatonic blues" ; 		tttenk[1][8] =  new Array(1,0,0,1,0,1,1,1,0,0,1,0) ; 

 tttenk[0][9] = "natural minor" ; 		tttenk[1][9] = new Array(1,0,1,1,0,1,0,1,1,0,1,0);  
 tttenk[0][10] = "harmonic" ; 			tttenk[1][10] = new Array(1,0,1,1,0,1,0,1,1,0,0,1);  
 tttenk[0][11] = "melodic asc" ; 		tttenk[1][11] = new Array(1,0,1,1,0,1,0,1,0,1,0,1);  
 tttenk[0][12] = "melodic dec" ; 		tttenk[1][12] = new Array(1,0,1,1,0,1,0,1,1,0,1,0);  
 tttenk[0][13] = "Overtone" ; 			tttenk[1][13] = new Array(1,0,1,0,1,0,1,1,0,1,1,0) ; 

 tttenk[0][14] = "chromatic" ; 			tttenk[1][14] = new Array(1,1,1,1,1,1,1,1,1,1,1,1);  
 tttenk[0][15] = "whole_tone" ; 		tttenk[1][15] = new Array(1,0,1,0,1,0,1,0,1,0,1,0);  

 
 tttenk[0][16] = "Diatonic" ; 			 tttenk[1][16] = new Array(1,0,1,0,1,0,0,1,0,1,0,0) ; 
 tttenk[0][17] = "Double Harmonic" ; 		 tttenk[1][17] = new Array(1,1,0,0,1,1,0,1,1,0,0,1) ; 
 tttenk[0][18] = "Eight Tone Spanish" ; 	 tttenk[1][18] = new Array(1,1,0,1,1,1,1,0,1,0,1,0) ; 
 tttenk[0][19] = "Leading Whole Tone" ; 	 tttenk[1][19] = new Array(1,0,1,0,1,0,1,0,1,0,1,1) ; 
 tttenk[0][20] = "Nine Tone Scale" ; 		 tttenk[1][20] = new Array(1,0,1,1,1,0,1,1,1,1,0,1) ; 
 tttenk[0][21] = "Dominant Seventh" ; 		 tttenk[1][21] = new Array(1,0,1,0,0,1,0,1,0,1,1,0) ; 


 tttenk[0][22] = "Whole Tone" ; 		 tttenk[1][22] = new Array(1,0,1,0,1,0,1,0,1,0,1,0) ; 
 tttenk[0][23] = "Augmented" ; 			 tttenk[1][23] = new Array(1,0,0,1,1,0,0,1,1,0,0,1) ; 
 
 tttenk[0][24] = "Algerian" ; 			 tttenk[1][24] = new Array(1,0,1,1,0,1,1,1,1,0,0,1) ; 
 tttenk[0][25] = "Arabian (a)" ; 		 tttenk[1][25] = new Array(1,0,1,1,0,1,1,0,1,1,0,1) ; 
 tttenk[0][26] = "Arabian (b)" ; 		 tttenk[1][26] = new Array(1,0,1,0,1,1,1,0,1,0,1,0) ; 
 tttenk[0][27] = "Asavari Theta" ; 		 tttenk[1][27] = new Array(1,0,1,1,0,1,0,1,1,0,1,0) ; 
 tttenk[0][28] = "Balinese" ; 			 tttenk[1][28] = new Array(1,1,0,1,0,0,0,1,1,0,0,0) ; 
 tttenk[0][29] = "Bilaval Theta" ; 		 tttenk[1][29] = new Array(1,0,1,0,1,1,0,1,0,1,0,1) ; 
 tttenk[0][30] = "Bhairav Theta" ; 		 tttenk[1][30] = new Array(1,1,0,0,1,1,0,1,1,0,0,1) ; 
 tttenk[0][31] = "Bhairavi Theta" ; 		 tttenk[1][31] = new Array(1,1,0,1,0,1,0,1,1,0,1,0) ; 
 tttenk[0][32] = "Byzantine" ; 			 tttenk[1][32] = new Array(1,1,0,0,1,1,0,1,1,0,0,1) ; 
 tttenk[0][33] = "Chinese" ; 			 tttenk[1][33] = new Array(1,0,0,0,1,0,1,1,0,0,0,1) ; 
 tttenk[0][34] = "Chinese Mongolian" ; 		 tttenk[1][34] = new Array(1,0,1,0,1,0,0,1,0,1,0,0) ; 
 tttenk[0][35] = "Diminished" ; 		 tttenk[1][35] = new Array(1,0,1,1,0,1,1,0,1,1,0,1) ; 
 tttenk[0][36] = "Dorian" ; 			 tttenk[1][36] = new Array(1,0,1,1,0,1,0,1,0,1,1,0) ; 
 tttenk[0][37] = "Egyptian" ; 			 tttenk[1][37] = new Array(1,0,1,0,0,1,0,1,0,0,1,0) ; 
 tttenk[0][38] = "Ethiopian (A raray)" ; 	 tttenk[1][38] = new Array(1,0,1,0,1,1,0,1,0,1,0,1) ; 
 tttenk[0][39] = "Ethiopian (Geez & ezel)" ; 	 tttenk[1][39] = new Array(1,0,1,1,0,1,0,1,1,0,1,0) ; 
 tttenk[0][40] = "Harmonic Minor" ; 		 tttenk[1][40] = new Array(1,0,1,1,0,1,0,1,1,0,0,1) ; 
 tttenk[0][41] = "Hawaiian" ; 			 tttenk[1][41] = new Array(1,0,1,1,0,1,0,1,0,1,0,1) ; 
 tttenk[0][42] = "Hindustan" ; 			 tttenk[1][42] = new Array(1,0,1,0,1,1,0,1,1,0,1,0) ; 
 tttenk[0][43] = "Hungarian Major" ; 		 tttenk[1][43] = new Array(1,0,0,1,1,0,1,1,0,1,1,0) ; 
 tttenk[0][44] = "Hungarian Gypsy" ; 		 tttenk[1][44] = new Array(1,0,1,1,0,0,1,1,1,0,0,1) ; 
 tttenk[0][45] = "Hungarian Gypsy Persian" ;  	 tttenk[1][45] = new Array(1,1,0,0,1,1,0,1,1,0,0,1) ; 
 tttenk[0][46] = "Hungarian Minor" ; 		 tttenk[1][46] = new Array(1,0,1,1,0,0,1,1,1,0,0,1) ; 
 tttenk[0][47] = "Ionian" ; 			 tttenk[1][47] = new Array(1,0,1,0,1,1,0,1,0,1,0,1) ; 

 tttenk[0][48] = "Japanese (A)" ; 		 tttenk[1][48] = new Array(1,1,0,0,0,1,0,1,1,0,0,0) ; 
 tttenk[0][49] = "Japenese (B)" ; 		 tttenk[1][49] = new Array(1,0,1,0,0,1,0,1,1,0,0,0) ; 
 tttenk[0][50] = "Japanese (Ichikosucho)" ; 	 tttenk[1][50] = new Array(1,0,1,0,1,1,1,1,0,1,0,1) ; 
 tttenk[0][51] = "Japanese (Taishikicho)" ; 	 tttenk[1][51] = new Array(1,0,1,0,1,1,1,1,0,1,1,1) ; 
 tttenk[0][52] = "Javaneese" ; 			 tttenk[1][52] = new Array(1,1,0,1,0,1,0,1,0,1,1,0) ; 
 tttenk[0][53] = "Jewish (Adonai Malakh)" ; 	 tttenk[1][53] = new Array(1,1,1,1,0,1,0,1,0,1,1,0) ; 
 tttenk[0][54] = "Jewish (Ahava Raba)" ; 	 tttenk[1][54] = new Array(1,1,0,0,1,1,0,1,1,0,1,0) ; 
 tttenk[0][55] = "Jewish (Magan Abot)" ; 	 tttenk[1][55] = new Array(1,1,0,1,1,0,1,0,1,0,1,1) ; 
 tttenk[0][56] = "Kafi Theta" ; 		 tttenk[1][56] = new Array(1,0,1,1,0,1,0,1,0,1,1,0) ; 
 tttenk[0][57] = "Kalyan Theta" ; 		 tttenk[1][57] = new Array(1,0,1,0,1,0,1,1,0,1,0,1) ; 
 tttenk[0][58] = "Khamaj Theta" ; 		 tttenk[1][58] = new Array(1,0,1,0,1,1,0,1,0,1,1,0) ; 
 tttenk[0][59] = "Locrian" ; 			 tttenk[1][59] = new Array(1,1,0,1,0,1,1,0,1,0,1,0) ; 

  //tttenk[0][60] = "Lydian" ; 			 tttenk[1][60] = new Array(1,0,1,0,1,0,1,1,0,1,0,1) ; 
  //tttenk[0][61] = "Major" ; 			 tttenk[1][61] = new Array(1,0,1,0,1,1,0,1,0,1,0,1) ; 
 tttenk[0][60] = "Madelynian" ; 		tttenk[1][60] = new Array(1,1,0,1,0,1,1,0,1,0,1,0) ; 

 tttenk[0][61] = "Marva Theta" ; 		 tttenk[1][61] = new Array(1,1,0,0,1,0,1,1,0,1,0,1) ; 
 tttenk[0][62] = "Mela Bhavapriya" ; 		 tttenk[1][62] = new Array(1,1,1,0,0,1,0,1,1,1,0,0) ; 
 tttenk[0][63] = "Mela Chakravakam" ; 		 tttenk[1][63] = new Array(1,1,0,0,1,1,0,1,0,1,1,0) ; 
 tttenk[0][64] = "Mela Chalanata" ; 		 tttenk[1][64] = new Array(1,0,0,1,1,1,0,1,0,0,1,1) ; 
 tttenk[0][65] = "Mela Charukesi" ; 		 tttenk[1][65] = new Array(1,0,1,0,1,1,0,1,1,0,1,0) ; 
 tttenk[0][66] = "Mela Chitrambari" ; 		 tttenk[1][66] = new Array(1,0,1,0,1,0,1,1,0,0,1,1) ; 
 tttenk[0][67] = "Mela Dharmavati" ; 		 tttenk[1][67] = new Array(1,0,1,1,0,0,1,1,0,1,0,1) ; 
 tttenk[0][68] = "Mela Dhatuvardhani" ; 	 tttenk[1][68] = new Array(1,0,0,1,1,0,1,1,1,0,0,1) ; 


 tttenk[0][69] = "Mela Dhavalambari" ; 		 tttenk[1][69] = new Array(1,1,0,0,1,0,1,1,1,1,0,0) ; 
 tttenk[0][70] = "Mela Dhenuka" ; 		 tttenk[1][70] = new Array(1,1,0,1,0,1,0,1,1,0,0,1) ; 
 tttenk[0][71] = "Mela Dhirasankarabharana" ; 	 tttenk[1][71] = new Array(1,0,1,0,1,1,0,1,0,1,0,1) ; 
 tttenk[0][72] = "Mela Divyamani" ; 		 tttenk[1][72] = new Array(1,1,0,0,1,0,1,1,0,0,1,1) ; 
 tttenk[0][73] = "Mela Gamanasrama" ; 		 tttenk[1][73] = new Array(1,1,0,0,1,0,1,1,0,1,0,1) ; 
 tttenk[0][74] = "Mela Ganamurti" ; 		 tttenk[1][74] = new Array(1,1,1,0,0,1,0,1,1,0,0,1) ; 
 tttenk[0][75] = "Mela Gangeyabhusani" ; 	 tttenk[1][75] = new Array(1,0,0,1,1,1,0,1,1,0,0,1) ; 
 tttenk[0][76] = "Mela Gaurimanohari" ; 	 tttenk[1][76] = new Array(1,0,1,1,0,1,0,1,0,1,0,1) ; 
 tttenk[0][77] = "Mela Gavambodhi" ; 		 tttenk[1][77] = new Array(1,1,0,1,0,0,1,1,1,1,0,0) ; 
 tttenk[0][78] = "Mela Gayakapriya" ; 		 tttenk[1][78] = new Array(1,1,0,0,1,1,0,1,1,1,0,0) ; 

 tttenk[0][79] = "Mela Hanumattodi" ; 		 tttenk[1][79] = new Array(1,1,0,1,0,1,0,1,1,0,1,0) ; 
 tttenk[0][80] = "Mela Harikambhoji" ; 		 tttenk[1][80] = new Array(1,0,1,0,1,1,0,1,0,1,1,0) ; 
 tttenk[0][81] = "Mela Hatakambari" ; 		 tttenk[1][81] = new Array(1,1,0,0,1,1,0,1,0,0,1,1) ; 
 tttenk[0][82] = "Mela Hemavati" ; 		 tttenk[1][82] = new Array(1,0,1,1,0,0,1,1,0,1,1,0) ; 
 tttenk[0][83] = "Mela Jalarnavam" ; 		 tttenk[1][83] = new Array(1,1,1,0,0,0,1,1,1,0,1,0) ; 
 tttenk[0][84] = "Mela Jhalavarali" ; 		 tttenk[1][84] = new Array(1,1,1,0,0,0,1,1,1,0,0,1) ; 
 tttenk[0][85] = "Mela Jhankaradhvani" ; 	 tttenk[1][85] = new Array(1,0,1,1,0,1,0,1,1,1,0,0) ; 
 tttenk[0][86] = "Mela Jyotisvarupini" ; 	 tttenk[1][86] = new Array(1,0,0,1,1,0,1,1,1,0,1,0) ; 
 tttenk[0][87] = "Mela Kamavarardhani" ; 	 tttenk[1][87] = new Array(1,1,0,0,1,0,1,1,1,0,0,1) ; 
 tttenk[0][88] = "Mela Kanakangi" ; 		 tttenk[1][88] = new Array(1,1,1,0,0,1,0,1,1,1,0,0) ; 
 tttenk[0][89] = "Mela Kantamani" ; 		 tttenk[1][89] = new Array(1,0,1,0,1,0,1,1,1,1,0,0) ; 
 tttenk[0][90] = "Mela Kharaharapriya" ; 	 tttenk[1][90] = new Array(1,0,1,1,0,1,0,1,0,1,1,0) ; 
 tttenk[0][91] = "Mela Kiravani" ; 		 tttenk[1][91] = new Array(1,0,1,1,0,1,0,1,1,0,0,1) ; 
 tttenk[0][92] = "Mela Kokilapriya" ; 		 tttenk[1][92] = new Array(1,1,0,1,0,1,0,1,0,1,0,1) ; 
 tttenk[0][93] = "Mela Kosalam" ; 		 tttenk[1][93] = new Array(1,0,0,1,1,0,1,1,0,1,0,1) ; 
 tttenk[0][94] = "Mela Latangi" ; 		 tttenk[1][94] = new Array(1,0,1,0,1,0,1,1,1,0,0,1) ; 
 tttenk[0][95] = "Mela Manavati" ; 		 tttenk[1][95] = new Array(1,1,1,0,0,1,0,1,0,1,0,1) ; 
 tttenk[0][96] = "Mela Mararanjani" ; 		 tttenk[1][96] = new Array(1,0,1,0,1,1,0,1,1,1,0,0) ; 
 tttenk[0][97] = "Mela Mayamalavagaula" ; 	 tttenk[1][97] = new Array(1,1,0,0,1,1,0,1,1,0,0,1) ; 
 tttenk[0][98] = "Mela Mechakalyani" ; 		 tttenk[1][98] = new Array(1,0,1,0,1,0,1,1,0,1,0,1) ; 
 tttenk[0][99] = "Mela Naganandini" ; 		 tttenk[1][99] = new Array(1,0,1,0,1,1,0,1,0,0,1,1) ; 
 tttenk[0][100] = "Mela Namanarayani" ; 	 tttenk[1][100] = new Array(1,1,0,0,1,0,1,1,1,0,1,0) ; 
 tttenk[0][101] = "Mela Nasikabhusani" ; 	 tttenk[1][101] = new Array(1,0,0,1,1,0,1,1,0,1,1,0) ; 
 tttenk[0][102] = "Mela Natabhairavi" ; 	 tttenk[1][102] = new Array(1,0,1,1,0,1,0,1,1,0,1,0) ; 
 tttenk[0][103] = "Mela Natakapriya" ; 		 tttenk[1][103] = new Array(1,1,0,1,0,1,0,1,0,1,1,0) ; 
 tttenk[0][104] = "Mela Navanitam" ; 		 tttenk[1][104] = new Array(1,1,1,0,0,0,1,1,0,1,1,0) ; 
 tttenk[0][105] = "Mela Nitimati" ; 		 tttenk[1][105] = new Array(1,0,1,1,0,0,1,1,0,0,1,1) ; 
 
 tttenk[0][106] = "Mela Pavani" ; 		 tttenk[1][106] = new Array(1,1,1,0,0,0,1,1,0,1,0,1) ; 
 tttenk[0][107] = "Mela Ragavardhani" ; 	 tttenk[1][107] = new Array(1,0,0,1,1,1,0,1,1,0,1,0) ; 
 tttenk[0][108] = "Mela Raghupriya" ; 		 tttenk[1][108] = new Array(1,1,1,0,0,0,1,1,0,0,1,1) ; 
 tttenk[0][109] = "Mela Ramapriya" ; 		 tttenk[1][109] = new Array(1,1,0,0,1,0,1,1,0,1,1,0) ; 
 tttenk[0][110] = "Mela Rasikapriya" ; 		 tttenk[1][110] = new Array(1,0,0,1,1,0,1,1,0,0,1,1) ; 
 tttenk[0][111] = "Mela Ratnangi" ; 		 tttenk[1][111] = new Array(1,1,1,0,0,1,0,1,1,0,1,0) ; 
 tttenk[0][112] = "Mela Risabhapriya" ; 	 tttenk[1][112] = new Array(1,0,1,0,1,0,1,1,1,0,1,0) ; 
 tttenk[0][113] = "Mela Rupavati" ; 		 tttenk[1][113] = new Array(1,1,0,1,0,1,0,1,0,0,1,1) ; 
 tttenk[0][114] = "Mela Sadvidhamargini" ; 	 tttenk[1][114] = new Array(1,1,0,1,0,0,1,1,0,1,1,0) ; 


 tttenk[0][115] = "Mela Salagam" ; 		 tttenk[1][115] = new Array(1,1,1,0,0,0,1,1,1,1,0,0) ; 
 tttenk[0][116] = "Mela Sanmukhapriya" ; 	 tttenk[1][116] = new Array(1,0,1,1,0,0,1,1,1,0,1,0) ; 
 tttenk[0][117] = "Mela Sarasangi" ; 		 tttenk[1][117] = new Array(1,0,1,0,1,1,0,1,1,0,0,1) ; 
 tttenk[0][118] = "Mela Senavati" ; 		 tttenk[1][118] = new Array(1,1,0,1,0,1,0,1,1,1,0,0) ; 
 tttenk[0][119] = "Mela Simhendramadhyama" ; 	 tttenk[1][119] = new Array(1,0,1,1,0,0,1,1,1,0,0,1) ; 
 tttenk[0][120] = "Mela Subhapantuvarali" ; 	 tttenk[1][120] = new Array(1,1,0,1,0,0,1,1,1,0,0,1) ; 
 tttenk[0][121] = "Mela Sucharitra" ; 		 tttenk[1][121] = new Array(1,0,0,1,1,0,1,1,1,1,0,0) ; 
 tttenk[0][122] = "Mela Sulini" ; 		 tttenk[1][122] = new Array(1,0,0,1,1,1,0,1,0,1,0,1) ; 
 tttenk[0][123] = "Mela Suryakantam" ; 		 tttenk[1][123] = new Array(1,1,0,0,1,1,0,1,0,1,0,1) ; 
 tttenk[0][124] = "Mela Suvarnangi" ; 		 tttenk[1][124] = new Array(1,1,1,0,0,0,1,1,0,1,0,1) ; 
 tttenk[0][125] = "Mela Syamalangi" ; 		 tttenk[1][125] = new Array(1,0,1,1,0,0,1,1,1,1,0,0) ; 
 tttenk[0][126] = "Mela Tanarupi" ; 		 tttenk[1][126] = new Array(1,1,1,0,0,1,0,1,0,0,1,1) ; 
 tttenk[0][127] = "Mela Vaschaspati" ; 		 tttenk[1][127] = new Array(1,0,1,0,1,0,1,1,0,1,1,0) ; 
 tttenk[0][128] = "Mela Vagadhisvari" ; 	 tttenk[1][128] = new Array(1,0,0,1,1,1,0,1,0,1,1,0) ; 
 tttenk[0][129] = "Mela Vakulabharanam" ; 	 tttenk[1][129] = new Array(1,1,0,0,1,1,0,1,1,0,1,0) ; 
 tttenk[0][130] = "Mela Vanaspati" ; 		 tttenk[1][130] = new Array(1,1,1,0,0,1,0,1,0,1,1,0) ; 
 tttenk[0][131] = "Mela Varunapriya" ; 		 tttenk[1][131] = new Array(1,0,1,1,0,1,0,1,0,0,1,1) ; 
 tttenk[0][132] = "Mela Visvambari" ; 		 tttenk[1][132] = new Array(1,1,0,0,1,0,1,1,0,0,1,1) ; 
 tttenk[0][133] = "Mela Yagapriya" ; 		 tttenk[1][133] = new Array(1,0,0,1,1,1,0,1,1,1,0,0) ; 
 tttenk[0][134] = "Melodic Minor" ; 		 tttenk[1][134] = new Array(1,0,1,1,0,1,0,1,0,1,0,1) ; 

 tttenk[0][135] = "Mixolydian" ; 		 tttenk[1][135] = new Array(1,0,1,0,1,1,0,1,0,1,1,0) ; 
 tttenk[0][136] = "Mohammedan" ; 		 tttenk[1][136] = new Array(1,0,1,1,0,1,0,1,1,0,0,1) ; 
 tttenk[0][137] = "Neapolitan" ; 		 tttenk[1][137] = new Array(1,1,0,1,0,1,0,1,1,0,0,1) ; 
 tttenk[0][138] = "Oriental (a)" ; 		 tttenk[1][138] = new Array(1,1,0,0,1,1,1,0,1,0,1,0) ; 
 tttenk[0][139] = "Overtone Dominant" ; 	 tttenk[1][139] = new Array(1,0,1,0,1,0,1,1,0,1,1,0) ; 
 tttenk[0][140] = "Pentatonic Major" ; 		 tttenk[1][140] = new Array(1,0,1,0,1,0,0,1,0,1,0,0) ; 
 tttenk[0][141] = "Pentatonic Minor" ; 		 tttenk[1][141] = new Array(1,0,0,1,0,1,0,1,0,0,1,0) ; 
 tttenk[0][142] = "Persian" ; 			 tttenk[1][142] = new Array(1,1,0,0,1,1,1,0,1,0,0,1) ; 
 tttenk[0][143] = "Phrygian" ; 			 tttenk[1][143] = new Array(1,1,0,1,0,1,0,1,1,0,1,0) ; 
 tttenk[0][144] = "Purvi Theta" ; 		 tttenk[1][144] = new Array(1,1,0,0,1,0,1,1,1,0,0,1) ; 
 tttenk[0][145] = "Roumanian Minor" ; 		 tttenk[1][145] = new Array(1,0,1,1,0,0,1,1,0,1,1,0) ; 
 tttenk[0][146] = "Spanish Gypsy" ; 		 tttenk[1][146] = new Array(1,1,0,0,1,1,0,1,1,0,1,0) ; 
 tttenk[0][147] = "Todi Theta" ; 		 tttenk[1][147] = new Array(1,1,0,1,0,0,1,1,1,0,0,1) ; 
 

 
 tttenk[0][148] = "Auxiliary Diminished" ; 	 tttenk[1][148] = new Array(1,0,1,1,0,1,1,0,1,1,0,1) ; 
 tttenk[0][149] = "Auxiliary Augmented" ; 	 tttenk[1][149] = new Array(1,0,1,0,1,0,1,0,1,0,1,0) ; 
 tttenk[0][150] = "Auxiliary Diminished Blues" ; tttenk[1][150] = new Array(1,1,0,1,1,0,1,1,0,1,1,0) ; 

 tttenk[0][151] = "Enigmatic" ; 		 tttenk[1][151] = new Array(1,1,0,0,1,0,1,0,1,0,1,1) ; 
 tttenk[0][152] = "Hirajoshi" ; 		 tttenk[1][152] = new Array(1,0,1,1,0,0,0,1,1,0,0,0) ; 
 tttenk[0][153] = "Kumoi" ; 			 tttenk[1][153] = new Array(1,0,1,1,0,0,0,1,0,1,0,0) ; 
 
 tttenk[0][154] = "Lydian Augmented" ; 		 tttenk[1][154] = new Array(1,0,1,0,1,0,1,0,1,1,0,1) ; 
 tttenk[0][155] = "Neapolitan Major" ; 		 tttenk[1][155] = new Array(1,1,0,1,0,1,0,1,0,1,0,1) ; 
 tttenk[0][156] = "Neapolitan Minor" ; 		 tttenk[1][156] = new Array(1,1,0,1,0,1,0,1,1,0,1,0) ; 
 tttenk[0][157] = "Oriental (b)" ; 		 tttenk[1][157] = new Array(1,1,0,0,1,1,1,0,0,1,1,0) ; 
 tttenk[0][158] = "Pelog" ; 			 tttenk[1][158] = new Array(1,1,0,1,0,0,0,1,1,0,0,0) ; 
 tttenk[0][159] = "Prometheus" ; 		 tttenk[1][159] = new Array(1,0,1,0,1,0,1,0,0,1,1,0) ; 
 tttenk[0][160] = "Prometheus Neapolitan" ; 	 tttenk[1][160] = new Array(1,1,0,0,1,0,1,0,0,1,1,0) ; 
 tttenk[0][161] = "Six Tone Symmetrical" ; 	 tttenk[1][161] = new Array(1,1,0,0,1,1,0,0,1,1,0,0) ; 
 tttenk[0][162] = "Super Locrian" ; 		 tttenk[1][162] = new Array(1,1,0,1,1,0,1,0,1,0,1,0) ; 
 tttenk[0][163] = "Lydian Minor" ; 		 tttenk[1][163] = new Array(1,0,1,0,1,0,1,1,1,0,1,0) ; 

 							   		  //c   d   e f   g   a   b
									  //F,  G,Ab,   B,C,  D,  E, F, 	
// tttenk[0][164] = "Lydian Diminished" ; 	 tttenk[1][164] = new Array(1,0,1,1,0,0,1,1,1,0,1,1) ; 
// tttenk[0][164] = "Lydian Diminished" ; 	 tttenk[1][164] = Was Array(1,o,1,1,o,o,1,1,1,o,1,1) ; 

 tttenk[0][164] = "Lydian Diminished" ; 	 tttenk[1][164] = new Array(1,0,1,1,0,0,1,1,0,1,0,1) ; 
 
 tttenk[0][165] = "Major Locrian" ; 		 tttenk[1][165] = new Array(1,0,1,0,1,1,1,0,1,0,1,0) ; 
 tttenk[0][166] = "Hindu" ; 			 tttenk[1][166] = new Array(1,0,1,0,1,1,0,1,1,0,1,0) ; 
 tttenk[0][167] = "Diminished Whole Tone" ; 	 tttenk[1][167] = new Array(1,1,0,1,1,0,1,0,1,0,1,0) ; 
 tttenk[0][168] = "Pure Minor" ; 		 tttenk[1][168] = new Array(1,0,1,1,0,1,0,1,1,0,1,0) ; 
 tttenk[0][169] = "Half Diminished (Locrian)" ;  tttenk[1][169] = new Array(1,1,0,1,0,1,1,0,1,0,1,0) ; 
 tttenk[0][170] = "Half Dim Two (Locrian two)" ; tttenk[1][170] = new Array(1,0,1,1,0,1,1,0,1,0,1,0) ; 
 
/*
 tttenk[0][7] = "india" ; 			tttenk[1][7] = new Array(1,0,0,0,1,1,0,1,0,0,1,0);  
 tttenk[0][8] = "japanese" ; 			tttenk[1][8] = new Array(1,1,0,0,0,1,0,1,0,0,1,0);  
 tttenk[0][9] = "arabic" ; 			tttenk[1][9] = new Array(1,1,0,0,1,1,0,1,1,0,0,1);  
tttenk[0][15] = "Blues" ; 			tttenk[1][15] = new Array(1,0,0,1,0,1,1,1,0,0,1,0) ; 
 tttenk[0][13] = "pentatonic" ; 		tttenk[1][13] = new Array(1,0,0,1,0,1,1,1,0,0,1,0); 
  tttenk[0][17] = "unknown" ; 			tttenk[1][14] = new Array(1,0,0,1,0,1,0,1,0,0,1,0);  




*/






function newin(num,pr){


//var wingen = window.open("", "wingen", "scrollbars=yes,toolbar=no,menubar=yes,resizable=yes,top=5,left=5,width=750,height=450"); 

var wingen = window.open("", "wingen"); 

var gen = wingen.document; 
gen.open("text/html", "replace");wingen.focus();
if (titleit.length>0){gen.write("<html><head><title>" +titleit+ "</title>");}
else{gen.write("<html><head><title>" +chordname[0]+"</title>");}
gen.write("<style>body,p,td{font-family:verdana,Lucida Console,monospace,courier;font-size:80%;}</style>");
gen.write("<style>u,br{font-family:monospace,Lucida Console,courier;font-size:160%;}</style>");

gen.write("<style>a:visited{text-decoration:none} a:link{text-decoration:none}</style>");
gen.write("</head><body bgcolor='#ffffff'>");
gen.writeln("&nbsp;<a href='http://www.gravityboy.com'>http://www.gootar.com</a> ~~~ " + titleit + " ~~~ ");
gen.write("<table width='100%'><tr><td bgcolor='#ccddcc'>");

gen.writeln("&nbsp;custom chord chart");
gen.writeln(" || " + toon + " tuning || " + lefty + "");
gen.writeln("</td></tr></table>|  by jim cranwell " + nameit + " | &copy " +Date()+ " | goddess 4Ø1 | <a href='http://www.gravityboy.com'>www.gravityboy.com</a>");
gen.writeln("<hr noshade size=1 color=#dddddd width=40% align=left> ");
gen.writeln("<table border='0' cellspacing='09' cellpadding='9' bgcolor='#eeeeee'> ");
gen.writeln("<tr>");

for (a=0;a<pr;a++) {
if((a%5==0)&&(a!=0)){gen.writeln("</tr></table><table border='0' bgcolor='#eeeeee' cellspacing='09' cellpadding='9'><tr>");}//**ifpr
gen.writeln("<td valign=top nowrap bgcolor='#ffffff'><center>");
gen.write(chordname[a]);
gen.writeln("<br>");
gen.write(chordnotes[a]);

if(chordnotes[a]!="scale"){gen.write("<u>");}
else { gen.write("</center><u><small><small>");}

for (j=0;j<prst[a];j++) {
if(j%6==0){gen.writeln("<br>");}//**ifj
gen.write(num[a][j]);}//**forj

if(chordnotes[a]=="scale"){gen.write("</small>");}

gen.write("</u></td>");	}//**fora

gen.writeln("</tr>");
gen.writeln("</table>");
gen.writeln("<center><hr noshade size=1 color=#dddddd width=40% align=left> </font>");
gen.writeln(" zero slash  Ø ¦  dash, means play an open string, no matter what the fret, ...babette. <br>");

gen.writeln("| tb vb ds jz kl enk no msg " +Date()+ "  |");
gen.writeln(" <a href=javascript:void('') onClick='window.print()'>print this page</a>");

//gen.writeln("<script language='JavaScript' src='../footer.js'><\/script>");

gen.write("</body></html>");
gen.close();

}