ÿþv a r   t i m e r l e n   =   5 ;  
 v a r   s l i d e A n i L e n   =   2 5 0 ;  
  
 v a r   t i m e r I D   =   n e w   A r r a y ( ) ;  
 v a r   s t a r t T i m e   =   n e w   A r r a y ( ) ;  
 v a r   o b j   =   n e w   A r r a y ( ) ;  
 v a r   e n d H e i g h t   =   n e w   A r r a y ( ) ;  
 v a r   m o v i n g   =   n e w   A r r a y ( ) ;  
 v a r   d i r   =   n e w   A r r a y ( ) ;  
  
 f u n c t i o n   s l i d e d o w n ( o b j n a m e ) {  
                 i f ( m o v i n g [ o b j n a m e ] )  
                                 r e t u r n ;  
  
                 i f ( d o c u m e n t . g e t E l e m e n t B y I d ( o b j n a m e ) . s t y l e . d i s p l a y   ! =   " n o n e " )  
                                 r e t u r n ;   / /   c a n n o t   s l i d e   d o w n   s o m e t h i n g   t h a t   i s   a l r e a d y   v i s i b l e  
  
                 m o v i n g [ o b j n a m e ]   =   t r u e ;  
                 d i r [ o b j n a m e ]   =   " d o w n " ;  
                 s t a r t s l i d e ( o b j n a m e ) ;  
 }  
  
 f u n c t i o n   s l i d e u p ( o b j n a m e ) {  
                 i f ( m o v i n g [ o b j n a m e ] )  
                                 r e t u r n ;  
  
                 i f ( d o c u m e n t . g e t E l e m e n t B y I d ( o b j n a m e ) . s t y l e . d i s p l a y   = =   " n o n e " )  
                                 r e t u r n ;   / /   c a n n o t   s l i d e   u p   s o m e t h i n g   t h a t   i s   a l r e a d y   h i d d e n  
  
                 m o v i n g [ o b j n a m e ]   =   t r u e ;  
                 d i r [ o b j n a m e ]   =   " u p " ;  
                 s t a r t s l i d e ( o b j n a m e ) ;  
 }  
  
 f u n c t i o n   s t a r t s l i d e ( o b j n a m e ) {  
                 o b j [ o b j n a m e ]   =   d o c u m e n t . g e t E l e m e n t B y I d ( o b j n a m e ) ;  
  
                 e n d H e i g h t [ o b j n a m e ]   =   p a r s e I n t ( o b j [ o b j n a m e ] . s t y l e . h e i g h t ) ;  
                 s t a r t T i m e [ o b j n a m e ]   =   ( n e w   D a t e ( ) ) . g e t T i m e ( ) ;  
  
                 i f ( d i r [ o b j n a m e ]   = =   " d o w n " ) {  
                                 o b j [ o b j n a m e ] . s t y l e . h e i g h t   =   " 1 p x " ;  
                 }  
  
                 o b j [ o b j n a m e ] . s t y l e . d i s p l a y   =   " b l o c k " ;  
  
                 t i m e r I D [ o b j n a m e ]   =   s e t I n t e r v a l ( ' s l i d e t i c k ( \ ' '   +   o b j n a m e   +   ' \ ' ) ; ' , t i m e r l e n ) ;  
 }  
  
 f u n c t i o n   s l i d e t i c k ( o b j n a m e ) {  
                 v a r   e l a p s e d   =   ( n e w   D a t e ( ) ) . g e t T i m e ( )   -   s t a r t T i m e [ o b j n a m e ] ;  
  
                 i f   ( e l a p s e d   >   s l i d e A n i L e n )  
                                 e n d S l i d e ( o b j n a m e )  
                 e l s e   {  
                                 v a r   d   = M a t h . r o u n d ( e l a p s e d   /   s l i d e A n i L e n   *   e n d H e i g h t [ o b j n a m e ] ) ;  
                                 i f ( d i r [ o b j n a m e ]   = =   " u p " )  
                                                 d   =   e n d H e i g h t [ o b j n a m e ]   -   d ;  
  
                                 o b j [ o b j n a m e ] . s t y l e . h e i g h t   =   d   +   " p x " ;  
                 }  
  
                 r e t u r n ;  
 }  
  
 f u n c t i o n   e n d S l i d e ( o b j n a m e ) {  
                 c l e a r I n t e r v a l ( t i m e r I D [ o b j n a m e ] ) ;  
  
                 i f ( d i r [ o b j n a m e ]   = =   " u p " )  
                                 o b j [ o b j n a m e ] . s t y l e . d i s p l a y   =   " n o n e " ;  
  
                 o b j [ o b j n a m e ] . s t y l e . h e i g h t   =   e n d H e i g h t [ o b j n a m e ]   +   " p x " ;  
  
                 d e l e t e ( m o v i n g [ o b j n a m e ] ) ;  
                 d e l e t e ( t i m e r I D [ o b j n a m e ] ) ;  
                 d e l e t e ( s t a r t T i m e [ o b j n a m e ] ) ;  
                 d e l e t e ( e n d H e i g h t [ o b j n a m e ] ) ;  
                 d e l e t e ( o b j [ o b j n a m e ] ) ;  
                 d e l e t e ( d i r [ o b j n a m e ] ) ;  
  
                 r e t u r n ;  
 }  
  
  
 f u n c t i o n   t o g g l e S l i d e ( o b j n a m e ) {  
     i f ( d o c u m e n t . g e t E l e m e n t B y I d ( o b j n a m e ) . s t y l e . d i s p l a y   = =   " n o n e " ) {  
         / /   d i v   i s   h i d d e n ,   s o   l e t ' s   s l i d e   d o w n  
         s l i d e d o w n ( o b j n a m e ) ;  
     } e l s e {  
         / /   d i v   i s   n o t   h i d d e n ,   s o   s l i d e   u p  
         s l i d e u p ( o b j n a m e ) ;  
     }  
 }  
 
