function ConnectRTShader( in_preset )
{
        NewScene( null, false );
        var obj = Application.ActiveSceneRoot.AddGeometry( "Torus", "MeshSurface" );
        Application.Selection.SetAsText(obj);
        var oShader = CreateShaderFromPreset(in_preset, "Sources.Materials.DefaultLib.Scene_Material");
        SIConnectShaderToCnxPoint(oShader.FullName+".out", 
                "Sources.Materials.DefaultLib.Scene_Material.realtime", false);
        if (!oShader) { return null; }
        return (oShader.Type == "XSICollection") ? oShader(0) : oShader;
}