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

youxin123

#include"stdio.h"
9 [2 i5 v  m. X3 |#include"math.h"
                FILE*fp;
                int i,gcode;
9 G* f8 {  e7 a+ F: Y                char fname[14],gvalue[65];
- G  A0 F) C- Z) k                float xs[100],ys[100],zs[100],xe[100],ye[100],ze[100];
                main()
- o  I7 u9 U$ s4 k* c; o                {int n;
                i=0;
$ G4 r# {6 n+ D" B$ \4 m                scanline();
5 P0 A/ ~0 V$ g+ m/ [: E0 V$ G                printf("Enter data file name:");
4 N6 Q0 {! [1 S# m7 c                scanf("%s",fname);
                fp=fopen(fname,"w");
                fprintf(fp,"%d\n",i);
2 y6 K; L( m" W; t+ b% \2 v% K                for(n=1;n<=i;n++)
                {fprintf(fp,"%f,%f,%f\n",xs[n],ys[n],zs[n]);
; b" o# R9 f8 o( Q7 @6 q) t" b                fprintf(fp,"%f,%f,%f\n",xe[n],ye[n],ze[n]);
                }
                fclose(fp);
                }
) p" r; W$ Q# |/ F$ h: ~                int scanline()
                {printf("Enter DXF file name:");
3 b( X2 a& M( x9 n% H3 b) |                scanf("%s",fname);
& @5 a. b) m" u2 ?0 o# K                strcat(fname,".dxf");
                fp=fopen(fname,"r");
                do{fscanf(fp,"%d",&gcode);
. O# C8 {) h4 M! g                fscanf(fp,"%s",gvalue);
                }while(gcode!=2||strcmp(gvalue,"ENTITIES")!=0);
  O8 Q, a# q4 E0 _                do{fscanf(fp,"%d",&gcode);
: {( B- Z4 \" W+ `6 f3 ]$ x                fscanf(fp,"%s",gvalue);
                if(gcode==0&&strcmp(gvalue,"LINE")==0)outline();
+ B# j2 p, I" \                }while(gcode!=0||strcmp(gvalue,"ENDSEC")!=0);
, W7 p; Q& r+ F  h- ~. c9 O                fclose(fp);
                return0;
                }
                int outline()
                {do{fscanf(fp,"%d",&gcode);
; G: Y8 h6 Y8 L" j                if(gcode==10)
                {i=i+1;
. c4 S' |; T  c; _" F. G3 U9 ^                fscanf(fp,"%f",&xs[i]);
+ z4 J, T4 {  A# r: p: A                }
                else
- k; }& W: y: T! `2 W; k2 U                fscanf(fp,"%s",gvalue);
; C' K3 z4 ^* A! @( A* q3 H: D                }while(gcode!=10);
                fscanf(fp,"%d",&gcode);
" w& \8 h7 ]8 S6 _" f                fscanf(fp,"%f",&ys[i]);
8 c$ C( C* ]7 L7 _- r6 n; w4 P                fscanf(fp,"%d",&gcode);
* k! A; i. o' p- N3 @                fscanf(fp,"%f",&zs[i]);
5 T7 u9 `' ?5 {8 c( O                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&xe[i]);
% K/ T; d$ F  p8 H- f8 S                fscanf(fp,"%d",&gcode);
* p. ~0 w7 E5 N2 a, H- {                fscanf(fp,"%f",&ye[i]);
3 P! f$ U5 U# v3 ?" _                fscanf(fp,"%d",&gcode);
                fscanf(fp,"%f",&ze[i]);
                return0;
                }
; S. B9 H2 Z. E4 y0 r6 ~9 ]