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

youxin123

#include"stdio.h"
1 i8 ]9 ]/ ?' C3 v+ j- I' E#include"math.h"
# |: M8 r9 D  ~; k3 E                FILE*fp;
                int i,gcode;
. r& \5 S. b; X, c                char fname[14],gvalue[65];
0 c. O/ V' W6 n2 M* t                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
6 r$ v9 Y# `8 Z: r, N                {int n;
                i=0;
                scanline();
! i( Z6 s% r0 K- r                printf("Enter data file name:");
8 z# t/ A; t  {0 ?9 }, ~- ?                scanf("%s",fname);
, o1 Y" c. n5 {" A, {! y" }                fp=fopen(fname,"w");
& x) V3 S( w) D4 z7 A: a                fprintf(fp,"%d\n",i);
                for(n=1;n<=i;n++)
, \8 O, S1 a2 _- U! R/ n" b                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
0 o+ Q- f  c- s0 ?8 q                }
( Q" _+ m  N: v                fclose(fp);
                }
                int scanline()
- s; F- K( z3 ^- p1 x7 _5 G9 ^                {printf("Enter DXF file name:");
                scanf("%s",fname);
0 @* w: m3 b/ r, B. \! q! n: p' y                strcat(fname,".dxf");
                fp=fopen(fname,"r");
% t# R0 k% R, n1 \                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
; y* c, `5 Q/ d. l7 d% v                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
                do{fscanf(fp,"%d",&gcode);
7 j0 c( C( R9 Z- R& r4 v5 k9 D" Q                fscanf(fp,"%s",gvalue);
/ z4 U: h% l7 S. j, Y) s) h% X                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
# l6 _: @/ J6 L7 G                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
                fclose(fp);
                return0;
4 B# l5 ]$ y7 t+ w1 D* g6 h+ Q                }
                int outline()
8 V4 D* m- o2 _8 p                {do{fscanf(fp,"%d",&gcode);
3 X% l( P7 F! X) o$ N$ |                if(gcode==10)
                {i=i+1;
6 s( \! {1 T1 f% n                fscanf(fp,"%f",&xs[i]);
, T4 ~/ w( g% h" `9 w/ ?- S                }
                else
                fscanf(fp,"%s",gvalue);
                }while(gcode!=10);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ys[i]);
3 N+ e6 g" Z3 f$ D, r                fscanf(fp,"%d",&gcode);
5 x7 W9 D/ u& @  K- M, ?& `                fscanf(fp,"%f",&zs[i]);
                fscanf(fp,"%d",&gcode);
+ O0 O# w# P: S: X3 N7 }# X                fscanf(fp,"%f",&xe[i]);
                fscanf(fp,"%d",&gcode);
8 F6 D1 t7 q6 p+ ]6 g1 q                fscanf(fp,"%f",&ye[i]);
                fscanf(fp,"%d",&gcode);
: j0 m# m4 L7 y( K+ e; e( I, d                fscanf(fp,"%f",&ze[i]);
                return0;
                }