Author Archives: Zevan

Bresenham line

By Zevan | March 11, 2009

CLICK HERE TO COPY
Actionscript:

var canvas:BitmapData = Bitmap(addChild(new Bitmap(new BitmapData(400,400, false, 0x000000)))).bitmapData;

 

drawLine(10,10,100,90, 0xFF0000);

drawLine(100,90,60,80, 0xFF0000);

drawLine(100,90,95,60, 0xFF0000);

   

for (var i:int = 0; i<100; i+=1){

    drawLine(i *4, 100 + i, 200, 390);

}

// code ported from here:

// http://www.edepot.com/linebenchmark.html

function drawLine(x1:int, y1:int, x2:int, y2:int, col:uint = 0xFFFFFF){

    var x:int, y:int;

    var dx:int, dy:int;

    var incx:int , incy:int

  [...]

Posted in BitmapData, graphics algorithms, setPixel | Tagged , | Leave a comment

Harmonic Series

By Zevan | March 10, 2009

CLICK HERE TO COPY
Actionscript:

var harmonic:Number = 0;

var k:Number = 1;

addEventListener(Event.ENTER_FRAME, onLoop);

function onLoop(evt:Event):void {

     harmonic += 1 / k;

     trace("+");

     trace("1 / " + k + "              =              " + harmonic);

     k+=1;

}

Read more about the harmonic series at wikipedia.

1 / [...]

Posted in Math | Tagged , , | Leave a comment

Formating Numbers with Commas

By Zevan | March 9, 2009

CLICK HERE TO COPY
Actionscript:

trace(formatNum(1000));

trace(formatNum(10000000));

trace(formatNum(1000000.39485));

 

function formatNum(num:Number):String {

    var newStr:String = "";

    var str:String = num.toString();

   

    var parts:Array = str.split(".");

    str = parts[0];

    var end:String = (parts[1]) ? "." + parts[1] : "";

   

    var i:int = str.length;

    while(i--> 0){

         var char:String = str.charAt(i);

  [...]

Posted in string manipulation | Tagged , | Leave a comment

Gumowski / Mira

By Zevan | March 8, 2009

CLICK HERE TO COPY
Actionscript:

[SWF(width = 600, height = 600)]

var a:Number = 0.02;

var b:Number = .9998;

 

var xn1:Number = 5;

var yn1:Number = 0;

var xn:Number, yn:Number;

 

var scale:Number = 10;

var iterations:Number = 20000;

 

function f(x:Number):Number{

    var x2:Number = x * x;

    return a * x + (2 * (1 - a) * x2) / (1 + x2);

}

 

var canvas:BitmapData [...]

Posted in Math, setPixel | Tagged , | Leave a comment