/* Websystem TřiEsa.cz

# WBS - 1.0

#

# autor: V. Faltus(c) 2019

# verze: 1.0

#

# licence: volná - pro nekomerční použití, čti: plotna.licence.txt

# license: free  - for non-commercial use, read: plotna.licence.txt

# 

# soubor funkcí js pro WS 

#

*/

function ftester()

{ alert("ftester");



}

var pocasi = 6;    /* celkem obrázků  - pro posun obrázků počasí "http://www.meteopress.cz/pictures2/pp_cr_"+*/

var akt=0;         /* aktuální obrázek - pro posun obrázků počasí */ 

var stp=akt;       /* počáteční obrázek */

function posun(y)

{ akt+=y;    

  if(akt < stp) akt=stp;    // netočíme

  if(akt > 5) akt=5;

  x=akt;

  document.getElementById("m0").src="https://meteopress.cz/pictures/pp_cr_"+x+"den.png";

  x+=1;

  document.getElementById("m1").src="https://meteopress.cz/pictures/pp_cr_"+x+"den.png";

  x+=1;

  document.getElementById("m2").src="https://meteopress.cz/pictures/pp_cr_"+x+"den.png";

}



function getMeteoPress(i) // doplněk k počasí - linky

{ 

  if(i==0)

    document.getElementById("pocasi").innerHTML='<div><img style="width: 100%;" alt=" Počasí dnes" title="Počasí dnes" src="http://www.meteopress.cz/pictures2/mapy/cr_actual_vx.png"></div>';

  else if(i==1)

    document.getElementById("pocasi").innerHTML='<div><img style="width: 100%;" alt=" Evropa - předpověď" title="Evropa - předpověď" src="http://portal.chmi.cz/files/portal/docs/meteo/om/evropa/preba/preba.gif"></div>';

  else if(i==2) 

    document.getElementById("pocasi").innerHTML='<div><img style="width: 100%;" alt=" Teplota - zítra" title="Teplota - zítra" src="http://portal.chmi.cz/files/portal/docs/meteo/om/evropa/T2mpreba_evropa.gif"></div>';

  else

    window.open("http://www.chmi.cz/files/portal/docs/meteo/om/vystrahy/index.html", '','width=600,height=500');

//    document.getElementById("pocasi").innerHTML='<div><img style="width: 100%;" alt=" Výstrahy ČHMÚ" title="Výstrahy počasí" src="http://www.chmi.cz/files/portal/docs/meteo/om/vystrahy/index.html"></div>';

}

function SetHmi() //uvodní nastavení HMI alert("hmi");

{ document.getElementById("mhmi").value="";

  document.getElementById("mkg").value=0;

  document.getElementById("mcm").value=0;

}

// led

function Pocitej1() 

{ var form_sazba = document.getElementById("es");

  var form_prikonLed = document.getElementById("wattL");

  var form_prikonZ = document.getElementById("wattZ");

//  alert(form_prikonZ.value+" , "+document.getElementById("wattZ").value);

	var form_pocetZ = document.getElementById("kus");

	var form_provozZ = document.getElementById("hod");

	var form_cenaLed = document.getElementById("cenaL");

	var vysledek_spotrebaZ = document.getElementById("vysledek_spotrebaZ");

    vysledek_spotrebaZ.innerHTML = Math.round((form_prikonZ.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)+ 0.49) + ",- Kč";

    

	var vysledek_spotrebaLed = document.getElementById("vysledek_spotrebaLed");

    vysledek_spotrebaLed.innerHTML = Math.round((form_prikonLed.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)) + ",- Kč";

	

  var vysledek_usetrite = document.getElementById("vysledek_usetrite");	

    vysledek_usetrite.innerHTML = Math.round((form_prikonZ.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)-(form_prikonLed.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)) + ",- Kč";

	

  var vysledek_investice = document.getElementById("vysledek_investice");	

    vysledek_investice.innerHTML = Math.round((1 / (((form_prikonZ.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)-(form_prikonLed.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)) / (form_cenaLed.value * form_pocetZ.value)))*100)/100 + " roku";	

}

function Pocitej() 

{ var form_sazba = document.getElementById("es");

	var form_prikonLed = document.getElementById("wattL");

  var form_prikonZ = document.getElementById("wattZ");

	var form_pocetZ = document.getElementById("kus");

	var form_provozZ = document.getElementById("hod");

	var form_cenaLed = document.getElementById("cenaL");

	var spotrebaZ = Math.round((form_prikonZ.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)+ 0.49);

  var vysledek_spotrebaZ = document.getElementById("vysledek_spotrebaZ");

    vysledek_spotrebaZ.innerHTML = spotrebaZ + ",- Kč";

  var form_investice = document.getElementById("form_investice");

  form_investice.innerHTML = Math.round(form_pocetZ.value * form_cenaLed.value) + ",- Kč";      

	var spotrebaLed = Math.round((form_prikonLed.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value));

	var vysledek_spotrebaLed = document.getElementById("vysledek_spotrebaLed");

  vysledek_spotrebaLed.innerHTML = spotrebaLed + ",- Kč";  

  var vysledek_usetrite = document.getElementById("vysledek_usetrite");	

	  vysledek_usetrite.innerHTML = Math.round(spotrebaZ-spotrebaLed) + ",- Kč";

  var vysledek_investice = document.getElementById("vysledek_investice");	

    vysledek_investice.innerHTML = Math.round((1 / (((form_prikonZ.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)-(form_prikonLed.value * form_provozZ.value * 365 * (form_sazba.value / 1000) * form_pocetZ.value)) / (form_cenaLed.value * form_pocetZ.value)))*100)/100 + " roku";	

}



function Klavesa(e,t)   // formuláře přihlášení do RS, WS, člen

{ //alert("prdelka");

  if(e.keyCode == 13)

  { if(t.id=='email')

      document.getElementById('password').focus();

    else if(t.id=='ipas')

      document.getElementById('kontrola').focus();

    else if(t.id=='kontrola')

      document.getElementById('email').focus(); 

    event.returnValue = false;            // pro IE

      

  }

}

function Stisk(f)  // brání použití klávesy enter, formuláře přihlášení do RS, WS, člen

{ 

  f.press.value=1; //alert(f.press.value);

}

function Pressvalue(x=0)

{ document.getElementById('press').value=x; // alert("press="+x);

}



function ESendForm(f)  // formuláře přihlášení editora

{ //alert("ESendForm="); 

  if(f.press.value>0) // rs

  {  f.press.value=0; 

     //f.kontrola.hidden=true;   

     //alert(f.press.value);

     if(f.sid.value==22)

     { f.test.value=hex_md5(f.email.value);

       f.press.value=hex_md5(f.kontrola.value+hex_md5(f.kontrola.value)); 

       f.ipas.value=hex_md5(f.kontrola.value+hex_md5(f.ipas.value));

       

       u=f.ajx.value+".ajax.php?sid="+f.sid.value+"&ipas="+f.ipas.value+"&test="+f.test.value+"&fce="+f.fce.value+"&kod="+f.press.value;

     }else

       u='';

     //alert(u);

     getajx(f.sid.value,u); 

     return false;

  }

  return false;                   // enter

}

function SendForm(f)  // formuláře přihlášení 19/registrace 20   usera

{ //alert("SendForm="); 

  if(f.press.value>0) // rs

  {  f.press.value=0; 

     f.kontrola.hidden=true;   

     f.test.value=hex_md5(f.email.value);

     f.press.value=hex_md5(f.kontrola.value+hex_md5(f.kontrola.value)); 

     //alert(f.test.value);

     if(f.sid.value==19)

     { //f.ipas.value=f.kontrola.value+hex_md5(f.ipas.value);

       f.ipas.value=hex_md5(f.kontrola.value+hex_md5(f.ipas.value));

       //f.email.value='';

       u=document.getElementById('3esa_ajx').value+".ajax.php?sid="+f.sid.value+"&ipas="+f.ipas.value+"&test="+f.test.value+"&fce="+f.fce.value+"&kod="+f.press.value;

     }else

       u=document.getElementById('3esa_ajx').value+".ajax.php?sid="+f.sid.value+"&email="+f.email.value+"&test="+f.test.value+"&fce="+f.fce.value+"&kod="+f.press.value;

     //alert(u);

     getajx(f.sid.value,u); 

     return false;





  }

  return false;                   // enter

}



function getajx(x,u)

{ //alert(x+" , "+u);

  if (window.ActiveXObject)

  {

    httpRequest = new ActiveXObject("Microsoft.XMLHTTP");

  }

  else

  {

    httpRequest = new XMLHttpRequest();

  }

  httpRequest.open("GET", u, true);

  httpRequest.onreadystatechange= function () {procAjax(x); } ;

  httpRequest.send(null);

  return false;

}

//var volil=0;

function NastavA(t,r,a) //ankety

{ //alert(t+r+','+a);

  if(document.getElementById('ida'+a).value==0)

    return true;

  document.getElementById('ida'+a).value=0;

  //ida = (id z tb anketa)

  url=document.getElementById('3esa_ajx').value+".ajax.php?ajxAnketa="+document.getElementById('anzv'+a).value+"&aid="+r+"&ida="+a;

  //alert(url);

  if (window.ActiveXObject)

  {

    httpRequest = new ActiveXObject("Microsoft.XMLHTTP");

  }

  else

  {

    httpRequest = new XMLHttpRequest();

  }

  httpRequest.open("GET", url, true);

  httpRequest.onreadystatechange= function () {procAjax(document.getElementById('anzv'+a).value); } ;

  httpRequest.send(null);



  return false;

}

function procAjax(x=0)

{

  if (httpRequest.readyState == 4)

  {                                      

    if(httpRequest.status == 200)

    { //alert(httpRequest.responseText); //.length

      if(x==0)   // anketa malá

      { if(httpRequest.responseText.length>2)

        { a=httpRequest.responseText.split("•");

          //c=parseInt(a[0]); // celkem nepoužito

          document.getElementById("asr"+a[1]).style.fontWeight="bold";    //color="#00f"; také OK

          for(i=2;i<a.length;i+=2)

            document.getElementById("asr"+a[i]).innerHTML=a[i+1];    //id + stav

          

        }else

          alert("Odhlasováno");        

      }else if(x==1)

      { if(httpRequest.responseText.length>2)

        { a=httpRequest.responseText.split("•");

          c=parseInt(a[0]); // celkem

          document.getElementById("asr"+a[1]).style.fontWeight="bold";             //color="#00f";                     //fontWeight="bold";

          for(i=2;i<a.length;i+=2)

          { document.getElementById("asr"+a[i]).innerHTML=a[i+1];    //id + stav

            document.getElementById("brv"+a[i]).style.width=Math.round(190/c*a[i+1]+0.5)+'px';  //šířka grafu = s(190)

          }  

        }else 

          document.getElementById("sp"+x).innerHTML="Odhlasováno";  

           //alert("Odhlasováno");

      }else if(x==19)//login

      { document.getElementById('loginu').hidden=true;

        document.getElementById("kontrola").style.fontWeight='bold';

        document.getElementById("kontrola").hidden=false;

        if(httpRequest.responseText.length>2)

        { a=httpRequest.responseText.split("•");

          

          document.getElementById("kontrola").value="Přihlášen";

        }else 

          document.getElementById("kontrola").value="Nepřihlášen!";

      }else if(x==22)//loged

      { document.getElementById('loginu').hidden=true;

        document.getElementById("kontrola").style.fontWeight='bold';

        document.getElementById("kontrola").hidden=false;

        if(httpRequest.responseText.length>2)

        { a=httpRequest.responseText.split("•");

          document.getElementById("rsp"+x).hidden=true;

          alert("Přihlášen");

          //document.getElementById("kontrola").value="Přihlášen";

        }else 

          document.getElementById("kontrola").value="Nepřihlášen!";

      }else if(x==20)//registr

      { document.getElementById('registru').hidden=true;

        document.getElementById("kontrola").style.fontWeight='bold';

        document.getElementById("kontrola").hidden=false;

        if(httpRequest.responseText.length>2)

        { a=httpRequest.responseText.split("•");

          document.getElementById('regsp0').hidden=true;

          document.getElementById('regsp1').hidden=false;      

          document.getElementById('regsp2').hidden=false;      

          document.getElementById("kontrola").value="Registrován";

        }else 

          document.getElementById("kontrola").value="Neregistrován!";



} } } }

// editace RS

function VlozText(s)  // vkládá thtml tagy do textu: nepárové

{ veta=document.getElementById("rstxt").value;  

  st=document.getElementById("rstxt").selectionStart;

  document.getElementById("rstxt").focus();

  document.getElementById("rstxt").value=veta.slice(0,st)+s+veta.slice(document.getElementById("rstxt").selectionEnd);

  document.getElementById("rstxt").selectionStart=st+s.length;

  document.getElementById("rstxt").selectionEnd=st+s.length;

}

function VlozText2(s1,s2)  // vkládá thtml tagy - párové

{ veta=document.getElementById("rstxt").value;  

  st=document.getElementById("rstxt").selectionStart;

  document.getElementById("rstxt").focus();

  m=s1+veta.substr(st, document.getElementById("rstxt").selectionEnd-st)+s2;  

  document.getElementById("rstxt").value=veta.slice(0,st)+m+veta.slice(document.getElementById("rstxt").selectionEnd);

  document.getElementById("rstxt").selectionStart=st+m.length;

  document.getElementById("rstxt").selectionEnd=st+m.length;

}    

function VlozText3(s1,s2,s3)  // vkládá thtml tagy do textu: barva

{ var f=prompt("číslo barvy (hex)", "#ff0000");

  if(f)                      // vložím barvu písma

  { f=s1+'"'+f+'"'+s2; 

    veta=document.getElementById("rstxt").value;  

    st=document.getElementById("rstxt").selectionStart;

    document.getElementById("rstxt").focus();

    m=f+veta.substr(st, document.getElementById("rstxt").selectionEnd-st)+s3;  

    document.getElementById("rstxt").value=veta.slice(0,st)+m+veta.slice(document.getElementById("rstxt").selectionEnd);

    document.getElementById("rstxt").selectionStart=st+f.length;

    document.getElementById("rstxt").selectionEnd=st+f.length;

} }   

function VlozTextP(s1,s2)  // vkládá thtml tagy do textu: barva Pozadí ff00ff

{ var f=prompt("číslo barvy (hex)", "#99ff00");

  if(f)

  { f=s1+f+'">';     // vložím barvu pozadí

    veta=document.getElementById("rstxt").value;  

    st=document.getElementById("rstxt").selectionStart;

    document.getElementById("rstxt").focus();

    m=f+veta.substr(st, document.getElementById("rstxt").selectionEnd-st)+s2;  

    document.getElementById("rstxt").value=veta.slice(0,st)+m+veta.slice(document.getElementById("rstxt").selectionEnd);

    document.getElementById("rstxt").selectionStart=st+f.length;

    document.getElementById("rstxt").selectionEnd=st+f.length;

} }   

function VlozTextV(s1,s2,s3)  // vkládá thtml tagy do textu: velikost písma 3

{ var f=prompt("Písmo (1-7)", "3");

  if(f)

  { f=s1+'"'+f+'"'+s2;     // vložím číslo velikosti fontu

    veta=document.getElementById("rstxt").value;  

    st=document.getElementById("rstxt").selectionStart;

    document.getElementById("rstxt").focus();

    m=f+veta.substr(st, document.getElementById("rstxt").selectionEnd-st)+s3;  

    document.getElementById("rstxt").value=veta.slice(0,st)+m+veta.slice(document.getElementById("rstxt").selectionEnd);

    document.getElementById("rstxt").selectionStart=st+f.length;

    document.getElementById("rstxt").selectionEnd=st+f.length;

} }   

function VlozLink(s1,s2,s3)  // vkládá thtml tagy do textu: odkaz-link

{ var f=prompt("text odkazu", "http:// (odkaz-link)");

  if(f)                      // vložím odkaz

  { f=s1+'"'+f+'"'+' style="" title="odkaz"'+s2; 

    veta=document.getElementById("rstxt").value;  

    st=document.getElementById("rstxt").selectionStart;

    document.getElementById("rstxt").focus();

    m=f+veta.substr(st, document.getElementById("rstxt").selectionEnd-st)+s3;  

    document.getElementById("rstxt").value=veta.slice(0,st)+m+veta.slice(document.getElementById("rstxt").selectionEnd);

    document.getElementById("rstxt").selectionStart=st+f.length;

    document.getElementById("rstxt").selectionEnd=st+f.length;

} }   



function NahledRS(path,obr,h,w)  // ukáže náhled článku při editaci                   _RSHSPACE          _RSVSPACE

{ if(obr)

    t='<img src="'+path+obr+'" height="'+h+'" width="'+w+'" align="left" hspace="2" vspace="2" />';

  else 

    t='';

  if(!showrs)                                          // shodné s funkci mOkno

    showrs=new popUp(100, 150, 650, 300, 'viewrs','<div style="width: 100%; height:100%;text-align: left;">'+t+document.getElementById("rstxt").value+"</div>", "white", "black", "10pt sans-serif", "Náhled: "+document.getElementById("hlrs").value, "blue", "#f0f0f0", "#dddddd", "gray", "gray", false, true, true, true, true);

  else

    document.getElementById('viewrs_c').innerHTML='<div style="width: 100%; height:100%;text-align: left;">'+t+document.getElementById("rstxt").value+"</div>";    

  showbox('viewrs');

}

function AvPopis(t)  // avatar - dá hodnotu popis do edit pole pro změnu

{ document.getElementById('eav').value=t.title;       // popis

  document.getElementById('idav').value=t.name;       // id - změna

  document.getElementById('xav').value+=(t.name+'•');  // id - seznam del



}