Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("layout")
CreateChartData
End Sub
Sub CreateChartData
If 100%Y > 100%x Then ' portrait mode
#SupportedOrientations: Portrait
Else
#SupportedOrientations: Landscape
End If
LineChart1.ClearData
LineChart1.AddLine("First line", Colors.Blue)
LineChart1.AddLine("Second line", Colors.Magenta)
For i = 0 To 100
LineChart1.AddLineMultiplePoints(i, Array As Double(i, 100-i), i Mod 10 = 0)
Next
LineChart1.Title = "Chart Title"
LineChart1.XAxisName = "X Axis"
LineChart1.YAxisName = "Y Axis"
LineChart1.IncludeLegend = "TOP_RIGHT"
LineChart1.YScaleMinValue = 0
LineChart1.AutomaticScale = True
LineChart1.XScaleTextOrientation = "45 DEGREES"
LineChart1.DrawChart
End Sub