function SliderCreate(sDiv,nSteps,nPos,sTexts) {
  var oDiv  = document.getElementById(sDiv);
  var oDiv1 = document.createElement('div');
  var oDiv4 = document.createElement('div');
  var oDiv5 = null;
  var oDiv6 = document.createElement('div');
  var aTxt  = sTexts.split(';');
  var sTxt  = '';

  oDiv1.style.textAlign = 'center';
  sTxt = '<table border=0 cellpadding=0 cellspacing=0 style="font:normal 9px Arial;" width="100%"><tr>';
  for (var i=0, m=aTxt.length-1, p=Math.round(100/m); i<=m; i++) {
    if (i==0) {
      sTxt += '<td style="text-align:left;" width="'+p/2+'%">'+aTxt[i]+'</td>';
    } else if (i==m) {
      sTxt += '<td style="text-align:right;" width="'+p/2+'%">'+aTxt[i]+'</td>';
    } else {
      sTxt += '<td style="text-align:center;" width="'+p+'%">'+aTxt[i]+'</td>';
    }
  }
  sTxt += '</tr></table>';
  oDiv1.innerHTML = sTxt;

  oDiv4.style.height = '21px';
  oDiv4.style.background = 'url(/scripts/slider/SliderTab.jpg) no-repeat 0px 0px';
  oDiv4.style.cursor = 'pointer';
  oDiv4.onmousedown = function(event) {SliderMouseDown(event||window.event,this);};
  oDiv4.onmousemove = function(event) {SliderMouseMove(event||window.event,this);};
  oDiv4.onmouseup   = function(event) {SliderMouseUp(event||window.event,this);};
  oDiv4.onmouseout  = function(event) {SliderMouseUp(event||window.event,this);};
  oDiv4.SliderSteps = nSteps-1;
  oDiv4.SliderWidth = parseInt(oDiv.style.width)-18;
  oDiv4.SliderStep  = oDiv4.SliderWidth / oDiv4.SliderSteps;
  oDiv4.SliderDrag  = false;
  oDiv4.SliderPos   = Math.round(nPos*oDiv4.SliderWidth/100);
  oDiv4.style.backgroundPosition = oDiv4.SliderPos+'px 0px';

  oDiv.appendChild(oDiv1);

  for (var i=0;i<nSteps;i++) {
    oDiv5 = document.createElement('div');
    oDiv5.style.styleFloat = 'left';
    oDiv5.style.cssFloat = 'left';
    oDiv5.style.width = (i==0)?('8px'):(Math.round(i*oDiv4.SliderStep) - Math.round((i-1)*oDiv4.SliderStep) - 2 + 'px');
    oDiv5.style.height = '4px';
    oDiv5.style.fontSize = '4px';
    oDiv5.style.borderRight = '2px solid #888';
    oDiv.appendChild(oDiv5);
  }

  oDiv6.style.clear = 'both';
  oDiv6.style.height = '21px';
  oDiv6.style.background = 'url(/scripts/slider/SliderBack.jpg) repeat-x 0px 0px';
  oDiv6.appendChild(oDiv4);

  oDiv.appendChild(oDiv6);

  SliderAdjust(oDiv4)
}


function GetMouseX(event,oSlider) {
  if (event.offsetX) {
    return event.offsetX;
  } else {
    var nPos = event.pageX;
    while (oSlider.offsetParent) {
      nPos -= oSlider.offsetLeft;
      oSlider = oSlider.offsetParent;
    }
    return nPos;
  }
}

function clearSelection() {
  var sel ;
  if (document.selection && document.selection.empty){
    document.selection.empty() ;
  } else if(window.getSelection) {
    sel=window.getSelection();
    if (sel && sel.removeAllRanges) sel.removeAllRanges() ;
  }
}


function SliderMouseDown(event,oSlider) {
  if (event.preventDefault) event.preventDefault();
  oSlider.SliderDrag = true;
  SliderMouseMove(event,oSlider); 
  clearSelection();
}


function SliderMouseMove(event,oSlider) {
  if (oSlider.SliderDrag) {
    oSlider.SliderPos = GetMouseX(event,oSlider)-9;
    if (oSlider.SliderPos<0) oSlider.SliderPos = 0;
    if (oSlider.SliderPos>oSlider.SliderWidth) oSlider.SliderPos = oSlider.SliderWidth;
    oSlider.style.backgroundPosition = oSlider.SliderPos+'px 0px';
  }
}


function SliderMouseUp(event,oSlider) {
  oSlider.SliderDrag = false;
  SliderAdjust(oSlider);
  clearSelection();
}


function SliderAdjust(oSlider) {
  oSlider.SliderPos = Math.round(oSlider.SliderPos / oSlider.SliderStep);
  if (oSlider.SliderPos==oSlider.nSteps) {
    oSlider.SliderPos = oSlider.SliderWidth;
  } else if (oSlider.SliderPos>=0) {
    oSlider.SliderPos = Math.round(oSlider.SliderPos * oSlider.SliderStep);
  } else {
    oSlider.SliderPos = 0;
  }
  oSlider.style.backgroundPosition = oSlider.SliderPos+'px 0px';
}


function SliderRead(sDiv) {
  var oDiv = document.getElementById(sDiv).lastChild.lastChild;
  var nPos = Math.round(100 * oDiv.SliderPos / oDiv.SliderWidth);
  if (nPos<0) nPos = 0;
  if (nPos>99) nPos = 99;
  return nPos; 
}




