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

youxin123

#include"stdio.h"
7 r  e/ y( c+ Z3 M/ H#include"math.h"
                FILE*fp;
                int i,gcode;
                char fname[14],gvalue[65];
5 U/ o% a% }* O5 T/ \5 ?                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
                {int n;
                i=0;
' O( Y4 G/ K* m9 ?9 z6 \                scanline();
- z. b6 t. l9 i" h. |                printf("Enter data file name:");
# b  F& E. R. k3 u                scanf("%s",fname);
# x) w+ U2 x4 k                fp=fopen(fname,"w");
! y0 k4 X; {9 y+ H5 b- |: ^                fprintf(fp,"%d\n",i);
% Q* g# m: m# T6 t5 G" b' \                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]);
* r& F' G( b9 b                }
                fclose(fp);
                }
8 p  J$ l) h. a% z2 `+ @: |                int scanline()
" b  \$ a# V( q+ X, x$ z                {printf("Enter DXF file name:");
                scanf("%s",fname);
                strcat(fname,".dxf");
) D8 ~! g# @! o' c$ p; u                fp=fopen(fname,"r");
, `- P) R5 @% V$ }* B                do{fscanf(fp,"%d",&gcode);
/ h- W" k. c6 |/ h$ a; ~, ~                fscanf(fp,"%s",gvalue);
9 `, K( j3 C% E  q8 F9 L: U                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
0 I5 g' [/ d7 F                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
" c7 j: @1 ^2 Z" l                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
* H$ @7 q# ^( c* w9 Z                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
                fclose(fp);
                return0;
4 B2 s; n' {$ S1 Q                }
                int outline()
. C6 o; P! P" j1 g/ _3 E9 N5 Z                {do{fscanf(fp,"%d",&gcode);
                if(gcode==10)
                {i=i+1;
& V3 X$ y) ~/ Q                fscanf(fp,"%f",&xs[i]);
6 ^, x+ m/ H: F, S( i9 U                }
8 N/ r! h# u" T6 f* a                else
                fscanf(fp,"%s",gvalue);
' D- H; d3 m; p5 Z$ Y7 S: B8 R% e3 {                }while(gcode!=10);
* F& M# H# _" P. H. M/ z' ]1 K                fscanf(fp,"%d",&gcode);
* F1 w$ J4 [) E" _/ H7 A) T5 y                fscanf(fp,"%f",&ys[i]);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&zs[i]);
                fscanf(fp,"%d",&gcode);
% K; {8 l% ~) m                fscanf(fp,"%f",&xe[i]);
6 t2 C4 {9 y3 ?                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ye[i]);
& _; J& J+ C% a4 K. T: `, r                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ze[i]);
                return0;
                }
, f1 `' D* l7 S7 R) r
3 w1 y" L* q3 b# z. ^; Y