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

youxin123

#include"stdio.h"
#include"math.h"
                FILE*fp;
                int i,gcode;
                char fname[14],gvalue[65];
) M9 E, U# {# t5 p. W. ^; J                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
                {int n;
) V, G- _6 V) D1 R, B                i=0;
                scanline();
                printf("Enter data file name:");
* b; T2 _8 W2 [) A: n# u                scanf("%s",fname);
0 i6 |( V. y0 j/ c                fp=fopen(fname,"w");
                fprintf(fp,"%d\n",i);
                for(n=1;n<=i;n++)
( h' K# D' r1 u% I; n0 ~                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
3 ~3 F9 f) b! k" N) Y. l                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
                }
, |. X& Z4 n% j( X9 Z1 h- q                fclose(fp);
                }
9 B  O4 n$ A4 G                int scanline()
; \4 d7 A7 [& F8 a9 C( j                {printf("Enter DXF file name:");
                scanf("%s",fname);
                strcat(fname,".dxf");
                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
0 z/ {& u/ n; B- Y" j                fscanf(fp,"%s",gvalue);
                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
4 v/ f, M" O% e  j) Z3 u                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
                fclose(fp);
                return0;
- [7 @, E7 T7 |$ X5 f                }
                int outline()
                {do{fscanf(fp,"%d",&gcode);
                if(gcode==10)
                {i=i+1;
                fscanf(fp,"%f",&xs[i]);
7 F: v6 p7 e: P                }
9 z/ c* R$ E& C; j                else
                fscanf(fp,"%s",gvalue);
                }while(gcode!=10);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ys[i]);
* r/ p! w5 c% o4 @( U5 C! [: t0 a( K8 u                fscanf(fp,"%d",&gcode);
; F, U2 B: I9 O# N                fscanf(fp,"%f",&zs[i]);
8 u$ J, K. e4 j3 s. R$ S% [$ R                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&xe[i]);
                fscanf(fp,"%d",&gcode);
4 F, @! `6 ]3 @4 L( u                fscanf(fp,"%f",&ye[i]);
' A8 D6 B$ M% z0 e6 F; _                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ze[i]);
                return0;
8 z* X; p2 c* \+ Y, {* t4 p                }