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

youxin123

#include"stdio.h"
$ K( C. u! Y3 G# Q" o9 l#include"math.h"
( K* G- r- w' a# |3 J0 r                FILE*fp;
  `$ U7 E4 H) \: J/ K                int i,gcode;
; y4 J; Z% ^9 p! E$ d. [$ W& @                char fname[14],gvalue[65];
9 k3 z. d0 ~2 O: b: G                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
( I8 Q0 T, u1 W" P! D                main()
; x/ X: @8 I- X, A# u$ A                {int n;
3 |; ?- s5 }: k" e) X. _                i=0;
7 X8 E6 A- D" G2 Q) n( M- p                scanline();
                printf("Enter data file name:");
                scanf("%s",fname);
                fp=fopen(fname,"w");
2 L# g- J" }& q9 s$ n                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]);
4 N& N* b1 }5 o' Q* J, V                }
                fclose(fp);
                }
7 e9 ^6 {7 v5 |2 C8 _# c                int scanline()
                {printf("Enter DXF file name:");
                scanf("%s",fname);
9 O/ m6 e% ?* u" G6 H5 R9 j6 H                strcat(fname,".dxf");
                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
" ~/ `( s* }- t% K) K  Y! R                fscanf(fp,"%s",gvalue);
                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
: m& {8 s6 |6 d6 u                do{fscanf(fp,"%d",&gcode);
                fscanf(fp,"%s",gvalue);
  U5 r$ z5 d1 N$ H& N3 u; f                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
                fclose(fp);
# d: J! j, T. Y/ h" S9 e" Y1 C                return0;
2 \7 m4 U; r$ v( t                }
4 r/ }' w& ]5 s) U) A1 I; S' K# y( d                int outline()
7 w" B- w# i- f; T2 K* E                {do{fscanf(fp,"%d",&gcode);
; {8 N! X+ T' F- Y                if(gcode==10)
1 a+ q# m* A1 Q' J5 o; {                {i=i+1;
                fscanf(fp,"%f",&xs[i]);
1 i; C5 W! W4 p* w                }
                else
- Y% _$ C) J8 n) J. |                fscanf(fp,"%s",gvalue);
                }while(gcode!=10);
                fscanf(fp,"%d",&gcode);
! S/ C7 O) t5 ?7 a) e( F: j/ {8 t                fscanf(fp,"%f",&ys[i]);
' g4 {- `/ ~. I% L9 i/ w( f                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&zs[i]);
                fscanf(fp,"%d",&gcode);
! Y' p, U! @* B                fscanf(fp,"%f",&xe[i]);
2 W3 z3 H1 r/ o: d2 B' c! X5 x                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ye[i]);
                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ze[i]);
                return0;
                }
; ?7 Z! d8 a( I7 P: ~
$ M" _% ]4 W; L( h% h3 J