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

youxin123

#include"stdio.h"
5 C) q! G% `1 t+ J; B- g#include"math.h"
                FILE*fp;
- t9 f7 Q$ {4 c. L* A! ^) {6 g                int i,gcode;
                char fname[14],gvalue[65];
5 y1 S2 P' B, }$ R7 {8 Q" t                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
: o6 U9 ?0 K4 Y1 f% j6 y+ A                {int n;
# g, W4 v, O% ^- q4 F                i=0;
                scanline();
                printf("Enter data file name:");
) i5 H/ c; o3 ?4 G+ _# k                scanf("%s",fname);
                fp=fopen(fname,"w");
                fprintf(fp,"%d\n",i);
                for(n=1;n<=i;n++)
5 r  o% f+ ]- z0 v$ g& d1 `                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
                }
                fclose(fp);
5 T! L1 ]$ e7 [( ~) s0 [. G) m7 P                }
: I# L+ K) d4 {                int scanline()
, v6 U0 I, N! c  J( j                {printf("Enter DXF file name:");
, n& C2 q! v7 U2 \2 W" p: E                scanf("%s",fname);
                strcat(fname,".dxf");
; @$ P4 }. e2 R" D                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
                do{fscanf(fp,"%d",&gcode);
' s+ b7 ~$ V- M) ~3 \6 n                fscanf(fp,"%s",gvalue);
                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
" s1 |  ^" H6 }$ a( W/ ^5 ?* |                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
8 p$ O. K9 u2 c$ D, L; z  N! S" w0 ?                fclose(fp);
/ V4 V2 R+ \+ F8 @# V3 a                return0;
                }
                int outline()
                {do{fscanf(fp,"%d",&gcode);
                if(gcode==10)
                {i=i+1;
# v; t0 n0 D1 S, m; i: s                fscanf(fp,"%f",&xs[i]);
" r( |' Q) I* X/ \& r* d                }
                else
3 N5 E6 L5 U* [' G                fscanf(fp,"%s",gvalue);
                }while(gcode!=10);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ys[i]);
8 j, y' |; l" W$ M) {9 w" G' Y                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&zs[i]);
0 i* D# P: U2 ^5 g                fscanf(fp,"%d",&gcode);
& ~! l- _( H2 I2 [$ ^7 y                fscanf(fp,"%f",&xe[i]);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ye[i]);
9 O" K$ }% z& \: o$ n- s: p                fscanf(fp,"%d",&gcode);
# d; {9 c) I  ^9 I  g                fscanf(fp,"%f",&ze[i]);
                return0;
                }