<%@ Page Language="C#" Description="dotnetCHARTING Component" %>
<%@ Register TagPrefix="dotnet" Namespace="dotnetCHARTING" Assembly="dotnetCHARTING" %>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Drawing2D" %>
<script runat="server">

void Page_Load(Object sender, EventArgs e)
{
// This sample deomonstrates a ranked slope chart with specific categories for each axis.

Chart.Type = ChartType.Combo;
Chart.Title = "Annual CO₂ Emissions by Country";
Chart.Size = "350x570";
Chart.TempDirectory = "temp";
Chart.LegendBox.Visible = false;
Chart.Debug = false;
Chart.JS.Enabled = true;

Chart.DefaultAxis.DefaultTick.Label.Font = new Font("Tahoma", 10);
Chart.DefaultAxis.DefaultTick.GridLine.Visible = false;
Chart.DefaultAxis.DefaultTick.Line.Visible = false;

Chart.XAxis.ClearValues = true;
Chart.XAxis.Orientation = dotnetCHARTING.Orientation.Top;

// The ranges represents the number of categories used below.Series element Y values refer to the indexes of
// either the first and second y axis category respectively.
Chart.YAxis.Minimum = -.5;
Chart.YAxis.Maximum = 19.5;
Chart.YAxis.DefaultTick.Line.Length = 0;
Chart.YAxis.InvertScale = true;

Axis secondYAxis = Chart.YAxis.Calculate("");
secondYAxis.JsID = "y2";
secondYAxis.InvertScale = true;
secondYAxis.Orientation = dotnetCHARTING.Orientation.Right;
secondYAxis.Minimum = -.5;
secondYAxis.Maximum = 19.5;
Chart.AxisCollection.Add(secondYAxis);

Chart.JS.Settings.Add("chartArea.clipContent", "false");

//Add specific categories to both y axes.
Chart.JS.Settings.Add("yAxis.0.categories", "js:['United States', 'Russia', 'China', 'Japan', 'Germany', 'United Kingdom', 'India', 'Canada', 'Italy', 'France', 'Poland', 'Mexico', 'South Africa', 'Australia', 'South Korea', 'Brazil', 'Iran', 'Saudi Arabia', 'Turkey', 'Indonesia']");

Chart.JS.Settings.Add("yAxis.1.categories", "['China', 'United States', 'India', 'Russia', 'Japan', 'Iran', 'Germany', 'Saudi Arabia', 'South Korea', 'Indonesia', 'Canada', 'Brazil', 'South Africa', 'Turkey', 'Australia', 'Mexico', 'United Kingdom', 'Italy', 'Poland', 'France']");

Chart.DefaultElement.ShowValue = false;
Chart.DefaultSeries.Type = SeriesType.Line;
Chart.DefaultSeries.DefaultElement.Marker.Type = ElementMarkerType.Circle;
Chart.DefaultSeries.LegendEntry.Visible = false;
Chart.ChartArea.ClearColors();

// Make first and last element y axis ticks inherit the series/element color.
Chart.JS.Settings.Add("defaultSeries.firstPoint.yAxisTick.label.color","%color");
// Make the last element bind to the second y axis.
Chart.JS.Settings.Add("defaultSeries.lastPoint.yAxisTick","js:{ axisId: 'y2', label_color: '%color' }");
// Makes a tick appear on the x axis at the point position. (the 1990 and 2000 ticks at the top)
Chart.JS.Settings.Add("defaultSeries.defaultPoint.xAxisTick","js:{ }");

Chart.DefaultSeries.LastElement.YAxisTick.AxisID = "y2";
Chart.DefaultElement.ToolTip = "CO₂ emissions in %country, %xValue<br><b>%zValue Mt</b>";

// *DYNAMIC DATA NOTE*
// This sample uses random data to populate the chart. To populate
// a chart with database data see the following resources:
// - Classic samples folder
// - Help File > Data Tutorials
// - Sample: features/DataEngine.aspx
SeriesCollection mySC = getData();
// Add the random data.
Chart.SeriesCollection.Add(mySC);

}
SeriesCollection getData()
{
SeriesCollection sc = new SeriesCollection();
Series ser1 = new Series("");
ser1.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722");
Element el1 = new Element();
el1.XValue = 1990;
el1.YValue = 2;
el1.ZValue = 2480;
el1.CustomAttributes["country"] = "China";
ser1.Elements.Add(el1);
Element el2 = new Element();
el2.XValue = 2000;
el2.YValue = 0;
el2.ZValue = 10670;
el2.CustomAttributes["country"] = "China";
ser1.Elements.Add(el2);
sc.Add(ser1);
Series ser2 = new Series("");
ser2.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el3 = new Element();
el3.XValue = 1990;
el3.YValue = 0;
el3.ZValue = 5110;
el3.CustomAttributes["country"] = "United States";
ser2.Elements.Add(el3);
Element el4 = new Element();
el4.XValue = 2000;
el4.YValue = 1;
el4.ZValue = 4710;
el4.CustomAttributes["country"] = "United States";
ser2.Elements.Add(el4);
sc.Add(ser2);
Series ser3 = new Series("");
ser3.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722");
Element el5 = new Element();
el5.XValue = 1990;
el5.YValue = 6;
el5.ZValue = 578.52;
el5.CustomAttributes["country"] = "India";
ser3.Elements.Add(el5);
Element el6 = new Element();
el6.XValue = 2000;
el6.YValue = 2;
el6.ZValue = 2440;
el6.CustomAttributes["country"] = "India";
ser3.Elements.Add(el6);
sc.Add(ser3);
Series ser4 = new Series("");
ser4.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el7 = new Element();
el7.XValue = 1990;
el7.YValue = 1;
el7.ZValue = 2530;
el7.CustomAttributes["country"] = "Russia";
ser4.Elements.Add(el7);
Element el8 = new Element();
el8.XValue = 2000;
el8.YValue = 3;
el8.ZValue = 1580;
el8.CustomAttributes["country"] = "Russia";
ser4.Elements.Add(el8);
sc.Add(ser4);
Series ser5 = new Series("");
ser5.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el9 = new Element();
el9.XValue = 1990;
el9.YValue = 3;
el9.ZValue = 1160;
el9.CustomAttributes["country"] = "Japan";
ser5.Elements.Add(el9);
Element el10 = new Element();
el10.XValue = 2000;
el10.YValue = 4;
el10.ZValue = 1030;
el10.CustomAttributes["country"] = "Japan";
ser5.Elements.Add(el10);
sc.Add(ser5);
Series ser6 = new Series("");
ser6.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el11 = new Element();
el11.XValue = 1990;
el11.YValue = 4;
el11.ZValue = 1050;
el11.CustomAttributes["country"] = "Germany";
ser6.Elements.Add(el11);
Element el12 = new Element();
el12.XValue = 2000;
el12.YValue = 6;
el12.ZValue = 644.31;
el12.CustomAttributes["country"] = "Germany";
ser6.Elements.Add(el12);
sc.Add(ser6);
Series ser7 = new Series("");
ser7.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el13 = new Element();
el13.XValue = 1990;
el13.YValue = 7;
el13.ZValue = 458.01;
el13.CustomAttributes["country"] = "Canada";
ser7.Elements.Add(el13);
Element el14 = new Element();
el14.XValue = 2000;
el14.YValue = 10;
el14.ZValue = 535.82;
el14.CustomAttributes["country"] = "Canada";
ser7.Elements.Add(el14);
sc.Add(ser7);
Series ser8 = new Series("");
ser8.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722");
Element el15 = new Element();
el15.XValue = 1990;
el15.YValue = 16;
el15.ZValue = 209.94;
el15.CustomAttributes["country"] = "Iran";
ser8.Elements.Add(el15);
Element el16 = new Element();
el16.XValue = 2000;
el16.YValue = 5;
el16.ZValue = 745.04;
el16.CustomAttributes["country"] = "Iran";
ser8.Elements.Add(el16);
sc.Add(ser8);
Series ser9 = new Series("");
ser9.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722");
Element el17 = new Element();
el17.XValue = 1990;
el17.YValue = 14;
el17.ZValue = 250.47;
el17.CustomAttributes["country"] = "South Korea";
ser9.Elements.Add(el17);
Element el18 = new Element();
el18.XValue = 2000;
el18.YValue = 8;
el18.ZValue = 597.61;
el18.CustomAttributes["country"] = "South Korea";
ser9.Elements.Add(el18);
sc.Add(ser9);
Series ser10 = new Series("");
ser10.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722");
Element el19 = new Element();
el19.XValue = 1990;
el19.YValue = 19;
el19.ZValue = 150.28;
el19.CustomAttributes["country"] = "Indonesia";
ser10.Elements.Add(el19);
Element el20 = new Element();
el20.XValue = 2000;
el20.YValue = 9;
el20.ZValue = 589.5;
el20.CustomAttributes["country"] = "Indonesia";
ser10.Elements.Add(el20);
sc.Add(ser10);
Series ser11 = new Series("");
ser11.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722");
Element el21 = new Element();
el21.XValue = 1990;
el21.YValue = 17;
el21.ZValue = 208.5;
el21.CustomAttributes["country"] = "Saudi Arabia";
ser11.Elements.Add(el21);
Element el22 = new Element();
el22.XValue = 2000;
el22.YValue = 7;
el22.ZValue = 625.51;
el22.CustomAttributes["country"] = "Saudi Arabia";
ser11.Elements.Add(el22);
sc.Add(ser11);
Series ser12 = new Series("");
ser12.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722");
Element el23 = new Element();
el23.XValue = 1990;
el23.YValue = 15;
el23.ZValue = 218.66;
el23.CustomAttributes["country"] = "Brazil";
ser12.Elements.Add(el23);
Element el24 = new Element();
el24.XValue = 2000;
el24.YValue = 11;
el24.ZValue = 467.38;
el24.CustomAttributes["country"] = "Brazil";
ser12.Elements.Add(el24);
sc.Add(ser12);
Series ser13 = new Series("");
ser13.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el25 = new Element();
el25.XValue = 1990;
el25.YValue = 11;
el25.ZValue = 317.04;
el25.CustomAttributes["country"] = "Mexico";
ser13.Elements.Add(el25);
Element el26 = new Element();
el26.XValue = 2000;
el26.YValue = 15;
el26.ZValue = 356.97;
el26.CustomAttributes["country"] = "Mexico";
ser13.Elements.Add(el26);
sc.Add(ser13);
Series ser14 = new Series("");
ser14.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el27 = new Element();
el27.XValue = 1990;
el27.YValue = 13;
el27.ZValue = 279.36;
el27.CustomAttributes["country"] = "Australia";
ser14.Elements.Add(el27);
Element el28 = new Element();
el28.XValue = 2000;
el28.YValue = 14;
el28.ZValue = 391.89;
el28.CustomAttributes["country"] = "Australia";
ser14.Elements.Add(el28);
sc.Add(ser14);
Series ser15 = new Series("");
ser15.DefaultElement.Color = ColorTranslator.FromHtml("#BDBDBD");
Element el29 = new Element();
el29.XValue = 1990;
el29.YValue = 12;
el29.ZValue = 312.97;
el29.CustomAttributes["country"] = "South Africa";
ser15.Elements.Add(el29);
Element el30 = new Element();
el30.XValue = 2000;
el30.YValue = 12;
el30.ZValue = 451.96;
el30.CustomAttributes["country"] = "South Africa";
ser15.Elements.Add(el30);
sc.Add(ser15);
Series ser16 = new Series("");
ser16.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722");
Element el31 = new Element();
el31.XValue = 1990;
el31.YValue = 18;
el31.ZValue = 151.51;
el31.CustomAttributes["country"] = "Turkey";
ser16.Elements.Add(el31);
Element el32 = new Element();
el32.XValue = 2000;
el32.YValue = 13;
el32.ZValue = 392.79;
el32.CustomAttributes["country"] = "Turkey";
ser16.Elements.Add(el32);
sc.Add(ser16);
Series ser17 = new Series("");
ser17.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el33 = new Element();
el33.XValue = 1990;
el33.YValue = 5;
el33.ZValue = 600.34;
el33.CustomAttributes["country"] = "United Kingdom";
ser17.Elements.Add(el33);
Element el34 = new Element();
el34.XValue = 2000;
el34.YValue = 16;
el34.ZValue = 329.58;
el34.CustomAttributes["country"] = "United Kingdom";
ser17.Elements.Add(el34);
sc.Add(ser17);
Series ser18 = new Series("");
ser18.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el35 = new Element();
el35.XValue = 1990;
el35.YValue = 8;
el35.ZValue = 439.55;
el35.CustomAttributes["country"] = "Italy";
ser18.Elements.Add(el35);
Element el36 = new Element();
el36.XValue = 2000;
el36.YValue = 17;
el36.ZValue = 303.82;
el36.CustomAttributes["country"] = "Italy";
ser18.Elements.Add(el36);
sc.Add(ser18);
Series ser19 = new Series("");
ser19.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el37 = new Element();
el37.XValue = 1990;
el37.YValue = 9;
el37.ZValue = 393;
el37.CustomAttributes["country"] = "France";
ser19.Elements.Add(el37);
Element el38 = new Element();
el38.XValue = 2000;
el38.YValue = 19;
el38.ZValue = 276.63;
el38.CustomAttributes["country"] = "France";
ser19.Elements.Add(el38);
sc.Add(ser19);
Series ser20 = new Series("");
ser20.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50");
Element el39 = new Element();
el39.XValue = 1990;
el39.YValue = 10;
el39.ZValue = 376.81;
el39.CustomAttributes["country"] = "Poland";
ser20.Elements.Add(el39);
Element el40 = new Element();
el40.XValue = 2000;
el40.YValue = 18;
el40.ZValue = 299.59;
el40.CustomAttributes["country"] = "Poland";
ser20.Elements.Add(el40);
sc.Add(ser20);

return sc;
}

</script>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>.netCHARTING Sample</title>
<script type="text/javascript">
</script>
</head>
<body>
<div align="center">
<dotnet:Chart ID="Chart" runat="server" />
</div>
</body>
</html>

<%@ Page Language="vb" Description="dotnetCHARTING Component" %>
<%@ Register TagPrefix="dotnet" Namespace="dotnetCHARTING" Assembly="dotnetCHARTING" %>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Drawing2D" %>
<script runat="server">

Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
' This sample deomonstrates a ranked slope chart with specific categories for each axis.

Chart.Type = ChartType.Combo
Chart.Title = "Annual CO2 Emissions by Country"
Chart.Size = "350x570"
Chart.TempDirectory = "temp"
Chart.LegendBox.Visible = False
Chart.Debug = False
Chart.JS.Enabled = True

Chart.DefaultAxis.DefaultTick.Label.Font = New Font("Tahoma", 10)
Chart.DefaultAxis.DefaultTick.GridLine.Visible = False
Chart.DefaultAxis.DefaultTick.Line.Visible = False

Chart.XAxis.ClearValues = True
Chart.XAxis.Orientation = dotnetCHARTING.Orientation.Top

' The ranges represents the number of categories used below.Series element Y values refer to the indexes of
' either the first and second y axis category respectively.
Chart.YAxis.Minimum = -.5
Chart.YAxis.Maximum = 19.5
Chart.YAxis.DefaultTick.Line.Length = 0
Chart.YAxis.InvertScale = True

Dim secondYAxis As Axis = Chart.YAxis.Calculate("")
secondYAxis.JsID = "y2"
secondYAxis.InvertScale = True
secondYAxis.Orientation = dotnetCHARTING.Orientation.Right
secondYAxis.Minimum = -.5
secondYAxis.Maximum = 19.5
Chart.AxisCollection.Add(secondYAxis)

Chart.JS.Settings.Add("chartArea.clipContent", "false")

'Add specific categories to both y axes.
Chart.JS.Settings.Add("yAxis.0.categories", "js:['United States', 'Russia', 'China', 'Japan', 'Germany', 'United Kingdom', 'India', 'Canada', 'Italy', 'France', 'Poland', 'Mexico', 'South Africa', 'Australia', 'South Korea', 'Brazil', 'Iran', 'Saudi Arabia', 'Turkey', 'Indonesia']")

Chart.JS.Settings.Add("yAxis.1.categories", "['China', 'United States', 'India', 'Russia', 'Japan', 'Iran', 'Germany', 'Saudi Arabia', 'South Korea', 'Indonesia', 'Canada', 'Brazil', 'South Africa', 'Turkey', 'Australia', 'Mexico', 'United Kingdom', 'Italy', 'Poland', 'France']")

Chart.DefaultElement.ShowValue = False
Chart.DefaultSeries.Type = SeriesType.Line
Chart.DefaultSeries.DefaultElement.Marker.Type = ElementMarkerType.Circle
Chart.DefaultSeries.LegendEntry.Visible = False
Chart.ChartArea.ClearColors()

' Make first and last element y axis ticks inherit the series/element color.
Chart.JS.Settings.Add("defaultSeries.firstPoint.yAxisTick.label.color","%color")
' Make the last element bind to the second y axis.
Chart.JS.Settings.Add("defaultSeries.lastPoint.yAxisTick","js:{ axisId: 'y2', label_color: '%color' }")
' Makes a tick appear on the x axis at the point position. (the 1990 and 2000 ticks at the top)
Chart.JS.Settings.Add("defaultSeries.defaultPoint.xAxisTick","js:{ }")

Chart.DefaultSeries.LastElement.YAxisTick.AxisID = "y2"
Chart.DefaultElement.ToolTip = "CO2 emissions in %country, %xValue<br><b>%zValue Mt</b>"

' *DYNAMIC DATA NOTE*
' This sample uses random data to populate the chart. To populate
' a chart with database data see the following resources:
' - Classic samples folder
' - Help File > Data Tutorials
' - Sample: features/DataEngine.aspx
Dim mySC As SeriesCollection = getData()
' Add the random data.
Chart.SeriesCollection.Add(mySC)

End Sub
Function getData() As SeriesCollection
Dim sc As SeriesCollection = New SeriesCollection()
Dim ser1 As Series = New Series("")
ser1.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722")
Dim el1 As Element = New Element()
el1.XValue = 1990
el1.YValue = 2
el1.ZValue = 2480
el1.CustomAttributes("country") = "China"
ser1.Elements.Add(el1)
Dim el2 As Element = New Element()
el2.XValue = 2000
el2.YValue = 0
el2.ZValue = 10670
el2.CustomAttributes("country") = "China"
ser1.Elements.Add(el2)
sc.Add(ser1)
Dim ser2 As Series = New Series("")
ser2.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el3 As Element = New Element()
el3.XValue = 1990
el3.YValue = 0
el3.ZValue = 5110
el3.CustomAttributes("country") = "United States"
ser2.Elements.Add(el3)
Dim el4 As Element = New Element()
el4.XValue = 2000
el4.YValue = 1
el4.ZValue = 4710
el4.CustomAttributes("country") = "United States"
ser2.Elements.Add(el4)
sc.Add(ser2)
Dim ser3 As Series = New Series("")
ser3.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722")
Dim el5 As Element = New Element()
el5.XValue = 1990
el5.YValue = 6
el5.ZValue = 578.52
el5.CustomAttributes("country") = "India"
ser3.Elements.Add(el5)
Dim el6 As Element = New Element()
el6.XValue = 2000
el6.YValue = 2
el6.ZValue = 2440
el6.CustomAttributes("country") = "India"
ser3.Elements.Add(el6)
sc.Add(ser3)
Dim ser4 As Series = New Series("")
ser4.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el7 As Element = New Element()
el7.XValue = 1990
el7.YValue = 1
el7.ZValue = 2530
el7.CustomAttributes("country") = "Russia"
ser4.Elements.Add(el7)
Dim el8 As Element = New Element()
el8.XValue = 2000
el8.YValue = 3
el8.ZValue = 1580
el8.CustomAttributes("country") = "Russia"
ser4.Elements.Add(el8)
sc.Add(ser4)
Dim ser5 As Series = New Series("")
ser5.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el9 As Element = New Element()
el9.XValue = 1990
el9.YValue = 3
el9.ZValue = 1160
el9.CustomAttributes("country") = "Japan"
ser5.Elements.Add(el9)
Dim el10 As Element = New Element()
el10.XValue = 2000
el10.YValue = 4
el10.ZValue = 1030
el10.CustomAttributes("country") = "Japan"
ser5.Elements.Add(el10)
sc.Add(ser5)
Dim ser6 As Series = New Series("")
ser6.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el11 As Element = New Element()
el11.XValue = 1990
el11.YValue = 4
el11.ZValue = 1050
el11.CustomAttributes("country") = "Germany"
ser6.Elements.Add(el11)
Dim el12 As Element = New Element()
el12.XValue = 2000
el12.YValue = 6
el12.ZValue = 644.31
el12.CustomAttributes("country") = "Germany"
ser6.Elements.Add(el12)
sc.Add(ser6)
Dim ser7 As Series = New Series("")
ser7.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el13 As Element = New Element()
el13.XValue = 1990
el13.YValue = 7
el13.ZValue = 458.01
el13.CustomAttributes("country") = "Canada"
ser7.Elements.Add(el13)
Dim el14 As Element = New Element()
el14.XValue = 2000
el14.YValue = 10
el14.ZValue = 535.82
el14.CustomAttributes("country") = "Canada"
ser7.Elements.Add(el14)
sc.Add(ser7)
Dim ser8 As Series = New Series("")
ser8.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722")
Dim el15 As Element = New Element()
el15.XValue = 1990
el15.YValue = 16
el15.ZValue = 209.94
el15.CustomAttributes("country") = "Iran"
ser8.Elements.Add(el15)
Dim el16 As Element = New Element()
el16.XValue = 2000
el16.YValue = 5
el16.ZValue = 745.04
el16.CustomAttributes("country") = "Iran"
ser8.Elements.Add(el16)
sc.Add(ser8)
Dim ser9 As Series = New Series("")
ser9.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722")
Dim el17 As Element = New Element()
el17.XValue = 1990
el17.YValue = 14
el17.ZValue = 250.47
el17.CustomAttributes("country") = "South Korea"
ser9.Elements.Add(el17)
Dim el18 As Element = New Element()
el18.XValue = 2000
el18.YValue = 8
el18.ZValue = 597.61
el18.CustomAttributes("country") = "South Korea"
ser9.Elements.Add(el18)
sc.Add(ser9)
Dim ser10 As Series = New Series("")
ser10.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722")
Dim el19 As Element = New Element()
el19.XValue = 1990
el19.YValue = 19
el19.ZValue = 150.28
el19.CustomAttributes("country") = "Indonesia"
ser10.Elements.Add(el19)
Dim el20 As Element = New Element()
el20.XValue = 2000
el20.YValue = 9
el20.ZValue = 589.5
el20.CustomAttributes("country") = "Indonesia"
ser10.Elements.Add(el20)
sc.Add(ser10)
Dim ser11 As Series = New Series("")
ser11.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722")
Dim el21 As Element = New Element()
el21.XValue = 1990
el21.YValue = 17
el21.ZValue = 208.5
el21.CustomAttributes("country") = "Saudi Arabia"
ser11.Elements.Add(el21)
Dim el22 As Element = New Element()
el22.XValue = 2000
el22.YValue = 7
el22.ZValue = 625.51
el22.CustomAttributes("country") = "Saudi Arabia"
ser11.Elements.Add(el22)
sc.Add(ser11)
Dim ser12 As Series = New Series("")
ser12.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722")
Dim el23 As Element = New Element()
el23.XValue = 1990
el23.YValue = 15
el23.ZValue = 218.66
el23.CustomAttributes("country") = "Brazil"
ser12.Elements.Add(el23)
Dim el24 As Element = New Element()
el24.XValue = 2000
el24.YValue = 11
el24.ZValue = 467.38
el24.CustomAttributes("country") = "Brazil"
ser12.Elements.Add(el24)
sc.Add(ser12)
Dim ser13 As Series = New Series("")
ser13.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el25 As Element = New Element()
el25.XValue = 1990
el25.YValue = 11
el25.ZValue = 317.04
el25.CustomAttributes("country") = "Mexico"
ser13.Elements.Add(el25)
Dim el26 As Element = New Element()
el26.XValue = 2000
el26.YValue = 15
el26.ZValue = 356.97
el26.CustomAttributes("country") = "Mexico"
ser13.Elements.Add(el26)
sc.Add(ser13)
Dim ser14 As Series = New Series("")
ser14.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el27 As Element = New Element()
el27.XValue = 1990
el27.YValue = 13
el27.ZValue = 279.36
el27.CustomAttributes("country") = "Australia"
ser14.Elements.Add(el27)
Dim el28 As Element = New Element()
el28.XValue = 2000
el28.YValue = 14
el28.ZValue = 391.89
el28.CustomAttributes("country") = "Australia"
ser14.Elements.Add(el28)
sc.Add(ser14)
Dim ser15 As Series = New Series("")
ser15.DefaultElement.Color = ColorTranslator.FromHtml("#BDBDBD")
Dim el29 As Element = New Element()
el29.XValue = 1990
el29.YValue = 12
el29.ZValue = 312.97
el29.CustomAttributes("country") = "South Africa"
ser15.Elements.Add(el29)
Dim el30 As Element = New Element()
el30.XValue = 2000
el30.YValue = 12
el30.ZValue = 451.96
el30.CustomAttributes("country") = "South Africa"
ser15.Elements.Add(el30)
sc.Add(ser15)
Dim ser16 As Series = New Series("")
ser16.DefaultElement.Color = ColorTranslator.FromHtml("#FF5722")
Dim el31 As Element = New Element()
el31.XValue = 1990
el31.YValue = 18
el31.ZValue = 151.51
el31.CustomAttributes("country") = "Turkey"
ser16.Elements.Add(el31)
Dim el32 As Element = New Element()
el32.XValue = 2000
el32.YValue = 13
el32.ZValue = 392.79
el32.CustomAttributes("country") = "Turkey"
ser16.Elements.Add(el32)
sc.Add(ser16)
Dim ser17 As Series = New Series("")
ser17.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el33 As Element = New Element()
el33.XValue = 1990
el33.YValue = 5
el33.ZValue = 600.34
el33.CustomAttributes("country") = "United Kingdom"
ser17.Elements.Add(el33)
Dim el34 As Element = New Element()
el34.XValue = 2000
el34.YValue = 16
el34.ZValue = 329.58
el34.CustomAttributes("country") = "United Kingdom"
ser17.Elements.Add(el34)
sc.Add(ser17)
Dim ser18 As Series = New Series("")
ser18.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el35 As Element = New Element()
el35.XValue = 1990
el35.YValue = 8
el35.ZValue = 439.55
el35.CustomAttributes("country") = "Italy"
ser18.Elements.Add(el35)
Dim el36 As Element = New Element()
el36.XValue = 2000
el36.YValue = 17
el36.ZValue = 303.82
el36.CustomAttributes("country") = "Italy"
ser18.Elements.Add(el36)
sc.Add(ser18)
Dim ser19 As Series = New Series("")
ser19.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el37 As Element = New Element()
el37.XValue = 1990
el37.YValue = 9
el37.ZValue = 393
el37.CustomAttributes("country") = "France"
ser19.Elements.Add(el37)
Dim el38 As Element = New Element()
el38.XValue = 2000
el38.YValue = 19
el38.ZValue = 276.63
el38.CustomAttributes("country") = "France"
ser19.Elements.Add(el38)
sc.Add(ser19)
Dim ser20 As Series = New Series("")
ser20.DefaultElement.Color = ColorTranslator.FromHtml("#4CAF50")
Dim el39 As Element = New Element()
el39.XValue = 1990
el39.YValue = 10
el39.ZValue = 376.81
el39.CustomAttributes("country") = "Poland"
ser20.Elements.Add(el39)
Dim el40 As Element = New Element()
el40.XValue = 2000
el40.YValue = 18
el40.ZValue = 299.59
el40.CustomAttributes("country") = "Poland"
ser20.Elements.Add(el40)
sc.Add(ser20)

Return sc
End Function

</script>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>.netCHARTING Sample</title>
<script type="text/javascript">
</script>
</head>
<body>
<div align="center">
<dotnet:Chart ID="Chart" runat="server" />
</div>
</body>
</html>