Mic ans Cam Check

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

package {
    import flash.display.Sprite;
    import flash.media.Microphone;
    import flash.media.Camera;
    import flash.text.TextField;
    import flash.events.Event;
    
    public class FlashTest extends Sprite {
        public function FlashTest() {
            // write as3 code here..
            if (stage) init(null);
            else addEventListener(Event.ADDED_TO_STAGE, init);
        }
        
        public function init(e:Event):void {
            removeEventListener(Event.ADDED_TO_STAGE, init);
                
            var tf:TextField = new TextField();
            tf.width = stage.stageWidth;
            tf.height = stage.stageHeight;
            addChild(tf);
            
            var name:String;
            tf.appendText("Microphone\n")
            for each (name in Microphone.names) {
                tf.appendText("- " + name + "\n");
            }
                    
            tf.appendText("\nMicrophone\n")
            for each (name in Camera.names) {
                tf.appendText("- " + name + "\n");
            }
        }
    }
}