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

youxin123

#include"stdio.h"
#include"math.h"
                FILE*fp;
                int i,gcode;
                char fname[14],gvalue[65];
( [8 _- p2 w/ o0 b                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
. |7 @% u% X; K( l8 L- f8 m                {int n;
                i=0;
$ O8 ~* Z; y4 ^9 ^4 a                scanline();
3 V  U8 I- B$ `                printf("Enter data file name:");
                scanf("%s",fname);
, A  d# x2 b1 @$ ~                fp=fopen(fname,"w");
) Y) ^$ R  X& N                fprintf(fp,"%d\n",i);
7 j3 f8 s  k) G4 ^: \                for(n=1;n<=i;n++)
                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
                }
3 Z' K4 h5 B. M/ v0 s                fclose(fp);
7 L. ?$ C# s& _; T; y$ j                }
                int scanline()
                {printf("Enter DXF file name:");
2 N# j3 v$ R  e2 P                scanf("%s",fname);
                strcat(fname,".dxf");
0 w  R+ T4 S0 y! p; j                fp=fopen(fname,"r");
/ ?. G5 C2 e+ }9 w4 h$ ^7 _5 F                do{fscanf(fp,"%d",&gcode);
2 A& O( x7 u3 z$ K% z: z                fscanf(fp,"%s",gvalue);
                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
0 n  z" q/ U0 c& B. C                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);
) E3 w7 x  x( e( t# |4 Y" V, I" |                return0;
2 A6 M$ ^$ B. h( z$ n                }
                int outline()
: P+ y: F( H* i7 n# k                {do{fscanf(fp,"%d",&gcode);
                if(gcode==10)
                {i=i+1;
                fscanf(fp,"%f",&xs[i]);
6 E+ A& l# A4 R! c9 L- F6 }' {( v! s                }
                else
7 B& f8 e4 ?- s' V' W6 a                fscanf(fp,"%s",gvalue);
                }while(gcode!=10);
9 t4 }' v  t/ E, H( U/ Q                fscanf(fp,"%d",&gcode);
1 e$ h( h$ J6 k6 p/ z- J/ R                fscanf(fp,"%f",&ys[i]);
                fscanf(fp,"%d",&gcode);
9 a0 W8 [3 w, _% z                fscanf(fp,"%f",&zs[i]);
                fscanf(fp,"%d",&gcode);
2 E" C  @" M" h; {3 J- I/ ]                fscanf(fp,"%f",&xe[i]);
                fscanf(fp,"%d",&gcode);
6 a8 l* g( X3 G3 f2 O4 o                fscanf(fp,"%f",&ye[i]);
                fscanf(fp,"%d",&gcode);
* ^; F) P+ b5 I' Z+ Y                fscanf(fp,"%f",&ze[i]);
                return0;
3 S7 J" |$ N5 o5 e- [! k( v                }

* I8 a9 W# E. g5 X* {/ F$ j