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

youxin123

#include"stdio.h"
#include"math.h"
                FILE*fp;
9 s7 E( _( E% }                int i,gcode;
  o! B% T/ ^, t6 u. V7 Y3 U- H                char fname[14],gvalue[65];
                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
0 H: J: z, i) \: o1 E                main()
8 X( K$ e7 X5 f. ?                {int n;
" [7 c( h4 e' A# l; v                i=0;
                scanline();
' F( h3 r) r/ ]: z5 Y                printf("Enter data file name:");
: U+ S' n: c1 T                scanf("%s",fname);
                fp=fopen(fname,"w");
8 c6 w4 e6 x" @3 \, i3 v# M                fprintf(fp,"%d\n",i);
& x% F  E1 V& C0 `# `  M                for(n=1;n<=i;n++)
                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
: U5 }% h; b1 P                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
                }
                fclose(fp);
# p- x2 ?" e" w7 K" ^1 s  \                }
+ O, P' O' D' k' Q# N, U9 q                int scanline()
                {printf("Enter DXF file name:");
                scanf("%s",fname);
8 R6 ?- t3 i/ H0 G! M                strcat(fname,".dxf");
                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
  {0 N) W4 F/ K% L                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
" x  R" n* u1 _7 p8 i! X+ r, ?) E                do{fscanf(fp,"%d",&gcode);
( H% @& @9 j+ ?- R                fscanf(fp,"%s",gvalue);
' f. s% f2 V) C/ P2 t+ z                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
& Q% W8 E5 s6 U2 g+ x  q6 P                fclose(fp);
' _# N% C$ [" U" _' A" U! H                return0;
                }
, o* d# k- {7 V# Y) b% S7 C( H                int outline()
                {do{fscanf(fp,"%d",&gcode);
# X" J6 \# ^0 H  B& L9 x9 m                if(gcode==10)
                {i=i+1;
" e" g5 j' W- ~2 e+ l- m                fscanf(fp,"%f",&xs[i]);
+ N# L. o0 w! }; d1 z8 _                }
6 k5 J! W& p, I: Q: a' r% w. i9 e                else
! c1 s& A& m& N( D                fscanf(fp,"%s",gvalue);
. M2 z9 Y5 H" H$ |9 z2 C. v9 ?! {                }while(gcode!=10);
  C2 u: I1 _, _3 n% e7 D                fscanf(fp,"%d",&gcode);
' l& V0 g& H' r                fscanf(fp,"%f",&ys[i]);
, c2 y  W. G3 O) {$ R! u                fscanf(fp,"%d",&gcode);
) C3 S* t! q4 u                fscanf(fp,"%f",&zs[i]);
7 f' n- j1 {. n1 M: c                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&xe[i]);
6 N. V# L- x8 T  _5 h% f                fscanf(fp,"%d",&gcode);
. l4 B9 {0 ~. E& N3 ~1 E# ~                fscanf(fp,"%f",&ye[i]);
$ G2 G8 h* b( p7 p+ \, H                fscanf(fp,"%d",&gcode);
0 |" m2 Z( y1 ^                fscanf(fp,"%f",&ze[i]);
* L- [; V: h% |5 I& [5 @2 Z                return0;
                }