C程序流星雨的源代码?
#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(SM_CXSCREEN), GetSystemMetrics(SM_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(SM_CXSCREEN) ; //屏幕宽度
cyScreen = GetSystemMetrics(SM_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) ;
这有个数字雨的代码,看能帮助你不!
用C语言编写流星雨程序
#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();}}
我要黑客帝国里的数字流星雨代码,用html或asp写的
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两个红气球跳动
QQ空间流星雨代码
QQ空间留言代码
[B][fts=6][ftc=#37B400]*[/ft]
[B][fts=6][ftc=#37B400]*[/ft] QQ空间留言代码
[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] QQ空间留言代码
[B][ffg,#438CCB,#FFFFFF] ` . . [/ft]
QQ空间留言代码 [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]
QQ空间留言代码
怎么使用流星雨代码
网页代码吗?我这有网页代码
htmltitle网页下雨/title
body bgcolor="#ffffff"
STYLE type=text/cssBODY {
FONT-FAMILY: "隶书"; FONT-SIZE: 9pt; MARGIN-LEFT: 0px; MARGIN-RIGHT: 0px; MARGIN-TOP: 0px
/STYLE
SCRIPT language=JavaScript
var no = 50;!--定义雨点的总数--
var speed = 1;!--定义下雨的速度--
var s, x, y, sn, cs;!--声明变量--
var a, r, cx, cy;!--声明变量--
var i, doc_width = 800, doc_height = 600;!--存储显示器的分辨率--
if (document.all) {!--如果是ie浏览器--
doc_width = document.body.clientWidth;!--获得窗口的宽度--
doc_height = document.body.clientHeight;!--获得窗口的高度--
x = new Array();!--存储所有雨点的横坐标--
y = new Array();!--存储所有雨点的纵坐标--
r = new Array();!--存储所有雨点的横坐标--
cx = new Array();!--存储所有雨点的横坐标--
cy = new Array();!--存储所有雨点的横坐标--
s = 8;
for (i = 0; i no; ++ i) {!--循环对所有的雨点进行初始化和显示--
initRain();!--初始化雨点--
if (document.all) {
document.write("div id=\"dot"+ i +"\" style=\"POSITION: ");!--创建新的层--
document.write("absolute; Z-INDEX: "+ i +"; VISIBILITY: ");!--显示雨点--
document.write("visible; TOP: 15px; LEFT: 15px;\"font color=\"black\"");!--颜色为红色--
document.write(",/font/div");
function initRain() {!--对雨点的初始化--
a = 6;
r[i] = 1;
sn = Math.sin(a);!--定义变量--
cs = Math.cos(a);!--定义变量--
cx[i] = Math.random() * doc_width + 1;!--初始化雨点横坐标--
cy[i] = Math.random() * doc_height + 1;!--初始化雨点纵坐标--
x[i] = r[i] * sn + cx[i];!--初始化雨点横坐标--
y[i] = cy[i];!--初始化雨点纵坐标--
function makeRain() {!--生成雨点--
r[i] = 1;!--雨点出现的纵坐标最小值--
cx[i] = Math.random() * doc_width + 1;!--横向速度--
cy[i] = 1;!--纵向速度--
x[i] = r[i] * sn + cx[i];!--获得下一次雨点的横坐标--
y[i] = r[i] * cs + cy[i];!--获得下一次雨点的纵坐标--
function updateRain() {!--更新雨点--
r[i] += s;!--
x[i] = r[i] * sn + cx[i];!--获得下一次雨点的横坐标--
y[i] = r[i] * cs + cy[i];!--获得下一次雨点的纵坐标--
function raindropIE() {!--对IE浏览器的下雨函数--
for (i = 0; i no; ++ i) {
updateRain();
if ((x[i] = 1) || (x[i] = (doc_width - 20)) || (y[i] = (doc_height - 20))) {!--判断雨点是否已经出了当前窗口边界--
makeRain();!--重新生成雨点--
doc_width = document.body.clientWidth;!--获得当前雨点所在层的宽度--
doc_height = document.body.clientHeight;!--获得当前雨点所在层的高度--
document.all["dot"+i].style.pixelTop = y[i];!--显示雨点--
document.all["dot"+i].style.pixelLeft = x[i];!--显示雨点--
setTimeout("raindropIE()", speed);!--根据speed值,动态更新下雨的图片--
if (document.all) {
raindropIE();!--如果是ie浏览器,调用相应的函数--
/SCRIPT
/body
/html
参考网站:http://www.tongdalong.com