❶ 流星雨的源程序
以下是原代碼:
#include<conio.h>
#include<dos.h>
#include<stdlib.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;i<24;i++)
for(j=0;j<80;j++)
{if(i<19){screen[j]='';printf(" ");}
else{screen[j]='#';textcolor(GREEN);cprintf("%c",screen[j]);}
}
do{for(i=0;i<10;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;i<j;i++)
if(k==a){j--;l=2;break;}
if(l==2)continue;a=k;
}while(i<9);
for(i=0;i<9;i++)
{e=random(26)+'A';gotoxy(a+1,b+1);
textcolor(d);cprintf("%c",e);f=0;}
for(j=0;j<24;j++)
for(i=0;i<10;i++)
if(f!=1)
{delay(5000);gotoxy(a+1,b+1);printf(" ");b=b+c;
l=(c<19-b)?c:(19-b);
for(m=1;m<l;m++)
{n=b+m-c;gotoxy(a+1,n+1);textcolor(d);
cprintf("%c",e);gotoxy(a+1,n+1);printf(" ");}
if(b<19){textcolor(d);gotoxy(a+1,b+1);cprintf("%c",e);}
else{for(m=0,k=a;m<5;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;k<80;k++)
if(screen[23][k]==''){t=1;break;}
}while(t!=1);
}
❷ 網易博客流星雨代碼
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兩個紅氣球跳動
❸ AS2.0代碼如下:請逐行翻譯。下面是段流星雨代碼:影片剪輯名為star.
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;i<num;i++)//for循環函數。語法:for(初始化;循環條件;步進){執行語句};
{ tmp=sum+i;//定義tmp並賦值sum+i的值;
star._rotation=random(40)*9;//_rotation為元件的旋轉角度。整句為隨機0~39一個正整數的9倍值賦值給star元件的旋轉角度
star.plicateMovieClip("star"+tmp,tmp);//plicateMovieClip復制star元件為"star"+tmp實例名元件,深度為tmp;
}
sum=sum+tmp;//sum相加+tmp並賦值給sum;
}
❹ 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空間留言代碼
❺ 我要黑客帝國里的數字流星雨代碼,用html或asp寫的
<html><style 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
網上找的代碼,我給你改了下
❻ iphone簡訊流星雨怎麼搞
iphone簡訊流星雨設置方法1:
首先打開」信息「點擊上方的」寫信息「編輯好內容和收件人後,長按藍色箭頭發送健,選擇屏幕,屏幕向左滑動,選擇喜歡的效果,最後點擊發送。
1、首先我們打開手機,在主屏幕找到」信息「,
2、在」信息「界面的右上方點擊」寫信息「,
3、然後輸入收件人的號碼和內容,長按發送信息的藍色箭頭,
4、在」帶效果發送「界面選擇你喜歡的效果,點擊」屏幕「,屏幕向左滑動,
5、最後選好你喜歡的效果,點擊藍色箭頭發送 。
方法2:
1.首先打開手機簡訊頁面,輸入特定的文字。
2.然後長按發送鍵,選擇「流星」特效,並點擊「使用」按鈕即可。
❼ 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; j<cc->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; i<iColumnCount; 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; i<iColumnCount; 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; i<iColumnCount; i++)
{
free( (ccChain+i)->current );
}
free(ccChain);
PostQuitMessage (0) ;
return 0 ;
}
return DefWindowProc (hwnd, message, wParam, lParam) ;
}
這有個數字雨的代碼,看能幫助你不!
❽ flash cs3製作流星雨步驟、需要編碼、
2.製作流星雨效果 (1)按Ctrl+F8創建一個圖像圖符,命名為:流星1。在圖符編輯區中用Tools面板中的橢圓工具 和箭頭工具 畫一顆流星的輪廓,如下圖所示: (2)接著,用油漆桶工具進行填充顏色,這一步很講究喔。在填充之前先調好顏色,打開Color Mixer混色面板,選擇輻射狀填充方式Radial。然後,把顏色定義條上的兩個顏色滑塊都設置成白色,並選中右邊的顏色滑塊,在Alpha中輸入:0 ,設置好後如下圖所示。 (3)現在,把油漆桶移到流星輪廓的左下角,點擊一下就填充好了(如下圖所示)!之後,用箭頭工具單擊選中輪廓,按Delete鍵把輪廓線刪掉。 (4)按Ctrl+F8鍵創建一個電影剪輯圖符,命名為:流星2 。在選中Layer1層第1幀的情況下,從圖符庫中把流星1圖符拖到電影剪輯編輯區。 (5)然後,選中第15幀(用滑鼠在時間軸的第15幀單擊一下),按F6鍵插入一個關鍵幀,再把滑鼠移到第1幀和第15幀之間單擊滑鼠右鍵,在彈出的菜單中選中Creat Motion Tween命令創建運動動畫。 (6)選中第15幀,把滑鼠移到編輯區中的流星上,按住滑鼠左鍵不放,把它向左下方移動一段距離,再選中Tools面板上的 工具,把它拉大。 (7)選中第10幀,按F6插入關鍵幀,之後,在選中第15幀的情況下,單擊一下編輯區中的流星,在Properties面板中的Color下拉菜單中選中Alpha,並把其右邊的值改為0% 。這樣,一顆流星就做出來了,如何實現流星雨呢?別急!下面就開始做。 (8)創建一個電影剪輯圖符,命名為:流星雨。接著,把流星2圖符從圖符庫中拖到編輯區來,並在Properties面板中的Instance Name中給它命名為:liuxin 。 (9)在第15幀單擊一下,按F5鍵使幀延續到第15幀。並把該層改命:流星。 (10)在流星層的上面創建一個新層,命名為:動作。接著,在該層的第1幀上單擊滑鼠右鍵,在彈出的菜單中選擇Actions命令,打開Actions面板,在面板上點擊 按鈕,選擇Expert Mode(專家模式),然後,在面板的動作編輯區中輸入以下代碼: n=1; plicateMovieClip (liuxin,"liuxin"+n,n); setProperty ("liuxin"+n, _x, random(500)); setProperty ("liuxin"+n, _y, random(330)); size=random(40)+10; setProperty ("liuxin"+n, _yscale, size); setProperty ("liuxin"+n, _xscale, size); n=n+1; (11)選擇除了「n=1;」以外的所有代碼,按Ctrl+c鍵復制代碼,如下圖所示: (12)在該層每隔3幀插入一個關鍵幀,每插入一個關鍵幀的同時,在動作編輯區中按Ctrl+v鍵粘貼剛才復制的代碼,
❾ 用C語言編寫流星雨程序
數字流星雨代碼:
//流星雨.cpp:Defines the entry point for the console application.
//
///////////////////////////////////////////////////
//程序名稱:數字流星雨
//最後修改:2006-10-15
///////////////////////////////////////////////////
#include<windows.h>
#include<time.h>
#include<stdlib.h>
#include"graphics.h"
#include<conio.h>
#include<math.h>
/***********************宏定義**********************/
#define PI 3.1415926//圓周率
#define WIDTH 200//屏幕寬度,流星出生區域
#define HEIGHT 150//屏幕高度,流星出生區域
#define V 20//流星速度,單次移動的像素數
#define LENGTH 20//流星字元數
#define DELAY 30//延時
#define NUM 45//流星個數
/******************定義流星結構體*******************/
struct meteor
{
int x0;
int y0;
int yh;
char str[LENGTH];
}me[NUM]={0};
/*********************函數聲明**********************/
char AsciiRand();
void Move(char*p);
void InitMeteor(struct meteor*me);
int color(int y,int y0,int yh);
void Meteors(struct meteor me[]);
/***********************主函數**********************/
///int main(void)
int _tmain(int argc,_TCHAR*argv[]){
char c='