[sharing] AS2 ragged lineStyle function

Actionscript Code:

import flash.geom.*;

raggedline = function(mc:MovieClip, p1:Point, p2:Point, thickness, rgb, style) {
    if (style==undefined){style=1;}
    var segmentlength:Number = 10;
    var totallength:Number = p2.subtract(p1).length;
    var segmentsperline:Number = totallength / segmentlength;
    if (style == 1) {
        var scatter: Number = 2;
    } else if (style == 2) {
        var scatter: Number = 1;
    }
    mc.lineStyle(thickness, rgb, 100, true);
    if (style == 1) {mc.moveTo(p1.x, p1.y)};
    var step = 1/segmentsperline;
    for (var i:Number = step; i < 1; i += step){
        xdelta = scatter - (Math.random()*2*scatter);
        ydelta = scatter - (Math.random()*2*scatter);
        var pi2:Point = Point.interpolate(p2, p1, i);
        if (style == 2) {
            var pi1:Point = Point.interpolate(p2, p1, i-step);
            mc.moveTo(pi1.x + xdelta, pi1.y + ydelta)
        };
        mc.lineTo(pi2.x + xdelta, pi2.y + ydelta);
    }
}

var tempmc:MovieClip = _root.createEmptyMovieClip("test",1);
raggedline(tempmc,new Point(10,10), new Point (300,200), 4, 0x000000, 1);
raggedline(tempmc,new Point(10,60), new Point (300,250), 4, 0x000000, 2);

Was pretty surprised to find out flash could not draw the different linestyles on it's own, so when I had to make a ragged line I had to make my own function. Figured I would share it. Two different styles depending on exactly what you are looking for. The first just randomizes line segments between the two points, the second keeps each segment parallel which causes a more jagged look.

Hope it comes in handy for someone now or later on in a forum search.