乐不思蜀

06月 28

AS3录像的基本点

2009年ActionScript, 录像 No Comments 没有评论 »top 顶部

第一，对不起我这么久没有更新了，我去旅游了然后我在再一次设计摄个博客的主题。

我不在时，Mad Chen (疯的陈？)留个评论说我应该写一些关于录像的事情所以我今天想给你们看怎么用AS3做一个特别简单的定制录放机。

录像表示

我们能使用Flash的‘FLV放像部件’－一个很好通用的工具－但是做你自己的还是更有效的，多功能的。 [...]

05月 17

AS3 逼真的云效果

2009年ActionScript 4 Comments 评论 »top 顶部

演示抓图

我上星期四给气象局来的客人看一个培训演示。我老板让我去准备一个PPT，但是（显然的）我选了用Flash（既可以卖弄又不用学用微软的狗屎）。

我先做了背景，当演示进步时，颜色从白天的天蓝色逐渐地变到夜间的紫黑色。然后在那个上面做了一连串任意动画的云，都是被ActionScript3创造了（任意的模糊形状在各框里动）。最后我用了些很帅的动画为了呈现信息。

我觉得我应该把这个演示文件上载到我博客给你们看我怎么做逼真的云了。另外的东西都很乱因为我星期三晚上太紧了，所以我这个送给你们的文件里面只包括了第一些‘幻灯片’。

击间隔棒为了进步演示！

云代码：

import flash.display.*;
import flash.geom.Point;
import flash.events.Event;
 
var bitmap:BitmapData;
var angle:Number = 0;
var _offset:Number = 0;
var randomness:Number = (Math.random()*1000)+1000;
 
var pt:Point = new Point(10, 10);
bitmap = new BitmapData(stage.stageWidth,310,true,0x000000);
var image:Bitmap = new Bitmap(bitmap);
addChild(image);
addEventListener(Event.ENTER_FRAME,loop);
 
function loop(e:Event):void
{
	var point:Point=new Point(this._offset,0);
	bitmap.perlinNoise(300,100,3,randomness,false,true,BitmapDataChannel.ALPHA,true,[point,point]);
	_offset+=2;
}