谁能帮我看一下这段代码哪出问题了，为什么运行不了

youxin123

#include"stdio.h"
& G# [, I+ r0 e% J9 N" n#include"math.h"
                FILE*fp;
: R  I- k- d# A" c9 @- i1 ]                int i,gcode;
9 J9 F# {. B2 }3 |2 w) A' g* p+ o                char fname[14],gvalue[65];
% ]* r& W$ O# ^' g8 O                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
0 I2 X( ?, \# I: a' P# F                {int n;
# o& S2 U% Y) k! `                i=0;
                scanline();
                printf("Enter data file name:");
) b8 e& ~3 d* b) q4 O                scanf("%s",fname);
                fp=fopen(fname,"w");
                fprintf(fp,"%d\n",i);
* R$ \, w- ]+ G$ }; \& f                for(n=1;n<=i;n++)
                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
) Y+ N- ]- [  X/ g2 b, Z; E/ ?$ P                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
                }
                fclose(fp);
1 W; _/ |' k) s5 q" w                }
: I0 b+ j$ K. S# l0 w& @6 x                int scanline()
                {printf("Enter DXF file name:");
                scanf("%s",fname);
7 f- O6 T- W' X7 p* [                strcat(fname,".dxf");
: ]$ ^: }+ a. a! A2 }  U6 q3 ^                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
9 h7 b# S+ f) i                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
7 u$ W/ {4 ~$ P                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
+ z, F: y5 T4 k. p2 N& H                fclose(fp);
8 h" ]0 {4 G' M                return0;
                }
0 e# A- j1 j, o( n& ^* q                int outline()
# a0 @6 }7 m+ u- ]* J. x                {do{fscanf(fp,"%d",&gcode);
- [# ^' ]* V& T( C3 b) C                if(gcode==10)
                {i=i+1;
                fscanf(fp,"%f",&xs[i]);
8 [1 E$ K9 P, ?                }
                else
$ B1 [3 Y$ {2 I3 s                fscanf(fp,"%s",gvalue);
+ e% L$ K! h7 Y( E5 l* I& O/ n                }while(gcode!=10);
3 y% y2 m; v  p" `" k  g/ S                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ys[i]);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&zs[i]);
% v7 Y; g# n5 d5 @" Z& q                fscanf(fp,"%d",&gcode);
& M" ?2 y8 x) L                fscanf(fp,"%f",&xe[i]);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ye[i]);
6 U7 W" j/ C& G% Y, n                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ze[i]);
                return0;
                }

& }. @# I9 \& m  [) I