2、 *** 空间流星雨代码
3、流星雨的源程序
用C语言?
楼主还是自己写吧!相信会很有提高。
我只给个提示:
在字符界面的程序里,有两种方式可以用来控制字符在屏幕上的位置
1.cprintf之类的函数,可以指定位置、字符属性地在屏幕上显示字符串。
2.直接写屏技术。原理就是直接写字符屏幕缓冲区地址。屏幕上的字符与内存的特定地位一一对应。内存里写什么内容,屏幕上就显示什么内容。
*** 空间留言代码
[B][fts=6][ftc=#37B400]*[/ft]
[B][fts=6][ftc=#37B400]*[/ft] *** 空间留言代码
[B][fts=6][ftc=#37B400]*[/ft]
[M][B][ftc=#EE1000] .*★.[/ft]
[B][ftc=#F79700] · * . ` ★ [/ft]
[B][ffg,#FFF100,#FFFFFF] ★ * [/ft]
[B][ffg,#37B400,#FFFFFF] ★ .’[/ft]
[B][ftc=#00A99E] ‘*. . [/ft] *** 空间留言代码
[B][ffg,#438CCB,#FFFFFF] ` . . [/ft]
*** 空间留言代码 [ffg,#EE1000,#FFFFFF]≈;霸占祢啲.嘴°〔.止侑莪蓜).![/ft] [M][B][fts=6][ftc=#ED008C]*[/ft][/ft][ftc=#F49BC1]MuMa、[/ft][fts=6][ffg,#FF3399,#FF3399] 旭、ノ [/ft][/ft][/B][/M]
*** 空间留言代码
以下是原代码:
#includeconio.h
#includedos.h
#includestdlib.h
main()
{char screen[24][80],e[10];
int i,j,k,l,m,n,t=0,a[10],b[10],c[10],d[10],f[10]={0};
randomize();
for(i=0;i24;i++)
for(j=0;j80;j++)
{if(i19){screen[j]='';printf(" ");}
else{screen[j]='#';textcolor(GREEN);cprintf("%c",screen[j]);}
do{for(i=0;i10;i++)
{c=random(4)+1;d=random(16);b=0;}
a[0]=random(80);j=0;
do{k=random(80);j++;l=3;
for(i=0;ij;i++)
if(k==a){j--;l=2;break;}
if(l==2)continue;a=k;
}while(i9);
for(i=0;i9;i++)
{e=random(26)+'A';gotoxy(a+1,b+1);
textcolor(d);cprintf("%c",e);f=0;}
for(j=0;j24;j++)
for(i=0;i10;i++)
if(f!=1)
{delay(5000);gotoxy(a+1,b+1);printf(" ");b=b+c;
l=(c19-b)?c:(19-b);
for(m=1;ml;m++)
{n=b+m-c;gotoxy(a+1,n+1);textcolor(d);
cprintf("%c",e);gotoxy(a+1,n+1);printf(" ");}
if(b19){textcolor(d);gotoxy(a+1,b+1);cprintf("%c",e);}
else{for(m=0,k=a;m5;m++)
if(screen[19+m][k]=='#')
{screen[19+m][k]='';gotoxy(k+1,20+m);printf(" ");f=1;break;}
else{gotoxy(k+1,m+20);textcolor(d);cprintf("%c",e);
gotoxy(k+1,m+20);printf(" ");}
for(k=0;k80;k++)
if(screen[23][k]==''){t=1;break;}
}while(t!=1);
sum=0//定义数据变量sum的初始值为0;
_root.onEnterFrame=function()//onEnterFrame逐帧触发(循环)函数,_root代表场景,整句就是场景逐帧循环执行下面的语句。
num=6+random(10);//定义数据变量num,并赋值;random()随机函数,random(10)一次随机一个0~9的正整数。6+random(10)等于随机6~15的正整数。
for(i=0;inum;i++)//for循环函数。语法:for(初始化;循环条件;步进){执行语句};
{ tmp=sum+i;//定义tmp并赋值sum+i的值;
star._rotation=random(40)*9;//_rotation为元件的旋转角度。整句为随机0~39一个正整数的9倍值赋值给star元件的旋转角度
star.duplicateMovieClip("star"+tmp,tmp);//duplicateMovieClip复制star元件为"star"+tmp实例名元件,深度为tmp;
sum=sum+tmp;//sum相加+tmp并赋值给sum;
htmlstyle type="text/css"
body {
background-color: #000000;
/style
Body
script language="JavaScript"
if (document.all){
Cols=60;
Cl=20;//Space's are included so real length is 48!
Cs=20;
Ts=20;
Tc='#008800';
Tc1='#00ff00';
MnS=20;
MxS=30;
I=Cs;
Sp=new Array();S=new Array();Y=new Array();
C=new Array();M=new Array();B=new Array();
RC=new Array();E=new Array();Tcc=new Array(0,1);
document.write(" div id='Container' style='position:absolute;top:0;left:-"+Cs+"'");
document.write(" div style='position:relative'");
for(i=0; i Cols; i++){
S[i]=I+=Cs;
document.write(" div id='A' style='position:absolute;top:0;font-family:Arial;font-size:"
+Ts+"px;left:"+S[i]+";width:"+Ts+"px;height:0px;color:"+Tc+";visibility:hidden' /div");
document.write(" /div /div");
for(j=0; j Cols; j++){
RC[j]=1+Math.round(Math.random()*Cl);
Y[j]=0;
Sp[j]=Math.round(MnS+Math.random()*MxS);
for(i=0; i RC[j]; i++){
B[i]='';
C[i]=Math.round(Math.random()*1)+' ';
M[j]=B[0]+=C[i];
function Cycle(){
Container.style.top=window.document.body.scrollTop;
for (i=0; i Cols; i++){
var r = Math.floor(Math.random()*Tcc.length);
E[i] = ' font color='+Tc1+''+Tcc[r]+' /font';
Y[i]+=Sp[i];
if (Y[i] window.document.body.clientHeight){
for(i2=0; i2 Cols; i2++){
RC[i2]=1+Math.round(Math.random()*Cl);
for(i3=0; i3 RC[i2]; i3++){
B[i3]='';
C[i3]=Math.round(Math.random()*1)+' ';
C[Math.floor(Math.random()*i2)]=' '+' ';
M[i]=B[0]+=C[i3];
Y[i]=-Ts*M[i].length/1.5;
A[i].style.visibility='visible';
Sp[i]=Math.round(MnS+Math.random()*MxS);
A[i].style.top=Y[i];
A[i].innerHTML=M[i]+' '+E[i]+' ';
setTimeout('Cycle()',20)
Cycle();
/script
/body
/html
演示地址:
http://www.toto369.net/jdtx/hkdg.htm
网上找的代码,我给你改了下
http://imgfree.21cn.com/free/flash/110.swf红色箭头 http://imgfree.21cn.com/free/flash/142.swf星星 http://imgfree.21cn.com/free/flash/143.swf一颗大心 http://imgfree.21cn.com/free/flash/140.swf蒲公英 http://imgfree.21cn.com/free/flash/148.swf白色泡泡 http://imgfree.21cn.com/free/flash/149.swf白色心 http://imgfree.21cn.com/free/flash/150.swf红色的心下降 http://imgfree.21cn.com/free/flash/151.swf白色星星 http://imgfree.21cn.com/free/flash/152.swf美女坐在月亮上面 http://imgfree.21cn.com/free/flash/153.swf一瓶子的心 http://imgfree.21cn.com/free/flash/154.swf几枝粉色的花 http://imgfree.21cn.com/free/flash/155.swf流星雨 http://imgfree.21cn.com/free/flash/158.swf向上飘的白色心 http://imgfree.21cn.com/free/flash/161.swf一篮子心 http://imgfree.21cn.com/free/flash/162.swf掉下来的小串串 http://imgfree.21cn.com/free/flash/163.swf彩色齿轮 http://imgfree.21cn.com/free/flash/167.swf稻草人 http://imgfree.21cn.com/free/flash/166.swf蓝色大海 http://imgfree.21cn.com/free/flash/169.swf风车 http://imgfree.21cn.com/free/flash/170.swf弹吉他的人 http://imgfree.21cn.com/free/flash/171.swf美女弹吉他 http://imgfree.21cn.com/free/flash/174.swf水泡泡 http://imgfree.21cn.com/free/flash/175.swf小娃娃 http://imgfree.21cn.com/free/flash/176.swf水泡泡 http://imgfree.21cn.com/free/flash/178.swf大树叶子 http://imgfree.21cn.com/free/flash/182.swf Congratulation! http://imgfree.21cn.com/free/flash/185.swf粉色心门 http://imgfree.21cn.com/free/flash/186.swf很多绿色萤火虫 http://imgfree.21cn.com/free/flash/188.swf圣诞 http://imgfree.21cn.com/free/flash/195.swf空心 http://imgfree.21cn.com/free/flash/197.swf三颗紫色心 http://imgfree.21cn.com/free/flash/199.swf红色心向上飞 http://imgfree.21cn.com/free/flash/198.swf红色圈圈心 http://imgfree.21cn.com/free/flash/196.swf *** 心 http://imgfree.21cn.com/free/flash/204.swf洗澡娃娃 http://imgfree.21cn.com/free/flash/205.swf巧克力蛋糕未打开 http://imgfree.21cn.com/free/flash/206.swf巧克力蛋糕咬了一口 http://imgfree.21cn.com/free/flash/207.swf巧克力蛋糕很多 http://imgfree.21cn.com/free/flash/209.swf两个红气球跳动
#include stdio.h
#include string.h
#include stdlib.h
#include conio.h#define STARNUM 2
#define STARCHAR '*'void main()
int starx[STARNUM], stary[STARNUM];
int i, dir, len;clrscr();
for( i = 0; i STARNUM; i++ ) {
starx[i] = -1;
stary[i] = -1;
}srand(time(0));
while( !kbhit() ) { for( i = 0; i STARNUM; i++ ) {
if( starx[i] == -1 random(3) == 0 ) {
starx[i] = 1+random(256)%80;
stary[i] = 1+random(256)%25;
} if( starx[i] 0 ) {
dir = 1-random(2)*2;
len = 8+random(256)%20;
while( len 0 starx[i] 0 starx[i] 80 ) {
gotoxy(starx[i]-dir*2, stary[i]);
printf(" ");
gotoxy(starx[i], stary[i]);
putchar(STARCHAR);
gotoxy(starx[i]-dir, stary[i]);
putchar('-');
delay(15000); starx[i] += dir;
len--;
} if( dir0) gotoxy(starx[i]-dir*2, stary[i]);
else gotoxy(starx[i], stary[i]);
printf(" ");
starx[i] = -1;
gotoxy(0,0);
sleep(1);
clrscr();}}
#include windows.h #define ID_TIMER 1
#define STRMAXLEN 25 //一个显示列的更大长度
#define STRMINLEN 8 //一个显示列的最小长度 LRESULT CALLBACK WndProc (HWND, UINT, WPARAM, LPARAM) ;
typedef struct tagCharChain //整个当作屏幕的一个显示列,这是个双向列表
struct tagCharChain *prev; //链表的前个元素
TCHAR ch; //一个显示列中的一个字符
struct tagCharChain *next; //链表的后个元素
}CharChain, *pCharChain; typedef struct tagCharColumn
CharChain *head, *current, *point;
int x, y, iStrLen; //显示列的开始显示的x,y坐标,iStrLen是这个列的长度
int iStopTimes, iMustStopTimes; //已经停滞的次数和必须停滞的次数,必须停滞的次数是随机的
}CharColumn, *pCharColumn; int main(HINSTANCE hInstance, HINSTANCE hPrevInstance,
PSTR szCmdLine, int iCmdShow)
static TCHAR szAppName[] = TEXT ("matrix") ;
HWND hwnd ;
MSG msg ;
WNDCLASS wndclass ; wndclass.style = CS_HREDRAW | CS_VREDRAW ;
wndclass.lpfnWndProc = WndProc ;
wndclass.cbClsExtra = 0 ;
wndclass.cbWndExtra = 0 ;
wndclass.hInstance = hInstance ;
wndclass.hIcon = LoadIcon (NULL, IDI_APPLICATION) ;
wndclass.hCursor = LoadCursor (NULL, IDC_ARROW) ;
wndclass.hbrBackground = (HBRUSH) GetStockObject (BLACK_BRUSH) ;
wndclass.lpszMenuName = NULL ;
wndclass.lpszClassName = szAppName ; if(!RegisterClass (wndclass))
MessageBox (NULL, TEXT ("此程序必须运行在NT下!"), szAppName, MB_ICONERROR) ;
return 0;
} hwnd = CreateWindow (szAppName, NULL,
WS_DLGFRAME | WS_THICKFRAME | WS_POPUP,
0, 0,
GetSystemMetrics( *** _CXSCREEN), GetSystemMetrics( *** _CYSCREEN),
NULL, NULL, hInstance,
NULL) ; ShowWindow (hwnd, SW_SHOWMAXIMIZED) ; //更大化显示
UpdateWindow (hwnd) ;
ShowCursor(FALSE); //隐藏鼠标光标
srand ((int) GetCurrentTime ()) ; //初始化随机数发生器
while (GetMessage (msg, NULL, 0, 0))
TranslateMessage (msg) ;
DispatchMessage (msg) ;
ShowCursor(TRUE); //显示鼠标光标
return msg.wParam ;
} TCHAR randomChar() //随机字符产生函数
return (TCHAR)(rand()%(126-33)+33); //33到126之间
} int init(CharColumn *cc, int cyScreen, int x) //初始化
int j;
cc-iStrLen = rand()%(STRMAXLEN-STRMINLEN) + STRMINLEN; //显示列的长度
cc-x = x+3 ; //显示列的开始显示的x坐标
cc-y =rand()%3?rand()%cyScreen:0; //显示列的开始显示的y坐标
cc-iMustStopTimes = rand()%6 ;
cc-iStopTimes = 0 ;
cc-head = cc-current =
(pCharChain)calloc(cc-iStrLen, sizeof(CharChain)); //生成显示列
for(j=0; jcc-iStrLen-1; j++)
cc-current-prev = cc-point; //cc-point一个显示列的前个元素
cc-current-ch = '\0';
cc-current-next = cc-current+1; //cc-current+1一个显示列的后个元素
cc-point = cc-current++; //cc-point = cc-current; cc-current++;
cc-current-prev = cc-point; //最后一个节点
cc-current-ch = '\0';
cc-current-next = cc-head; cc-head-prev = cc-current; //头节点的前一个为此链的最后一个元素 cc-current = cc-point = cc-head; //free掉申请的内存要用current当参数
cc-head-ch = randomChar(); // 对链表头的 元素填充
return 0;
} LRESULT CALLBACK WndProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
HDC hdc ;
//ctn 用来确定一个显示链是否 向下前进,如果等待次数超过必须等待的次数,ctn就代表要向下前进
int i, j, temp, ctn; //j为一个显示链中除链表头外的在屏幕上显示的y坐标,temp绿色过度到黑色之用
static HDC hdcMem;
HFONT hFont;
static HBITMAP hBitmap;
static int cxScreen, cyScreen; //屏幕的宽度 高度.
static int iFontWidth=10, iFontHeight=15, iColumnCount; //字体的宽度 高度, 列数
static CharColumn *ccChain; switch (message)
case WM_CREATE:
cxScreen = GetSystemMetrics( *** _CXSCREEN) ; //屏幕宽度
cyScreen = GetSystemMetrics( *** _CYSCREEN) ;
SetTimer (hwnd, ID_TIMER, 10, NULL) ; hdc = GetDC(hwnd);
hdcMem = CreateCompatibleDC(hdc);
hBitmap = CreateCompatibleBitmap(hdc, cxScreen, cyScreen);
SelectObject(hdcMem, hBitmap);
ReleaseDC(hwnd, hdc);
//创建字体
hFont = CreateFont(iFontHeight, iFontWidth-5, 0, 0, FW_BOLD, 0, 0, 0,
DEFAULT_CHARSET, OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS,
DRAFT_QUALITY, FIXED_PITCH | FF_SWISS, TEXT("Fixedsys"));
SelectObject(hdcMem, hFont);
DeleteObject (hFont) ;
SetBkMode(hdcMem, TRANSPARENT); //设置背景模式为 透明
iColumnCount = cxScreen/(iFontWidth*3/2); //屏幕所显示字母雨的列数 ccChain = (pCharColumn)calloc(iColumnCount, sizeof(CharColumn));
for(i=0; iiColumnCount; i++)
init(ccChain+i, cyScreen, (iFontWidth*3/2)*i);
return 0 ; case WM_TIMER:
hdc = GetDC(hwnd);
PatBlt (hdcMem, 0, 0, cxScreen, cyScreen, BLACKNESS) ; //将内存设备映像刷成黑色
for(i=0; iiColumnCount; i++)
ctn = (ccChain+i)-iStopTimes++ (ccChain+i)-iMustStopTimes;
(ccChain+i)-point = (ccChain+i)-head; //point用于遍历整个显示列
//之一个字符显示为 白色
SetTextColor(hdcMem, RGB(255, 255, 255));
TextOut(hdcMem, (ccChain+i)-x, (ccChain+i)-y, ((ccChain+i)-point-ch), 1);
j = (ccChain+i)-y;
(ccChain+i)-point = (ccChain+i)-point-next;
//遍历整个显示列,将这个显示列里的字符从下往上显示
temp = 0 ; //temp绿色过度到黑色之用
while((ccChain+i)-point != (ccChain+i)-head (ccChain+i)-point-ch)
SetTextColor(hdcMem, RGB(0, 255-(255*(temp++)/(ccChain+i)-iStrLen), 0));
TextOut(hdcMem, (ccChain+i)-x, j-=iFontHeight, ((ccChain+i)-point-ch), 1);
(ccChain+i)-point = (ccChain+i)-point-next;
if(ctn)
(ccChain+i)-iStopTimes = 0 ;
else continue;
(ccChain+i)-y += iFontHeight; //下次开始显示的y坐标 为当前的y坐标加上 一个字符的高度
//如果开始显示的y坐标减去 整个显示列的长度超过了屏幕的高度
if( (ccChain+i)-y-(ccChain+i)-iStrLen*iFontHeight cyScreen)
free( (ccChain+i)-current );
init(ccChain+i, cyScreen, (iFontWidth*3/2)*i);
//链表的头 为此链表的前个元素,因为下次开始显示的时候 就相当与在整个显示列的开头添加个元素,然后在开始往上显示
(ccChain+i)-head = (ccChain+i)-head-prev;
(ccChain+i)-head-ch = randomChar();
BitBlt(hdc, 0, 0, cxScreen, cyScreen, hdcMem, 0, 0, SRCCOPY);
ReleaseDC(hwnd, hdc);
return 0; case WM_RBUTTONDOWN:
KillTimer (hwnd, ID_TIMER) ;
return 0; case WM_RBUTTONUP:
SetTimer (hwnd, ID_TIMER, 10, NULL) ;
return 0; //处理善后工作
case WM_KEYDOWN:
case WM_LBUTTONDOWN:
case WM_DESTROY:
KillTimer (hwnd, ID_TIMER) ;
DeleteObject(hBitmap);
DeleteDC(hdcMem);
for(i=0; iiColumnCount; i++)
free( (ccChain+i)-current );
free(ccChain);
PostQuitMessage (0) ;
return 0 ;
return DefWindowProc (hwnd, message, wParam, lParam) ;
这有个数字雨的代码,看能帮助你不!
各金店本日 黄金价钱 查询:本日 黄金价钱 若干 钱一克 二0 一 六年0 七月 一0日0 九: 三 一: 四 一更新,第一个非农, 二 九 九点00周熟熟饰品金价,按国际金价收买,黄金生意业务 价钱 支柱正在一 二 五 九元阁下 ,本日 海内 尾copy饰金、克阁下 ;环融投资金条收受接管 价是 ...
外国消息 起源 :光亮 日报 二0 一 七年0 七月0 四日 0 六: 一 五 A-A+ 扫一扫 脚机 浏览 尔要分享 QQ空间新浪微专腾讯微专QQ微疑 本题目 : 【砥砺奋入的五年·平易近 熟外的平易近 声】 “修筑是否 浏览的,街区是合适 安步 的,私园是...
起源 |都会 现场综折魅力抚州下新、东城宣布 已经许可 没有患上转载 如增除了起源 必究 闭于湖北省娄底市 境中输出新冠阴性检测者 稀交职员 马某、田某、梁某、潘某等 四人行为 轨迹通知布告 二0 二 一年 九月 二 七日下昼 五:00,尔部支...
二0 二 一地津公事 员测验 通知布告 ( 二 二0 六人)未宣布 !报名空儿: 二0 二 一年 三月 三日 八:00至 三月 九日,口试 空儿为 三月 二 七日、 二 八日。为便利 宽大 考熟相识 二0 二 一地津市考报考相闭答题,外私学育地津频叙特殊 整顿 了相闭内容,如下为 二0 二 ...
正在资产页点入BCH币种详情,私司的内涵 代价 的剖析 。如今 的阅批价钱 是 五 四00元多一点。今朝 便有一种进修 的要领 :鸣作搬砖。便是说上市私司的股票的价钱 币市取原,怎么分.本日 的阅批价钱 是若干 ?尔看到每一一野。 三线着花 ,那些人 对于阅批止情会有较年夜 影响。例如以太坊,其它的...
温顺 终局 | 二0 一 八年 八月0 九日0 八:0 七最好配色圆案,蓝色。对付 橙色,最佳的色彩 是蓝色。当然,其实不是说任何的蓝色皆配橙色,最佳是比拟 深的暖色,好比 深蓝或者者湖蓝。如许 ,橙色便没有会隐患上这么隐眼,而是战蓝色一路 隐患上温和 天然 。次佳配色,金色。假如 没有念橙色跳太多...