var VarSlideDown = -1;  //Esta Variavel é Global pelo menos por enquanto
var VarSlideUp = -1;  //Esta Variavel é Global pelo menos por enquanto

function SlideDownTopBody(pTemporizador, pPixels){
 MeuFrame = top.document.body;
 if (VarSlideDown == -1) {
  VarSlideDown = MeuFrame.scrollHeight;
 }
 top.window.scrollBy(0,pPixels);
 VarSlideDown = VarSlideDown - pPixels;
 if (VarSlideDown >= 1) {
  MeuIntervaloDown = top.window.setTimeout('SlideDownTopBody('+pTemporizador+','+pPixels+')',pTemporizador);
 } else {
  top.window.clearInterval(MeuIntervaloDown);
  VarSlideDown = -1;
 }
}

function SlideUpTopBody(pTemporizador, pPixels){
 MeuFrame = top.document.body;
 if (VarSlideUp == -1) {
  VarSlideUp = MeuFrame.scrollHeight;
 }
 top.window.scrollBy(0,pPixels*-1);
 VarSlideUp = VarSlideUp - pPixels;
 if (VarSlideUp >= 1) {
  MeuIntervaloUp = top.window.setTimeout('SlideUpTopBody('+pTemporizador+','+pPixels+')',pTemporizador);
 } else {
  top.window.clearInterval(MeuIntervaloUp);
  VarSlideUp = -1;
 }
}

function SlideDownBody(pFrame, pTemporizador, pPixels){
 MeuFrame = document.getElementById(pFrame);
 if (VarSlideDown == -1) {
  VarSlideDown = MeuFrame.scrollHeight;
 }
 window.scrollBy(0,pPixels);
 VarSlideDown = VarSlideDown - pPixels;
 if (VarSlideDown >= 1) {
  MeuIntervaloDown = window.setTimeout('SlideDownBody("'+pFrame+'",'+pTemporizador+','+pPixels+')',pTemporizador);
 } else {
  clearInterval(MeuIntervaloDown);
  VarSlideDown = -1;
 }
}

function SlideUpBody(pFrame, pTemporizador, pPixels){
 MeuFrame = document.getElementById(pFrame);
 if (VarSlideUp == -1) {
  VarSlideUp = MeuFrame.scrollHeight;
 }
 window.scrollBy(0,pPixels*-1);
 VarSlideUp = VarSlideUp - pPixels;
 if (VarSlideUp >= 1) {
  MeuIntervaloUp = window.setTimeout('SlideUpBody("'+pFrame+'",'+pTemporizador+','+pPixels+')',pTemporizador);
 } else {
  clearInterval(MeuIntervaloUp);
  VarSlideUp = -1;
 }
}

function SlideDown(pFrame, pTemporizador, pPixels){
 MeuFrame = document.getElementById(pFrame);
 if (VarSlideDown == -1) {
  VarSlideDown = MeuFrame.contentWindow.document.body.scrollHeight;
 }
 MeuFrame.contentWindow.window.scrollBy(0,pPixels);
 VarSlideDown = VarSlideDown - pPixels;
 if (VarSlideDown >= 1) {
  MeuIntervaloDown = window.setTimeout('SlideDown("'+pFrame+'",'+pTemporizador+','+pPixels+')',pTemporizador);
 } else {
  clearInterval(MeuIntervaloDown);
  VarSlideDown = -1;
 }
}

function SlideUp(pFrame, pTemporizador, pPixels){
 MeuFrame = document.getElementById(pFrame);
 if (VarSlideUp == -1) {
  VarSlideUp = MeuFrame.contentWindow.document.body.scrollHeight;
 }
 MeuFrame.contentWindow.window.scrollBy(0,pPixels*-1);
 VarSlideUp = VarSlideUp - pPixels;
 if (VarSlideUp >= 1) {
  MeuIntervaloUp = window.setTimeout('SlideUp("'+pFrame+'",'+pTemporizador+','+pPixels+')',pTemporizador);
 } else {
  clearInterval(MeuIntervaloUp);
  VarSlideUp = -1;
 }
}
