#   !" &/     "  ""         D E M A G O G 
 
 #   !!"  !   "!"
 
 #   /+  "!"+  #"  +",  .     
 
 #         $ ":   D O C ,   D O C X ,   H T M ,   H T M L ,   S H T M L ,   F B 2 ,   T X T 
 
 #   /  +/  "  F 2 
 
 
 
 S T R   n a z v a n i e ,   f i l e s ,   f ,   d ,   d e l i m 
 
 N U M   n e x t ,   i ,   n 
 
 
 
 n a z v a n i e   =   I n p u t B o x ( ' !>AB02;5=85  A1>@=8:0' , ' 2548B5  =0720=85' , ' !   ' ) 
 
 
 
 W N e w ( 0 , n a z v a n i e ) 
 
 
 
 #   >41>@  B5:AB>2  ?@5:@0I05BAO,   :>340
 
 #   2  >G5@54=><  480;>35  2K1>@0  =060B0
 
 #   :=>?:0  " B<5=0"   8;8  :;028H0  E s c . 
 
 #     480;>35  2>7<>65=  <=>65AB25==K9
 
 #   2K1>@  D09;>2:   S h i f t + A r r o w D n   8/ 8;8  
 
 #   C t r l + L e f t M o u s e C l i c k . 
 
 
 
 d e l i m   =   c h r ( 1 3 ) + c h r ( 1 0 ) + c h r ( 1 3 ) + c h r ( 1 0 ) + c h r ( 1 3 ) + c h r ( 1 0 ) 
 
 
 
 n e x t   =   1 
 
 D O   n e x t   < >   0 
 
         f i l e s   =   O p e n D i a l o g ( 1 ) 
 
         s p l i t ( f i l e s , ' d ' , ' | ' ) 
 
         n   =   d . c o u n t 
 
         I F   n   < >   0 
 
                 i   =   1 
 
                 D O   i   < =   n 
 
                         f   =   s e e ( d . + i ) 
 
                         W O p e n ( 9 , f ) 
 
                         W A d d ( 0 , 9 , d e l i m ) 
 
                         i   =   i + 1 
 
                 O D 
 
         E L S E   
 
                 n e x t   =   0 
 
         F I 
 
 O D 
 
 
 
 W N e w ( 9 , ' ' ) 
 
 S h o w M e s s a g e ( ' >B>2>!    57C;LB0B  2  >:=5  " 0   -   !B0B8AB8:0" ' ) 
 
 