// Original:  Nicholas Loar, http://www.cass.net/~anarchy
// This script and many more are available free online at
// The JavaScript Source!! http://javascript.internet.com

// Netscape-Method from Luc Sillis, mailto:luxil@village.uunet.be

// Script strongly optimized and improved by Frank Bergermann
// http://www.bitwelt.de http://www.frankbergermann.de

// Begin

var musicPopUp;	// Siehe unten

function selectSound(sel) {
	var opt=sel.options[sel.selectedIndex]
	playSound(opt.value,opt.loop)
}

function playSound(datei,loop) {
  if (document.all){	// erst ab MSIE4 nutzbar
    document.all.music.src = datei;
    if(loop)
      document.all.music.loop = loop;
    else
      document.all.music.loop = "infinite";	// Hier Standard-Wiederholung einstellen
      // Nur IE. infinite = unendlich, sonst eine Anzahl.
      // Empfehlung: Standard=infinite, bei Wav-Dateien <option ... loop=1> angeben.
      // Sonst umgekehrt: Standard=1, bei Midi-Dateien <option ... loop=infinite> angeben.
  } else {
    // Verzichtet voll auf <embed>-Tag, das von Version zu Version unterschiedlich ist (andere Plugins)
    // und meist überhaupt nicht läuft. (C) 2001 Frank Bergermann, http://www.bitwelt.de
    if (musicPopUp)
      if (!musicPopUp.closed)
        musicPopUp.close()
    var pos=",left="+(screen.width-190)+",top=0"	// Wichtig: Klammern
    if (datei)
      musicPopUp = window.open (datei, "Musik", "resizeable,width=180,height=20"+pos) ;
      // Zum Abspielen wird eine NS-Vollinstallation benötigt, keine Minimal-Installation
  }
}

// Sound stoppbar mit: playSound()

/*
Der in der folgenden if-Abfrage enthaltene bgsound-Tag kann auch direkt
in den Dokument-Head eingebunden werden.
Dann funktioniert es auch mit Scripting=Ja+Einfügeoperationen=Nein.
Dann aber hier löschen, sonst läuft es nicht mehr, weil bei doppelter Namensverwendung
ein Array erzeugt würde, das anders angesprochen wird.
*/
if (document.all)
  document.write('<bgsound ID=music>')

// End