Forked from: mash's stratus test diff:1 forked from: stratus test hacker_9p8x8.. forked:0favorite:0lines:47license : 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