function fotografie(i)
{
var txt;

txt = "<HTML> \n";
txt += "<HEAD> \n";
txt += "<TITLE>®eleznice - Semmering</TITLE> \n";
txt += "<META http-equiv='content-type' content='text/html; charset=iso-8859-2'> \n";
txt += "<LINK href='../../etc/mv.css' type=text/css rel=STYLESHEET> \n\n";
txt += "<link rel='shortcut icon' href='http://www.martinvalek.net/favicon.ico' /> \n";
txt += "<sc" + "ript language='JavaScript'> \n";
txt += "<!-- \n";
// Celkový počet fotek
txt += "pocet_obrazku = 55; \n"; 
txt += "show = false; \n"; 
// jména suborů
txt += "images = new Array (); \n";
txt += "images[1] = 'fotky/2006-09-0041.jpg'; \n";
txt += "images[2] = 'fotky/2006-09-0067.jpg'; \n";
txt += "images[3] = 'fotky/2006-09-0578.jpg'; \n";
txt += "images[4] = 'fotky/2006-09-0601.jpg'; \n";
txt += "images[5] = 'fotky/2006-09-0753.jpg'; \n";
txt += "images[6] = 'fotky/2006-09-0747.jpg'; \n";
txt += "images[7] = 'fotky/2006-09-0764.jpg'; \n";
txt += "images[8] = 'fotky/2006-09-0499.jpg'; \n";
txt += "images[9] = 'fotky/2006-09-0505.jpg'; \n";
txt += "images[10] = 'fotky/2006-09-0863.jpg'; \n";
txt += "images[11] = 'fotky/2006-09-0139.jpg'; \n";
txt += "images[12] = 'fotky/2006-09-0149.jpg'; \n";
txt += "images[13] = 'fotky/2006-09-0179.jpg'; \n";
txt += "images[14] = 'fotky/2006-09-0196.jpg'; \n";
txt += "images[15] = 'fotky/2006-09-0214.jpg'; \n";
txt += "images[16] = 'fotky/2006-09-0238.jpg'; \n";
txt += "images[17] = 'fotky/2006-09-0813.jpg'; \n";
txt += "images[18] = 'fotky/2006-09-0255.jpg'; \n";
txt += "images[19] = 'fotky/2006-09-0306.jpg'; \n";
txt += "images[20] = 'fotky/2006-09-0334.jpg'; \n";
txt += "images[21] = 'fotky/2006-09-0350.jpg'; \n";
txt += "images[22] = 'fotky/2006-09-0387.jpg'; \n";
txt += "images[23] = 'fotky/2006-09-0692.jpg'; \n";
txt += "images[24] = 'fotky/2006-09-0540.jpg'; \n";
txt += "images[25] = 'fotky/2006-09-0553.jpg'; \n";
txt += "images[26] = 'fotky/2006-09-0545.jpg'; \n";
txt += "images[27] = 'fotky/2008-05-1964.jpg'; \n";
txt += "images[28] = 'fotky/2008-05-2628.jpg'; \n";
txt += "images[29] = 'fotky/2008-04-1945.jpg'; \n";
txt += "images[30] = 'fotky/2008-04-1612.jpg'; \n";
txt += "images[31] = 'fotky/2008-04-1655.jpg'; \n";
txt += "images[32] = 'fotky/2008-04-1787.jpg'; \n";
txt += "images[33] = 'fotky/2008-04-1854.jpg'; \n";
txt += "images[34] = 'fotky/2008-05-2213.jpg'; \n";
txt += "images[35] = 'fotky/2008-05-2467.jpg'; \n";
txt += "images[36] = 'fotky/2008-05-2493.jpg'; \n";
txt += "images[37] = 'fotky/2008-05-2150.jpg'; \n";
txt += "images[38] = 'fotky/2009-09-2674.jpg'; \n";
txt += "images[39] = 'fotky/2009-09-2402.jpg'; \n";
txt += "images[40] = 'fotky/2009-09-2424.jpg'; \n";
txt += "images[41] = 'fotky/2009-09-2489.jpg'; \n";
txt += "images[42] = 'fotky/2009-09-2561.jpg'; \n";
txt += "images[43] = 'fotky/2009-09-2628.jpg'; \n";
txt += "images[44] = 'fotky/2009-09-2618.jpg'; \n";
txt += "images[45] = 'fotky/2009-09-3292.jpg'; \n";
txt += "images[46] = 'fotky/2009-09-2777.jpg'; \n";
txt += "images[47] = 'fotky/2009-09-2578.jpg'; \n";
txt += "images[48] = 'fotky/2009-09-3323.jpg'; \n";
txt += "images[49] = 'fotky/2009-09-3404.jpg'; \n";
txt += "images[50] = 'fotky/2009-09-3425.jpg'; \n";
txt += "images[51] = 'fotky/2009-09-2931.jpg'; \n";
txt += "images[52] = 'fotky/2009-09-3554.jpg'; \n";
txt += "images[53] = 'fotky/2009-09-3615.jpg'; \n";
txt += "images[54] = 'fotky/2009-09-3623.jpg'; \n";
txt += "images[55] = 'fotky/2009-09-3675.jpg'; \n";
// Komentáře fotografií
txt += "comment = new Array () \n";
txt += "comment[1] = 'Památník Carla Ghegy ve stanici Semmering'; \n";
txt += "comment[2] = '1016 + 1142 ÖBB, ÖBB-EC 556 Österreichisches Umweltzeichen, Wolfsbergkogel'; \n";
txt += "comment[3] = '1116.229 ÖBB, IC 534 Naturpark Grebenzen, Wolfsbergkogel'; \n";
txt += "comment[4] = '1116 ÖBB, ÖBB-EC 557 Kunsthaus Graz, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[5] = 'Viadukt Kalte Rinne a Polleroswand - nejznámějąí dominanty Semmeringbahn'; \n";
txt += "comment[6] = '1116 ÖBB, ÖBB-EC 531 IT Campus Kärnten, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[7] = '1116 ÖBB, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[8] = '1116.156 ÖBB, IC 537 Europäisch Computer Führershein, Breitenstein - Wolfsbergkogel'; \n";   
txt += "comment[9] = '1142.663 + 1116.153 ÖBB, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[10] = '1116.200 ÖBB, IC 537 Europäisch Computer Führershein, Breitenstein - Wolfsbergkogel'; \n";   
txt += "comment[11] = '1116.085 ÖBB, ÖBB-EC 732 FH Technikum Kärnten, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[12] = '4010.001+013 ÖBB, IC 550 Wiener Volkshochschulen, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[13] = '1116.103 ÖBB, IC 532 Kelag Energie Express, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[14] = '4010.029 ÖBB, IC 552 Stadt Bruck an der Mur, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[15] = '1116.107 ÖBB, IC 534 Naturpark Grebenzen, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[16] = '1116.153 ÖBB, EC 158 Croatia, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[17] = '1116.062 GySEV + 1142.554 ÖBB, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[18] = '1116.182 + pk1142.605 ÖBB, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[19] = '1016.029 + pk1116.100 ÖBB, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[20] = '1144.266 + 1116 ÖBB, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[21] = '1116.272 ÖBB, IC 565 Therme Oberlaa-Wien, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[22] = '4010.011 ÖBB, IC 550 Wiener Volkshochschulen, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[23] = '1044.021 ÖBB, EC 33 Allegro Stradivari, Klamm-Schottwien - Breitenstein'; \n";
txt += "comment[24] = '1044.006 ÖBB, EC 33 Allegro Stradivari, Küb - Eichberg'; \n";   
txt += "comment[25] = '2x1116 ÖBB, EC 159 Croatia, Küb - Eichberg'; \n";
txt += "comment[26] = '1116.216 ÖBB, Eichberg - Küb'; \n";    
txt += "comment[27] = '33.132 + pk1245.525 ÖBB, Semmering'; \n";
txt += "comment[28] = '1216.226 ÖBB, ÖBB-EC 151 Emona, Wolfsbergkogel'; \n";
txt += "comment[29] = '1116 GySEV + 1116 ÖBB, IC 630 Sternenturm Judenburg, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[30] = '1142 + 1116 ÖBB, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[31] = '1144 ÖBB, ÖBB-IC 535 KÄRNTEN wasser.reich, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[32] = '1142 ÖBB, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[33] = '1116 ÖBB, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[34] = '1116.087 ÖBB, IC 658, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[35] = '1116 + 1116.003 ÖBB,  Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[36] = '1116 + pk1142.566 ÖBB, Wolfsbergkogel - Breitenstein'; \n";   
txt += "comment[37] = '1144 + 1116 ÖBB, Klamm-Schottwien - Breitenstein'; \n";
txt += "comment[38] = '1144.037 + 1044.069 ÖBB, ÖBB-EC 733 Der Warmbaderhof, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[39] = '1044.036 ÖBB, ÖBB-IC 259, Breitenstein - Wolfsbergkogel'; \n";
txt += "comment[40] = '1044.081 + pk1116.266 ÖBB, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[41] = '1216.921+920 Adria Transport + pk1216.910 LTE, GAG 48430, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[42] = '1116.111 + 1044.117 ÖBB, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[43] = '1044.046 ÖBB, ÖBB-IC 252, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[44] = '1044.015 ÖBB, ÖBB-IC 534 Österreichischer Städtebund, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[45] = '1142.667 ÖBB, ÖBB-IC 252, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[46] = '1116.198 ÖBB, ÖBB-EC 732, Wolfsbergkogel - Breitenstein'; \n";
txt += "comment[47] = '1042.013 ÖBB, ÖBB-IC 556 Erlebnis Demokratie, Wolfsbergkogel - Breitenstein'; \n";   
txt += "comment[48] = '1144.217 ÖBB, ÖBB-IC 650, Breitenstein'; \n";
txt += "comment[49] = '1116.114 + pk1144 ÖBB, Klamm-Schottwien - Breitenstein'; \n";    
txt += "comment[50] = '1142.705 + 1116 ÖBB, Klamm-Schottwien - Breitenstein'; \n";
txt += "comment[51] = '1042.032 ÖBB, ÖBB-IC 657, Klamm-Schottwien - Breitenstein'; \n";
txt += "comment[52] = '1010.003 ÖBB, Küb - Eichberg'; \n";
txt += "comment[53] = '4020.002 ÖBB, R 2957, Küb - Eichberg'; \n";
txt += "comment[54] = '1116.038 ÖBB, ÖBB-IC 257, Küb - Eichberg'; \n";
txt += "comment[55] = '1016.029 ÖBB, ÖBB-EC 733 Der Warmbaderhof, Küb - Eichberg'; \n";
// Data fotografií
txt += "date = new Array () \n";
txt += "date[1] = '5.9.2006'; \n";
txt += "date[2] = '5.9.2006'; \n";
txt += "date[3] = '8.9.2006'; \n";
txt += "date[4] = '8.9.2006'; \n";
txt += "date[5] = '9.9.2006'; \n";
txt += "date[6] = '9.9.2006'; \n";
txt += "date[7] = '9.9.2006'; \n";
txt += "date[8] = '7.9.2006'; \n";
txt += "date[9] = '7.9.2006'; \n";
txt += "date[10] = '9.9.2006'; \n";
txt += "date[11] = '6.9.2006'; \n";
txt += "date[12] = '6.9.2006'; \n";
txt += "date[13] = '6.9.2006'; \n";
txt += "date[14] = '6.9.2006'; \n";
txt += "date[15] = '6.9.2006'; \n";
txt += "date[16] = '6.9.2006'; \n";
txt += "date[17] = '9.9.2006'; \n";
txt += "date[18] = '6.9.2006'; \n";
txt += "date[19] = '6.9.2006'; \n";
txt += "date[20] = '6.9.2006'; \n";
txt += "date[21] = '7.9.2006'; \n";
txt += "date[22] = '7.9.2006'; \n";
txt += "date[23] = '8.9.2006'; \n";
txt += "date[24] = '7.9.2006'; \n";
txt += "date[25] = '7.9.2006'; \n";
txt += "date[26] = '7.9.2006'; \n";
txt += "date[27] = '1.5.2008'; \n";
txt += "date[28] = '3.5.2008'; \n";
txt += "date[29] = '30.4.2008'; \n";
txt += "date[30] = '30.4.2008'; \n";
txt += "date[31] = '30.4.2008'; \n";
txt += "date[32] = '30.4.2008'; \n";
txt += "date[33] = '30.4.2008'; \n";
txt += "date[34] = '2.5.2008'; \n";
txt += "date[35] = '2.5.2008'; \n";
txt += "date[36] = '2.5.2008'; \n";
txt += "date[37] = '1.5.2008'; \n";
txt += "date[38] = '23.9.2009'; \n";
txt += "date[39] = '22.9.2009'; \n";
txt += "date[40] = '22.9.2009'; \n";
txt += "date[41] = '23.9.2009'; \n";
txt += "date[42] = '23.9.2009'; \n";
txt += "date[43] = '23.9.2009'; \n";
txt += "date[44] = '23.9.2009'; \n";
txt += "date[45] = '26.9.2009'; \n";
txt += "date[46] = '23.9.2009'; \n";
txt += "date[47] = '23.9.2009'; \n";
txt += "date[48] = '26.9.2009'; \n";
txt += "date[49] = '26.9.2009'; \n";
txt += "date[50] = '26.9.2009'; \n";
txt += "date[51] = '26.9.2009'; \n";
txt += "date[52] = '27.9.2009'; \n";
txt += "date[53] = '27.9.2009'; \n";
txt += "date[54] = '27.9.2009'; \n";
txt += "date[55] = '27.9.2009'; \n";
// Lasovač na automatické přepínání fotek
txt += "var timer; \n";    
// Nastavení obrázku
txt += "function SetPic (){ \n";
txt += "document.images.imgprev.src = images[actpic];} \n";
// Nastavení komentáře obrázku
txt += "function SetKom (){ \n";
txt += "function dominnerText(node, text) { \n";
txt += "while (node.hasChildNodes()) { \n";
txt += "node.removeChild(node.firstChild); \n";
txt += "} \n";
txt += "node.appendChild(document.createTextNode(text)); \n";
txt += "} \n";
txt += "dominnerText(document.getElementById('popis'), comment[actpic])}; \n";
// Nastavení data obrázku
txt += "function SetDat (){ \n";
txt += "function dominnerText(node, text) { \n";
txt += "while (node.hasChildNodes()) { \n";
txt += "node.removeChild(node.firstChild); \n";
txt += "} \n";
txt += "node.appendChild(document.createTextNode(text)); \n";
txt += "} \n";
txt += "dominnerText(document.getElementById('datum'), date[actpic])}; \n";
// Následující snímek
txt += "function NextPic (){ \n";
txt += "if (actpic == pocet_obrazku) actpic = pocet_obrazku; \n";
txt += "else actpic++; \n";
txt += "SetPic(); \n";
txt += "SetKom (); \n";
txt += "SetDat (); \n";
txt += "document.SetPic.previous.value='<<<'; \n";
txt += "if (actpic == pocet_obrazku){ \n";
txt += "document.SetPic.next.value='';  \n";
txt += "document.SetPic.slshow.value=''; \n";
txt += "if (show == true) {show = false; \n";
txt += "StopSlideShow ();} \n";
txt += "} \n";
txt += "} \n";
// Předchozí snímek
txt += "function PrevPic (){ \n";
txt += "if (actpic != 1) { \n";
txt += "actpic--; \n";
txt += "SetPic(); \n";
txt += "SetKom (); \n";
txt += "SetDat (); \n";
txt += "document.SetPic.next.value = '>>>'; } \n";
txt += "if (show == false) { \n";
txt += "document.SetPic.slshow.value='slideshow';} \n";
txt += "if (actpic == 1) { \n";
txt += "document.SetPic.previous.value=''; } \n";
txt += "} \n";
// Snímek volaný z galerie
txt += "function AktPic (){ \n";
//txt += "actpic = 1; \n";
txt += "actpic = " + i + "; \n";
txt += "SetPic(); \n";
txt += "SetKom (); \n";
txt += "SetDat (); \n";
txt += "if (actpic == 1){ \n";
txt += "document.SetPic.previous.value=''; } \n";
txt += "if (actpic == pocet_obrazku){ \n";
txt += "document.SetPic.next.value='';  \n";
txt += "document.SetPic.slshow.value=''; } \n";
txt += "} \n";
// Poslední snímek
txt += "function LastPic (){ \n";
txt += "actpic = pocet_obrazku; \n";
txt += "SetPic(); \n";
txt += "SetKom (); \n";
txt += "SetDat ();} \n";
// Spu|tění slideshow
txt += "function SlideShow (){ \n";
txt += "timer = setInterval ('NextPic();', 20000);} \n";
// Zastavení slideshow
txt += "function StopSlideShow (){ \n";
txt += "clearInterval (timer);} \n";
// Ovladac slideshow
txt += "function OvladacSlideShow () {  \n";
txt += "if (show == false && actpic != pocet_obrazku) { show = true; \n";
txt += "SlideShow (); \n";
txt += "document.SetPic.slshow.value='stop';} \n";
txt += "else \n";
txt += "{if (actpic != pocet_obrazku) { show = false; \n";
txt += "StopSlideShow (); \n";
txt += "document.SetPic.slshow.value='slideshow';} \n";
txt += "} \n";
txt += "} \n";
// Ovladac zmeny barvy tlacitek
txt += "function KurzorNadNahledy() { \n";
txt += "document.SetPic.nahledy.style.color = '#ffffff'; } \n";
txt += "function KurzorMimoNahledy() { \n";
txt += "document.SetPic.nahledy.style.color = '#3C3E35'; } \n";
txt += "function KurzorNadSlshow() { \n";
txt += "document.SetPic.slshow.style.color = '#ffffff'; } \n";
txt += "function KurzorMimoSlshow() { \n";
txt += "document.SetPic.slshow.style.color = '#3C3E35'; } \n";
txt += "function KurzorNadPredchozi() { \n";
txt += "document.SetPic.previous.style.color = '#ffffff'; } \n";
txt += "function KurzorMimoPredchozi() { \n";
txt += "document.SetPic.previous.style.color = '#3C3E35'; } \n";
txt += "function KurzorNadDalsi() { \n";
txt += "document.SetPic.next.style.color = '#ffffff'; } \n";
txt += "function KurzorMimoDalsi() { \n";
txt += "document.SetPic.next.style.color = '#3C3E35'; } \n";
txt += "// --> \n";
txt += "//--> </sc" + "ript> \n";

txt += "</HEAD> \n";
txt += "<BODY OnLoad='AktPic ();'> \n";
txt += "<table width=100% height=99%> \n";
txt += "<tr height=20><td> \n";
txt += "<form name='SetPic'> \n";
txt += "<input name='nahledy' onclick='history.go(-1);' class='galerie-navigace-foto' id='nahledy' type='button' width=50px style='cursor: pointer;' value='náhledy' onMouseOver='KurzorNadNahledy()' onMouseOut='KurzorMimoNahledy()'></td> \n";
txt += "<input name='slshow' onclick='OvladacSlideShow();' class='galerie-navigace-foto' id='slideshow' type='button' style='cursor: pointer;' value='slideshow' onMouseOver='KurzorNadSlshow()' onMouseOut='KurzorMimoSlshow()'></td> \n";
txt += "<input name='previous' onClick='PrevPic();' class='galerie-navigace-foto' id='zpet' type='button' style='cursor: pointer;' value='&lt;&lt;&lt;' onMouseOver='KurzorNadPredchozi()' onMouseOut='KurzorMimoPredchozi()'></td> \n";
txt += "<input name='next' onclick='NextPic();' class='galerie-navigace-foto' id='tam' type='button' style='cursor: pointer;' value='&gt;&gt;&gt;' onMouseOver='KurzorNadDalsi()' onMouseOut='KurzorMimoDalsi()'></td></tr></form> \n";
txt += "<tr align=center valign=middle> \n";
txt += "<td> \n";
txt += "<IMG Name='imgprev' title='' alt='Semmering'> \n";
txt += "<div class='popiska-text' id='popis'></div> \n";
txt += "<div class='datum-text' id='datum'></div></td></tr><table> \n";
txt += "</BODY> \n";
txt += "</HTML>";

	document.open(); 
	document.write(txt);
	document.close(); 
}	

