| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 953 人关注过本帖
标题:[原创]变幻的四面体
只看楼主 加入收藏
if_exist
Rank: 2
等 级:论坛游民
帖 子:86
专家分:41
注 册:2009-4-20
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:3 
[原创]变幻的四面体
win-tc下编译通过
程序代码:
#include <Conio.h>
#include <graphics.h>
#include <stdlib.h>
#define closegr closegraph
#define NDOT 4


typedef struct
{
   int a,b,x,y,tx,ty;
} DotInf;


void initgr(void) /* BGI初始化 */
{
  int gd = DETECT, gm = 0;
  registerbgidriver(EGAVGA_driver);
  initgraph(&gd, &gm, "");
}

void delta(DotInf dot[],int c)
{
   int i,j;
   setcolor(c);
   if (c==0)
   {
     for (i=0;i<NDOT;i++)
       for (j=i+1;j<NDOT;j++) line(dot[i].tx,dot[i].ty,dot[j].tx,dot[j].ty);
   }
   else
   {
     for (i=0;i<NDOT;i++)
       for (j=i+1;j<NDOT;j++) line(dot[i].x,dot[i].y,dot[j].x,dot[j].y);
   }

}

int main(void)
{
  int i,j,whi=0;
  DotInf snk[NDOT];

  initgr(); /* BGI初始化 */

  for (i=0;i<NDOT;i++) {
   snk[i].a=snk[i].b=snk[i].x=snk[i].y=200;
  }
  randomize();
  while (!kbhit())
  {
    if (whi<NDOT) whi++; else whi=0;
    for (i=0;i<350;i++) delay(10);

    delta(snk,0);
    delta(snk,2);

    for (i=0;i<NDOT;i++){
      if ((snk[i].x==snk[i].a)&&(snk[i].y==snk[i].b)){
         snk[i].a=rand()%600+1;
         snk[i].b=rand()%400+20;
      }
    }
    for (i=0;i<NDOT;i++){
    snk[i].tx=snk[i].x;
    snk[i].ty=snk[i].y;
    if (whi>i) continue;
       if (snk[i].x>snk[i].a)
         snk[i].x--;
       else if (snk[i].x<snk[i].a)
         snk[i].x++;
       else
       {
           if (snk[i].y>snk[i].b)
             snk[i].y--;
           else if (snk[i].y<snk[i].b)
             snk[i].y++;
       }
    }


  }

  getch();
  closegr(); /* 恢复TEXT屏幕模式 */
  return 0;
}




[[it] 本帖最后由 if_exist 于 2009-7-25 09:30 编辑 [/it]]
搜索更多相关主题的帖子: 四面体 变幻 
2009-07-25 09:26
if_exist
Rank: 2
等 级:论坛游民
帖 子:86
专家分:41
注 册:2009-4-20
收藏
得分:0 
不会吧~ 居然没人回贴....真失败

open-gl
2009-07-26 09:41
xiaoyong12
Rank: 2
等 级:论坛游民
帖 子:25
专家分:14
注 册:2008-9-12
收藏
得分:14 
哈哈,我顶 ----批处理之家   兄弟伙
2009-08-01 00:03
wsj3000
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:78
专家分:161
注 册:2009-8-4
收藏
得分:0 
我也顶....虽然我使用gcc~~~~~~
2009-08-26 09:37
快速回复:[原创]变幻的四面体
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.502177 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved