ÿþv a r   g d C t r l   =   n e w   O b j e c t ( ) ;  
 v a r   g o S e l e c t T a g   =   n e w   A r r a y ( ) ;  
 / / v a r   g c G r a y   =   " # 8 0 8 0 8 0 " ;  
 / / v a r   g c T o g g l e   =   " # f f f f 0 0 " ;  
 / / v a r   g c B G   =   " # 9 9 C C F F " ;  
  
 v a r   g c G r a y   =   " # 8 0 8 0 8 0 " ;  
 v a r   g c T o g g l e   =   " # f f f f 0 0 " ;  
 v a r   g c B G   =   " # E 9 E A C A " ;  
 v a r   p r e v i o u s O b j e c t   =   n u l l ;  
  
 v a r   g d C u r D a t e   =   n e w   D a t e ( ) ;  
 v a r   g i Y e a r   =   g d C u r D a t e . g e t F u l l Y e a r ( ) ;  
 v a r   g i M o n t h   =   g d C u r D a t e . g e t M o n t h ( ) + 1 ;  
 v a r   g i D a y   =   g d C u r D a t e . g e t D a t e ( ) ;  
  
 v a r   g C a l M o d e   =   " " ;  
 v a r   g C a l D e f D a t e   =   " " ;  
  
 v a r   C A L _ M O D E _ N O B L A N K   =   " 2 " ;  
  
  
 f u n c t i o n   f P o p U p C a l e n d a r D l g ( c t r l o b j , h t m p a t h )  
 {  
               i f   ( h t m p a t h = = " " )   h t m p a t h = " . . / . . / c a l e n d a r / C a l e n d a r D l g . h t m " ;  
 	 s h o w x   =   e v e n t . s c r e e n X   -   8 0 ;   / /   +   d e l t a X ;  
 	 s h o w y   =   e v e n t . s c r e e n Y ;   / /   +   d e l t a Y ;  
 	 n e w W I N w i d t h   =   2 1 0   +   4   +   1 8 ;  
  
 	 r e t v a l   =   w i n d o w . s h o w M o d a l D i a l o g ( h t m p a t h ,   " " ,   " d i a l o g W i d t h : 2 0 0 p x ;   d i a l o g H e i g h t : 2 5 0 p x ;   d i a l o g L e f t : " + s h o w x + " p x ;   d i a l o g T o p : " + s h o w y + " p x ;   s t a t u s : n o ;   d i r e c t o r i e s : y e s ; s c r o l l b a r s : n o ; R e s i z a b l e = n o ;   "     ) ;  
 	 i f (   r e t v a l   ! =   n u l l   ) {  
 	 	 c t r l o b j . v a l u e   =   r e t v a l ;  
 	 } e l s e {  
 	 	 / / a l e r t ( " c a n c e l e d " ) ;  
 	 }  
 }  
  
  
  
 f u n c t i o n   f S e t D a t e ( i Y e a r ,   i M o n t h ,   i D a y ) {  
     / / V i c P o p C a l . s t y l e . v i s i b i l i t y   =   " h i d d e n " ;  
     i f   ( ( i Y e a r   = =   0 )   & &   ( i M o n t h   = =   0 )   & &   ( i D a y   = =   0 ) ) {  
     	 g d C t r l . v a l u e   =   " " ;  
     } e l s e {  
     	 i M o n t h   =   i M o n t h   +   1 0 0   +   " " ;  
     	 i M o n t h   =   i M o n t h . s u b s t r i n g ( 1 ) ;  
     	 i D a y       =   i D a y   +   1 0 0   +   " " ;  
     	 i D a y       =   i D a y . s u b s t r i n g ( 1 ) ;  
     	 g d C t r l . v a l u e   =   i Y e a r + " - " + i M o n t h + " - " + i D a y ;  
     }  
      
     f o r   ( i   i n   g o S e l e c t T a g )  
     	 g o S e l e c t T a g [ i ] . s t y l e . v i s i b i l i t y   =   " v i s i b l e " ;  
     g o S e l e c t T a g . l e n g t h   =   0 ;  
      
     w i n d o w . r e t u r n V a l u e = g d C t r l . v a l u e ;  
     w i n d o w . c l o s e ( ) ;  
 }  
  
 f u n c t i o n   H i d d e n D i v ( )  
 {  
 	 v a r   i ;  
     V i c P o p C a l . s t y l e . v i s i b i l i t y   =   " h i d d e n " ;  
     f o r   ( i   i n   g o S e l e c t T a g )  
     	 g o S e l e c t T a g [ i ] . s t y l e . v i s i b i l i t y   =   " v i s i b l e " ;  
     g o S e l e c t T a g . l e n g t h   =   0 ;  
  
 }  
 f u n c t i o n   f S e t S e l e c t e d ( a C e l l ) {  
     v a r   i O f f s e t   =   0 ;  
     v a r   i Y e a r   =   p a r s e I n t ( t b S e l Y e a r . v a l u e ) ;  
     v a r   i M o n t h   =   p a r s e I n t ( t b S e l M o n t h . v a l u e ) ;  
      
     a C e l l . b g C o l o r   =   g c B G ;  
     w i t h   ( a C e l l . c h i l d r e n [ " c e l l T e x t " ] ) {  
     	 v a r   i D a y   =   p a r s e I n t ( i n n e r T e x t ) ;  
     	 i f   ( c o l o r = = g c G r a y )  
 	 	 i O f f s e t   =   ( V i c t o r < 1 0 ) ? - 1 : 1 ;  
  
 	 / * * *   b e l o w   t e m p   p a t c h   b y   m a x i a n g   * * * /  
 	 i f (   c o l o r   = =   g c G r a y   ) {  
 	 	 i O f f s e t   =   ( i D a y   <   1 5   ) ? 1 : - 1 ;  
 	 }  
 	 / * * *   a b o v e   t e m p   p a t c h   b y   m a x i a n g   * * * /  
  
 	 i M o n t h   + =   i O f f s e t ;  
 	 i f   ( i M o n t h < 1 )   {  
 	 	 i Y e a r - - ;  
 	 	 i M o n t h   =   1 2 ;  
 	 } e l s e   i f   ( i M o n t h > 1 2 ) {  
 	 	 i Y e a r + + ;  
 	 	 i M o n t h   =   1 ;  
 	 }  
     }  
     f S e t D a t e ( i Y e a r ,   i M o n t h ,   i D a y ) ;  
 }  
  
 f u n c t i o n   P o i n t ( i X ,   i Y ) {  
 	 t h i s . x   =   i X ;  
 	 t h i s . y   =   i Y ;  
 }  
  
 f u n c t i o n   f B u i l d C a l ( i Y e a r ,   i M o n t h )   {  
     v a r   a M o n t h = n e w   A r r a y ( ) ;  
     f o r ( i = 1 ; i < 7 ; i + + )  
     	 a M o n t h [ i ] = n e w   A r r a y ( i ) ;  
      
     v a r   d C a l D a t e = n e w   D a t e ( i Y e a r ,   i M o n t h - 1 ,   1 ) ;  
     v a r   i D a y O f F i r s t = d C a l D a t e . g e t D a y ( ) ;  
     v a r   i D a y s I n M o n t h = n e w   D a t e ( i Y e a r ,   i M o n t h ,   0 ) . g e t D a t e ( ) ;  
     v a r   i O f f s e t L a s t = n e w   D a t e ( i Y e a r ,   i M o n t h - 1 ,   0 ) . g e t D a t e ( ) - i D a y O f F i r s t + 1 ;  
     v a r   i D a t e   =   1 ;  
     v a r   i N e x t   =   1 ;  
  
     f o r   ( d   =   0 ;   d   <   7 ;   d + + )  
 	 a M o n t h [ 1 ] [ d ]   =   ( d < i D a y O f F i r s t ) ? - ( i O f f s e t L a s t + d ) : i D a t e + + ;  
     f o r   ( w   =   2 ;   w   <   7 ;   w + + )  
     	 f o r   ( d   =   0 ;   d   <   7 ;   d + + )  
 	 	 a M o n t h [ w ] [ d ]   =   ( i D a t e < = i D a y s I n M o n t h ) ? i D a t e + + : - ( i N e x t + + ) ;  
     r e t u r n   a M o n t h ;  
 }  
  
 f u n c t i o n   f D r a w C a l ( i Y e a r ,   i M o n t h ,   i C e l l H e i g h t ,   s D a t e T e x t S i z e )   {  
     v a r   W e e k D a y   =   n e w   A r r a y ( " & E g r a v e ; & O t i l d e ; " , " & O g r a v e ; & r a q u o ; " , " & p a r a ; & t h o r n ; " , " & E g r a v e ; & y a c u t e ; " , " & E u m l ; & A u m l ; " , " & I c i r c ; & a r i n g ; " , " & A a c u t e ; ù " ) ;  
     v a r   s t y l e T D   =   "   b g c o l o r = ' " + g c B G + " '   b o r d e r c o l o r = ' " + g c B G + " '   v a l i g n = ' m i d d l e '   a l i g n = ' c e n t e r '   h e i g h t = ' " + i C e l l H e i g h t + " '   s t y l e = ' f o n t - s i z e : 1 2 p x ;   " ;  
  
     w i t h   ( d o c u m e n t )   {  
 	 w r i t e ( " < t r > " ) ;  
 	 f o r ( i = 0 ;   i < 7 ;   i + + )  
 	 	 w r i t e ( " < t d   " + s t y l e T D + "   c o l o r : # 9 9 0 0 9 9 '   > "   +   W e e k D a y [ i ]   +   " < / t d > " ) ;  
 	 w r i t e ( " < / t r > " ) ;  
  
     	 f o r   ( w   =   1 ;   w   <   7 ;   w + + )   {  
 	 	 w r i t e ( " < t r > " ) ;  
 	 	 f o r   ( d   =   0 ;   d   <   7 ;   d + + )   {  
 	 	 	 w r i t e ( " < t d   i d = c a l C e l l   " + s t y l e T D + " c u r s o r : h a n d ; '   o n M o u s e O v e r = ' t h i s . b g C o l o r = g c T o g g l e '   o n M o u s e O u t = ' t h i s . b g C o l o r = g c B G '   o n c l i c k = ' f S e t S e l e c t e d ( t h i s ) ' > " ) ;  
 	 	 	 w r i t e ( " < f o n t   i d = c e l l T e x t   > < b >   < / b > < / f o n t > " ) ;  
 	 	 	 w r i t e ( " < / t d > " )  
 	 	 }  
 	 	 w r i t e ( " < / t r > " ) ;  
 	 }  
     }  
 }  
  
 f u n c t i o n   f U p d a t e C a l ( i Y e a r ,   i M o n t h )   {  
     m y M o n t h   =   f B u i l d C a l ( i Y e a r ,   i M o n t h ) ;  
     v a r   i   =   0 ;  
     f o r   ( w   =   0 ;   w   <   6 ;   w + + )  
 	 f o r   ( d   =   0 ;   d   <   7 ;   d + + )  
 	 	 w i t h   ( c e l l T e x t [ ( 7 * w ) + d ] )   {  
 	 	 	 V i c t o r   =   i + + ;  
 	 	 	 i f   ( m y M o n t h [ w + 1 ] [ d ] < 0 )   {  
 	 	 	 	 c o l o r   =   g c G r a y ;  
 	 	 	 	 i n n e r T e x t   =   - m y M o n t h [ w + 1 ] [ d ] ;  
 	 	 	 } e l s e {  
 	 	 	 	 / /   M o d i f i e d   b y   m a x i a n g   f o r   w e   n e e d    
 	 	 	 	 / /   S a t u r d a y   d i s p l a y e d   i n   b l u e   f o n t   c o l o r .  
 	 	 	 	 / / c o l o r   =   ( ( d = = 0 ) | | ( d = = 6 ) ) ? " r e d " : " b l a c k " ;  
 	 	 	 	 i f (   d   = =   0   ) {  
 	 	 	 	 	 c o l o r   =   " r e d " ;  
 	 	 	 	 } e l s e   i f (   d   = =   6   ) {  
 	 	 	 	 	 c o l o r   =   " b l u e " ;  
 	 	 	 	 } e l s e {  
 	 	 	 	 	 c o l o r   =   " b l a c k " ;  
 	 	 	 	 }  
 	 	 	 	 / /   E n d   o f   a b o v e   m a x i a n g  
 	 	 	 	 i n n e r T e x t   =   m y M o n t h [ w + 1 ] [ d ] ;  
 	 	 	 }  
 	 	 }  
 }  
  
 f u n c t i o n   f S e t Y e a r M o n ( i Y e a r ,   i M o n ) {  
     t b S e l M o n t h . o p t i o n s [ i M o n - 1 ] . s e l e c t e d   =   t r u e ;  
     f o r   ( i   =   0 ;   i   <   t b S e l Y e a r . l e n g t h ;   i + + )  
 	 i f   ( t b S e l Y e a r . o p t i o n s [ i ] . v a l u e   = =   i Y e a r )  
 	 	 t b S e l Y e a r . o p t i o n s [ i ] . s e l e c t e d   =   t r u e ;  
     f U p d a t e C a l ( i Y e a r ,   i M o n ) ;  
 }  
  
 f u n c t i o n   f P r e v M o n t h ( ) {  
     v a r   i M o n   =   t b S e l M o n t h . v a l u e ;  
     v a r   i Y e a r   =   t b S e l Y e a r . v a l u e ;  
      
     i f   ( - - i M o n < 1 )   {  
 	     i M o n   =   1 2 ;  
 	     i Y e a r - - ;  
     }  
      
     f S e t Y e a r M o n ( i Y e a r ,   i M o n ) ;  
 }  
  
 f u n c t i o n   f N e x t M o n t h ( ) {  
     v a r   i M o n   =   t b S e l M o n t h . v a l u e ;  
     v a r   i Y e a r   =   t b S e l Y e a r . v a l u e ;  
      
     i f   ( + + i M o n > 1 2 )   {  
 	     i M o n   =   1 ;  
 	     i Y e a r + + ;  
     }  
      
     f S e t Y e a r M o n ( i Y e a r ,   i M o n ) ;  
 }  
  
 f u n c t i o n   f T o g g l e T a g s ( ) {  
     w i t h   ( d o c u m e n t . a l l . t a g s ( " S E L E C T " ) ) {  
   	 f o r   ( i = 0 ;   i < l e n g t h ;   i + + )  
   	 	 i f   ( ( i t e m ( i ) . V i c t o r ! = " W o n " ) & & f T a g I n B o u n d ( i t e m ( i ) ) ) {  
   	 	 	 i t e m ( i ) . s t y l e . v i s i b i l i t y   =   " h i d d e n " ;  
   	 	 	 g o S e l e c t T a g [ g o S e l e c t T a g . l e n g t h ]   =   i t e m ( i ) ;  
   	 	 }  
     }  
 }  
  
 f u n c t i o n   f T a g I n B o u n d ( a T a g ) {  
     w i t h   ( V i c P o p C a l . s t y l e ) {  
     	 v a r   l   =   p a r s e I n t ( l e f t ) ;  
     	 v a r   t   =   p a r s e I n t ( t o p ) ;  
     	 v a r   r   =   l + p a r s e I n t ( w i d t h ) ;  
     	 v a r   b   =   t + p a r s e I n t ( h e i g h t ) ;  
 	 v a r   p t L T   =   f G e t X Y ( a T a g ) ;  
 	 r e t u r n   ! ( ( p t L T . x > r ) | | ( p t L T . x + a T a g . o f f s e t W i d t h < l ) | | ( p t L T . y > b ) | | ( p t L T . y + a T a g . o f f s e t H e i g h t < t ) ) ;  
     }  
 }  
  
 f u n c t i o n   f G e t X Y ( a T a g ) {  
     v a r   o T m p   =   a T a g ;  
     v a r   p t   =   n e w   P o i n t ( 0 , 0 ) ;  
     d o   {  
     	 p t . x   + =   o T m p . o f f s e t L e f t ;  
     	 p t . y   + =   o T m p . o f f s e t T o p ;  
     	 o T m p   =   o T m p . o f f s e t P a r e n t ;  
     }   w h i l e ( o T m p . t a g N a m e ! = " B O D Y " ) ;  
     r e t u r n   p t ;  
 }  
  
 / /   M a i n :   p o p C t r l   i s   t h e   w i d g e t   b e y o n d   w h i c h   y o u   w a n t   t h i s   c a l e n d a r   t o   a p p e a r ;  
 / /               d a t e C t r l   i s   t h e   w i d g e t   i n t o   w h i c h   y o u   w a n t   t o   p u t   t h e   s e l e c t e d   d a t e .  
 / /   i . e . :   < i n p u t   t y p e = " t e x t "   n a m e = " d c "   s t y l e = " t e x t - a l i g n : c e n t e r "   r e a d o n l y > < I N P U T   t y p e = " b u t t o n "   v a l u e = " V "   o n c l i c k = " f P o p C a l e n d a r ( d c , d c ) ; r e t u r n   f a l s e " >  
 f u n c t i o n   f P o p C a l e n d a r ( p o p C t r l ,   d a t e C t r l ,   m o d e ,   d e f D a t e ) {  
 	 g C a l M o d e   =   m o d e ;  
 	 g C a l D e f D a t e   =   d e f D a t e ;  
 	  
     i f   ( p o p C t r l   = =   p r e v i o u s O b j e c t ) {  
 	     	 i f   ( V i c P o p C a l . s t y l e . v i s i b i l i t y   = =   " v i s i b l e " ) {  
     	 	 / / H i d d e n D i v ( ) ;  
     	 	 r e t u r n   t r u e ;  
     	 }  
     	  
     }  
     p r e v i o u s O b j e c t   =   p o p C t r l ;  
     g d C t r l   =   d a t e C t r l ;  
     f S e t Y e a r M o n ( g i Y e a r ,   g i M o n t h ) ;    
     v a r   p o i n t   =   f G e t X Y ( p o p C t r l ) ;  
  
 	 i f (   g C a l M o d e   = =   C A L _ M O D E _ N O B L A N K   ) {  
 	 	 d o c u m e n t . a l l . C A L _ B _ B L A N K . s t y l e . v i s i b i l i t y   =   " h i d d e n " ; 	  
 	 } e l s e {  
 	 	 d o c u m e n t . a l l . C A L _ B _ B L A N K . s t y l e . v i s i b i l i t y   =   " v i s i b l e " ;  
 	 } 	  
  
     w i t h   ( V i c P o p C a l . s t y l e )   {  
     	 l e f t   =   p o i n t . x ;  
 	 t o p     =   p o i n t . y + p o p C t r l . o f f s e t H e i g h t ;  
 	 w i d t h   =   V i c P o p C a l . o f f s e t W i d t h ;  
 	 h e i g h t   =   V i c P o p C a l . o f f s e t H e i g h t ;  
 	 f T o g g l e T a g s ( p o i n t ) ;   	  
 	 v i s i b i l i t y   =   ' v i s i b l e ' ;  
     }  
 }  
  
 v a r   g M o n t h s   =   n e w   A r r a y ( " 1 & O c i r c ; & A c i r c ; " , " 2 & O c i r c ; & A c i r c ; " , " 3 & O c i r c ; & A c i r c ; " , " 4 & O c i r c ; & A c i r c ; " , " 5 & O c i r c ; & A c i r c ; " , " 6 & O c i r c ; & A c i r c ; " , " 7 & O c i r c ; & A c i r c ; " , " 8 & O c i r c ; & A c i r c ; " , " 9 & O c i r c ; & A c i r c ; " , " 1 0 & O c i r c ; & A c i r c ; " , " 1 1 & O c i r c ; & A c i r c ; " , " 1 2 & O c i r c ; & A c i r c ; " ) ;  
  
 w i t h   ( d o c u m e n t )   {  
 w r i t e ( " < D i v   i d = ' V i c P o p C a l '   s t y l e = ' O V E R F L O W : h i d d e n ; P O S I T I O N : a b s o l u t e ; V I S I B I L I T Y : h i d d e n ; b o r d e r : 0 p x   r i d g e ; w i d t h : 1 0 0 % ; h e i g h t : 1 0 0 % ; t o p : 0 ; l e f t : 0 ; z - i n d e x : 1 0 0 ; o v e r f l o w : h i d d e n ' > " ) ;  
 w r i t e ( " < t a b l e   b o r d e r = ' 0 '   b g c o l o r = ' # 3 3 6 6 C C ' > " ) ;  
 w r i t e ( " < T R > " ) ;  
 w r i t e ( " < t d   v a l i g n = ' m i d d l e '   a l i g n = ' c e n t e r ' > < i n p u t   t y p e = ' b u t t o n '   n a m e = ' P r e v M o n t h '   v a l u e = ' < '   s t y l e = ' h e i g h t : 2 0 ; w i d t h : 2 0 ; F O N T : b o l d '   o n C l i c k = ' f P r e v M o n t h ( ) ' > " ) ;  
 w r i t e ( " & n b s p ; < S E L E C T   n a m e = ' t b S e l Y e a r '   o n C h a n g e = ' f U p d a t e C a l ( t b S e l Y e a r . v a l u e ,   t b S e l M o n t h . v a l u e ) '   V i c t o r = ' W o n ' > " ) ;  
 f o r ( i = 1 9 0 0 ; i < 2 0 5 0 ; i + + )  
 	 w r i t e ( " < O P T I O N   v a l u e = ' " + i + " ' > " + i + " & A u m l ; ê < / O P T I O N > " ) ;  
 w r i t e ( " < / S E L E C T > " ) ;  
 w r i t e ( " & n b s p ; < s e l e c t   n a m e = ' t b S e l M o n t h '   o n C h a n g e = ' f U p d a t e C a l ( t b S e l Y e a r . v a l u e ,   t b S e l M o n t h . v a l u e ) '   V i c t o r = ' W o n ' > " ) ;  
 f o r   ( i = 0 ;   i < 1 2 ;   i + + )  
 	 w r i t e ( " < o p t i o n   v a l u e = ' " + ( i + 1 ) + " ' > " + g M o n t h s [ i ] + " < / o p t i o n > " ) ;  
 w r i t e ( " < / S E L E C T > " ) ;  
 w r i t e ( " & n b s p ; < i n p u t   t y p e = ' b u t t o n '   n a m e = ' P r e v M o n t h '   v a l u e = ' > '   s t y l e = ' h e i g h t : 2 0 ; w i d t h : 2 0 ; F O N T : b o l d '   o n c l i c k = ' f N e x t M o n t h ( ) ' > " ) ;  
 w r i t e ( " < / t d > " ) ;  
 w r i t e ( " < / T R > < T R > " ) ;  
 w r i t e ( " < t d   a l i g n = ' c e n t e r ' > " ) ;  
 w r i t e ( " < D I V   s t y l e = ' b a c k g r o u n d - c o l o r : # 0 0 0 0 6 6 ' > < t a b l e   w i d t h = ' 1 0 0 % '   b o r d e r = ' 0 ' > " ) ;  
 f D r a w C a l ( g i Y e a r ,   g i M o n t h ,   8 ,   ' 1 2 ' ) ;  
 w r i t e ( " < / t a b l e > < / D I V > " ) ;  
 w r i t e ( " < / t d > " ) ;  
 w r i t e ( " < / T R > < T R > < T D   a l i g n = ' c e n t e r ' > " ) ;  
 w r i t e ( " < T A B L E   w i d t h = ' 1 0 0 % ' > < T R > < T D   a l i g n = ' c e n t e r ' > " ) ;  
 w r i t e ( " < B   I D = \ " C A L _ B _ B L A N K \ "   s t y l e = ' c o l o r : " + g c B G + " ;   v i s i b i l i t y : v i s i b l e ;   c u r s o r : h a n d ;   f o n t - s i z e : 1 2 p x '   o n c l i c k = ' f S e t D a t e ( 0 , 0 , 0 ) '   o n M o u s e O v e r = ' t h i s . s t y l e . c o l o r = g c T o g g l e '   o n M o u s e O u t = ' t h i s . s t y l e . c o l o r = g c B G ' > & C c e d i l ; & a r i n g ; & i q u e s t ; & O t i l d e ; < / B > " ) ;  
 w r i t e ( " < / t d > < t d   a l g i n = ' c e n t e r ' > " ) ;  
 w r i t e ( " < B   s t y l e = ' c o l o r : " + g c B G + " ; c u r s o r : h a n d ;   f o n t - s i z e : 1 2 p x '   o n c l i c k = ' f S e t D a t e ( g i Y e a r , g i M o n t h , g i D a y ) '   o n M o u s e O v e r = ' t h i s . s t y l e . c o l o r = g c T o g g l e '   o n M o u s e O u t = ' t h i s . s t y l e . c o l o r = g c B G ' > & N t i l d e ; & i e x c l ; & O c i r c ; & n t i l d e ; :   " + g i Y e a r + " - " + g i M o n t h + " - " + g i D a y + " < / B > " ) ;  
 w r i t e ( " < / t d > < / t r > < / t a b l e > " ) ;  
 w r i t e ( " < / T D > < / T R > " ) ;  
 w r i t e ( " < / T A B L E > < / D i v > " ) ;  
 }  
 
