TopCoderOpen 2008 Qual Round 1 Easy

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

package {
    import flash.display.Sprite;
    public class TopCoder extends Sprite {
        private var trace:Tracer = new Tracer();
        public function TopCoder() {
            //tracer standby
            trace.property( { x:20, y:20 } );
            trace.isDevelop = true; 
            addChild( trace.create );
            
            //TopCoderOpen 2008 Qual Round 1
            //http://www.itmedia.co.jp/enterprise/articles/0910/10/news003.html
            trace.dev("TopCoderOpen 2008 Qual Round 1 Easy");
            trace.push("Odds of human alive: " + oddsHumanSurvive(2,0));
            trace.push("Odds of human alive: " + oddsHumanSurvive(4,0));
            trace.show();
        }
        //--- result logic
        //topcoder上の疑問
        //Q.1000以下の入力を弾くロジックは必要？
        //100*(1/(M+1) = 100/(M+1)
        public function oddsHumanSurvive(M:uint,B:uint):String {
            if(M==0) return "100%" else if(M%2) return "0%";
            return Number(100/(M+1))+"%";
        }
        /*--- sample
        モンスターから生き残るには最低2匹必要、
        人間vsウサギの場合、維持or倒すことが出来る≒人間が生き残る条件下では後者を選択することが適切。
        つまり人間視点で言えば、ウサギは経過が違えど結果に影響を及ばさない。
        
        //hint that Mr.chokudai says "M2 B0 = 33.333..%"
        M2 B0 P1
        M-M- 1
          P- 0
        M-M- 1
          P- 0
        P-M- 0
          M- 0
        100*(2/6) = 33.333..%
       */
    }
}

import flash.system.IME;
import flash.display.*;
import flash.text.*;

class Tracer extends Sprite
{
    public var format:TextFormat;
    public var txt:TextField;
    private static const NEWLINE:String = "\n";
    private var _log:String = "";
    private var _isDev:Boolean = false;
    
    public function get create() :TextField { return txt }; //getter
    public function get log() :String { return _log };
    public function get isDevelop() :Boolean { return _isDev };
    public function set isDevelop(bool:Boolean) :void { _isDev = bool };
    
    public function Tracer(format_:TextFormat = null)
    {
        format = new TextFormat();
        txt = new TextField();
        //format
        var ref:* = (format_) ? format_ : {color:0x000000, size:12, font:'MS Gothic'};
        PropertyScan( format, ref );
        //prop
        var prop:Object = { x:0, y:0, autoSize:TextFieldAutoSize.LEFT };
        PropertyScan( txt, prop );
        //format done
        txt.defaultTextFormat = format;
    }
    // function has 4 params. implement dynamic param nomber.
    // x, y, width, height or Object/Array
    public function property(...args):void
    {
        const properties:Array = new Array('x','y','width','height');
        var isArray:Boolean = (args[0] is Array) ? true : false;
        var params:* = isArray ? args[0] : args;
        var Q:uint = params.length; //Queue
        
        if (isArray || (Q<=4 && !(params is Object)) ) for (var i:uint=0; i<Q; i++) txt[properties[i]] = params[i];
        else PropertyScan(txt, args[0]);
    }
    public function push(...args) :void { _log += Roller(args) + NEWLINE };
    public function show() :void { txt.htmlText = _log };
    public function dev(...args) :void
    {
        if (_isDev) _log += ("<b><font color='#ff0000'>" + Roller(args) + "</font></b>" + NEWLINE) ;
    }
    /* static functions, logic designed by madflash */
    private static function Roller(...args) :String
    {
        var str:String = "";
        if ( args.length <= 1 ) str += String(args);
        else for each(var e:Object in args){str += (String(e) + " ")};
        
        return str;
    }
    private static function PropertyScan(target:*, ref:*) :void
    {
        if (target is Object && ref is Object)
            for(var key:String in ref) target[key] = ref[key];   
    }
}