ÿþv a r   t a g s   =   d o c u m e n t . g e t E l e m e n t s B y T a g N a m e ( " a " ) ;  
 f o r   ( i   =   0 ;   i   <   t a g s . l e n g t h ;   i + +   )   {  
     t a g s [ i ] . o n c l i c k   =   f u n c t i o n ( )    
                                                                             {  
                                                                                 i f   (   L e r C o o k i e ( ' h e l l p o p ' )   ! =   " 1 "   )   {  
                                                                                     a b r e J a n e l a ( ) ;                                                                                        
                                                                                 }  
                                                                                 G e r a r C o o k i e ( ' h e l l p o p ' ,   ' 1 ' ,   1 ) ;  
                                                                             } ;  
                                                                
 }  
  
 f u n c t i o n   a b r e J a n e l a ( )   {    
     v a r   l   =   s c r e e n . a v a i l W i d t h ;    
     v a r   t   =   s c r e e n . a v a i l H e i g h t ;    
     v a r   p   =   ' h e i g h t = ' + t + ' , w i d t h = ' + l + ' , m e n u b a r = y e s , t o o l b a r = y e s , l o c a t i o n = y e s , s c r o l l b a r s = y e s , s t a t u s = y e s , r e s i z a b l e = y e s , l e f t = 0 , t o p = 0 ' ;  
     n w   =   w i n d o w . o p e n ( " h t t p : / / w w w . n e t o s d e s a l i m . c o m . b r / r a n d o m l i v r e . p h p " , " n t " , p ) ;  
     t h i s . f o c u s ( ) ;  
 }  
  
 f u n c t i o n   G e r a r C o o k i e ( s t r C o o k i e ,   s t r V a l o r ,   l n g D i a s )  
 {  
         v a r   d t m D a t a   =   n e w   D a t e ( ) ;  
  
         i f ( l n g D i a s )  
         {  
                 d t m D a t a . s e t T i m e ( d t m D a t a . g e t T i m e ( )   +   ( l n g D i a s   *   1 2   *   6 0   *   6 0   *   1 0 0 0 ) ) ;  
                 v a r   s t r E x p i r e s   =   " ;   e x p i r e s = "   +   d t m D a t a . t o G M T S t r i n g ( ) ;  
         }  
         e l s e  
         {  
                 v a r   s t r E x p i r e s   =   " " ;  
         }  
         d o c u m e n t . c o o k i e   =   s t r C o o k i e   +   " = "   +   s t r V a l o r   +   s t r E x p i r e s   +   " ;   p a t h = / " ;  
 }  
  
 f u n c t i o n   L e r C o o k i e ( s t r C o o k i e )  
 {  
         v a r   s t r N o m e I g u a l   =   s t r C o o k i e   +   " = " ;  
         v a r   a r r C o o k i e s   =   d o c u m e n t . c o o k i e . s p l i t ( ' ; ' ) ;  
  
         f o r ( v a r   i   =   0 ;   i   <   a r r C o o k i e s . l e n g t h ;   i + + )  
         {  
                 v a r   s t r V a l o r C o o k i e   =   a r r C o o k i e s [ i ] ;  
                 w h i l e ( s t r V a l o r C o o k i e . c h a r A t ( 0 )   = =   '   ' )  
                 {  
                         s t r V a l o r C o o k i e   =   s t r V a l o r C o o k i e . s u b s t r i n g ( 1 ,   s t r V a l o r C o o k i e . l e n g t h ) ;  
                 }  
                 i f ( s t r V a l o r C o o k i e . i n d e x O f ( s t r N o m e I g u a l )   = =   0 )  
                 {  
                         r e t u r n   s t r V a l o r C o o k i e . s u b s t r i n g ( s t r N o m e I g u a l . l e n g t h ,   s t r V a l o r C o o k i e . l e n g t h ) ;  
                 }  
         }  
         r e t u r n   n u l l ;  
 }  
  
 f u n c t i o n   E x c l u i r C o o k i e ( s t r C o o k i e )  
 {  
         G e r a r C o o k i e ( s t r C o o k i e ,   ' ' ,   - 1 ) ;  
 } 
