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

youxin123

#include"stdio.h"
#include"math.h"
% T& x# k: ]& Q. r* `6 j0 J5 R                FILE*fp;
                int i,gcode;
                char fname[14],gvalue[65];
                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
, Y* h0 [7 w  |- ]                main()
                {int n;
                i=0;
                scanline();
                printf("Enter data file name:");
: r/ w* X0 B4 }5 p5 R& X                scanf("%s",fname);
( s- {0 E3 t: i& w9 G5 w4 {+ m                fp=fopen(fname,"w");
                fprintf(fp,"%d\n",i);
                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]);
                }
& `" E, u% J& U( w: m) b                fclose(fp);
6 v, j7 E# Y0 {& D; L4 R                }
                int scanline()
# E& v" E. {( r& W* \                {printf("Enter DXF file name:");
) J! I  b$ J: a* S* z4 ^                scanf("%s",fname);
: ~) N+ `+ g1 F5 X* P, |                strcat(fname,".dxf");
6 H" e2 B. B5 ]: c                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
( b+ _0 M  p0 h3 ~1 Z8 q( Q                fscanf(fp,"%s",gvalue);
( \% w* g& ^( y* O  J# ^                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
                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);
8 L9 Z3 v8 a! w. g# E/ b6 g8 p                return0;
                }
                int outline()
: }" q9 |( ^( o) y" u+ w; E                {do{fscanf(fp,"%d",&gcode);
1 l# W0 |: p) q" |* L                if(gcode==10)
5 L" k# F' r/ s7 _& {4 l                {i=i+1;
: a" B% Y, m3 I  L                fscanf(fp,"%f",&xs[i]);
4 }. U/ j  [' l  ~0 f" Y  [                }
  V5 u' F  l" E  h, j9 ~                else
6 n' u# i- p1 e) p! t                fscanf(fp,"%s",gvalue);
. n  e8 M5 O" A0 B: {                }while(gcode!=10);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ys[i]);
/ \6 c  T2 q+ ~2 w5 N7 J: X2 w) B                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&zs[i]);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&xe[i]);
" k. v, f# n* _+ Q0 l* r                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ye[i]);
                fscanf(fp,"%d",&gcode);
$ Q/ I7 G. _' ^9 w                fscanf(fp,"%f",&ze[i]);
5 F  x. ]# q* k/ Z6 E                return0;
                }
5 u( s, c8 ]3 K# L% W