Dim RA As New RectangleAnnotation
 
                    RA.Text = Path.GetFileNameWithoutExtension(ENGFile)
                    RA.ClipToChartArea = ChartEngine.ChartAreas(0).Name
                    RA.Font = New Font("Arial", 14, FontStyle.Bold)
                    RA.ForeColor = Color.Plum
                    RA.LineColor = Color.Blue
                    RA.BackColor = Color.Transparent
                    RA.LineWidth = 1
                    RA.AxisX = ChartEngine.ChartAreas(0).AxisX
                    RA.X = CInt(MaxRPM) - 1000
                    RA.AnchorY = 75
                    ChartEngine.Annotations.Add(RA)