f u n c   m a i n ( )   = 
 
         a u t o 
 
                 f n   "  Z 
 
                 r   "  Z 
 
                 t   "  Z 
 
                 s t r   "  Z 
 
         e n d a u t o 
 
 
 
         f n   !  Z 2 S t r ( 1 ) 
 
         r   !  C r e a t e R e a d e r ( f n ) 
 
         t   !  R e a d Z ( r ) 
 
 
 
         s t r   !  Z 2 S t r ( t ) 
 
         d o   D e b u g ( s t r ) 
 
 
 
 | a a a 
 
         d o   D o E v e n t s ( ) 
 
         g o t o   | a a a 
 
         r e t 
 
 e n d f u n c 