Las3r repl test

Las3r - A lisp for the AVM2 - http://github.com/aemoncannon/las3r
wiki: http://wiki.github.com/aemoncannon/las3r/
las3r.swf built from: http://github.com/yonatan/las3r/tree/get-def

by yonatan 31 Mar 2010

Tags

lisp
Embed

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

// Las3r - A lisp for the AVM2 - http://github.com/aemoncannon/las3r
// wiki: http://wiki.github.com/aemoncannon/las3r/
// las3r.swf built from: http://github.com/yonatan/las3r/tree/get-def

package {
    import flash.events.*;
    import flash.net.*;
    import flash.system.*;
    import flash.text.*;
    import flash.utils.*;
    import flash.display.*;

    public class Las3rTest extends Sprite {
        private var request:URLRequest;
        private var tf:TextField;
        
        public function Las3rTest() {
            loadLas3rSwf(init);
        }

        private function init(e:Event):void {
            var replClass:Class = getDefinitionByName("com.las3r.repl.Repl") as Class;
            var repl:* = new replClass(465, 465, stage);
            addChild(repl);
        }

        private function loadLas3rSwf(completeHandler:Function):void {
            Security.loadPolicyFile("http://zozuar.org/wonderfl/crossdomain.xml");
            var loader:Loader;
            var req:URLRequest = new URLRequest("http://zozuar.org/wonderfl/las3r.swf");
            var ctx:LoaderContext = new LoaderContext(true, ApplicationDomain.currentDomain, SecurityDomain.currentDomain);
            loader = new Loader();
            loader.contentLoaderInfo.addEventListener(Event.COMPLETE, completeHandler);
            loader.load(req, ctx);
        }
    }
}