请帮忙，简单的awk代码分析.

mathew

以下一段awk代码是用来分析dxf格式的文件的,
dxf文件格式大概是这样:
...
TEXT
  8
2
10
747.16
20
273.75
40
  10.00
  1
#-25
  0
TEXT
  8
2
10
748.23
20
272.15
40
  10.00
  1
#-26
  0
LINE
  8
8
10
750.09
20
279.58
11
751.65
21
277.70
  0
TEXT
  8
2
10
750.09
20
279.58
40
  10.00
  1
#-27
  0
TEXT
  8
2
10
751.65
20
277.70
40
  10.00
  1
#-28
  0
LINE
  8
8
10
750.09
20
273.09
11
752.93
21
274.79
  0
TEXT
  8
2
10
750.09
20
273.09
..........



使用方式$andxf.awk filenam.dxf ,功能是抽取一些必要的信息出来，但是我看来看去也看不明白,谁能给我简单注解一下?"#"后面是我的问题，

1. awk '
   
2.         BEGIN {
   
3.                 TXT_no=-1 #这里TXT_no的值是-1
   
4.                 Str=""
   
5.         }
   
6. 
   
7. 
   
8.         {
   
9.                 if( TXT_no != -1 )
   
10.                         ++TXT_no #这里TXT_no的值是多少？
    
11. 
    
12.                 if( $0 == "TEXT" )
    
13.                         TXT_no=0
    
14. 
    
15.                 if( TXT_no == 2)  #这里能到达吗?
    
16.                         S2=$0
    
17. 
    
18.                 if( TXT_no == 18){
    
19.                         S18=$0
    
20. 
    
21.                         if( S2 == 19){       
    
22.                         # the second line below the line with "TEXT" is a
    
23.                         # flage, if the value is "19", means this section
    
24.                         # is used for the text in paper patten.
    
25.                         # if the value is "1", there is another meaning.
    
26. 
    
27.                                 gsub( " *\^\^* *\~\~*", "^ ", S18)
    
28.                                 gsub( " *\~\~* *\^\^*", "~ ", S18)
    
29.                                 gsub( " *\^ *", "^ ", S18)
    
30.                                 gsub( " *\~ *", "~ ", S18)
    
31. 
    
32.                                 Str=sprintf("%s:%s", Str, S18)
    
33.                         }
    
34.                         else{
    
35.                                 split(S18, s, ":")
    
36.                                 if ( s[1] == "Annotation" ){
    
37.                                         PC=s[2]
    
38.                                         printf ("%s%s\n", PC, Str)
    
39.                                         TXT_no=-1
    
40.                                         Str=""
    
41.                                 }
    
42.                         }
    
43.                 }
    
44.         }
    
45. ' $1
    

复制代码

angel518

study

梦蓝

if( TXT_no != -1 )
         ++TXT_no #这里TXT_no的值是多少？ ->从“TEXT”标志行开始每读文件的一行加1，直到下一个“TEXT”标志

      if( $0 == "TEXT" )
         TXT_no=0

      if( TXT_no == 2)  #这里能到达吗? -〉从“TEXT”标志行开始读第3行时到达
         S2=$0

miling

1. awk '
   
2.    BEGIN {
   
3.       TXT_no=-1 #初始化TXT_no，本程序是以"TEXT"为标识，形成多个片断，此变量是用来对片断内进行计数的
   
4.       Str=""
   
5.    }
   
6. 
   
7. 
   
8.    {
   
9.       if( TXT_no != -1 )
   
10.          ++TXT_no        #对于第一次遇到"TEXT"之前，TXT_no一直是-1，一旦遇到TEXT后，计数开始
    
11. 
    
12.       if( $0 == "TEXT" )
    
13.          TXT_no=0     #遇见TEXT后，计数归0
    
14. 
    
15.       if( TXT_no == 2)  #这里能到达吗?
    
16.          S2=$0
    

复制代码

mathew

谢谢几位，明白了许多,但是还有不明白的地方.

1. 
   
2. if( TXT_no != -1 )
   
3.          ++TXT_no        #对于第一次遇到"TEXT"之前，TXT_no一直是-1，一旦遇到TEXT后，计数开始
   
4. 
   
5.       if( $0 == "TEXT" )
   
6.          TXT_no=0     #遇见TEXT后，计数归0
   

复制代码

好象有点矛盾啊，比如读到第一个"TEXT"记录时，TXT_no=0, 但是前面又说,一旦遇到TEXT后，计数开始 ?还是不大明白
.


这个程序用来分析ASCII DXF格式的，我在这里放上一个完整的DXF文件，
大家可试验一下.
http://home.netvigator.com/~fritzyau/LZBNEW.dxf