function wipeRight(){
  if (clipTal('box2','l')<800) {
    clipMed('box2',0,0,0,5)
    setTimeout("wipeRight()",30)
  }
    setTimeout("reset()",2500)
}
function wipeLeft() {
  if (clipTal('box2','r')>0) {
    clipMed('box2',0,-5,0,0)
    setTimeout("wipeLeft()",30)
  }
    setTimeout("reset()",2500)
}
function wipeDown() {
  if (clipTal('box2','t')<456) {
    clipMed('box2',5,0,0,0)
    setTimeout("wipeDown()",30)
  }
    setTimeout("reset()",2500)
}

function wipeUp() {
  if (clipTal('box2','b')>0) {
    clipMed('box2',0,0,-5,0)
    setTimeout("wipeUp()",30)
  }
    setTimeout("reset()",2500)
}
function reset(){
  clipTil('box2',0,800,456,0)
}


function wipehGardin(){
  if (clipTal('box4','l')<400) {
    clipMed('box4',0,0,0,5)
    setTimeout("wipehGardin()",30)
  }
}
function wipelGardin() {
	if (clipTal('box3','r')>0) {
		clipMed('box3',0,-5,0,0)
		setTimeout("wipelGardin()",30)
}

}

function wipeBoth(){
  if (clipTal('box4','l')<400) {
    clipMed('box4',0,0,0,3)
    setTimeout("wipeGardinLeft()",30)
  }
}
function wipeGardinLeft(){
  if (clipTal('box3','r')>0) {
    clipMed('box3',0,-3,0,0)
    setTimeout("wipeBoth()",30)
  }
}

function closeBoth(){
	if (clipTal('box4','l')>0) {
		clipMed('box4',0,0,0,-3)
		setTimeout("closeGardinLeft()",30)
	}
}
function closeGardinLeft(){
  if (clipTal('box3','r')<400) {
    clipMed('box3',0,3,0,0)
    setTimeout("closeBoth()",30)
  }
}
 
function resetGardin(){
  clipTil('box3',0,400,456,0)
  clipTil('box4',0,400,456,0)
}