签到

05月06日
尚未签到

共有回帖数 0

    做月子

    等级:
    看看啊
    一群星星在追老鼠!!
    #include DOS.H
    #includegraphics.h
    #includestdlib.h
    #includemath.h
    #define maxcircle 80
    #define CR 1
    main()
    {union REGS r;
    int dr=DETECT,mode=0;
    int mx,my,mc;
    int i, color[maxcircle];
    double fx,fy,force=0;
    double s,x[maxcircle],y[maxcircle];


    initgraph(&dr,&mode,"");
    r.x.ax=0;
    int86(0X33,&r,&r);
    r.x.ax=2;
    int86(0x33,&r,&r);
    for(i=0;imaxcircle;i++)
    {color=random(16)+1;
    x=random(640);
    y=random(480);
    }

    while(!kbhit())
    {
    r.x.ax=3;
    int86(0x33,&r,&r);
    mx=r.x.cx;
    my=r.x.dx;
    mc=r.x.bx;
    for(i=0;imaxcircle;i++)
    {
    fx=mx-x;
    fy=my-y;
    s=sqrt(fx*fx+fy*fy+0.0012);
    if(s!=0)
    {
     setcolor(0);
     setfillstyle(1,0);

    fillellipse(x,y,CR,CR);
    setcolor(color);
    setfillstyle(1,color);

    force=random(30)/(double)10;

    x+=fx/s*force;
    y+=fy/s*force;


    fillellipse(x,y,CR,CR);

    }


    }
    if(mc==1)
    {
    cleardevice();
    for(i=0;imaxcircle;i++)
    {x=random(640);
    y=random(480);
    color=random(16)+1;
    fillellipse(x,y,CR,CR);
    }
    }

    }
    }



    楼主 2016-03-09 12:35 回复

共有回帖数 0
  • 回 帖
  • 表情 图片 视频
  • 发表

登录直线网账号

Copyright © 2010~2015 直线网 版权所有,All Rights Reserved.沪ICP备10039589号 意见反馈 | 关于直线 | 版权声明 | 会员须知