<!--

//===============================================================
function Main(){
//gstrLn=AppsGetLang(location.href);

//if(gstrLn!="cs")gstrLn="en";
//SetLanguage(gstrLn);



//AppsRefreshUrl();

gstrLn=AppsGetLang(location.href);
SetLanguage(gstrLn);
webInitOptLang();
}

//===============================================================
//TRANSPOSE
function Transpose(){

var intParam1=0;
var strDelic="";
var strZadani="";
var intStupnice=0;
var bolTest=false;
var strVysledek="";


// VYMAZÁNÍ PŘEDCHOZÍHO VÝSLEDKU
document.getElementById("txtVysledek").value="";

// PŘEČTENÍ VSTUPNÍCH PARAMETRŮ ZADANÝCH UŽIVATELEM
intParam1=parseInt(document.getElementById("optParam1").value);
strDelic=document.getElementById("optDelic").value;
strZadani=document.getElementById("txtZadani").value;
intStupnice=parseInt(document.getElementById("optPultony").value);

// KONTROLA VSTUPNÍCH PARAMETRŮ ZADANÝCH UŽIVATELEM + VÝPOČET
txtester.chordtrans.transpose(strZadani,intParam1,strDelic,intStupnice,function(result){
	if(!result.error){
		strVysledek=result.text;
		strVysledek=strVysledek.substr(0,strVysledek.length-1);
		document.getElementById("txtVysledek").value=strVysledek;
	}
	else{
		Msg(result.errnum);
	}
});

}//end-of-Transpose

//===============================================================
function Inzeruj(strZnak){
document.getElementById("txtZadani").focus();
document.getElementById("txtZadani").value+=strZnak;
}

//===============================================================
function Smaz(){
document.getElementById("txtVysledek").value="";
document.getElementById("txtZadani").value="";
document.getElementById("txtZadani").focus();
}

//===============================================================
function Priklad(intIndex){
intIndex=parseInt(intIndex);
var strMsg="";
var obj=null;
if (intIndex==1){
  document.getElementById("optParam1").value="6";
  document.getElementById("optDelic").value="-";
  document.getElementById("optPultony").value="1";
  document.getElementById("txtZadani").value="A#mi-Cbmaj-Dmi";
  document.getElementById("txtVysledek").value="";
  strMsg=" Přečtěte hodnoty ve formuláři.";
  strMsg+="\n Po potvrzení tohoto hlášení provede program výpočet.";
  strMsg+="\n Výsledek můžete přečíst v textovém poli Výsledek.";
  alert(strMsg);
  Transpose();
}
else if (intIndex==2){
  document.getElementById("optParam1").value="6";
  document.getElementById("optDelic").value="/";
  document.getElementById("optPultony").value="1";
  document.getElementById("txtZadani").value="A#mi-C#maj-Dmi";
  document.getElementById("txtVysledek").value="";
  strMsg=" Přečtěte hodnoty ve formuláři. Věnujte prosím pozornost znaku v kolonce Dělící znak mezi akordy. ";
  strMsg+="\n Po potvrzení tohoto hlášení provede program výpočet.";
  strMsg+="\n Výsledek můžete přečíst v textovém poli Výsledek.";
  alert(strMsg);
  Transpose();
  strMsg ="I když je výsledek nepravdivý, výpočet proběhl v pořádku. Program totiž považuje celý text v textovém poli";
  strMsg+=" Akordy k transponování za jedinný akord, protože v textu nenašel dělící znak, v tomto případě lomítko.";
  strMsg+=" Transponoval tedy nesmyslný akord začínající tónem A#";
  strMsg+="\n \n Dávejte vždy pozor na dělící znak, který máte nastavený.";
  alert(strMsg);
}
else if (intIndex==3){
  document.getElementById("optParam1").value="16";
  document.getElementById("optDelic").value="-";
  document.getElementById("optPultony").value="1";
  document.getElementById("txtZadani").value="A#mi-C#maj-Dmi";
  document.getElementById("txtVysledek").value="";
  strMsg=" Přečtěte hodnoty ve formuláři. Program převede akordy na tóninu E. ";
  strMsg+="\n Po potvrzení tohoto hlášení provede program výpočet.";
  strMsg+="\n Výsledek můžete přečíst v textovém poli Výsledek.";
  alert(strMsg);
  Transpose();
}
}

//===============================================================
function Help(){
var strM="";
strM+="Program Transponer akordů je určen k rychlému a jednoduchému převádění akordů na jinou tóninu.\n\n\n";
strM+="Způsob transponování: \nAkordy můžete transponovat o určitý počet půltónů směrem dolů nebo nahoru - Transponovat dolů, Transponovat nahoru.";
strM+=" Akordy můžete také rovnou převést na jinou tóninu - Transponovat na tón.";
strM+="\n\nDělící znak: \nTímto znakem program rozezná jednotlivé akordy mezi sebou (viz. Akordy k transponování).";
strM+="\n\nZobrazení snížených, zvýšených půltónů - vysvětleno na následujícím příkladu:";
strM+="\nvždy b: C#+2 půltóny = zobrazen Eb (ne D#)."; 
strM+="\nvždy #: Ab+2 půltóny = zobrazen A# (ne Hb)."; 
strM+="\n\nAkordy k transponování: \nDo tohoto textového pole napište akordy, které chcete transponovat. Akordy mezi sebou";
strM+=" oddělujte znakem, který jste zvolili v rozbalovacím seznamu Dělící znak mezi akordy.";
strM+="\n\nTlačítko b: \nNa konec textu v textovém poli Akordy k transponování přidá znak b - snížený půltón.";
strM+="\n\nTlačítko #: \nNa konec textu v textovém poli Akordy k transponování přidá znak # - zvýšený půltón.";
strM+="\n\nTlačítko Smaž: \nSmaže text v textových polích Akordy k transponování a Výsledek.";
strM+="\n\nTlačítko Transponuj: \nPodle nastavených parametrů transponuje, převede, akordy z textového pole Akordy k transponování do textového pole Výsledek.";
strM+="\n\nVýsledek: \nV tomto textovém poli se zobrazí transponované akordy.";
strM+="\n\n\nAkord, který program vyhodnotí jako neplatný, bude zobrazen v hranatých závorkách.\n\n";
alert(strM);
}

//===============================================================
function Msg(id){
var t;
switch (id){
  case 11:
	t="V kolonce - Způsob transponování - vyberte, prosím, platnou položku.";
	break;
  case 21:
	t="V kolonce - Dělící znak - vyberte, prosím, platnou položku.";
	break;
  case 30:
	t="V kolonce - Zobrazení snížených, zvýšených půltónů - vyberte, prosím, platnou položku.";
	break;
  case 40:
	t="Napište akordy k transponování.";
	break;
  default: t="Neočekávaná chyba číslo: " + id;
}
alert (t);
}




// 06
//===================================
function SetLanguage(lng){

gstrLn=lng;
AppsSaveCookie("lng",gstrLn);

AppsRefreshUrl();

var lrs=new Array();

lrs[0]=new Array("ln-chordtrans",1);
lrs[1]=new Array("h1",1);
lrs[2]=new Array("lic-chordtrans",1);
lrs[3]=new Array("sample1",10);
lrs[4]=new Array("sample2",11);
lrs[5]=new Array("sample3",12);
lrs[6]=new Array("help",13);
lrs[7]=new Array("h-setting",14);
lrs[8]=new Array("h-chords-in",15);
lrs[9]=new Array("h-result",16);
lrs[10]=new Array("lblparam1",17);
lrs[11]=new Array("lblDelic",18);
lrs[12]=new Array("lblPultony",19);

document.title=LoadResString(1);

for(var i=0;i<lrs.length;i++)document.getElementById(lrs[i][0]).innerHTML=LoadResString(lrs[i][1]);

lrs=null;
lrs=new Array();
lrs[0]=new Array("cmdClear",20);
lrs[1]=new Array("cmdTranspose",21);
for(var i=0;i<lrs.length;i++)document.getElementById(lrs[i][0]).value=LoadResString(lrs[i][1]);

}


// 07
//===================================
function LoadResString(id,lng){

if(lng==undefined)lng=gstrLn;

//CZECH
if(lng=="cs"){
	switch(id){

		case 1:return("Transponer akordů");

		case 10:return("Příklad 1");
		case 11:return("Příklad 2");
		case 12:return("Příklad 3");
		case 13:return("Nápověda");
		case 14:return("Nastavení");
		case 15:return("Akordy k transponování");
		case 16:return("Výsledek");
		case 17:return("Způsob transponování");
		case 18:return("Dělící znak");
		case 19:return("Zobrazení snížených, zvýšených půltónů");
		case 20:return("Smaž");
		case 21:return("Transponuj");

		//errors

		//results
		//SYSTEM ERROR: UNDEFINED ID
		default:return("LoadResString: nedefinované id=" + id);

	}//end-of-switch
}//end-of-if


//NOT ENGLISH
if(lng!="en"){
	var strEn=LoadResString(id,"en");
	try{
		google.language.translate(strEn,"en",lng,function(result){
			if(!result.error)return(result.translation);
		});
		return(strEn);
	}
	catch(err){
		return(strEn);
	}
}


//ENGLISH = ENGLISH + SOURCE LANGUAGE FOR TRANSLATING
if(lng=="en"){
	switch(id){

		case 1:return("Chord Transposer");
		case 10:return("Sample 1");
		case 11:return("Sample 2");
		case 12:return("Sample 3");
		case 13:return("Help");
		case 14:return("Setting");
		case 15:return("Chords");
		case 16:return("Result");
		case 17:return("Transposition method");
		case 18:return("Separator");
		case 19:return("Views semitones");
		case 20:return("Clear");
		case 21:return("Transpose");
		//errors

		//results

		//SYSTEM ERROR: UNDEFINED ID
		default:return("LoadResString: undefined id=" + id);

	}//end-of-switch

}//end-of-switch

}//end-of-LoadResString
-->