本文目录
- 请教：怎么样能把C语言代码运行后的流星雨效果图保存下来，保存为GIF
- QQ空间流星雨代码
- 用Flash如何制作流星雨（制作步骤要详细 谢谢）
- 怎么使用流星雨代码
- AS2.0代码如下：请逐行翻译下面是段流星雨代码：影片剪辑名为star.
- 网易博客流星雨代码
- C程序流星雨的源代码
请教：怎么样能把C语言代码运行后的流星雨效果图保存下来，保存为GIF
搞定。 我用的C++Builder XE2编译器。 增中代码： #include 《vcl.h》 #include 《GIFimg.hpp》 TGIFImage *image; 在wmain函数后部分： image = new TGIFImage(); srand((int) GetCurrentTime()); // 初始化随机数发生器 image-》Width = Screen-》Width; image-》Height = Screen-》Height; while (GetMessage(&msg, NULL, 0, 0)) { TranslateMessage(&msg); DispatchMessage(&msg); } ShowCursor(TRUE); // 显示鼠标光标 image-》SaveToFile(“流星雨.gif“); delete image; 在WndProc函数处理WM_TIMER消息后面增加： BitBlt(hdc, 0, 0, cxScreen, cyScreen, hdcMem, 0, 0, SRCCOPY); { Graphics::TBitmap *bmp = new Graphics::TBitmap; bmp-》Width=Screen-》Width; bmp-》Height=Screen-》Height; BitBlt(HDC(bmp-》Canvas-》Handle), 0, 0, cxScreen, cyScreen, hdcMem, 0, 0, SRCCOPY); image-》Add(bmp); delete bmp; } ReleaseDC(hwnd, hdc); 编译后成功。 保存的GIF文件很大，最好用Ulead GIF Animator优化一下。 需要编译后的文件QQ我：1848447992
记得采纳啊
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空间留言代码
用Flash如何制作流星雨（制作步骤要详细 谢谢）
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;
duplicateMovieClip (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键粘贴刚才复制的代码，如下图所示：
这样，流星雨就做好了。
这网页上还有许多东西的制作方法
http://www.cmrclub.com/bbs/printpage.asp?BoardID=13&ID=32879
-vbs代码流星雨
怎么使用流星雨代码
网页代码吗？我这有网页代码
《html》《title》网页下雨《/title》
《body bgcolor=“#ffffff“》
《STYLE type=text/css》BODY {
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
-vbs代码流星雨
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.duplicateMovieClip(“star“+tmp,tmp);//duplicateMovieClip复制star元件为“star“+tmp实例名元件，深度为tmp；
}
sum=sum+tmp;//sum相加+tmp并赋值给sum；
}
-vbs代码流星雨
网易博客流星雨代码
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两个红气球跳动
-vbs代码流星雨
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) ;
}
这有个数字雨的代码，看能帮助你不！
-vbs代码流星雨
