ÿþv a r   m o d e   =   1 ; 
 v a r   f a r s i k e y   =   [  
 	 0 x 0 0 2 0 ,   0 x 0 0 2 1 ,   0 x 0 6 1 B ,   0 x 0 6 6 B ,   0 x 0 0 A 4 ,   0 x 0 6 6 A ,   0 x 0 6 0 C ,   0 x 0 6 A F ,  
 	 0 x 0 0 2 9 ,   0 x 0 0 2 8 ,   0 x 0 0 2 A ,   0 x 0 0 2 B ,   0 x 0 6 4 8 ,   0 x 0 0 2 D ,   0 x 0 0 2 E ,   0 x 0 0 2 F ,  
 	 0 x 0 6 F 0 ,   0 x 0 6 F 1 ,   0 x 0 6 F 2 ,   0 x 0 6 F 3 ,   0 x 0 6 F 4 ,   0 x 0 6 F 5 ,   0 x 0 6 F 6 ,   0 x 0 6 F 7 ,  
 	 0 x 0 6 F 8 ,   0 x 0 6 F 9 ,   0 x 0 0 3 A ,   0 x 0 6 4 3 ,   0 x 0 0 3 E ,   0 x 0 0 3 D ,   0 x 0 0 3 C ,   0 x 0 6 1 F ,  
 	 0 x 0 6 6 C ,   0 x 0 6 2 4 ,   0 x 2 0 0 C ,   0 x 0 6 9 8 ,   0 x 0 6 C C ,   0 x 0 6 4 D ,   0 x 0 6 2 5 ,   0 x 0 6 2 3 ,    
 	 0 x 0 6 2 2 ,   0 x 0 6 5 1 ,   0 x 0 6 2 9 ,   0 x 0 0 B B ,   0 x 0 0 A B ,   0 x 0 6 2 1 ,   0 x 0 0 4 E ,   0 x 0 0 5 D ,    
 	 0 x 0 0 5 B ,   0 x 0 6 5 2 ,   0 x 0 6 4 B ,   0 x 0 6 2 6 ,   0 x 0 6 4 F ,   0 x 0 6 4 E ,   0 x 0 0 5 6 ,   0 x 0 6 4 C ,    
 	 0 x 0 0 5 8 ,   0 x 0 6 5 0 ,   0 x 0 6 A 9 ,   0 x 0 6 2 C ,   0 x 0 6 9 8 ,   0 x 0 6 8 6 ,   0 x 0 0 D 7 ,   0 x 0 6 4 0 ,    
 	 0 x 0 6 7 E ,   0 x 0 6 3 4 ,   0 x 0 6 3 0 ,   0 x 0 6 3 2 ,   0 x 0 6 4 A ,   0 x 0 6 2 B ,   0 x 0 6 2 8 ,   0 x 0 6 4 4 ,    
 	 0 x 0 6 2 7 ,   0 x 0 6 4 7 ,   0 x 0 6 2 A ,   0 x 0 6 4 6 ,   0 x 0 6 4 5 ,   0 x 0 6 2 6 ,   0 x 0 6 2 F ,   0 x 0 6 2 E ,    
 	 0 x 0 6 2 D ,   0 x 0 6 3 6 ,   0 x 0 6 4 2 ,   0 x 0 6 3 3 ,   0 x 0 6 4 1 ,   0 x 0 6 3 9 ,   0 x 0 6 3 1 ,   0 x 0 6 3 5 ,  
 	 0 x 0 6 3 7 ,   0 x 0 6 3 A ,   0 x 0 6 3 8 ,   0 x 0 0 7 D ,   0 x 0 0 7 C ,   0 x 0 0 7 B ,   0 x 0 0 7 E      
 ] ;  
  
 
 f u n c t i o n   F a r s i K e y D o w n ( ) 
 { 
 	 i f   ( w i n d o w . e v e n t . s h i f t K e y   & &   w i n d o w . e v e n t . a l t K e y   | |   w i n d o w . e v e n t . k e y C o d e   = =   1 2 3 )  
 	 {    
 	 	 i f   ( m o d e   = =   0 )   {  
 	 	 	 m o d e   =   1 ;  
 	 	 	 w i n d o w . d e f a u l t S t a t u s   =   " F a r s i " ;  
 	 	 }  
 	 	 e l s e   {  
 	 	 	 m o d e   =   0 ;  
 	 	 	 w i n d o w . d e f a u l t S t a t u s   =   " E n g l i s h " ;  
 	 	 }  
 	 	 r e t u r n   f a l s e ;  
 	 }  
 	  
 	 r e t u r n   t r u e ; 
 } 
 f u n c t i o n   F a r s i K e y P r e s s ( ) 
 { 
 	 v a r   k e y   =   w i n d o w . e v e n t . k e y C o d e ;  
 	 i f   ( ( k e y   <   0 x 0 0 2 0   | |   k e y   > =   0 x 0 0 F F ) ) {  
 	 	 m o d e   =   1 ;  
 	 	 w i n d o w . d e f a u l t S t a t u s   =   " F a r s i " ;  
 	 }  
 	 i f   ( k e y   <   0 x 0 0 2 0   | |   k e y   > =   0 x 0 0 F F )  
 	 	 r e t u r n ;  
 	 	  
 	 i f   ( m o d e   = =   1 )   {  
 	 	 i f   ( k e y   = =   0 x 0 0 2 0   & &   w i n d o w . e v e n t . s h i f t K e y )   / /   S h i f t - s p a c e   - >   Z W N J  
 	 	 	 w i n d o w . e v e n t . k e y C o d e   =   0 x 2 0 0 C ;  
 	 	 e l s e  
 	 	 	 w i n d o w . e v e n t . k e y C o d e   =   f a r s i k e y [ k e y   -   0 x 0 0 2 0 ] ;  
 	 }  
 	 r e t u r n   t r u e ; 
 } 
 f u n c t i o n   N u m b e r K e y P r e s s ( ) 
 { 
 	 v a r   c o d e   =   w i n d o w . e v e n t . k e y C o d e ; 
 	 v a r   k e y   =   S t r i n g . f r o m C h a r C o d e ( c o d e ) ; 
 	 i f   ( c o d e   >   1 2 7 ) 
 	 	 r e t u r n ; 
 	 	 s w i t c h ( k e y ) 
 	 	 { 
 	 	 	 c a s e   ' 0 '           :     b r e a k ; 
 	 	 	 c a s e   ' 1 '           :     b r e a k ; 
 	 	 	 c a s e   ' 2 '           :     b r e a k ; 
 	 	 	 c a s e   ' 3 '           :     b r e a k ; 
 	 	 	 c a s e   ' 4 '           :     b r e a k ; 
 	 	 	 c a s e   ' 5 '           :     b r e a k ; 
 	 	 	 c a s e   ' 6 '           :     b r e a k ; 
 	 	 	 c a s e   ' 7 '           :     b r e a k ; 
 	 	 	 c a s e   ' 8 '           :     b r e a k ; 
 	 	 	 c a s e   ' 9 '           :     b r e a k ; 
 	 	 	 d e f a u l t   : 	 w i n d o w . e v e n t . k e y C o d e   =     " " ;   b r e a k ; 
 	 	 } 
         w i n d o w . e v e n t . r e t u r n V a l u e   =   t r u e ; 
 } 
 
 
