标题:一个模拟自然云朵的C程序(转载) 实在是漂亮!!!
只看楼主
mkmny
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2004-8-17
得分:0 

仔细分析了一下这个程序(虽不能完全看懂……),这似乎,好像,的确绘出的是一张静态图。按理说不会有什么变化的呀!

忆楠:你到底是怎么看到变化的?仔细说一说吧。(不过你是不是有必要好好休息一下,盯着屏幕时间太久了吧)


2004-08-21 09:31
qingwashaoye
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2004-8-27
得分:0 
good,like
2004-08-28 00:43
忆楠
Rank: 1
等 级:新手上路
帖 子:721
专家分:0
注 册:2004-7-5
得分:0 
不行了  让大家见笑了   明天我去配一副老花镜```

点 鼠 标 , 救 饥 民 http://www./
2004-08-30 19:49
海蓝
Rank: 1
等 级:新手上路
帖 子:121
专家分:0
注 册:2004-8-6
得分:0 

缺乏动感。。

没有什么变化。

2004-08-31 08:41
sunwear
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2004-8-15
得分:0 
你们都是用什么编的啊  为什么我用turbo c 2.0 和cygwin的gcc 全都提示错误呢
2004-08-31 09:44
smallstar
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2004-8-31
得分:0 

我加了一些注释,还没有看完,有点难,还要懂汇编和微机原理

希望有人合作把这个程序注释完。这个程序真的还很好的。

#include <stdio.h> #include <dos.h> #include <math.h> long Addr[768]; int Mode; /* REGS的定义(在dos.h中):    struct WORDREGS{unsigned int ax, bx, cx, dx, si, di, cflag, flags;}    struct BYTEREGS{unsigned char al, ah, bl, bh, cl, ch, dl, dh;}    union REGS{struct WORDREGS x;struct BYTEREGS h;} 头文件:dos.h */

Set_Mode (int mode) { union REGS r; /*REGS在哪定义的?原形是怎么样的??*/ r.h.ah=0; r.h.al=mode; int86 (0x10,&r,&r); /*这个函数的功能?是通用8086软中断接口*/ }

/*功能 入口参数 出口参数 INT 10H 的 00H功能 设置显示模式 AH = 00H   AL = 模式(如果位 7 置位,则不清除显示缓冲区) */

Set_Graphics_Mode (unsigned x,unsigned y) { long i; if ((x<321)&&(y<201)) { Set_Mode (0x13); Mode=0x13; for (i=0;i<200;i++) Addr[i]=320*i; } else if ((x<641)&&(y<401)) { Set_Mode (0x5c); Mode=0x5c; for (i=0;i<400;i++) Addr[i]=640*i; } else if ((x<641)&&(y<481)) { Set_Mode (0x5d); Mode=0x5d; for (i=0;i<480;i++) Addr[i]=640*i; } else if ((x<641)&&(y<481)) { Set_Mode (0x5d); Mode=0x5d; for (i=0;i<480;i++) Addr[i]=640*i; } else if ((x<801)&&(y<601)) { Set_Mode (0x5e); Mode=0x5e; for (i=0;i<600;i++) Addr[i]=800*i; } else if ((x<1025)&&(y<769)) { Set_Mode (0x62); Mode=0x62; for (i=0;i<768;i++) Addr[i]=1024*i; } else { Set_Mode (3); printf ("Not support this mode .\n"); getch (); } }/*显示模式设置完成*/

/* 函数名: int86x 功 能: 通用8086软中断接口 用 法: int int86x(int intr_num, union REGS *insegs, union REGS *outregs, struct SREGS *segregs); SREGS 的定义: struct SREGS {unsigned int es,cs,ss,ds}    */ set_pattern () { int i; unsigned char pat[256][3]; struct SREGS inreg; union REGS reg;

pat[0][0]=0;pat[0][1]=0;pat[0][2]=0; for (i=1;i<=255;i++) { pat[i][0]=(unsigned char)((float)(abs(i-127)*63)/127.0+0.5); pat[i][1]=(unsigned char)((float)(abs(i-127)*63)/127.0+0.5); pat[i][2]=63; } reg.x.ax=0x1012; reg.x.bx=0; reg.x.cx=256; reg.x.dx=FP_OFF(pat); inreg.es=FP_SEG(pat); int86x (0x10,&reg,&reg,&inreg); }

plot (int x,int y,unsigned char color) { long offset; char Page; unsigned char far *address; switch (Mode) { case 0x13: offset=Addr[y]+x; address=(unsigned char far *)(0xa0000000L+offset); *address=color; break; case 0x5c: case 0x5d: case 0x5e: offset=Addr[y]+x; Page=(offset>>16); outportb (0x3c4,0xe); outportb (0x3c5,Page^0x02); offset=offset&65535; address=(unsigned char far *)(0xa0000000L+offset); *address=color; break; case 0x62: offset=Addr[y]+x; Page=y>>6; outportb (0x3c4,0xe); outportb (0x3c5,Page^0x02); offset=offset&65535; address=(unsigned char far *)(0xa0000000L+offset); *address=color; break; default: break; } }

get_pixel (int x,int y) { long offset; char Page; unsigned char far *address; unsigned char color; switch (Mode) { case 0x13: offset=Addr[y]+x; address=(unsigned char far *)(0xa0000000+offset); color=*address; break; case 0x5c: case 0x5d: case 0x5e: offset=Addr[y]+x; Page=(offset>>16); outportb (0x3c4,0xe); outportb (0x3c5,Page^0x02); offset=offset&65535; address=(unsigned char far *)(0xa0000000L+offset); color=*address; break; case 0x62: offset=Addr[y]+x; Page=y>>6; outportb (0x3c4,0xe); outportb (0x3c5,Page^0x02); offset=offset&65535; address=(unsigned char far *)(0xa0000000L+offset); color=*address; break; default: break; } return (color); }

randint (unsigned int range) { float sigma=423.1966; static double OldRand=0.4231967; double temp; temp=sigma*OldRand; OldRand=temp-(int)temp; return (int)(OldRand*(float)range); }

void New_Col (int xa,int ya,int x,int y,int xb,int yb) { unsigned int color; color=abs(xa-xb)+abs(ya-yb); color=randint(color<<1)-color; color=color+(get_pixel(xa,ya)+get_pixel(xb,yb)+1)>>1; if (color<1) color=1; else if (color>255) color=255; if ((get_pixel(x,y)==0)) plot (x,y,color); }

void Sub_Divide (int x1,int y1,int x2,int y2) { int x,y; unsigned char color; if (!((x2-x1<2)&&(y2-y1<2))) { x=(x1+x2)>>1; y=(y1+y2)>>1; New_Col (x1,y1,x,y1,x2,y1); New_Col (x2,y1,x2,y,x2,y2); New_Col (x1,y2,x,y2,x2,y2); New_Col (x1,y1,x1,y,x1,y2); color=(get_pixel(x1,y1)+get_pixel(x2,y1)+get_pixel(x2,y2)+get_pixel (x1,y2)+2)>>2; plot (x,y,color); Sub_Divide (x1,y1,x,y); Sub_Divide (x,y1,x2,y); Sub_Divide (x,y,x2,y2); Sub_Divide (x1,y,x,y2); } }

main () { int x,y; x=320;y=200; Set_Graphics_Mode (x,y); set_pattern (); plot (0,0,randint(254)+1); plot (x-1,0,randint(254)+1); plot (x-1,y-1,randint(254)+1); plot (0,y-1,randint(254)+1); Sub_Divide (0,0,x-1,y-1); getch(); Set_Mode (0x03); }

2004-09-01 09:54
mkmny
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2004-8-17
得分:0 

还要懂汇编和微机原理?哦,我的天哟!!!××××××××××

看来我至少要等到大三才能看懂这个程序了。


2004-09-14 12:20
冰河2004
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2004-12-22
得分:0 

我拿回家去是试试啊

2004-12-26 22:43
ma1394230111
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2012-2-24
得分:0 
这个代码不能用VC6.0运行吗?新手求照顾!
2012-11-05 18:15
monkey11
Rank: 1
等 级:新手上路
帖 子:19
专家分:4
注 册:2012-10-29
得分:0 
为啥我用vc++运行不了啊,好多错误
2012-11-16 12:10



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-4348-1-1.html




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

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