10-2.c

来自「《C语言程序设计实训》第十章」· C语言 代码 · 共 59 行

/*10-2.c*/
#include<graphics.h>
#include<stdlib.h>
#include<conio.h>
main()
{
int driver,mode,k=0,i;
int m,ml;
int maxx,mayy,size;
void *buf;
driver=DETECT;
mode=0;
initgraph(&driver,&mode,"");
maxx=getmaxx();
mayy=getmaxy();
setfillstyle(SOLID_FILL,LIGHTGRAY);
bar(1,1,maxx,mayy);
setcolor(RED);
for(i=0;i<=10;i++)
circle(150,150,i);
size=imagesize(100,100,250,200);
if(size!=-1)
 buf=(void *)malloc(size);
if(buf)
{
getimage(100,100,250,200,buf);
m=120;ml=m;
do{
  k=k+1;
  if((ml+100)>mayy)
  {
  for(m=m+30;m<maxx;m=m+30)
  {
  ml=ml-20;
  putimage(m,ml,buf,COPY_PUT);
  }
  }
  if((m+100)>maxx)
  {
  m=m-100;
  for(ml=ml+100;ml>=1;ml=ml-10)
  {
  m=m-19;
  putimage(m,ml,buf,COPY_PUT);
  }
  for(m=m;m>=1;m=m-30)
  {
  ml=ml-17;
  putimage(m,ml,buf,COPY_PUT);
  }
  }
  ml=ml+20;m=m+20;
  putimage(m,ml,buf,COPY_PUT);
  }while(k!=1000);
  getch();
  }
  restorecrtmode();
}