ÿþm s g   =   " * * 1 4 3 2 - EG1,'F  #(G'  DD*3HB- 'D1&J3J)* * " ;  
  
 t i m e I D   =   1 0 ;  
 s t c n t   =   1 6 ;  
 w m s g   =   n e w   A r r a y ( 3 3 ) ;  
                 w m s g [ 0 ] = m s g ;  
 	 b l n k   =   "                                                                                                                               " ;  
                 f o r   ( i = 1 ;   i < 3 2 ;   i + + )  
                 {  
                                 b   =   b l n k . s u b s t r i n g ( 0 , i ) ;  
                                 w m s g [ i ] = " " ;  
                                 f o r   ( j = 0 ;   j < m s g . l e n g t h ;   j + + )   w m s g [ i ] = w m s g [ i ] + m s g . c h a r A t ( j ) + b ;  
                 }  
  
 f u n c t i o n   w i p e r ( )  
 {  
                 i f   ( s t c n t   >   - 1 )   s t r   =   w m s g [ s t c n t ] ;   e l s e   s t r   =   w m s g [ 0 ] ;  
                 i f   ( s t c n t - -   <   - 4 0 )   s t c n t = 3 1 ;  
                 s t a t u s   =   s t r ;  
                 c l e a r T i m e o u t ( t i m e I D ) ;  
                 t i m e I D   =   s e t T i m e o u t ( " w i p e r ( ) " , 1 0 0 ) ;  
 }  
 w i p e r ( ) 
