root = Card([header, viewers, mostWatched, watchTime, subsCancels, genrePerformance, bufferingRate, deliveryHealth, releases, licenses, recClick, searches, revenuePlan, deviceView, regionFocus, featureFlags, promoteTitle])
header = CardHeader("Operations Room", "Live metrics dashboard")
viewers = TextContent("Viewers watching now: 12,345", "large")
titles = ["The Crown", "Stranger Things", "Money Heist", "The Office"]
hours = [200, 180, 150, 130]
mostWatched = Table([Col("Title", titles), Col("Hours", hours)])
days = ["Day 1","Day 2","Day 3","Day 4","Day 5"]
watchSeries = Series("Watch Time", [10,12,11,13,15])
watchTime = LineChart(days, watchSeries, "linear", "Day", "Hours")
newSubList = [500,600,700,800,900]
cancelList = [100,150,120,180,200]
subsCancels = Table([Col("New Subscribers", newSubList), Col("Cancellations", cancelList)])
genreList = ["Action","Drama","Comedy","Sci-Fi"]
genreSeries = Series("Hours", [150,200,120,180])
genrePerformance = HorizontalBarChart(genreList, genreSeries, "stacked", "Hours", "Genre")
bufferingRate = Progress(2.5, "Buffering Rate")
regionHealthList = ["North America","Europe","Asia","South America"]
healthList = ["Good","Fair","Poor","Excellent"]
deliveryHealth = Table([Col("Region", regionHealthList), Col("Health", healthList)])
releaseItem1 = ListItem("New Series A", "Jan 15, 2025", [], null)
releaseItem2 = ListItem("Movie B", "Feb 1, 2025", [], null)
releases = ListBlock([releaseItem1, releaseItem2])
licenseItem1 = ListItem("License X", "Expires Mar 2025", [], null)
licenseItem2 = ListItem("License Y", "Expires Apr 2025", [], null)
licenses = ListBlock([licenseItem1, licenseItem2])
recLabels = ["Rec 1","Rec 2","Rec 3"]
recSeries = Series("Clicks", [100,150,120])
recClick = BarChart(recLabels, [recSeries], "grouped", "Feature", "Clicks")
searchList = ["Action","Comedy","Drama"]
noPlayList = [50,30,20]
searches = Table([Col("Query", searchList), Col("No Playback", noPlayList)])
planList = ["Basic","Standard","Premium"]
revenueList = [5000,12000,25000]
revenuePlan = Table([Col("Plan", planList), Col("Revenue", revenueList)])
deviceList = ["Phone","Tablet","TV","Desktop"]
shareList = [40,25,20,15]
deviceView = Table([Col("Device", deviceList), Col("Share", shareList)])
regionOptions = [SelectItem("North America","North America"), SelectItem("Europe","Europe"), SelectItem("Asia","Asia")]
regionSelect = Select("region", regionOptions, "Select region")
regionFocus = DialogBlock("Focus Region", "Region", "Select region to view detailed metrics", [regionSelect])
flagStreaming = Tag("Streaming", null, "md", "info")
flagHq = Tag("HQ", null, "sm", "info")
flag4k = Tag("4K", null, "sm", "warning")
flagSubtitles = Tag("Subtitles", null, "sm", "info")
flagDrm = Tag("DRM", null, "sm", "warning")
featureFlags = Card([flagStreaming, flagHq, flag4k, flagSubtitles, flagDrm])
promoteTitle = Button("Promote Title", null, "primary")