home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c009 / 3.ddi / DIS4.C < prev    next >
Encoding:
C/C++ Source or Header  |  1993-09-25  |  2.6 KB  |  124 lines
  1. #include <stdio.h>
  2. #include <conio.h>
  3. #include <dos.h>
  4. #include <stdlib.h>
  5. #include <ctype.h>
  6. #include <graphics.h>
  7.  
  8. unsigned char cb[1000];
  9. FILE *fp,*fd;      //,*fp1;
  10. //void *men1,*men2,*cx,*cy;
  11.  
  12. void main()
  13. {int /*i,*/ii,/*jj,*/k,kk,x,y,/*cursor,*/x0,y0,x1/*,y1,x2,y2,nn,size*/;
  14.  int gdriver = DETECT, gmode, errorcode;
  15.  long tp,j;
  16.  int xl,yl;
  17.  float f;
  18.  static char chi[]="indj",chd[]="datj";
  19.  unsigned char /*cf[12],*/ca,cc,cz,cs;
  20. // void *men3;
  21.  struct {long db; int da;} ind;
  22.  
  23. /* printf("**  open [dat?]  [ind?]  ");
  24.  scanf("%c",&cs);
  25.  chi[3]=chd[3]=cs;*/
  26.  printf("\n\n\nPlease enter the code [1601-8794] :");
  27.  scanf("%d",&ii);
  28.  if (ii>8794) ii=1601;
  29.  if (ii<1601) ii=1601;
  30.  if (ii%100>94)
  31.    if (ii/100<87) ii=(ii/100+1)*100;
  32.    else ii=1601;
  33.  
  34.  errorcode = registerfarbgidriver(EGAVGA_driver_far);
  35.  if (errorcode < 0)
  36.  {
  37.     printf("Graphics error: %s\n", grapherrormsg(errorcode));
  38.     printf("Press any key to halt:");
  39.     getch();
  40.     exit(1);
  41.  }
  42.  errorcode = registerfarbgifont(triplex_font_far);
  43.  if (errorcode < 0)
  44.  {
  45.     printf("Graphics error: %s\n", grapherrormsg(errorcode));
  46.     printf("Press any key to halt:");
  47.     getch();
  48.     exit(1);
  49.  }
  50.  
  51.  initgraph(&gdriver, &gmode, "");
  52.  errorcode = graphresult();
  53.  if (errorcode != grOk)
  54.  {
  55.     printf("Graphics error: %s\n", grapherrormsg(errorcode));
  56.     printf("Press any key to halt:");
  57.     getch();
  58.     exit(1);
  59.  }
  60.  setbkcolor(1);
  61.  fp=fopen(chi,"rb");
  62.  fd=fopen(chd,"rb");
  63.  
  64.  for(kk=ii; kk<=8794; kk++)
  65.   {cleardevice();
  66.    setlinestyle(SOLID_LINE,0,THICK_WIDTH);
  67.    rectangle(0,0,getmaxx(),getmaxy());
  68.    setlinestyle(SOLID_LINE,0,NORM_WIDTH);
  69.    rectangle(4,3,getmaxx()-4,getmaxy()-3);
  70.    getaspectratio(&xl,&yl);
  71.    f=((float) yl )/((float) xl);
  72.    j=kk;
  73.    tp=j*6;
  74.    fseek(fp,tp,0);
  75.    fread(&ind,6,1,fp);
  76.    fseek(fd,ind.db,0);
  77.    fread(cb,ind.da,1,fd);
  78.    ca=cb[0];
  79.    cc=cb[1];
  80.    x=1.85*ca*f+50;
  81.    y=1.85*cc;
  82.    x0=x;
  83.    y0=y;
  84.    moveto(x,y);
  85.    k=ind.da/2;
  86.    for(x1=1; x1<k; x1++)
  87.     { ca=cb[2*x1];
  88.       cc=cb[2*x1+1];
  89.       if(ca==0xff && cc==0xff)
  90.        { x1++;
  91.      ca=cb[2*x1];
  92.      cc=cb[2*x1+1];
  93.      x=1.85*ca*f+50;
  94.      y=1.85*cc;
  95.      if(cs>'e') lineto(x0,y0);
  96.      x0=x;
  97.      y0=y;
  98.      moveto(x,y);
  99.      continue;
  100.        }
  101.       x=1.85*ca*f+50;
  102.       y=1.85*cc;
  103.       lineto(x,y);
  104.      }
  105.     if(cs>'e') lineto(x0,y0);
  106.     cz=getch();
  107. /*    free(men1);
  108.     free(men2);
  109.     free(cx);
  110.     free(cy);*/
  111.     if(cz==0x1b) break;
  112.     if (kk%100>93)
  113.     if (kk/100<87) kk=(kk/100+1)*100;
  114.     else kk=1601;
  115.     if (ii>8794) ii=1601;
  116.     if (ii<1601) ii=1601;
  117.   }
  118.   fcloseall();
  119.   closegraph();
  120. }
  121.  
  122.  
  123.  
  124.