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

youxin123

#include"stdio.h"
#include"math.h"
                FILE*fp;
& u- j9 M, G, A/ j                int i,gcode;
                char fname[14],gvalue[65];
                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
& S+ V# f4 C3 p' s                main()
                {int n;
                i=0;
                scanline();
                printf("Enter data file name:");
+ m1 W; F9 M- O2 I  D  d* r                scanf("%s",fname);
                fp=fopen(fname,"w");
9 p# n) i7 q, x                fprintf(fp,"%d\n",i);
3 s- F7 ^& m! x) q2 _. S2 _                for(n=1;n<=i;n++)
                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
3 a% [- C2 Q7 _! V+ O                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
                }
. k+ ^6 ]0 e4 m2 s( [# Q                fclose(fp);
3 B* B8 K0 h% U5 I                }
/ `: b9 U' o: O% n; W6 J                int scanline()
                {printf("Enter DXF file name:");
                scanf("%s",fname);
                strcat(fname,".dxf");
, n1 H' L' I1 o8 A0 e8 M                fp=fopen(fname,"r");
5 g/ e% o- p8 o- R! Q" v                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
                do{fscanf(fp,"%d",&gcode);
$ e- C+ d# H- O& G, h                fscanf(fp,"%s",gvalue);
0 z8 l# U/ G4 a1 w9 [                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
, ?% t1 G1 i# T3 l/ o                fclose(fp);
                return0;
9 F4 u" B& w* ?8 T0 U                }
3 f; N  z: d4 t# Z1 K                int outline()
                {do{fscanf(fp,"%d",&gcode);
                if(gcode==10)
                {i=i+1;
& J  O* H8 l! _$ b5 k. i                fscanf(fp,"%f",&xs[i]);
7 x! K$ _/ W3 X& K, i! Q                }
( f$ k; V$ w( I5 n                else
                fscanf(fp,"%s",gvalue);
                }while(gcode!=10);
: v) f. G- l7 w$ |; W5 l                fscanf(fp,"%d",&gcode);
0 w8 K0 o, P4 s4 N% q                fscanf(fp,"%f",&ys[i]);
- B4 U: l. e/ S- }) q                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&zs[i]);
                fscanf(fp,"%d",&gcode);
/ E! e* q6 ^9 D) J( e, S9 |* G                fscanf(fp,"%f",&xe[i]);
                fscanf(fp,"%d",&gcode);
+ q/ F& s& @; `                fscanf(fp,"%f",&ye[i]);
6 ]7 y0 c. j  N' f                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ze[i]);
                return0;
                }

5 p& q+ z& w$ n