
void Init_Data()
{
int i
for( i=0i<POINTi++)
{
Snow[i].x=0
Snow[i].y=0
Snow[i].size=0
}
for( i=0i<MaxXi++)
Map[i]=MaxY
}
显示:
void MakeSnow()
{
int i
if( CurSnow>=POINT ) return
for( i=0Snow[i].sizei++ )
CurSnow++
Snow[i].x=random(MaxX)
Snow[i].y=random(DOWNSPEED)
Snow[i].size=random(MaxSize)+1
}
设定显示坐标
void ShowSnow( int x, int y, int size, int flag )
{
int color=0
if ( flag ) color=15
switch( size )
{
case 1:
putpixel( x, y, color )
break
case 2:
setcolor( color )
line( x-1, y-1, x+1, y+1 )
line( x-1, y+1, x+1, y-1 )
break
case 3:
setcolor( color )
line( x-1, y-1, x+1, y+1 )
line( x-1, y+1, x+1, y-1 )
/*
line( x-2, y-2, x+2, y+2 )
line( x-2, y+2, x+2, y-2 )*/
line( x-2, y, x+2, y )
line( x, y-2, x, y+2 )
break
}
}
雪花移动效果:
void Move( int n, int tox, int toy )
{
int x, y, size, i, j
float person
x=Snow[n].x
y=Snow[n].y
size=Snow[n].size
/* check end */
j=y
if( x<tox )
{
person=(DOWNSPEED *1.0) / ( tox-x )*1.0
for( i=xi<=toxi++ )
{
if( j>=Map[i] )
{
tox=i-size
break
}
j+=(int)( (i-x+1)*person )
}
}
else if( x>tox )
{
person=(DOWNSPEED *1.0) / ( x-tox )*1.0
for( i=xi>=toxi-- )
{
if( j>=Map[i] )
{
tox=i+size
break
}
j+=(int)( (x-i+1)*person )
}
}
if( y+DOWNSPEED>=Map[tox] )
{
switch( size )
{
case 1:
Map[x]--
break
case 2:
Map[x]-=2
if( x>0 &&Map[x-1]>Map[x] ) Map[x-1]=Map[x]
if( x<MaxX-1 &&Map[x+1]>Map[x] ) Map[x+1]=Map[x]
break
case 3:
Map[x]-=3
if( x>1 &&Map[x-2]>Map[x] ) Map[x-1]=Map[x]
if( x>0 &&Map[x-1]>Map[x] ) Map[x-1]=Map[x]
if( x<MaxX-2 &&Map[x+2]>Map[x] ) Map[x+1]=Map[x]
if( x<MaxX-1 &&Map[x+1]>Map[x] ) Map[x+1]=Map[x]
break
}
CurSnow--
y=Map[x]+size
Snow[n].x=x
Snow[n].y=y
Snow[n].size=0
}
else /* not end */
{
Snow[n].x=tox
Snow[n].y=toy
}
}
雪花屏保。本程序用VB 6.0 编写。
有雪花效果,移动时间,闪动日历。
雪花可模拟风吹的效果,可设定雪花数量、是否显示时间日历、风速、时间移动速度、日历闪动速度等。
画到屏幕上 有2种方法第一种:
把窗体大小设为屏幕大小 然后截取一张屏幕的图放在窗体上然后在这张图上绘图
第二种:
获取桌面的句柄然后获取桌面的HDC来绘图 比较麻烦
要防止一闪一闪可以用双缓存即先绘制到一张等大小的bmp然后再把bmp绘制到panel上
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)