Tag Archives: flash

Hill Climbing

By Zevan | May 4, 2009

Actionscript:

var target:Array = ("actionsnippet").split("");
var leng:int=target.length;
var iterations:int = 0;
 
var alphabet:Array = ("abcdefghijklmnopqrstuvwxyz").split("");
var search:Array = randomString();
var indices:Array = new Array();
for (var i:int = 0; i<leng; i++) indices.push(i);
 
addEventListener(Event.ENTER_FRAME, onLoop);
function onLoop(evt:Event):void {
    for (var i:int = 0; i<10; i++){
        if (indices.length> 0){
           var ii:int = int(Math.random()*indices.length);
           var index:int = indices[ii];
         
           search[index] = randomChar();
           
           if (search[index] == target[index]){
               indices.splice(ii,1);   
           }
           trace(search);
           iterations++;
        }else{
            trace("found after "+iterations+" iterations");
            removeEventListener(Event.ENTER_FRAME, onLoop);
            break;
        }
    }
}
function randomChar():String { return alphabet[int(Math.random()*alphabet.length)]; };
function randomString():Array {
    var str:Array = new Array();
    for (var i:int = 0; i<leng; i++) {
        str.push(randomChar());
    }
    return str;
}

A little random hill climbing...

Here are the last few iterations... lowest number of iterations I noticed was round 250...
.... j,c,t,i,o,n,s,n,i,p,p,e,t y,c,t,i,o,n,s,n,i,p,p,e,t s,c,t,i,o,n,s,n,i,p,p,e,t w,c,t,i,o,n,s,n,i,p,p,e,t e,c,t,i,o,n,s,n,i,p,p,e,t j,c,t,i,o,n,s,n,i,p,p,e,t z,c,t,i,o,n,s,n,i,p,p,e,t l,c,t,i,o,n,s,n,i,p,p,e,t f,c,t,i,o,n,s,n,i,p,p,e,t a,c,t,i,o,n,s,n,i,p,p,e,t found after 361 iterations

Posted in arrays, misc, strings | Also tagged actionscript | 5 Comments

Previous and Next Buttons

By Zevan | May 3, 2009

CLICK HERE TO COPY

Actionscript:

var prevBtn:Sprite = makeArrow(100, 100);
prevBtn.rotation = 180;
var nextBtn:Sprite = makeArrow(130, 100);
 
var index:int = 0;
var vals:Array = [1,2,3,4,5,6,7,8,9,10,11];
var leng:int = vals.length;
 
trace(vals[index]);
 
prevBtn.addEventListener(MouseEvent.CLICK, onPrev);
function onPrev(evt:MouseEvent):void {
    index--;
    if (index <0){
        index = leng - 1;
    }
    trace(vals[index%leng]);
}
nextBtn.addEventListener(MouseEvent.CLICK, onNext);
function onNext(evt:MouseEvent):void {
    index++;
    trace(vals[index%leng]);
}
 
function makeArrow(xp:Number, yp:Number):Sprite {
    var s:Sprite = Sprite(addChild(new Sprite()));
    s.buttonMode = true;
    with(s.graphics) beginFill(0x666666), moveTo(0,-10), lineTo(20, 0), lineTo(0,10);
    s.x = xp;
    s.y = yp;
    return s;
}

Previous and next buttons....

Posted in UI, misc | Also tagged actionscript | Leave a comment

Command Draw Source

By Zevan | May 2, 2009

CLICK HERE TO COPY

Actionscript:

[SWF(width = 600, height = 500, frameRate=30, background = 0xFFFFFF)]
 
var cmd:String = "1000 small orange circles, 9000 black lines,3 large white circles"
// try some of these commands:
//"300 small red triangles and 2 big orange circle 3 big black lines";
//"100 big black triangles, ten small white rectangles 1 big white circle and 1 big gray poly";
// "300 small red triangles and 2 big orange circle 3 big black lines";
//"10 big black circles 1000 big white lines 100 small white rects 1 big red circle and 1 green poly"
stage.align = "TL"
var msk:Shape = new Shape();
with(msk.graphics) beginFill(0x00FF00), drawRect(0,0,600, 400);
this.mask = msk;
var amount:Number;
var color:uint = 0;
var shape:String;
 
var hexLookup:Object = {red:0xFF0000, green:0x00FF00, blue:0x0000FF, yellow:0xFFFF00, orange:0xFFCC00, white:0xFFFFFF, gray:0xCCCCCC, grey:0xCCCCCC, black:0x000001};
var sizeLookup:Object = {large:true, big:true, small:true, tiny:true};
var defaultSize:Number = 50;
var size:Number = defaultSize;
var halfSize:Number = size / 2;
var circles:Function = circle;
var ovals:Function = oval, ellipse:Function = oval;
var rects:Function = rect, rectangle:Function = rect, rectangles:Function = rect;
var lines:Function = line;
var triangles:Function = triangle;
var polygon:Function = poly, polygons:Function = poly;
var large:Function = big;
var tiny:Function = small;
 
parse();
function parse():void {
    amount = 1;
    color = 0x000000;
    shape = "circle";
    var words:Array = cmd.split(/[\W]+/g)
    for (var i:int = 0; i<words.length; i++){
        var w:* = words[i];
        if (isNaN(Number(w))){
            if (hexLookup[w]){
                color = hexLookup[w];
                trace(w, "color");
            }else
            if (sizeLookup[w]){
                this[w]();
            }else
            if (this[w]){
                for (var j:int = 0; j<amount; j++){
                   this[w]();
                }
                color = 0x000000;
                size = defaultSize;
                trace(w, "command");
            }
        }else{
            trace(w, "number");
            amount = w;
        }
    }
}
function makeShape(p:Array):void{
        var s:Shape = Shape(addChild(new Shape()));
         for (var i:int = 0; i<p.length; i++) {
            s.graphics[p[i][0]].apply(graphics,p[i].splice(1));
         }
        s.rotation = Math.random() * 360;
        s.x = Math.random() * stage.stageWidth;
        s.y = Math.random() * stage.stageHeight;
}
 
function circle():void{
      makeShape([["beginFill",color], ["drawCircle",0,0,Math.random() * halfSize + halfSize]]);
}
function oval():void{
      makeShape([["beginFill",color],["drawEllipse", 0,0,Math.random() * size + halfSize]]);  
}
function square():void{
        var s:Number = Math.random() * halfSize + halfSize;
        var p:Number = -s/2;
        makeShape([["beginFill",color],["drawRect", p, p, s, s]]);  
}
function rect():void{
        var w:Number = Math.random() * halfSize + halfSize;
        var h:Number = Math.random() * halfSize + halfSize;
        makeShape([["beginFill",color],["drawRect", -w/2, -h/2, w, h]]);
}
function line():void{
    var s:Number = size * 2;
    makeShape([["lineStyle",Math.random()*3, color],["lineTo", Math.random()*s - size, Math.random()*s - size]])
}
function triangle():void {
     var s:Number = size * 2;
     makeShape([["beginFill",color],["lineTo", Math.random()*s - size, Math.random()*s - size], ["lineTo", Math.random()*s - size, Math.random()*s - size]]);
}
function poly():void {
     var s:Number = size * 2;
     var cmds:Array = [["beginFill",color]]
     var num:Number = int(Math.random()*8) + 2;
     for (var i:int = 0; i<num; i++){
          cmds.push(["lineTo", Math.random()*s - size, Math.random()*s - size]);
     }
     makeShape(cmds);
}
function big():void{
    size = 100 + Math.random() * 40;
    halfSize = size / 2;
}
function small():void {
    size = 3 + Math.random() * 20;
    halfSize = size / 2;
}

I've been meaning to post this source for a long time. It's a project I created for shapevent called Command Draw. It allows you to use simple sentence structure to create textures and patterns.

See it in action here (this one has some minimal UI and uses flashvars for the command string).

As a side note, this is the 200th post on ActionSnippet.com

Posted in Graphics, dynamic, strings | Also tagged actionscript | 3 Comments

QuickBox2D Chain

By Zevan | May 1, 2009

CLICK HERE TO COPY

Actionscript:

import com.actionsnippet.qbox.*;
 
var sim:QuickBox2D = new QuickBox2D(this, {debug:true});
// use the box2D default renderer (debug : true)
 
sim.createStageWalls();
 
// anchor
var pre:QuickObject = sim.addCircle({x:9, y:3, radius:.5, density:0});
 
// create a chain of boxes
for (var i:int = 0; i<12; i++){
  var curr:QuickObject = sim.addBox({x:10 + i, y:3, width:.9, height:.9, angularDamping:1});
                                                                 
  // currently always adds a b2DistanceJoint
  sim.addJoint({a:pre.body, b:curr.body, 
                           x1:9 + i, y1: 3, x2: 10 + i, y2:3, collideConnected:false});
  pre = curr;
}
 
// add a circle, use CCD (isBullet)
sim.addCircle({x:20, y:10, radius:1, isBullet:true});
 
// start simulation
sim.start();
sim.mouseDrag();

This snippet uses my QuickBox2D library to create a chain. QuickBox2D is a wrapper for Box2DFlashAS3 that greatly simplifies world setup, instantiation and graphical skinning of rigid bodies (more info on yesterdays post)...

See the swf here.

Download Box2DFlashAS3 here

Download QuickBox2D Alpha 104 here

See yesterdays post for additional information. I'm still in the process of writing some docs and possibly a tutorial for QuickBox2D... hopefully I'll finish with that soon...

If your somewhat familiar with Box2D and just want to just dig right in, the following scrap of information may help:

// Methods of the QuickBox2D class, used for creating rigid bodies and joints addCircle(); addBox(); addPoly(); // currently only creates b2DistanceJoints addJoint();

these function all take one parameter Object as their argument. The common parameter properties for rigid bodies are:

// QuickBox2D simpleRender settings: lineColor:0x000000 lineAlpha:1 lineThickness:0 fillColor:0xCCCCCC fillAlpha:1 // wrapped Box2D properties x:3 y:3 density:1 friction:0.5 restitution:0.2 angle: 0 linearDamping:0 angularDamping:0 isBullet:false, fixedRotation:false allowSleep: true isSleeping:false // advanced use maskBits:0xFFFF categoryBits:1 groupIndex:0


//and the specific param properties are:

addCircle() :  radius

addBox()   : width, height

addPoly()  : verts

//Joints have the following properties... not going to bother explaining these until I write the docs: addJoint() : a, b, x1, x2, y1, y2

Posted in Box2D, QuickBox2D, motion | Also tagged actionscript, Box2D, QuickBox2D | 4 Comments

Tag Archives: flash

Hill Climbing

Previous and Next Buttons

Command Draw Source

QuickBox2D Chain

Search

Pages

Recent Posts

Categories

Archives

RSS Feeds