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

youxin123

#include"stdio.h"
! N% n% ?/ L; a- R#include"math.h"
0 Y& z* O! J9 |. B! R$ T6 C( c                FILE*fp;
( A3 Q: X6 w: H3 L( m                int i,gcode;
' e& U) x: y* N* w                char fname[14],gvalue[65];
                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
* Q: w6 G4 d+ R1 L7 W) J9 w% W                {int n;
                i=0;
# {+ _, y% h: A  F* N# a                scanline();
' `9 F, G: u7 B. q+ ^7 o                printf("Enter data file name:");
                scanf("%s",fname);
: P9 {; d) {  G3 X3 j2 W& x* C                fp=fopen(fname,"w");
6 r3 A6 k$ O, w# [1 u" s0 M  l                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& F4 f9 L; f8 d                }
                fclose(fp);
' H' e$ }$ P; E                }
                int scanline()
                {printf("Enter DXF file name:");
                scanf("%s",fname);
3 U2 ?! q0 }4 [                strcat(fname,".dxf");
" p8 j; K0 H, V& U# r                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
0 w# p. w3 X) q7 v4 z                fscanf(fp,"%s",gvalue);
                }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);
( V/ J. s# d! S% j" [! `: B! A                fclose(fp);
! }5 t# e% D" t                return0;
+ u0 c; e# h# r6 W, T- u                }
- L* E( I- `0 R* v0 Q                int outline()
                {do{fscanf(fp,"%d",&gcode);
                if(gcode==10)
0 F7 o3 q* k& f" }, ~' ?                {i=i+1;
9 J* B4 a2 c) x* h! m! c9 b                fscanf(fp,"%f",&xs[i]);
                }
& X9 w; H4 I/ u                else
                fscanf(fp,"%s",gvalue);
1 T8 U' Q) u$ G5 T, ?. n* m4 Q                }while(gcode!=10);
' p; C2 c& |- h# b2 p' c1 o5 h                fscanf(fp,"%d",&gcode);
5 `' m  J3 T9 S6 m4 l3 W                fscanf(fp,"%f",&ys[i]);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&zs[i]);
" j2 t8 P( Y- S                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&xe[i]);
9 Y: R' g8 C! b; I/ u                fscanf(fp,"%d",&gcode);
6 P9 O* [9 {' {# ]: V) j% o- K- X                fscanf(fp,"%f",&ye[i]);
. }7 _  t0 o7 e1 f- f                fscanf(fp,"%d",&gcode);
% K* L- E# r; N& x) y4 I4 |                fscanf(fp,"%f",&ze[i]);
                return0;
                }