ÿþf u n c t i o n   s h o w D a t e ( )   { 
 
         v a r   m y d a t e = n e w   D a t e ( ) 
 
         v a r   y e a r = m y d a t e . g e t Y e a r ( ) 
 
         
 
         i f   ( y e a r   <   1 0 0 0 ) 
 
                 y e a r + = 1 9 0 0 
 
         
 
         v a r   d a y = m y d a t e . g e t D a y ( ) 
 
         v a r   m o n t h = m y d a t e . g e t M o n t h ( ) 
 
         v a r   d a y m = m y d a t e . g e t D a t e ( ) 
 
         
 
         i f   ( d a y m = = 1   | |   d a y m = = 2 1   | |   d a y m = = 3 1 ) 
 
               { s u f f i x   =   " s t " } 
 
 	 e l s e   i f   ( d a y m = = 2   | |   d a y m = = 2 2 ) 
 
               { s u f f i x   =   " n d " } 
 
 	 e l s e   i f   ( d a y m = = 3   | |   d a y m = = 2 3 ) 
 
               { s u f f i x   =   " r d " } 
 
 	 e l s e   { s u f f i x   =   " t h " }   
 
                 
 
         v a r   d a y a r r a y = n e w   A r r a y ( " 2>A:@5A5=L5" , " ?>=545;L=8:" , " 2B>@=8:" , " A@540" , " G5B25@3" , " ?OB=8F0" , " AC11>B0" ) 
 
         v a r   m o n t h a r r a y = n e w   A r r a y ( " /=20@L" , " $52@0;L" , " 0@B" , " ?@5;L" , " 09" , " N=L" , " N;L" , " 23CAB" , " !5=BO1@L" , " :BO1@L" , " >O1@L" , " 5:01@L" ) 
 
         
 
         d o c u m e n t . w r i t e ( d a y a r r a y [ d a y ] + "   " + d a y m + "   " + m o n t h a r r a y [ m o n t h ] + "   " + y e a r ) 
 
 } 
