function PlayMIDI(piesnURL, czaspiesni, tytulpiesni) { var DocString = "" document.open(); // dla przez netscape 1.x, lu MSIE 2.0, dla MSIE 2.0, if ( navigator.appName == 'Netscape') { DocString = DocString + '

'; } else DocString = DocString + ''; //"width=0 height=0 loop=false autostart="true" volume="100" border=0>'; // DocString = DocString + ''; DocString = DocString + "\n"; document.write(''); document.write(''); document.write(''); document.write(DocString); document.write("
" ) document.write("
Tytuł: "+tytulpiesni); document.write("") document.close() } function PlayRandom() { numerpiesni = 11; songs = new Array(numerpiesni); times = new Array(numerpiesni); titles = new Array(numerpiesni); var index; // ran = Math.round(Math.Random(10)*numerpiesni); today = new Date(); ran = today.getTime(); ran = Math.abs(Math.round(Math.sin(ran*3)*38111) % numerpiesni) if (ran > (numerpiesni - 1)) ran = 10; if (ran < 0) ran = 0; songs[1] = "midi/elshaddi.mid"; times[0] = 255; titles[1] = '"Elszadaj"' titles[1] = titles[0] + "
Zbory Boże ChDS" songs[0] = "midi/crownhim.mid"; times[1] = 176; titles[0] = '"Crown Him with Many Crowns"'; titles[0] = titles[1] + "
Zbory Boże ChDS" songs[2] = "midi/givthnks.mid"; times[2] = 90; titles[2] = '"giv thanks"'; titles[2] = titles[2] + "
Zbory Boże ChDS " songs[3] = "midi/glorify.mid"; times[3] = 126; titles[3] = '"Glorify the Name of the Lord"' titles[3] = titles[3] + "
Zbory Boże ChDS" songs[4] = "midi/lordlift.mid"; times[4] = 247; titles[4] = '"Z nieba na ziemię"' titles[4] = titles[4] + "
Zbory Boże ChDS" songs[5] = "midi/seek1sta.mid"; times[6] = 150; titles[5] = '"Królestwa Bożego szukajcie wpierw"' titles[5] = titles[5] + "
Zbory Boże ChDS" songs[6] = "midi/thanks.mid"; titles[6] = '"Give Thanks"' titles[6] = titles[6] + "
Zbory Boże ChDS" times[6] = 177; songs[7] = "midi/showers.mid"; times[7] = 146; titles[7] = '"There Shall Be Showers of Blessings"' titles[7] = titles[2] + "
Zbory Boże ChDS" songs[8] = "midi/astdeer.mid"; titles[8] = '"Tak jak jeleń"' titles[8] = titles[8] + "
Zbory Boże ChDS" times[8] = 159; songs[9] = "midi/hosanna.mid"; titles[9] = '"Hosanna"' titles[9] = titles[9] + "
Zbory Boże ChDS" times[9] = 95; songs[10] = "midi/singalel.mid"; titles[10] = '"S"' titles[10] = titles[10] + "
Zbory Boże ChDS" times[10] = 126; PlayMIDI(songs[ran], times[ran], titles[ran]); }