ÿþf u n c t i o n   P o p F o r m ( u r l , t i t l e , f e a t u r e s )  
 	 {  
 	 	 w i n d o w . o p e n ( u r l , t i t l e , f e a t u r e s ) ;  
 	 }  
 	  
 v a r   f l a s h s p e e d = 1 0 0     / / i n   m i l l i s e c o n d s 	  
 v a r   n = 0  
 v a r   m e s s a g e = " "  
 v a r   n e o n b a s e c o l o r = " # f f f f f f "  
 v a r   n e o n t e x t c o l o r = " # 5 2 7 A 5 7 "  
  
 f u n c t i o n   N e o n M s g ( m s g , l i n k )  
 	 {  
 	 	 	 m e s s a g e = m s g  
 	 	 	 i f   ( d o c u m e n t . a l l | | d o c u m e n t . g e t E l e m e n t B y I d )  
 	 	 	 {  
 	 	 	 	 d o c u m e n t . w r i t e ( ' < a   h r e f = " '   +   l i n k   +   ' " > < f o n t   s i z e = " 5 "   f a c e = " T r a d i t i o n a l   A r a b i c "   c o l o r = " ' + n e o n b a s e c o l o r + ' " > < b > ' )  
 	 	 	 	 f o r   ( m = 0 ; m < m e s s a g e . l e n g t h ; m + + )  
 	 	 	 	 d o c u m e n t . w r i t e ( ' < s p a n     i d = " n e o n l i g h t ' + m + ' " > ' + m e s s a g e . c h a r A t ( m ) + ' < / s p a n > ' )  
 	 	 	 	 d o c u m e n t . w r i t e ( ' < / b > < / f o n t > < / a > ' )  
 	 	 	 }  
 	 	 	 e l s e  
 	 	 	 d o c u m e n t . w r i t e ( m e s s a g e )  
 	 	 	 b e g i n n e o n ( )  
 	 }  
  
 	 	 f u n c t i o n   c r o s s r e f ( n u m b e r )  
 	 	 {  
 	 	 	 	 v a r   c r o s s o b j = d o c u m e n t . a l l ?   e v a l ( " d o c u m e n t . a l l . n e o n l i g h t " + n u m b e r )   :   d o c u m e n t . g e t E l e m e n t B y I d ( " n e o n l i g h t " + n u m b e r )  
 	 	 	 r e t u r n   c r o s s o b j  
 	 	 }  
 	 	  
 	 	 f u n c t i o n   n e o n ( )  
 	 	 {  
 	 	 	 	 / / C h a n g e   a l l   l e t t e r s   t o   b a s e   c o l o r  
 	 	 	 	 i f   ( n = = 0 )  
 	 	 	 {  
 	 	 	 	 f o r   ( m = 0 ; m < m e s s a g e . l e n g t h ; m + + )  
 	 	 	 	 / / e v a l ( " d o c u m e n t . a l l . n e o n l i g h t " + m ) . s t y l e . c o l o r = n e o n b a s e c o l o r  
 	 	 	 	 c r o s s r e f ( m ) . s t y l e . c o l o r = n e o n b a s e c o l o r  
 	 	 	 }  
 	 	 	  
 	 	 	 / / c y c l e   t h r o u g h   a n d   c h a n g e   i n d i v i d u a l   l e t t e r s   t o   n e o n   c o l o r  
 	 	 	 c r o s s r e f ( n ) . s t y l e . c o l o r = n e o n t e x t c o l o r  
 	 	 	  
 	 	 	 i f   ( n < m e s s a g e . l e n g t h - 1 )  
 	 	 	 n + +  
 	 	 	 e l s e  
 	 	 	 {  
 	 	 	 	 n = 0  
 	 	 	 	 c l e a r I n t e r v a l ( f l a s h i n g )  
 	 	 	 	 s e t T i m e o u t ( " b e g i n n e o n ( ) " , 1 5 0 0 )  
 	 	 	 	 r e t u r n  
 	 	 	 }  
 	 	 }  
 	 	  
 	 	 f u n c t i o n   b e g i n n e o n ( )  
 	 	 {  
 	 	 	 i f   ( d o c u m e n t . a l l | | d o c u m e n t . g e t E l e m e n t B y I d )  
 	 	 	 f l a s h i n g = s e t I n t e r v a l ( " n e o n ( ) " , f l a s h s p e e d )  
 	 	 } 
