Forked from:: mash's stratus test

forked from: stratus test

forked:0
favorite:0
lines:47
license : All rights reserved
modified : 2009-09-14 12:15:22

Embed: Tweet

// forked from mash's stratus test
// write as3 code here..
package {
    import flash.display.*;
    import flash.text.*;
    import flash.events.*;
    import flash.net.*;
    public class stratus_client_test extends Sprite {
        private const StratusAddress:String = "rtmfp://stratus.adobe.com";
        private const DeveloperKey:String = "";
        private var nc :NetConnection;
        private var cht_tf :TextField;
        private var log_tf :TextField;
        private var btn :Sprite;

private var listener_ns :NetStream;

public function stratus_client_test() {
            nc = new NetConnection();
            nc.addEventListener(NetStatusEvent.NET_STATUS,function(e :NetStatusEvent) :void {
              log_tf.appendText( e.info.code+"\n" );
            });
            nc.connect(StratusAddress + "/" + DeveloperKey);
            init_view();

listener_ns = new NetStream(nc, NetStream.DIRECT_CONNECTIONS);
        listener_ns.addEventListener(NetStatusEvent.NET_STATUS, net_status_logger );

}
        private function net_status_logger( e :NetStatusEvent ) :void {
            log_tf.appendText("ns: "+e.info.code+"\n");
        }
        private function init_view() :void {
            cht_tf = new TextField;
            cht_tf.type = TextFieldType.DYNAMIC;
            cht_tf.width = 1000;
            cht_tf.background = true;
            cht_tf.backgroundColor = 0xEEEEEE;
            addChild( cht_tf );

btn = new Sprite;
            var g :Graphics = btn.graphics;
            g.beginFill(0x333333);
            g.drawRect(0,0,40,20);
            addChild(btn);
            btn.x = (465-40);

log_tf = new TextField;
            log_tf.type = TextFieldType.INPUT;
            log_tf.width = 1000;
            log_tf.y     = 100;
            addChild( log_tf );
        }
    }
}

Code Fullscreen

Preview Fullscreen