编程烟花代码,求用vb写出的烟花代码急急急

1,求用vb写出的烟花代码急急急用ps做好烟花图片 , 然后加载 。这里有 http://www.pudn.com/downloads145/sourcecode/asm/detail631360.html
2,放烟花的代码放烟花的代码相关内容如下:烟花其实可以看成由一些形状相似的图形聚集在一起构成的 。其原理是,首先将形状相似的同类图形聚集在一起,然后,短时间内向四周炸开 。据此,我们也采用类似的方法 。与以上炮竹的制作类似,我们这里也利用turtle的画笔形状作为烟花的基本形状,代码如下 。容易看出,以上代码中,将烟花在Python中被定义为一组形状相同的画笔列表firworks 。好了,炮竹与烟花都有了,接下来,我们计划让二者协同工作 , 即 , 首先让炮竹firecracker向上运行一段,当倒达一定高度后让烟花firworks聚集在一起,并短时间炸开 。具体代码如下 。以上代码是一无限循环,每次循环首先让炮竹firecracker上升一段 , 当到达一定高度后让烟花firework聚集在一起,然后向四周迅速炸开 。电子烟花其实是一个投影仪,机身呈半球形 , 第一眼都觉得更像是一台天文望远镜 。靠着上面的6只高光源LED镜头在光线暗淡的空间投影 。其中大镜头一个,小镜头四个,还有一个可以旋转180度的镜头 。所有镜头都在透明的球形盖的保护之下 。而且底座部分有一排操作按钮 。
3,编一个鼠标点击放烟花的程序楼上的不对,,,晕, , 乱来 。把这个文件下下来 。http://myloves.68l.com/yanhua/jhanabi.class ,把下面的代码加到你网页下,注意jhanabi.class的路径和网页一个路径的下面就不用改了 。麻烦采纳,谢谢!【编程烟花代码,求用vb写出的烟花代码急急急】
4,c语言编程烟花代码简单c语言编程烟花代码简单如下:#include "stdlib.h"#include "graphics.h"#include "stdio.h"#include "math.h"#include "conio.h "#define PI3.1425926main()int gdriver=DETECT,gmode,errorcode;int a[10],b[10],x,y,c,r,i,j,t;double rad = 0.0;/* initialize graphics and local variables */initgraph(&gdriver , &gmode ,"");/* read result of initialization */errorcode = graphresult();if (errorcode != grOk)/* an error occurred */printf("Graphics error : %s/n",grapherrormsg(errorcode));printf("Please any key to halt:");getch();exit(1);/* terminate with an error code */}randomize();for(;!kbhit();)x=rand()%500+100; /*随机中心坐标*/y=rand()%300+100;for(r = 0 ;r <= 8 ; r++)/*烟花的大小设定*/for(i = 0,rad = 0.0 ; rad < 2*PI; rad += 0.78 )/*设定坐标*/a[i++] = x + (int)r *10* cos(rad);b[ i ] = y + (int)r *10* sin(rad);}t = i;for(i=1;i<t;i++)c=rand()%13+1; /*各点的颜色随机*/setcolor(c);/*功能:将当前图形屏幕的当前笔画颜色置为color.*/circle(a[i],b[i],1);/* a[i],b[i] 为圆心 1 为半径 画圆 */}delay(10000);delay(10000);cleardevice();函数名: cleardevice功能: 清除图形屏幕用法: void far cleardevice(void); }}getch();closegraph();函数名: closegraph功能: 关闭图形系统用法: void far closegraph(void);}初始化烟花参数void Init( int i )// 分别为:烟花中心到图片边缘的最远距离、烟花中心到图片左上角的距离 (x、y) 两个分量int r[13] = int x[13] = int y[13] = /**** 初始化烟花 *****/Fire[i].x = 0; // 烟花中心坐标Fire[i].y = 0;Fire[i].width = 240; // 图片宽Fire[i].height = 240; // 图片高Fire[i].max_r = r[i]; // 最大半径Fire[i].cen_x = x[i]; // 中心距左上角距离Fire[i].cen_y = y[i];Fire[i].show = false; // 是否绽放Fire[i].dt = 5; // 绽放时间间隔Fire[i].t1 = timeGetTime();Fire[i].r = 0; // 从 0 开始绽放/**** 初始化烟花弹 *****/Jet[i].x = -240; // 烟花弹左上角坐标Jet[i].y = -240;Jet[i].hx = -240; // 烟花弹发射最高点坐标Jet[i].hy = -240;Jet[i].height = 0; // 发射高度Jet[i].t1 = timeGetTime();Jet[i].dt = rand() % 10; // 发射速度时间间隔Jet[i].n = 0; // 烟花弹闪烁图片下标Jet[i].shoot = false; // 是否发射}5,flash 烟花代码问题 求救把上面的代码换成下面这个试试看:for (i=2; i<70; i++)duplicateMovieClip("ster1", "ster"+i, i); eval("ster"+i)._rotation = random(360); var abc:Number = 40+random(80); eval("ster"+i)._xscale = abc; eval("ster"+i)._yscale = abc;}给你一个网址 <a href="http://wenwen.soso.com/z/urlalertpage.e?sp=shttp%3a%2f%2fwww.haoqzone.com%2f" target="_blank">http://www.haoqzone.com/</a>在那里可以找到;所有的"ster" add i都换成"ster"+i6 , 如何用vb编写礼花绽放并写出它的代码先建立一个图片框,一个时钟控件 , Interval属性设为100,代码如下:Private Sub Form_Click()Picture1.ScaleMode = 3Picture1.Scale (-3, 3)-(3, -3)Picture1.Line (-0.3, -2)-(0.3, -3), , BFEnd SubPrivate Sub Timer1_Timer()Dim i As SinglePicture1.DrawWidth = 2For i = 0.15 To 3 Step 0.001Picture1.PSet (i, Log(i)), RGB(255, 0, 1)NextFor i = 0.15 To 3 Step 0.001Picture1.PSet (i, Log(i)), Form1.BackColorNextFor i = -0.15 To -3 Step -0.001Picture1.PSet (i, Log(-i)), RGB(255, 0, 1)NextFor i = -0.15 To -3 Step -0.001Picture1.PSet (i, Log(-i)), Form1.BackColorNextFor i = -2 To 3 Step 0.001Picture1.PSet (0, i), RGB(255, 0, 0)Next iFor i = -2 To 3 Step 0.001Picture1.PSet (0, i), Form1.BackColorNext iEnd Sub朋友我先问你问题,为什么我的提问不能上传了7,关于VC或者MFC编程环境下烟花绽放程序的C代码可惜一开始没能画成圆,所以整个过程都是菱形的变换,希望大家多多指教,能够想办法把初始状态就围成一个圆.#include "stdlib.h"#include"graphics.h"main()initgraph(&gd,&gr,"");randomize();for(;!kbhit();)y=rand()%300+100;a[0]=x; /*各点坐标的计算,我的烟花图形没能是圆的*/b[0]=y-10;a[1]=a[0]+5;a[2]=a[1]+5;a[3]=a[1];a[4]=a[0];a[5]=a[0]-5;a[6]=a[5]-5;a[7]=a[6]+5;for(j=1;j<5;j++)b[j]=b[j-1]+5;for(j=5;j<8;j++)b[j]=b[j-1]-5;for(j=0;j<6;j++) /*烟花的大小设定*/for(i=0;i<8;i++)c=rand()%13+1; /*各点的颜色随机*/setcolor(c);circle(a[i],b[i],1);}delay(5000);cleardevice();b[0]-=10; /*各点的坐标变换*/a[1]+=5;b[1]-=5;a[2]+=10;a[3]+=5;b[3]+=5;b[4]+=10;a[5]-=5;b[5]+=5;a[6]-=10;a[7]-=5;b[7]-=5;}}getch();closegraph();}

    推荐阅读