var actualSection = 0;  //cislo akttualni sekce
 
 var actualPrep = 0; // index aktualne zobrazeneho preparatu

 var sections = ["toc", "subtoc"] // vycet sekci v dokumentu 
 var subsections = ["thumbs", "single"]  // vycet poodsekci

 var tabs = ["search", "glossary"] // vycet zalozek v obcnim panelu
 
 var mainToc = new Array() // senzam kategorii nejvyssi urovne

function initApplication() { //inicializace aplikace
  showTab("search")
 generateOutline()
 }

 function showSection(sid) { //zobrazeni vybrane sekce

	for (var i = 0; i < sections.length; i++) {
		document.getElementById(sections[i]).style.display = (sid == sections[i] ) ? "block" : "none";	
	}
  document.getElementById("navigline").style.display = (sid == "toc") ? "none" : "block" 
 } 

  function showTab(tid) { // zborazeni vybrane zalozky v bocnim panelu 

 
	for (var i = 0; i < tabs.length; i++) {  
	if (tid == tabs[i]) {           
		document.getElementById("tab_" + tabs[i]).style.display = "block";
		document.getElementById("tab_" + tabs[i] + "_label").className = "block";
    }	
  else {
		document.getElementById("tab_" + tabs[i]).style.display = "none";
		document.getElementById("tab_" + tabs[i] + "_label").className = "nonactive";
    }  
  
	}
   
 } 

 
 
 function showSubsection(sid) { // zobrazeni dane podsekce
   
	for (var i = 0; i < subsections.length; i++) {
		document.getElementById(subsections[i]).style.display = (sid == subsections[i] ) ? "block" : "none";	
	} 
 } 
 
// osnova - prehled kapitol atlasu
var outline = [
  "1 Poznámky k morfologii ústní sliznice", 
"2 Anamnéza a vyšetření pacienta", 
"2.1 Zásady vyšetření pacienta ", 
"2.1.1 Anamnéza", 
"2.1.2 Objektivní nález a postupy při vyšetřování dutiny ústní", 
"2.1.2.1 Histopatologické změny ", 
"2.1.2.2 Morfologie slizničních projevů", 
"2.1.2.3 Lokalizace a trvání ", 
"2.1.2.4 Vlastní vyšetření ", 
"2.1.3 Pomocná laboratorní vyšetření", 
"2.1.4 Konziliární vyšetření ", 
"2.2 Příčiny onemocnění ústní sliznice ", 
"2.2.1 Zevní příčiny ", 
"2.2.2 Vnitřní příčiny ", 
"3 Běžné anatomické odchylky", 
"3.1 Linea alba", 
"3.2 Orální pigmentace", 
"3.3 Leukoedém", 
"4 Patologie rtů ", 
"4.1 Vrozené anomálie", 
"4.1.1 Morbus Fordyce ", 
"4.1.2 Rozštěp a fisury rtu", 
"4.1.3 Dvojitý ret ", 
"4.2 Záněty rtů (cheilitis)", 
"4.2.1 Přehled cheilitid", 
"4.3 Bolavé ústní koutky (anguli infectiosi, stomatitis angularis) ", 
"5 Patologie jazyka ", 
"5.1 Vrozené anomálie", 
"5.1.1 Ankyloglosie", 
"5.1.2 Lingua geographica (mapovitý jazyk, glossitis migrans) ", 
"5.1.3 Lingua plicata ", 
"5.1.4 Melkersonův-Rosenthalův syndrom ", 
"5.1.5 Glossitis rhombica mediana ", 
"5.2 Makroglosie ", 
"5.2.1 Vrozené anomálie", 
"5.2.2 Získané anomálie", 
"5.3 Povlak jazyka", 
"5.3.1 Povlak fyziologický", 
"5.3.2 Povlak patologicky zmnožený", 
"5.3.3 Povlak patologicky zmenšený", 
"5.4 Záněty jazyka (glositidy)", 
"5.4.1 Přehled glositid", 
"5.4.2 Glossitis intersticialis luetica", 
"5.4.3 Glositidy u karenčních ", 
"5.5 Glosodynie (stomatodynie) ", 
"6 Poruchy slinné sekrece", 
"6.1 Funkce sliny", 
"6.2 Sekrece sliny", 
"6.3 Poruchy slinné sekrece ", 
"6.3.1 Ptyalismus (sialorrhoea)", 
"6.3.2 Snížená slinná sekrece (hyposialie) ", 
"6.3.2.1 Xerostomie ", 
"7 Foetor ex ore (halitosis)$2.1.1", 
"8 Slizniční léze dutiny ústní s charakteristickým nálezem", 
"8.1 Pigmentace – diferenčně diagnostické poznámky", 
"8.1.1 Addisonova nemoc ", 
"8.1.2 Bronchogenní karcinomy plic (příp. některé další maligní nádory)", 
"8.1.3 Peutzův-Jeghersův syndrom", 
"8.1.4 Akanthosis nigricans", 
"8.1.5 Hemochromatóza ", 
"8.1.6 Porfyrie", 
"8.1.7 Pigmentové névy", 
"8.1.8 Melanosis circumscripta praeblastomatosa Dubreuilh", 
"8.1.9 Maligní melanom", 
"8.1.10 Exogenní pigmentace", 
"8.2 Symptom bílé plochy – diferenčně diagnostické poznámky", 
"8.2.1 Leukoplakie", 
"8.2.2 Kandidóza (moniliáza, soor, moučnivka)", 
"8.2.2.1 Glossitis rhombica mediana (Brocquova-Pautrierova glossitis)$5.1.5", 
"8.2.2.2 Lingua villosa nigra$5.3.2", 
"8.2.3 Lichen ruber planus ", 
"8.2.3.1 Lichenoidní reakce ústní sliznice ", 
"8.2.3.2 Polékové slizniční lichenoidní reakce", 
"8.2.4 Naevus spongiosus albus (white sponge naevus)", 
"8.2.5 Kuřácká leukokeratóza (stomatitis fumantium) ", 
"8.2.6 Darierova nemoc (hereditární folikulární dyskeratóza) ", 
"8.2.7 Psoriáza (psoriasis vulgaris)", 
"8.2.8 Lupus erytematodes ", 
"8.2.8.1 Diskoidní lupus erytematodes (DLE)", 
"8.2.8.2 Systémový lupus erytematodes (SLE)", 
"8.2.9 Morbus Fordce$4.1.1", 
"8.2.10 Erytroplakie", 
"8.3 Eroze v dutině ústní – diferenčně diagnostické poznámky", 
"8.3.1 Virová onemocnění", 
"8.3.1.1 Onemocnění ze skupiny herpes simplex ", 
"8.3.1.2 Herpes zoster (pásový opar) ", 
"8.3.1.3 Varicella (plané neštovice)", 
"8.3.1.4 Herpangína ", 
"8.3.1.5 Vezikulózní stomatitida s exantémem na rukou a nohou ", 
"8.3.1.6 Infekční mononukleóza", 
"8.3.1.7 Cytomegalovirová choroba ", 
"8.3.1.8 Morbilli (spalničky) ", 
"8.3.2 Recidivující afty", 
"8.3.2.1 Erythema exsudativum multiforme Hebrae. ", 
"8.3.2.2 Behçetův syndrom ", 
"8.3.2.3 Tourainova aftóza ", 
"8.3.3 Toxicko-alergické exantému", 
"8.3.4 Skupina puchýřnatých nemocí ", 
"8.3.4.1 Pemfigus ", 
"8.3.4.2 Skupina pemfigoidu ", 
"8.3.4.3 Dermatitis herpetiformis (Duhring-Brocquova nemoc)", 
"8.3.4.4 Epidermolysis bullosa acquisita", 
"8.4. Vředy v dutině ústní – diferenčně diagnostické poznámky", 
"8.4.1 Nemoci postihující primárně gingivu ", 
"8.4.1.1 Gingivostomatitis ulceróza", 
"8.4.1.2 Leukemie a lymfomy ", 
"8.4.1.3 Agranulocytóza", 
"8.4.2 Nemoci nepostihující primárně gingivu ", 
"8.4.2.1 Traumatický ulcus (dekubitální vřed) ", 
"8.4.2.2 Sukční trauma patrové sliznice", 
"8.4.2.3 Stomatitis z přikusování (Cheek bite stomatitis, morsicatio buccalis", 
"8.4.2.4 Válečková stomatitis (Cotton roll ulcer)", 
"8.4.2.5 Recidivující afty (stomatitis aphtosa)", 
"8.4.2.6 Vředy toxicko-alergického původu ", 
"8.4.2.7 Stomatitis electrogalvanica. ", 
"8.4.2.8 Stomatitidy z termických vlivů ", 
"8.4.2.9 Stomatitidy z vlivů chemických (poleptání) ", 
"8.4.3 Vředy u specifických zánětů ", 
"8.4.3.1 Syfilis (lues, příjice)", 
"8.4.3.2 Tuberkulóza", 
"9 Projevy systémových chorob v dutině ústní ", 
"9.1 Slizniční změny v dutině ústní při HIV-infekci/AIDS", 
"9.1.1 Virové infekce", 
"9.1.2 Bakteriální infekce", 
"9.1.3 Plísňové infekce ", 
"9.1.4 Neoplazmata", 
"9.1.5 Postižení sliznic nejasné etiologie", 
"9.1.5.1 Cystická lymfoidní hyperplazie při ", 
"9.1.6. Pravidla pro ošetřování HIV pozitivních pacientů", 
"9.2 Slizniční změny v dutině ústní při onemocnění krvetvorného systému", 
"9.2.1 Onemocnění bílé řady", 
"9.2.1.1 Leukemie a lymfomy ", 
"9.2.1.1.1 Léky ", 
"9.2.1.2 Plazmocytom ", 
"9.2.1.3 Agranulocytóza", 
"9.2.2 Onemocnění červené řady", 
"9.2.2.1. Anémie", 
"9.2.2.2 Polyglobulie", 
"9.2.3 Krvácivé choroby (hemoragické diatézy)", 
"9.2.3.1 Koagulopatie (poruchy plazmatických faktorů)", 
"9.2.3.2 Poruchy trombocytů", 
"9.2.3.3 Poruchy cévní stěny (vaskulopatie)", 
"9.3 Onemocnění srdce a krevního oběhu", 
"9.4 Onemocnění dýchacího systému ", 
"9.5 Onemocnění ledvin ", 
"9.6 Onemocnění trávicího ústrojí", 
"10 Prekancerózy ", 
"10.1 Leukoplakie$8.2.1", 
"10.2 Erytroplakie$8.2.10", 
"10.3 Keratoma senile", 
"10.4 Cornu cutaneum ", 
"10.5 Další fakultativní prekancerózy", 
"10.5.1 Sideropenická dysfagie (Plummerův-Vinsonův syndrom)$5.4.3", 
"10.5.2 Diskoidní lupus erythematosus (DLE)$8.2.8.1", 
"10.5.3 Xeroderma pigmentosum", 
"10.5.4 Epidermolysis bullosa$8.3.4.4", 
"10.5.5 Lues$8.4.3.1", 
"10.5.6 Lichen ruber planus$8.2.3", 
"10.5.7 Sjögrenův syndrom$6.3.2", 
"10.6 Paraneoplastické projevy" 
/*
"11 Nádory",
"11.1 benigní nádory",
"11.1.1 fibroepitelovy polyp", 
"11.1.2 epulidy", 
"11.2 Ca",
"11.3 exostoza", 
"11.4 hemangiom", 
"11.5 HPV", 
"11.6 papilomatoza", 
"11.7 veruca vulgaris horniho rtu"
*/

  ]
  var cats = new Array(); //kategorie
    
    //objekt kategorie
  function Cathegory() {
  this.title = "";
  this.label = "";
  this.level = 0;
  this.parent = null;
  this.subcats = new Array();
  this.pics = new Array();
  this.ref = null; // odkaz na referencni shodnou kategorii
  
  this.getPicsTotal = function() {
    var count = this.pics.length;
    for (var i = 0; i < this.subcats.length; i++) {
      count+=  this.subcats[i].getPicsTotal()
      }
    return count
    }  
  }
  
  function getCathegory(cid) {   //vyhledani dane kategorie
    var vystup = null;
    for (var i =0; i < cats.length; i++) {
       if (cid == cats[i].label ) return cats[i];
    }
    return vystup;
  } 
  
    function generateOutline() {  // generovani osnovy, nacteni kategorii
    
    cats = new Array();
    
       
    var vystup = ""
    var level = 0;  
    var radky = outline 
    for (var i = 0; i < radky.length; i++) {
      var label = radky[i].substring(0, radky[i].indexOf(" "));
      if (label.charAt(label.length-1) == ".") label = label.substring(0, label.length-1);
      
      var cat = new Cathegory();
      
      var ref = null; 
      var title = radky[i].substring(radky[i].indexOf(" ")+1);
      
      if (title.indexOf("$") > -1) {  // referencni kategorie
        ref = title.substring(title.indexOf("$")+1);
        var catRef = getCathegory(ref)
        cat.pics = catRef.pics;
        title = title.substring(0, title.indexOf("$"))
      }
      
      var level2 = label.split(".").length;
      
      if (level2 > level) vystup += "<ol>"
      if (level2 < level) {
        for (var j = 0; j < level - level2; j++) vystup += "</li>\n</ol>\n"
      } 
      if (level2 == level) vystup += "</li>\n"
      vystup += "<li><p>" + label + " " + title + "</p>"
      level = level2;
      
      cat.title = title;
      cat.ref = ref; 
      cat.label = label;
      cat.level = level2;
      
      
      if (label.lastIndexOf(".") > 0) {
        var parentLabel = label.substring(0, label.lastIndexOf("."))
        var parent = getCathegory(parentLabel);
        parent.subcats.push(cat);
        cat.parent = parent  
      }
      
      var pid = getPicsLabel(label)
      for (var ii = 0; ii < pictures.length; ii++) {
        if (pictures[ii][0].indexOf(pid) == 0 && pictures[ii][0].length == pid.length + 2) cat.pics.push(pictures[ii])
      }
      
      if (cat.level == 1) mainToc.push(cat)
      cats.push(cat);
    }
    
    for (var k = 0; k < level ; k++) vystup += "</li>\n</ol>\n"
    
    document.getElementById("vystupni").value = vystup;
   
    
    generateMainToc()
    } 
  
  // ziskani popisku obrazku
  function getPicsLabel(retez) { 
    var chunks = retez.split(".")
      for (var ii = 0; ii < chunks.length; ii++) {
        if (chunks[ii].length == 1) chunks[ii] = "0" + chunks[ii]
      }
      
      return chunks.join("_")
  }
  
  // vytvoreni  osnovy nejvyssi urovne  
  function generateMainToc() {
    showSection("toc")
    
    document.getElementById("navigline").innerHTML = "";
    document.getElementById("navigline").style.display = "none"
    
    var vystup = "<ol class='toc'>"
    for (var i = 0; i < mainToc.length; i++) {
       vystup += "<li onclick='selectCat(" + mainToc[i].label + ")'>" + mainToc[i].label + " " + mainToc[i].title + "</li>"
    }
    vystup += "</ol>";
    document.getElementById("toc").innerHTML += vystup;
  }
  
  // generovani osnovy vybrane podkapitoly
  function generateSubtoc(cat) {
  showSection("subtoc")
 
    var vystup = "";
    
    
    var subcount = 0;
    if (cat.subcats.length > 0) {
      
      vystup += "<ol>"
      for (var i = 0; i < cat.subcats.length; i++) {
      var subcat =   cat.subcats[i]
      subcount += subcat.subcats.length;
      if (subcount > 20 && i < cat.subcats.length - 1 && cat.level == 1) { 
        vystup += "</ol> <ol>"; 
        subcount = 0;
        }
      
      var tCount = (subcat.pics.length == 0) ? "" : " (" + subcat.pics.length + ")"
      
      if (subcat.pics.length > 0) {
          vystup += "<li><p class=\"gallery\"><a onclick=\"selectCat('" + subcat.label + "') \" >" + subcat.label + " " + subcat.title + tCount +"</a></p>"
      }
      
      if (subcat.pics.length == 0 && subcat.getPicsTotal() > 0) {
        vystup += "<li><p>" + subcat.label + " " + subcat.title + tCount +"</p>"
      }
      
      if (subcat.getPicsTotal() == 0) {
        vystup += "<li class=\"hidden\"><p>" + subcat.label + " " + subcat.title + tCount +"</p>"
        }
        
      vystup +=  generateSubtoc(subcat) + "</li>";
      
      }
      vystup += "</ol>"
      
    }
    return vystup;
  }
  
  // vyber a zobrazeni kapitoly 
  function selectCat(cid) {
    var main = getCathegory(cid);
    
    var navig = "";
    
    var cat2 = main;
    var ccount = 0; 
    while (cat2.parent) { 
      cat2 = cat2.parent; 
      ccount++;  
      navig = " <a onclick=\"selectCat(\'" + cat2.label + "\')\">" + cat2.label + " " + cat2.title + "</a>" +((ccount > 1) ? " &gt; ": "" ) +  navig;
    }
    navig = "<a onclick=\"showSection(\'toc\')\">TOC</a>" + ((navig.length > 0) ? "&gt; " + navig : "")
    
     document.getElementById("navigline").style.display = "block"
     document.getElementById("navigline").innerHTML = navig;
    
    actualSection = main;
    var parent = ""
    if (main.label.lastIndexOf(".") > -1) parent = main.label.substring(0, main.label.lastIndexOf("."))
    var move_up = ""
    if (parent != "") {
      move_up =  "<span class=\"apl\" onclick=\"selectCat('" + parent + "')\" title=\"Přejít o úroveň výše\">&#160;</span>" // <img src=\"design/Arrow_Up24v.png\" alt=\"Výše\" />
    } 
    
    else move_up =  "<span class=\"apl\" onclick=\"showSection(\'toc\')\" title=\"Přejít na přehled kapitol\">&#160;</span>"  //<img src=\"design/Arrow_Up24v.png\" alt=\"Výše\" />
    document.getElementById("maincat").innerHTML = move_up + " " + main.label + " " + main.title;
    document.getElementById("subcats").innerHTML =  generateSubtoc(main)
    generateThumbs(main.label)
  }
  
  
  // vytbvoreni senzamu nahledu obrzku v dane kaiptole
  function generateThumbs(cid) {
  
   showSubsection("thumbs")
    var pid = getPicsLabel(cid); 
    
   
  var thumbs = 	document.getElementById("thumbs")
  
	 var vystup = "<menu>"
	 
	 actualSection = getCathegory(cid);
	 var preparaty = actualSection.pics
	 
	 for (var i =0; i < preparaty.length; i++) {
		var file = preparaty[i][0];
		var desc = preparaty[i][1];
		//desc = desc.replace(/(\s)([ksvziouKSCVZIOU])(\s)/g,"$1$2&#160;")
    
    vystup += "<figure onclick=\"showPreparate('" + i + "')\" >"
		vystup += "<img src='pics\/mini\/" +preparaty[i][0] +".jpg ' alt='náhled preparátu' />"
		vystup += "<figcaption>" + preparaty[i][1].replace(/(\s)([ksvziouKSVZAIOU])\s/g,"$1$2&nbsp;") + "</figcaption>";	
		vystup += "</figure>"	
	 }
	  
	 vystup += "</menu>";
	 thumbs.innerHTML = vystup; 
  }
  
  // prechod na nasledujici obrazek v sekci 
  function nextPreparate() {
  if (actualPrep < actualSection.pics.length-1) {
    actualPrep++; 
    showPreparate(actualPrep)
  }
 } 
 // prechod na predchozi obrazek v sekci   
function prevPreparate() {
  if (actualPrep > 0) {
    actualPrep--; 
    showPreparate(actualPrep)
  }
 }
  

 // ozbrazeni obrazku daneho indexu
  function showPreparate(index) {
  index = parseInt(index)
	actualPrep = index
	showSubsection("single")  
  
    var first = (index == 0) ? "firstOn" : "firstOff";
    var last = (index == actualSection.pics.length -1) ? "lastOn" : "lastOff";
    document.getElementById("mainFigure").className = "figure popiskyOff legendaOff" + " " + first + " " + last;
   
  
  var vystup = ""  
  var prep = actualSection.pics[index];
  vystup +=  "<span class=\"apl\" onclick=\"showSubsection('thumbs')\" title=\"Zobrazit náhledy\"><img src=\"design/Arrow_Up24v.png\" alt=\"Náhledy\" /></span>"
  vystup += (index+ 1) + " " + actualSection.title
    document.getElementById("figtitle").innerHTML = vystup
    
    //generovani popisku
    
    var fig1 = document.getElementById("preparat");
   
  
   var p_width = 640 
                                                                            /*  width=\""+ p_width + "\"*/
      var pic = "<img id=\"fig_preparat\" src=\"pics\/vodoznak\/" + prep[0] + ".jpg\" alt=\"" + prep[1] +"\" />";
    
    
    fig1.innerHTML = pic
  
   //spodni popis obrazku
    var popis = prep[1];
    popis = popis.replace(/(\s)([ksvziouKSVZAIOU])\s/g,"$1$2&nbsp;")
    
    document.getElementById("popis").innerHTML = popis ;
    
  }
  
  /************* Vyhledavani ***************/
function searchPhrase() {
  var phrase = document.getElementById("search_phrase").value;
  
  var count = 0;
  
  if (phrase == "") return;
  var vystup = "<ol>" 
  for (var i = 0; i < mainToc.length; i++) {
  //alert("Kategorie: " + mainToc[i].title )
     vystup += searchCat(mainToc[i], phrase);
  }
  vystup += "</ol>";
  if (vystup == "<ol></ol>") { vystup = "<p>Hledaná fráze nebyla nalezena.</p>"}
  document.getElementById("search_results").innerHTML = vystup;
}  

function searchCat(cat, fraze) {
    var vystup = ""   
    if (cat.title.toLowerCase().indexOf(fraze.toLowerCase()) > -1) {
      vystup += "<li><a onclick=\"selectCat('" + cat.label + "')\">" + cat.label +"</a></li>";
      
      //document.getElementById("displej").innerHTML +="<li><a onclick=\"selectCat('" + cat.label + "')\">" + cat.label +"</a></li>" 
     // counter++;
    }
  
    for (var i =0; i < cat.pics.length; i++ ) {
      if (cat.pics[i][1].toLowerCase().indexOf(fraze.toLowerCase()) > -1) {
        var title = cat.pics[i][0];
        var index = title.charCodeAt(title.length-1) - 97
        vystup += "<li><a onclick=\"selectCat('" + cat.label + "'); showPreparate(" + index +")\">" + cat.label + ", " + "obr. " + (index +1 ) + "</a></li>";
       // counter++;
        
      }
    }
   for (var j =0; j < cat.subcats.length; j++ ) {
     vystup += searchCat(cat.subcats[j], fraze)
   }  
   return vystup
}