flash on 2010-1-21

by uwi
♥0 | Line 31 | Modified 2010-01-21 21:16:25 | MIT License
play

ActionScript3 source code

/**
 * Copyright uwi ( http://wonderfl.net/user/uwi )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/EyXG
 */

package {
    import flash.display.Sprite;
    import flash.text.TextField;
    public class CheckTri extends Sprite {
        public function CheckTri() {
            var tf : TextField = new TextField();
            addChild(tf);
            tf.height = 465;
            
            var i : uint;
            var ok : Array = new Array(48);
            for(i = 0;i < 48;i++)ok[i] = 0;
            
            var seed : Array = [0];
            for(i = 1;i <= 20;i++){
                var next : Array = [];
                for each(var s : int in seed){
                    var n : int;
                    n = s + i*i*i;
                    next.push(n);
                    if(n >= 0 && n < 48 && ok[n] == 0)ok[n] = i;
                    
                    n = s - i*i*i;
                    next.push(n);
                    if(n >= 0 && n < 48 && ok[n] == 0)ok[n] = i;
                }
                seed = next;
            }
            
            for(i = 0;i < 48;i++){
                tf.appendText("" + i + "\t" + ok[i] + "\n");
            }
        }
    }
}