/*
  Copyright:    Copyright (c) 2005
  Company:      BfA, 1152-21
  Author:       Christian Wuttke

  Script für Readspeaker. Vorlesen einer Textauswahl
  
  Quelle: Torsten Onkes (LVA Westfalen), Mail vom 31.08.2005
  
  Version 1.1  03.09.2005 Wuttke
*/
function sayit() {
  if (navigator.appName=="Microsoft Internet Explorer") {
    // recent Mozilla versions
    if (window.getSelection) {
      var selectedString = window.getSelection();
      // MSIE 4+
    }
    else if (document.all) {
      rng = document.selection.createRange();
      selectedString = rng.text;
    }
  }
  else {
    var selectedString = document.getSelection();  
  }

  if (window.location.href) {
    document.rs_form.url.value = window.location.href;
  }
  else if (document.location.href) {
    document.rs_form.url.value = document.location.href;
  }

  document.rs_form.rstext.value = selectedString;
}

function copyselected() {
  setTimeout("sayit()",50); return true;
}