中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
作者:
标题: TC写的小动画效果 上一主题 | 下一主题
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『楼 主』:  TC写的小动画效果

上传的文件里有3个效果:变幻Delta带影子的    变幻四面体  不同速度随机游动的点

我平常放dos启动盘里,进入dos的时候拿来做屏保啦哈哈。
#include <Conio.h>
#include <graphics.h>
#include <stdlib.h>
#define closegr closegraph
#define NDOT 4


typedef struct
{
   int a,b,x,y;
} 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);
     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],everdot[NDOT];

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

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

    delta(everdot,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++){
    everdot[i].x=snk[i].x;
    everdot[i].y=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;
}
[ Last edited by 523066680 on 2009-9-7 at 01:25 ]

附件 1: TCGRAPH.rar (2009-9-4 00:46, 59.37 K, 下载附件所需积分 1 点 ,下载次数: 132)


综合型编程论坛

我的作品索引
  
2009-9-4 00:43
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 2 楼』:  

………………



综合型编程论坛

我的作品索引
  
2009-9-7 01:25
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
justzero
新手上路




积分 8
发帖 3
注册 2009-9-5
来自 China
状态 离线
『第 3 楼』:  12

不错!

2009-9-11 08:05
查看资料  发短消息 网志   编辑帖子  回复  引用回复
cike09
新手上路





积分 17
发帖 11
注册 2009-9-12
来自 宇宙·······禹州
状态 离线
『第 4 楼』:  

??????????????????

2009-9-12 05:35
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (1144733571)  编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 5 楼』:  

楼上有怀疑就说,发问号很容易被当作恶意灌水并扣分的。



综合型编程论坛

我的作品索引
  
2009-9-12 05:41
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
xugaohui
高级用户




积分 774
发帖 293
注册 2003-4-16
来自 湖北仙桃
状态 离线
『第 6 楼』:  

不能在移动鼠标时退出,不能驻留内存。



下载
09年7月7日 更新
感谢网友 囧HQY 提供空间
2009-9-13 01:02
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 7 楼』:  

学没多久,不会,多多指教啊~
什么是驻留内存



综合型编程论坛

我的作品索引
  
2009-9-14 06:19
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (523066680)  编辑帖子  回复  引用回复
xiaoguizi007
新手上路





积分 8
发帖 4
注册 2010-4-6
状态 离线
『第 8 楼』:  

这么好,看看

2010-4-20 16:22
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
erontec
新手上路





积分 2
发帖 1
注册 2010-2-24
状态 离线
『第 9 楼』:  

这么好,看看

2010-4-20 22:35
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
demonstone
新手上路





积分 2
发帖 1
注册 2010-4-20
状态 离线
『第 10 楼』:  不错

收下了!

2010-4-26 21:05
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
messen
新手上路





积分 17
发帖 8
注册 2010-1-3
状态 离线
『第 11 楼』:  

看看的哦 可惜了 不怎么会用

2010-5-5 18:21
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
atak
新手上路





积分 16
发帖 7
注册 2010-10-18
状态 离线
『第 12 楼』:  

做的不错

2010-10-25 11:47
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
1beyondworld
新手上路





积分 8
发帖 4
注册 2010-8-3
状态 离线
『第 13 楼』:  

不错的方法

2010-11-1 20:52
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wds59211314
新手上路





积分 2
发帖 1
注册 2010-12-14
状态 离线
『第 14 楼』:  

下载来看看,还没看过呢…

2010-12-15 10:30
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
1051093860
初级用户





积分 21
发帖 11
注册 2014-1-18
状态 离线
『第 15 楼』:  

不错!

2015-6-18 21:21
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: