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

youxin123

#include"stdio.h"
#include"math.h"
) w4 [" P- Z/ I! J. v$ b& ?' s                FILE*fp;
                int i,gcode;
: k6 V/ a0 `6 ]0 d: h                char fname[14],gvalue[65];
1 q+ L  N; H9 {( q% X) A                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
6 X# }# |" \. k# d                {int n;
                i=0;
                scanline();
5 C2 ]( x# z8 K1 \+ ]2 u                printf("Enter data file name:");
4 i/ h7 d: Q5 r& o) D# J6 ?                scanf("%s",fname);
                fp=fopen(fname,"w");
# }& l7 w' A  F  R( y4 n                fprintf(fp,"%d\n",i);
4 ~: N* T) `& `( ?                for(n=1;n<=i;n++)
                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
& r' l8 D2 Y1 e. S3 v                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
$ t$ B1 c* J! h5 U                }
! Y* {* V1 w- \) P* y4 W                fclose(fp);
: T0 G: ]$ [1 O% m                }
                int scanline()
) u- P- C8 W/ L, L4 b6 i' R                {printf("Enter DXF file name:");
8 p/ X2 E& @. ~0 I0 R8 B                scanf("%s",fname);
: \) |; G4 Q; Q% D, w                strcat(fname,".dxf");
( U' \+ m2 |( d. `. C; h                fp=fopen(fname,"r");
4 [* V. I7 W5 U0 h                do{fscanf(fp,"%d",&gcode);
+ E' x" s) E; a& i* r                fscanf(fp,"%s",gvalue);
' D0 x7 o. R2 X! H  |0 W. C; U1 b                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
1 O6 I& L+ x0 H8 \" X# y                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
' P( @" D$ D: q6 W/ w+ r6 k8 p                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
                fclose(fp);
2 P* S0 x1 V# A& A1 F7 \1 d& g                return0;
) Y! L' l6 r' c- I$ _; K                }
                int outline()
                {do{fscanf(fp,"%d",&gcode);
, h3 R, ]: q8 [0 N+ z                if(gcode==10)
7 n: N, d2 q7 l% _% ]4 O0 _( R8 J                {i=i+1;
                fscanf(fp,"%f",&xs[i]);
; [; V: M0 n; F1 ]$ }                }
                else
                fscanf(fp,"%s",gvalue);
( p& h/ t9 c9 |$ A8 F' T                }while(gcode!=10);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ys[i]);
5 l4 _) U* q! y7 p* d                fscanf(fp,"%d",&gcode);
6 m- M  Z2 j) P5 ^4 I' f                fscanf(fp,"%f",&zs[i]);
% u' k  ^' D5 W8 R* t) {                fscanf(fp,"%d",&gcode);
2 {$ R8 s# P3 t+ n2 y; n                fscanf(fp,"%f",&xe[i]);
1 _% |! |, _7 z4 }, G                fscanf(fp,"%d",&gcode);
7 s$ ?  ?2 v. D8 g5 h                fscanf(fp,"%f",&ye[i]);
                fscanf(fp,"%d",&gcode);
/ _+ G( p" j/ h2 I2 O# d                fscanf(fp,"%f",&ze[i]);
                return0;
% ^/ ]! T+ s" r$ b# V7 X                }

& S6 |. O* X" S" P; o