RED
/**
* Copyright christian ( http://wonderfl.net/user/christian )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/8sDL
*/
package
{
import flash.display.*;
import flash.geom.Point;
import flash.events.Event;
import flash.filters.ConvolutionFilter;
/** @author SPANVEGA // CHRISTIAN **/
[ SWF (width = '465', height = '465', backgroundColor = '0x000000', frameRate = '30')]
public class RED extends Sprite
{
private var f : ConvolutionFilter = new ConvolutionFilter (3, 3, [-30, 30, 0, -30, 30, 0, -30, 30, 0], 9, 0);
private var b : BitmapData = new BitmapData (465, 233, true, 0);
private var o : Array = [new Point (), new Point ()];
public function RED ()
{
Wonderfl.disable_capture ();
stage.scaleMode = 'noScale';
graphics.beginFill (0, 1);
graphics.drawRect (0, 0, 465, 465);
with (addChild (new Bitmap (b))) y = 116.25;
stage.addEventListener (Event.ENTER_FRAME, function () : void
{
o[1].y = (o[0].x = (o[0].y += 2.5)) * 2;
b.perlinNoise (100, 100, 2, 0xFF, false, false, 9, false, o);
b.applyFilter (b, b.rect, b.rect.topLeft, f);
b.draw (b, null, null, 'hardlight');
b.draw (b, null, null, 'lighten');
});
}
}
}