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

youxin123

#include"stdio.h"
( S6 D5 z. f( J  k" @4 I#include"math.h"
                FILE*fp;
0 f- w& ]1 m' ?, \1 Z3 l& Y, P                int i,gcode;
                char fname[14],gvalue[65];
# W1 g" t2 Y6 l  i                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
' o$ s) S/ L( p7 T0 `, b                {int n;
                i=0;
                scanline();
                printf("Enter data file name:");
: \( ?$ X. C+ J; `                scanf("%s",fname);
9 l, R; |  j: x9 O( f- f                fp=fopen(fname,"w");
8 k' d- F6 R# j2 `% r7 L                fprintf(fp,"%d\n",i);
8 @7 M: w% z! t                for(n=1;n<=i;n++)
                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
* s2 X8 q0 }# V' U                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
                }
* c7 X" f2 D' h& N' U                fclose(fp);
  r, c5 ~& N: u                }
                int scanline()
                {printf("Enter DXF file name:");
+ K; ]4 W; m5 H4 K; F                scanf("%s",fname);
$ g0 A1 K$ ?. Q! }4 |, y                strcat(fname,".dxf");
& |. R: U7 C6 f* g: g$ J                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
( V. r* B5 f$ S( X% I* A. b+ ?                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
9 B* f6 |) V' Y5 k                do{fscanf(fp,"%d",&gcode);
3 I# o  F4 i# B5 d                fscanf(fp,"%s",gvalue);
                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
: W2 G. a& Q" A: S                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
! f/ c3 P3 N" ?                fclose(fp);
) H4 M+ k4 C4 V& m/ \, s& x                return0;
; A8 |! L- N+ G                }
                int outline()
4 b( x/ I! o& T' H                {do{fscanf(fp,"%d",&gcode);
                if(gcode==10)
9 F4 t! a9 c. C% {                {i=i+1;
                fscanf(fp,"%f",&xs[i]);
# `( x5 @6 J& _) Q                }
' l4 S+ u. S" A* ^/ ~                else
                fscanf(fp,"%s",gvalue);
7 ?, I8 V% `% x9 ]                }while(gcode!=10);
: z$ R- C5 {; G8 u" B# H# @9 d                fscanf(fp,"%d",&gcode);
; q! B# h4 c+ l- O                fscanf(fp,"%f",&ys[i]);
                fscanf(fp,"%d",&gcode);
+ \; R, h# q; q/ V, K$ I1 o                fscanf(fp,"%f",&zs[i]);
4 D- n% g% r; V) _* |4 w                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&xe[i]);
; W- i/ Z) j9 B  w& p* X2 Y; ^                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ye[i]);
) o8 V" A' f$ H" D* r0 M                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ze[i]);
                return0;
* Y5 y: `  K$ C0 c# M                }