#include <stdio.h>
#include <graphics.h>
#include <bios.h>

#define X1 110
#define Y1 70
#define X2 510
#define Y2 370
#define Norm   setlinestyle(0,0,NORM_WIDTH)
#define Thick  setlinestyle(0,0,THICK_WIDTH)
#define printbyte(byte) biosprint(0,(byte),0)

void printgrscr(void)
{
   int i,j,k;
   unsigned char byte1,byte2,byte3;

   printbyte(27);
   printbyte('@');
   for(j=0; j < getmaxy() + 1;j += 12){
        printbyte(27);
        printbyte('*');
        printbyte(38);
        printbyte((getmaxx()+1)%256);
        printbyte((getmaxx()+1)/256);
        for(i=0;i<getmaxx()+1;i++){
             byte1=byte2=byte3 = 0;
                  byte1<<=1;
                  byte1 |= getpixel(i,j+0) &&1;
                  byte1<<=1;
                  byte1 |= getpixel(i,1) &&1;
                  byte1<<=1;
                  byte1 |= getpixel(i,j+1) &&1;
                  byte1<<=1;
                  byte1 |= getpixel(i,1) &&1;
                  byte1<<=1;
                  byte1 |= getpixel(i,j+2) &&1;
                  byte1<<=1;
                  byte1 |= getpixel(i,1) &&1;
                  byte1<<=1;
                  byte1 |= getpixel(i,j+3) &&1;
                  byte1<<=1;
                  byte1 |= getpixel(i,1) &&1;

                  byte2<<=1;
                  byte2 |= getpixel(i,j+4) &&1;
                  byte2<<=1;
                  byte2 |= getpixel(i,1) &&1;
                  byte2<<=1;
                  byte2 |= getpixel(i,j+5) &&1;
                  byte2<<=1;
                  byte2 |= getpixel(i,1) &&1;
                  byte2<<=1;
                  byte2 |= getpixel(i,j+6) &&1;
                  byte2<<=1;
                  byte2 |= getpixel(i,1) &&1;
                  byte2<<=1;
                  byte2 |= getpixel(i,j+7) &&1;
                  byte2<<=1;
                  byte2 |= getpixel(i,1) &&1;

                  byte3<<=1;
                  byte3 |= getpixel(i,j+8) &&1;
                  byte3<<=1;
                  byte3 |= getpixel(i,1) &&1;
                  byte3<<=1;
                  byte3 |= getpixel(i,j+9) &&1;
                  byte3<<=1;
                  byte3 |= getpixel(i,1) &&1;
                  byte3<<=1;
                  byte3 |= getpixel(i,j+10) &&1;
                  byte3<<=1;
                  byte3 |= getpixel(i,1) &&1;
                  byte3<<=1;
                  byte3 |= getpixel(i,j+11) &&1;
                  byte3<<=1;
                  byte3 |= getpixel(i,1) &&1;
              printbyte(byte1);
              printbyte(byte2);
              printbyte(byte3);
         }
         printbyte(27);
         printbyte(60);
         printbyte(27);
         printbyte('J');
         printbyte(24);
         printbyte(13);
      }
}

void graph1(void)
{
  int mi = 0;
  int my = 0;
  int mz = 0;
  int mk = Y2;
  int c_count;
  int c_x_value[16]={0,};
  int c_y_value[7]={0,};
  float c_j_value[6]={0.0,};
  char yjb[6][10]={0,};
  char *lyc = 0;
  char lse[16][5]={0,};
  int count;
  int count1;
  int gd= DETECT,gm;
  FILE *fp;

  initgraph (&gd, &gm,"");
  if ((fp=fopen("graph1.txt","r")) == NULL) {
     printf("error\n");
     exit(-1);
  }
  Norm;
  setlinestyle(1,0,1);
  for(count=1;count<10;count++) {
     line(X1,Y1+count*30,X2,Y1+count*30);
  }

  settextstyle(2,0,8);
  outtextxy(X1-75,Y1-54,"1");
  outtextxy(X1-65,Y1-54,".");
  Norm;
  line(X1-50,Y1-50,X1-39,Y1-50);               /* ¤¡ */
  line(X1-39,Y1-49,X1-39,Y1-45);
  line(X1-44,Y1-45,X1-44,Y1-42);               /* ¤Ç */
  line(X1-50,Y1-42,X1-39,Y1-42);
  line(X1-50,Y1-39,X1-39,Y1-39);               /* ¤© */
  line(X1-40,Y1-39,X1-39,Y1-36);
  line(X1-50,Y1-36,X1-39,Y1-36);
  line(X1-50,Y1-36,X1-49,Y1-33);
  line(X1-50,Y1-33,X1-39,Y1-33);

  line(X1-30,Y1-50,X1-24,Y1-50);               /* ¤¸ */
  line(X1-27,Y1-49,X1-27,Y1-40);
  line(X1-30,Y1-33,X1-27,Y1-40);
  line(X1-27,Y1-40,X1-25,Y1-33);
  line(X1-22,Y1-50,X1-22,Y1-33);               /* ¤À */
  line(X1-22,Y1-42,X1-19,Y1-42);
  line(X1-19,Y1-50,X1-19,Y1-33);

  line(X1,Y1-50,X1,Y1-32);                    /* ¤² */
  line(X1,Y1-41,X1+5,Y1-41);
  line(X1,Y1-32,X1+5,Y1-32);
  line(X1+5,Y1-50,X1+5,Y1-32);
  line(X1+8,Y1-50,X1+8,Y1-32);                /* ¤À */
  line(X1+8,Y1-42,X1+11,Y1-42);
  line(X1+11,Y1-50,X1+11,Y1-32);

  line(X1+20,Y1-50,X1+22,Y1-50);              /* ¤¾ */
  line(X1+18,Y1-48,X1+24,Y1-48);
  ellipse(X1+21,Y1-44,0,360,3,3);
  line(X1+28,Y1-50,X1+28,Y1-42);             /* ¤¿  */
  line(X1+28,Y1-45,X1+30,Y1-45);
  line(X1+18,Y1-38,X1+18,Y1-32);             /* ¤² */
  line(X1+18,Y1-35,X1+27,Y1-35);
  line(X1+18,Y1-32,X1+27,Y1-32);
  line(X1+28,Y1-38,X1+28,Y1-32);

  line(X1+37,Y1-50,X1+37,Y1-32);             /* ¤² */
  line(X1+37,Y1-41,X1+42,Y1-41);
  line(X1+37,Y1-32,X1+42,Y1-32);
  line(X1+42,Y1-50,X1+42,Y1-32);
  line(X1+47,Y1-50,X1+47,Y1-32);             /*¤Ó */

  line(X1+67,Y1-50,X1+73,Y1-50);             /* ¤¡ */
  line(X1+73,Y1-50,X1+73,Y1-46);
  line(X1+67,Y1-40,X1+73,Y1-46);
  line(X1+77,Y1-50,X1+77,Y1-40);             /* ¤Å */
  line(X1+75,Y1-47,X1+77,Y1-47);
  line(X1+75,Y1-43,X1+77,Y1-43);
  line(X1+67,Y1-38,X1+77,Y1-38);             /* ¤© */
  line(X1+77,Y1-38,X1+77,Y1-35);
  line(X1+67,Y1-35,X1+77,Y1-35);
  line(X1+67,Y1-35,X1+67,Y1-32);
  line(X1+67,Y1-32,X1+77,Y1-32);

  line(X1+85,Y1-50,X1+91,Y1-50);             /* ¤¸ */
  line(X1+88,Y1-49,X1+88,Y1-45);
  line(X1+85,Y1-40,X1+88,Y1-45);
  line(X1+88,Y1-45,X1+91,Y1-40);
  line(X1+95,Y1-50,X1+95,Y1-39);             /* ¤Ã */
  line(X1+92,Y1-44,X1+95,Y1-44);
  ellipse(X1+90,Y1-34,0,360,5,3);            /* ¤· */

  line(X1+103,Y1-50,X1+113,Y1-50);           /* ¤§ */
  line(X1+103,Y1-50,X1+103,Y1-40);
  line(X1+103,Y1-40,X1+113,Y1-40);
  line(X1+108,Y1-38,X1+108,Y1-32);           /* ¤Ç */
  line(X1+103,Y1-32,X1+113,Y1-32);

  line(X1-70,Y1+10,X1-60,Y1+10);             /* ¤¼ */
  line(X1-70,Y1+10,X1-70,Y1+14);
  line(X1-70,Y1+12,X1-60,Y1+12);
  line(X1-70,Y1+14,X1-60,Y1+14);
  line(X1-65,Y1+15,X1-65,Y1+17);             /* ¤Ç */
  line(X1-70,Y1+17,X1-60,Y1+17);
  ellipse(X1-65,Y1+23,0,360,5,3);            /* ¤· */

  line(X1-70,Y1+33,X1-64,Y1+33);             /* ¤¡ */
  line(X1-64,Y1+33,X1-64,Y1+45);
  line(X1-67,Y1+41,X1-67,Y1+49);             /* ¤Ç */
  line(X1-70,Y1+49,X1-64,Y1+49);
  line(X1-61,Y1+33,X1-61,Y1+49);             /* ¤¿  */
  line(X1-61,Y1+41,X1-59,Y1+41);

  ellipse(X1-65,Y1+59,0,360,5,3);            /* ¤· */
  line(X1-70,Y1+64,X1-60,Y1+64);             /* ¤Ð */
  line(X1-68,Y1+64,X1-68,Y1+65);
  line(X1-62,Y1+64,X1-62,Y1+65);
  line(X1-70,Y1+67,X1-60,Y1+67);             /* ¤© */
  line(X1-60,Y1+67,X1-60,Y1+70);
  line(X1-70,Y1+70,X1-60,Y1+70);
  line(X1-70,Y1+70,X1-70,Y1+73);
  line(X1-70,Y1+73,X1-60,Y1+73);

  line(X2+70,Y1+8,X2+70,Y1+25);             /* ¤² */
  line(X2+70,Y1+16,X2+75,Y1+16);
  line(X2+70,Y1+25,X2+75,Y1+25);
  line(X2+75,Y1+8,X2+75,Y1+25);
  line(X2+78,Y1+8,X2+78,Y1+25);             /* ¤À */
  line(X2+78,Y1+16,X2+81,Y1+16);
  line(X2+81,Y1+8,X2+81,Y1+25);

  line(X2+72,Y1+33,X2+74,Y1+33);             /* ¤¾ */
  line(X2+70,Y1+35,X2+76,Y1+35);
  ellipse(X2+73,Y1+40,0,360,3,3);
  line(X2+80,Y1+33,X2+80,Y1+42);             /* ¤¿  */
  line(X2+80,Y1+38,X2+82,Y1+38);
  line(X2+70,Y1+46,X2+70,Y1+50);             /* ¤² */
  line(X2+70,Y1+48,X2+79,Y1+48);
  line(X2+70,Y1+50,X2+79,Y1+50);
  line(X2+80,Y1+46,X2+80,Y1+50);

  line(X2+70,Y1+57,X2+70,Y1+75);             /* ¤² */
  line(X2+70,Y1+66,X2+75,Y1+66);
  line(X2+70,Y1+75,X2+75,Y1+75);
  line(X2+75,Y1+57,X2+75,Y1+75);
  line(X2+80,Y1+57,X2+80,Y1+75);             /*¤Ó */

  settextstyle(2,0,8);
  outtextxy(X2+20,Y2+46,"(");
  Norm;
  line(X2+33,Y2+50,X2+35,Y2+50);              /* ü */
  line(X2+31,Y2+52,X2+37,Y2+52);
  line(X2+34,Y2+52,X2+34,Y2+60);
  line(X2+31,Y2+66,X2+34,Y2+60);
  line(X2+37,Y2+66,X2+34,Y2+60);
  line(X2+37,Y2+58,X2+39,Y2+58);
  line(X2+39,Y2+50,X2+39,Y2+66);
  line(X2+41,Y2+50,X2+41,Y2+66);

  line(X2+49,Y2+50,X2+49,Y2+58);              /* ¹ø */
  line(X2+49,Y2+54,X2+55,Y2+54);
  line(X2+49,Y2+58,X2+55,Y2+58);
  line(X2+55,Y2+50,X2+55,Y2+58);
  line(X2+57,Y2+54,X2+59,Y2+54);
  line(X2+59,Y2+49,X2+59,Y2+59);
  line(X2+49,Y2+61,X2+49,Y2+66);
  line(X2+49,Y2+66,X2+59,Y2+66);

  line(X2+69,Y2+50,X2+73,Y2+50);              /* ȣ */
  line(X2+66,Y2+52,X2+76,Y2+52);
  ellipse(X2+71,Y2+57,0,360,5,3);
  line(X2+71,Y2+62,X2+71,Y2+66);
  line(X2+66,Y2+66,X2+76,Y2+66);
  settextstyle(2,0,8);
  outtextxy(X2+82,Y2+46,")");


  settextstyle(2,0,5);
  outtextxy(X1-28,Y1-5+0*30,"100");
  outtextxy(X1-30,Y1-5+1*30," 90");
  outtextxy(X1-30,Y1-5+2*30," 80");
  outtextxy(X1-30,Y1-5+3*30," 70");
  outtextxy(X1-30,Y1-5+4*30," 60");
  outtextxy(X1-30,Y1-5+5*30," 50");
  outtextxy(X1-30,Y1-5+6*30," 40");
  outtextxy(X1-30,Y1-5+7*30," 30");
  outtextxy(X1-30,Y1-5+8*30," 20");
  outtextxy(X1-28,Y1-5+9*30," 10");
  outtextxy(X1-30,Y1-5+10*30,"  0");

  setlinestyle(0,0,0);
  line(X1,Y2,X2,Y1);
  fscanf(fp,"%d",&c_count);
  setlinestyle(4,0xf18f,1);
  for(count=0;count<c_count;count++){
     fscanf(fp,"%d",&c_x_value[count]);
     line(2*c_x_value[count]+X1,Y1, 2*c_x_value[count]+X1,Y2);
  }

  for(mi=0;mi<6;mi++){
     for(count=0;count<c_count;count++){
        fscanf(fp,"%d",&c_y_value[count]);
     }
     setlinestyle(0,0,0);
     for(count=0;count<c_count-1;count++){
        line(2*c_x_value[count]+X1,Y2-(3*c_y_value[count]),
        2*c_x_value[count+1]+X1,Y2-(3*c_y_value[count+1]));
        }
  }

  for(count=0;count<6;count++){
     fscanf(fp,"%f",&c_j_value[count]);
  }
  setlinestyle(0,0,0);
  for(count=0;count<6;count++){
     my = Y2 - (c_j_value[count] * 3);
     setcolor(12);
     line(X1+(c_j_value[count]*4),my,X2+30,my);
     setcolor(15);
     line(X1+(c_j_value[count]*4),Y1,X1+(c_j_value[count]*4),Y2);
  }

  for(count=0;count<6;count++){
     my = Y2-(c_j_value[count] * 3);
     fscanf(fp,"%s",yjb[count]);
     if(my==mk)
     outtextxy(X2+20,(my+mk)/2-5," ");
     else
     outtextxy(X2+20,(my+mk)/2-5,yjb[count]);
     mk=my;
  }

  settextstyle(2,0,5);
  for(count=0;count<16;count++){
     fscanf(fp,"%s",lse[count]);
  }

  for(count1=0;count1<16;count1++){
     mz = 0;
     for(count=0;count<5;count++){
        mz = mz +15;
        lyc=lse[count1][count];
        outtextxy(2*c_x_value[count1]+X1-3,Y2+mz,&lyc);
     }
  }

  Thick;
  rectangle(X1,Y1,X2,Y2);
  Norm;

  fclose(fp);
  getch();
/*  printgrscr();*/
  closegraph();
}

void graph2(void)
{
  int mi = 0;
  int my = 0;
  int mz = 0;
  int mk = Y2;
  int c_count;
  int c_x_value[16]={0,};
  int c_y_value[7]={0,};
  int c_j_value[6]={100,};
  char yjb[6][10]={0,};
  char *lyc = 0;
  char lse[16][5]={0,};
  int count;
  int count1;
  int gd= DETECT,gm;
  FILE *fp;

  initgraph (&gd, &gm,"");           /* graphic screen init. */
  if ((fp=fopen("graph2.txt","r")) == NULL) {
     printf("error\n");
     exit(-1);
  }

  settextstyle(2,0,8);                        /* ŸÀÌƲ ¹× °¡·Î,¼¼·Î ±ÛÀÚµé */
  outtextxy(X1-75,Y1-52,"2");
  outtextxy(X1-60,Y1-52,".");
  Norm;
  ellipse(X1-42,Y1-45,0,360,3,4);          /*  ÀÔ */
  line(X1-34,Y1-49,X1-34,Y1-41);
  line(X1-34,Y1-38,X1-34,Y1-32);
  line(X1-45,Y1-38,X1-45,Y1-32);
  line(X1-44,Y1-35,X1-34,Y1-35);
  line(X1-44,Y1-32,X1-34,Y1-32);

  line(X1-25,Y1-48,X1-15,Y1-48);              /* µµ */
  line(X1-25,Y1-48,X1-25,Y1-37);
  line(X1-25,Y1-37,X1-15,Y1-37);
  line(X1-20,Y1-35,X1-20,Y1-33);
  line(X1-25,Y1-32,X1-15,Y1-32);

  line(X1-7,Y1-48,X1+4,Y1-48);               /* °î */
  line(X1+4,Y1-48,X1+4,Y1-42);
  line(X1-2,Y1-44,X1-2,Y1-41);
  line(X1-7,Y1-40,X1+4,Y1-40);
  line(X1-7,Y1-37,X1+4,Y1-37);
  line(X1+4,Y1-37,X1+4,Y1-32);

  line(X1+15,Y1-48,X1+15,Y1-45);              /* ¼± */
  line(X1+12,Y1-40,X1+15,Y1-45);
  line(X1+15,Y1-45,X1+18,Y1-40);
  line(X1+19,Y1-44,X1+21,Y1-44);
  line(X1+22,Y1-48,X1+22,Y1-39);
  line(X1+12,Y1-37,X1+12,Y1-32);
  line(X1+12,Y1-32,X1+22,Y1-32);

  line(X1-70,Y1+10,X1-60,Y1+10);              /* Åë */
  line(X1-70,Y1+10,X1-70,Y1+14);
  line(X1-70,Y1+12,X1-60,Y1+12);
  line(X1-70,Y1+14,X1-60,Y1+14);
  line(X1-65,Y1+15,X1-65,Y1+17);
  line(X1-70,Y1+17,X1-60,Y1+17);
  ellipse(X1-65,Y1+23,0,360,5,3);

  line(X1-70,Y1+33,X1-64,Y1+33);              /* °ú */
  line(X1-64,Y1+33,X1-64,Y1+45);
  line(X1-67,Y1+41,X1-67,Y1+49);
  line(X1-70,Y1+49,X1-64,Y1+49);
  line(X1-61,Y1+33,X1-61,Y1+49);
  line(X1-61,Y1+41,X1-59,Y1+41);

  ellipse(X1-65,Y1+58,0,360,5,3);             /* À² */
  line(X1-70,Y1+63,X1-60,Y1+63);
  line(X1-68,Y1+64,X1-68,Y1+65);
  line(X1-62,Y1+64,X1-62,Y1+65);
  line(X1-70,Y1+66,X1-60,Y1+66);
  line(X1-60,Y1+66,X1-60,Y1+69);
  line(X1-70,Y1+69,X1-60,Y1+69);
  line(X1-70,Y1+69,X1-70,Y1+72);
  line(X1-70,Y1+72,X1-60,Y1+72);

  line(X2+70,Y1+9,X2+76,Y1+9);              /* ÀÜ */
  line(X2+73,Y1+10,X2+73,Y1+13);
  line(X2+73,Y1+13,X2+70,Y1+16);
  line(X2+73,Y1+13,X2+76,Y1+16);
  line(X2+80,Y1+9,X2+80,Y1+17);
  line(X2+80,Y1+13,X2+82,Y1+13);
  line(X2+70,Y1+19,X2+70,Y1+25);
  line(X2+70,Y1+25,X2+80,Y1+25);

  ellipse(X2+75,Y1+36,0,360,5,3);             /* À¯ */
  line(X2+70,Y1+42,X2+80,Y1+42);
  line(X2+72,Y1+42,X2+72,Y1+48);
  line(X2+78,Y1+42,X2+78,Y1+48);

  ellipse(X2+75,Y1+58,0,360,5,3);             /* À² */
  line(X2+70,Y1+63,X2+80,Y1+63);
  line(X2+72,Y1+63,X2+72,Y1+65);
  line(X2+78,Y1+63,X2+78,Y1+65);
  line(X2+70,Y1+66,X2+80,Y1+66);
  line(X2+80,Y1+66,X2+80,Y1+69);
  line(X2+70,Y1+69,X2+80,Y1+69);
  line(X2+70,Y1+69,X2+70,Y1+72);
  line(X2+70,Y1+72,X2+80,Y1+72);


  settextstyle(2,0,8);
  outtextxy(X2+20,Y2+46,"(");
  Norm;
  line(X2+33,Y2+50,X2+35,Y2+50);              /* ü */
  line(X2+31,Y2+52,X2+37,Y2+52);
  line(X2+34,Y2+52,X2+34,Y2+60);
  line(X2+31,Y2+66,X2+34,Y2+60);
  line(X2+37,Y2+66,X2+34,Y2+60);
  line(X2+37,Y2+58,X2+39,Y2+58);
  line(X2+39,Y2+50,X2+39,Y2+66);
  line(X2+41,Y2+50,X2+41,Y2+66);

  line(X2+49,Y2+50,X2+49,Y2+58);              /* ¹ø */
  line(X2+49,Y2+54,X2+55,Y2+54);
  line(X2+49,Y2+58,X2+55,Y2+58);
  line(X2+55,Y2+50,X2+55,Y2+58);
  line(X2+57,Y2+54,X2+59,Y2+54);
  line(X2+59,Y2+49,X2+59,Y2+59);
  line(X2+49,Y2+61,X2+49,Y2+66);
  line(X2+49,Y2+66,X2+59,Y2+66);

  line(X2+69,Y2+50,X2+73,Y2+50);              /* ȣ */
  line(X2+66,Y2+52,X2+76,Y2+52);
  ellipse(X2+71,Y2+57,0,360,5,3);
  line(X2+71,Y2+62,X2+71,Y2+66);
  line(X2+66,Y2+66,X2+76,Y2+66);
  settextstyle(2,0,8);
  outtextxy(X2+82,Y2+46,")");


  settextstyle(2,0,8);
  outtextxy(X1+14,Y1+26,"(");
  Norm;
  setcolor(12);
  line(X1+30,Y1+38,X1+40,Y1+38);              /* ½Ç¼± */
  setcolor(15);
  line(X1+53,Y1+30,X1+55,Y1+30);              /* ¤¾ */
  line(X1+51,Y1+32,X1+57,Y1+32);
  ellipse(X1+54,Y1+37,0,360,3,3);
  line(X1+61,Y1+30,X1+61,Y1+39);             /* ¤¿  */
  line(X1+61,Y1+34,X1+63,Y1+34);
  line(X1+51,Y1+42,X1+51,Y1+46);             /* ¤² */
  line(X1+51,Y1+44,X1+60,Y1+44);
  line(X1+51,Y1+46,X1+60,Y1+46);
  line(X1+61,Y1+42,X1+61,Y1+46);

  line(X1+73,Y1+30,X1+73,Y1+33);             /* ¤µ */
  line(X1+70,Y1+37,X1+73,Y1+33);
  line(X1+73,Y1+33,X1+76,Y1+37);
  line(X1+77,Y1+34,X1+79,Y1+34);             /* ¤Ã */
  line(X1+80,Y1+30,X1+80,Y1+37);
  ellipse(X1+75,Y1+44,0,360,5,3);            /* ¤· */

  ellipse(X1+92,Y1+34,0,360,3,4);          /*  ÀÔ */
  line(X1+99,Y1+30,X1+99,Y1+45);
  line(X1+89,Y1+40,X1+89,Y1+46);
  line(X1+99,Y1+40,X1+99,Y1+46);
  line(X1+89,Y1+43,X1+99,Y1+43);
  line(X1+89,Y1+46,X1+99,Y1+46);

  line(X1+108,Y1+30,X1+118,Y1+30);              /* µµ */
  line(X1+108,Y1+30,X1+108,Y1+40);
  line(X1+108,Y1+40,X1+118,Y1+40);
  line(X1+113,Y1+42,X1+113,Y1+44);
  line(X1+108,Y1+45,X1+118,Y1+45);
  outtextxy(X1+128,Y1+25,")");

  settextstyle(2,0,8);
  outtextxy(X1+14,Y1+51,"(");
  setlinestyle(1,0,1);
  line(X1+29,Y1+63,X1+41,Y1+63);              /* Á¡¼± */
  Norm;
  ellipse(X1+54,Y1+59,0,360,3,4);          /*  ÀÔ */
  line(X1+61,Y1+55,X1+61,Y1+63);
  line(X1+51,Y1+65,X1+51,Y1+71);
  line(X1+61,Y1+65,X1+61,Y1+71);
  line(X1+51,Y1+68,X1+61,Y1+68);
  line(X1+51,Y1+71,X1+61,Y1+71);

  line(X1+70,Y1+55,X1+80,Y1+55);              /* µµ */
  line(X1+70,Y1+55,X1+70,Y1+65);
  line(X1+70,Y1+65,X1+80,Y1+65);
  line(X1+75,Y1+67,X1+75,Y1+69);
  line(X1+70,Y1+70,X1+80,Y1+70);

  line(X1+89,Y1+55,X1+89,Y1+61);             /* ¹ü */
  line(X1+95,Y1+55,X1+95,Y1+61);
  line(X1+89,Y1+58,X1+95,Y1+58);
  line(X1+89,Y1+62,X1+95,Y1+62);
  line(X1+96,Y1+59,X1+98,Y1+59);             /* ¤Ã */
  line(X1+99,Y1+54,X1+99,Y1+63);
  line(X1+89,Y1+65,X1+99,Y1+65);
  line(X1+89,Y1+65,X1+89,Y1+70);
  line(X1+99,Y1+65,X1+99,Y1+70);
  line(X1+89,Y1+70,X1+99,Y1+70);

  ellipse(X1+112,Y1+59,0,360,3,3);          /*  ˤ */
  line(X1+108,Y1+65,X1+116,Y1+65);
  line(X1+112,Y1+66,X1+112,Y1+70);
  line(X1+118,Y1+55,X1+118,Y1+70);
  outtextxy(X1+128,Y1+50,")");


  setlinestyle(2,0,8);               /* ¼¼·Î 10µîºÐ */
  for(count=1;count<10;count++) {
     if (count==1 || count == 2){
        line(X1,Y1+count*30,X1+10,Y1+count*30);
        line(X1+140,Y1+count*30,X2,Y1+count*30); }
     else line(X1,Y1+count*30,X2,Y1+count*30);
  }
  setlinestyle(1,0,1);               /* ¼¼·Î 10µîºÐ Á¡¼±*/
  for(count=1;count<11;count++) {
     if (count==2 || count == 3){
        line(X1,Y1+count*30-15,X1+10,Y1+count*30-15);
        line(X1+140,Y1+count*30-15,X2,Y1+count*30-15); }
     else line(X1,Y1+count*30-15,X2,Y1+count*30-15);
       }

  settextstyle(2,0,5);
  outtextxy(X1-28,Y1-5+0*30,"100");  /* Åë°úÀ² ÁÂÇ¥°ª */
  outtextxy(X1-30,Y1-5+1*30," 90");
  outtextxy(X1-30,Y1-5+2*30," 80");
  outtextxy(X1-30,Y1-5+3*30," 70");
  outtextxy(X1-30,Y1-5+4*30," 60");
  outtextxy(X1-30,Y1-5+5*30," 50");
  outtextxy(X1-30,Y1-5+6*30," 40");
  outtextxy(X1-30,Y1-5+7*30," 30");
  outtextxy(X1-30,Y1-5+8*30," 20");
  outtextxy(X1-28,Y1-5+9*30," 10");
  outtextxy(X1-30,Y1-5+10*30,"  0");

  outtextxy(X2+10,Y1-5+0*30,"0  ");  /* ÀÜÀ¯À² ÁÂÇ¥°ª */
  outtextxy(X2+10,Y1-5+1*30,"10 ");
  outtextxy(X2+10,Y1-5+2*30,"20 ");
  outtextxy(X2+10,Y1-5+3*30,"30 ");
  outtextxy(X2+10,Y1-5+4*30,"40 ");
  outtextxy(X2+10,Y1-5+5*30,"50 ");
  outtextxy(X2+10,Y1-5+6*30,"60 ");
  outtextxy(X2+10,Y1-5+7*30,"70 ");
  outtextxy(X2+10,Y1-5+8*30,"80 ");
  outtextxy(X2+10,Y1-5+9*30,"90 ");
  outtextxy(X2+10,Y1-5+10*30,"100");

  setlinestyle(0,0,0);
  fscanf(fp,"%d",&c_count);          /* X ÁÂÇ¥ÁöÁ¡ ÀÔ·Â ¹× Ç¥½Ã */
  setlinestyle(4,0xf18f,1);
  for(count=0;count<c_count;count++){
     fscanf(fp,"%d",&c_x_value[count]);
     if ((2*c_x_value[count]+X1) <= 210){
        line(2*c_x_value[count]+X1,Y1, 2*c_x_value[count]+X1,Y1+20);
        line(2*c_x_value[count]+X1,Y1+80, 2*c_x_value[count]+X1,Y2); }
     else
        line(2*c_x_value[count]+X1,Y1, 2*c_x_value[count]+X1,Y2);
  }

  for(mi=0;mi<3;mi++){                /* »óÇÑ°¡,ÇÏÇÑ°¡,Áß¾Ó°ª ÀÔ·Â¹× Ç¥½Ã */
     for(count=0;count<c_count;count++){
        fscanf(fp,"%d",&c_y_value[count]);
     }
     if (mi==2) {
        setcolor(12);
        setlinestyle(0,0,0);  }
     else {
        setcolor(15);
        setlinestyle(1,0,1);   }
     for(count=0;count<c_count-1;count++){
        line(2*c_x_value[count]+X1,Y2-(3*c_y_value[count]),
        2*c_x_value[count+1]+X1,Y2-(3*c_y_value[count+1]));
        }
  }

  setcolor(15);
  settextstyle(2,0,5);             /* X ÁÂÇ¥¸í ÀÔ·Â */
  for(count=0;count<16;count++){
     fscanf(fp,"%s",lse[count]);
  }

  for(count1=0;count1<16;count1++){  /* X ÁÂÇ¥¸í Ç¥½Ã */
     mz = 0;
     for(count=0;count<5;count++){
        mz = mz +15;
        lyc=lse[count1][count];
        outtextxy(2*c_x_value[count1]+X1-3,Y2+mz,&lyc);
     }
  }

  Thick;
  rectangle(X1,Y1,X2,Y2);            /* Àüü Å׵θ® */
  Norm;

  fclose(fp);
  getch();
/*  printgrscr();*/
  closegraph();
}

main()
{
   graph1();
   graph2();
}