textTest05

by Nowloading_
♥0 | Line 36 | Modified 2010-10-12 13:03:53 | MIT License
play

ActionScript3 source code

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

// forked from ton_'s textTest04
// forked from ton_'s textTest03
// forked from ton_'s textTest02.5
// forked from ton_'s textTest02
// forked from ton_'s textTest01
/**
テキスト表示実験4
「当たり確率100分の1のくじを当てるまでの試行回数の表示」
最大試行数は1000回で、クリック毎に当たるまでの回数を表示

当たり判定はMath.randomで0~99の乱数を発生させて行っている。
**/

package {
    import flash.events.Event;
    import flash.display.Sprite;
    import flash.display.MovieClip;
    import flash.events.MouseEvent;
    import flash.text.TextField;
    
    public class FlashTest extends Sprite {
        private var fld:TextField;
        private var XY:Array = new Array();
        private var now:int;
        private var BB:int = 0;
        private var RB:int = 0;
        public function FlashTest() {
            // write as3 code here..
            fld = new TextField();
            fld.wordWrap = true;
            fld.height = 465;
            fld.width = 300;         
            addChild(fld);
            stage.addEventListener(MouseEvent.CLICK, onClick);
        }
        
        public function onClick(e:MouseEvent):void{
            //確率演算部分
            for ( var i:int = 0; i < 3000; i++){
                now = Math.ceil(Math.random()*600)-1;
                
                if (now <= 1) {
                    BB += 1;
                } else if (now == 2){
                    RB +=1;
                }


            }
            //テキスト表示部分
            XY.unshift([BB,RB,"\n"]); 
            //値の初期化
            BB = 0;
            RB = 0;
            fld.text = "," + String(XY)
        }             
    }    
}