<!--
function clipVal ( obj, edge ) {
   if ( dom ) {
      var clips = obj.clip.split ("rect(")[1].split(")")[0].split("px");
      switch ( edge ) {
         case "t" : return Number ( clips [ 0 ] );
         case "r" : return Number ( clips [ 1 ] );
         case "b" : return Number ( clips [ 2 ] );
         case "l" : return Number ( clips [ 3 ] );
      }
   }
   if ( ns4 ) {
      switch ( edge ) {
         case "t" : return obj.clip.top;
         case "r" : return obj.clip.right;
         case "b" : return obj.clip.bottom;
         case "l" : return obj.clip.left;
      }
   }
}

function clipTo ( obj, t, r, b, l ) {
   if ( dom ) obj.clip = "rect(" + t + "px " + r + "px " + b + "px " + l + "px)";
   if ( ns4 ) {
      obj.clip.top = t;
      obj.clip.right = r;
      obj.clip.bottom = b;
      obj.clip.left = l;
    }
 }

function clipBy ( obj, t, r, b, l ) {
   if ( dom ) {
      obj.clip = "rect(" + 
         ( this.clipVal ( obj, 't' ) + t ) + "px " + 
         ( this.clipVal ( obj,'r' ) + r ) + "px " + 
         ( this.clipVal ( obj,'b' ) + b ) + "px " + 
         ( this.clipVal ( obj,'l' ) + l ) + "px)";
   }
   if ( ns4 ) {
      obj.clip.top = clipVal ( obj, 't' ) + t;
      obj.clip.right = clipVal ( obj, 'r' ) + r;
      obj.clip.bottom = clipVal ( obj, 'b' ) + b;
      obj.clip.left = clipVal ( obj, 'l' ) + l;
   }
}

function swipeRightClose ( ) {
   if ( clipVal ( els, 'r' ) > 0 ) clipBy ( els, 0, -5, 0, 0 );
   else clearInterval ( timer );
}

function swipeRightOpen ( ) {
   if ( !zilch ) { clipTo ( els, 0, 0, 200, 0 ); zilch = 1; }
   if ( clipVal ( els, 'r' ) < 200 ) clipBy ( els, 0, 5, 0, 0 );
   else { clearInterval ( timer ); zilch = 0; }
}

function swipeLeftClose ( ) {
   if ( clipVal ( els, 'l' ) < 200 ) clipBy ( els, 0, 0, 0, 5 );
   else clearInterval ( timer );
}

function swipeLeftOpen ( ) {
   if ( !zilch ) { clipTo ( els, 0, 200, 200, 200 ); zilch = 1; }
   if ( clipVal ( els, 'l' ) > 0 ) clipBy ( els, 0, 0, 0, -5 );
   else { clearInterval ( timer ); zilch = 0; }
}

function swipeTopUp ( ) {
   if ( !zilch ) { clipTo ( els, 200, 200, 200, 0 ); zilch = 1; }
   if ( clipVal ( els, 't' ) > 0 ) clipBy ( els, -5, 0, 0, 0 );
   else { clearInterval ( timer ); zilch = 0; }
}

function swipeTopDown ( ) {
   if ( clipVal ( els, 't' ) < 200 ) clipBy ( els, 5, 0, 0, 0 );
   else clearInterval ( timer );
}

function swipeBottomUp ( ) {
   if ( clipVal ( els, 'b' ) > 0 ) clipBy ( els, 0, 0, -5, 0 );
   else clearInterval ( timer );
}

function swipeBottomDown ( ) {
   if ( !zilch ) { clipTo ( els, 0, 200, 0, 0 ); zilch = 1; }
   if ( clipVal ( els, 'b' ) < 200 ) clipBy ( els, 0, 0, 5, 0 );
   else { clearInterval ( timer ); zilch = 0; }
}

function swipeRightBottomUp ( ) {
   if ( clipVal ( els, 'r' ) > 0 ) clipBy ( els, 0, -5, -5, 0 );
   else clearInterval ( timer );
}

function swipeRightBottomDown ( ) {
   if ( !zilch ) { clipTo ( els, 0, 0, 0, 0 ); zilch = 1; }
   if ( clipVal ( els, 'r' ) < 200 ) clipBy ( els, 0, 5, 5, 0 );
   else { clearInterval ( timer ); zilch = 0; }
}

function swipeRightTopDown ( ) {
   if ( clipVal ( els, 'r' ) > 0 ) clipBy ( els, 5, -5, 0, 0 );
   else clearInterval ( timer );
}

function swipeRightTopUp ( ) {
   if ( !zilch ) { clipTo ( els, 200, 0, 200, 0 ); zilch = 1; }
   if ( clipVal ( els, 'r' ) < 200 ) clipBy ( els, -5, 5, 0, 0 );
   else { clearInterval ( timer ); zilch = 0; }
}

function swipeLeftBottomUp ( ) {
   if ( clipVal ( els, 'l' ) < 200 ) clipBy ( els, 0, 0, -5, 5 );
   else clearInterval ( timer );
}

function swipeLeftBottomDown ( ) {
   if ( !zilch ) { clipTo ( els, 0, 200, 0, 200 ); zilch = 1; }
   if ( clipVal ( els, 'l' ) > 0 ) clipBy ( els, 0, 0, 5, -5 );
   else { clearInterval ( timer ); zilch = 0; }
}

function swipeLeftTopDown ( ) {
   if ( clipVal ( els, 'l' ) < 200 ) clipBy ( els, 5, 0, 0, 5 );
   else clearInterval ( timer );
}

function swipeLeftTopUp ( ) {
   if ( !zilch ) { clipTo ( els, 200, 200, 200, 200 ); zilch = 1; }
   if ( clipVal ( els, 'l' ) > 0 ) clipBy ( els, -5, 0, 0, -5 );
   else { clearInterval ( timer ); zilch = 0; }
}

function openHoriz ( ) {
   if ( !zilch ) { clipTo ( els, 0, 100, 200, 100 ); zilch = 1; }
   if ( clipVal ( els, 'r' ) < 200 ) clipBy ( els, 0, 5, 0, -5 );
   else { clearInterval ( timer ); zilch = 0; }
}

function closeHoriz ( ) {
   if ( !zilch ) { clipTo ( els, 0, 200, 200, 0 ); zilch = 1; }
   if ( clipVal ( els, 'r' ) > 100 ) clipBy ( els, 0, -5, 0, 5 );
   else { clearInterval ( timer ); zilch = 0; }
}

function openVert ( ) {
   if ( !zilch ) { clipTo ( els, 100, 200, 100, 0 ); zilch = 1; }
   if ( clipVal ( els, 'b' ) < 200 ) clipBy ( els, -5, 0, 5, 0 );
   else { clearInterval ( timer ); zilch = 0; }
}

function closeVert ( ) {
   if ( !zilch ) { clipTo ( els, 0, 200, 200, 0 ); zilch = 1; }
   if ( clipVal ( els, 'b' ) > 100 ) clipBy ( els, 5, 0, -5, 0 );
   else { clearInterval ( timer ); zilch = 0; }
}

function boxIn ( ) {
   if ( !zilch ) { clipTo ( els, 0, 200, 200, 0 ); zilch = 1; }
   if ( clipVal ( els, 't' ) < 100 ) clipBy ( els, 5, -5, -5, 5 );
   else { clearInterval ( timer ); zilch = 0; }
}

function boxOut ( ) {
   if ( !zilch ) { clipTo ( els, 100, 100, 100, 100 ); zilch = 1; }
   if ( clipVal ( els, 't' ) > 0 ) clipBy ( els, -5, 5, 5, -5 );
   else { clearInterval ( timer ); zilch = 0; }
 }

function restart ( ) {
   if ( window.timer ) clearInterval ( timer );
   if ( zilch ) clipTo ( els, 0, 200, 200, 0 );
   zilch = 0;
}

window.defaultStatus = document.title;
//-->