试一下 moving ball

2016-02-19 14:05 4 1 收藏

今天图老师小编要跟大家分享试一下 moving ball,精心挑选的过程简单易学,喜欢的朋友一起来学习吧!

【 tulaoshi.com - 编程语言 】

*******'w'加速,'s'减速,'a','d'转向************#include bios.h
  #include math.h
  #include graphics.h
  #include stdio.h
  #include time.h
  #include dos.h
  #define PI 3.14159265
  #define r 15
  #define c(c) setfillstyle(1,c)main()
  {int x=320,y=240,x0=320,y0=240;float v=0,t=0,a=0;
   char k='0';
   int gdriver=DETECT,gmode;
    initgraph(&gdriver,&gmode,"c:c2gi"); setcolor(15);
  setwritemode(XOR_PUT);while(k!='q')
   {while(bioskey(1)==0)
     {printf("t=%f,v=%f,a=%f(%d,%d)",t,v,a,x,y);
     if(x=0x=639)a=PI-a;if(y=0y=479)a=-a;
     x=v*cos(a)*t+x;y=v*sin(a)*t+y;
      line(x0,y0,x,y);
      circle(x,y,5);
      delay(5000);
      circle(x,y,5);
        x0=x;y0=y;
        t+=0.01;
        }
     k=bioskey(0);
  switch(k)
    {case 'a': a-=0.1;break;
     case 'd': a+=0.1;break;
     case 's': v-=0.1;break;
     case 'w': v+=0.1;break;
    }
  }
  }
  

来源:http://www.tulaoshi.com/n/20160219/1606133.html

延伸阅读
浅谈一下《尘埃3》 首先,我来浅谈一下我对尘埃3的看法。 优点: 1、画面的提升。 2、超酷的游戏菜单。 3、更加真实的车损。 4、感觉回到了肯林麦克雷。 5、车型更多,赛道更酷。 缺点: 1、感觉不如上代2的奔放,第3部激发不起的我的激情,还有轨道设计,想甩尾也不这么容易。 2、赛道短了点,刚开出点感觉就跑完了。 3、感觉有点象F...
一下怎么发布恶搞图片   一下怎么发布恶搞图片?一下是一款互相吐槽、图片恶搞社交应用。发挥无尽的想象,一起来玩耍吧!接下来小编就教大家一下怎么发布恶搞图片。希望可以帮到大家。 1)打开一下后进入主页,点击下方。拍摄照片点击中间红色。 2)调整好照片的大小,点击。跳转到滤镜,选择恶搞笑图片,调整好大小后,...
一下保存原始图片方法   一下保存原始图片方法。是一款朋友之间互相吐槽、恶搞的图片社交软件,处理之后图片原始照片就变了,那么一下哪里设置保存原始图片呢?下面就来教大家保存原始图片的方法。 1)下载并打开一下手机软件,进入后点击右下角人形图标; 2)进入个人编辑界面,点击右上角形设置图标,然后把保存原...
标签: ASP
  <HTML     <HEAD     <TITLEPlace Document Title Here</TITLE     </HEAD     <BODY BGColor=ffffff Text=000000     <%     Set cn = Server.CreateObject("ADODB.Connection&q...
新生婴儿有鼻屎怎么办如何清洁? 刚出生几个月的新生儿发现鼻孔里有积存的鼻屎是需要立即清洁的,否则会堵住鼻孔,新生儿就会呼吸困难。那么清洁新生儿的鼻屎可以用很多种方式。比如可以用湿毛巾外敷鼻翼,让鼻孔内部的鼻屎能够得到充分的软化,再用棉签等在鼻孔里转一转,鼻屎就会轻松的出来。还有可以让新生儿打喷嚏,鼻屎随之会出。最后...

经验教程

106

收藏

90
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部