Gallery
PreviousExtreme Value Signal
<%@ Page Language="C#" Description="dotnetCHARTING Component" %>
<%@ Register TagPrefix="dotnet" Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Drawing2D" %>
<%@ Import Namespace="dotnetCHARTING"%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>.netCHARTING Financial Extreme Value Signal Sample</title>
<script runat="server">
void Page_Load(Object sender,EventArgs e)
{
// Demonstrates the use of the Extreme value signal indicators
// First we declare a chart of type FinancialChart
// The Financial Chart
FinancialChart.Title="Financial Chart";
FinancialChart.TempDirectory="temp";
FinancialChart.Debug=true;
FinancialChart.ShadingEffect = true;
FinancialChart.LegendBox.Template ="%icon %name";
FinancialChart.Size="800X600";
FinancialChart.XAxis.Scale = Scale.Time;
FinancialChart.XAxis.FormatString = "MMM d";
FinancialChart.XAxis.TimeInterval = TimeInterval.Week;
FinancialChart.YAxis.Label.Text = "Price (USD)";
FinancialChart.YAxis.FormatString = "currency";
FinancialChart.YAxis.ScaleRange.ValueLow = 11;
// Here we load data samples from the FinancialCompany table from within chartsample.mdb
DataEngine priceDataEngine = new DataEngine(ConfigurationManager.AppSettings["DNCConnectionString"]);
priceDataEngine.ChartType = ChartType.Financial;
priceDataEngine.DateGrouping = TimeInterval.Day;
priceDataEngine.StartDate = new DateTime (2021,6,1);
priceDataEngine.EndDate = new DateTime (2021,9,30);
priceDataEngine.SqlStatement = @"SELECT TransDate, HighPrice, LowPrice, OpenPrice, ClosePrice FROM FinancialCompany WHERE TransDate >= #STARTDATE# AND TransDate <= #ENDDATE# ORDER BY TransDate ";
priceDataEngine.DataFields = "xAxis=TransDate,High=HighPrice,Low=LowPrice,Open=OpenPrice,Close=ClosePrice";
SeriesCollection sc = priceDataEngine.GetSeries ();
Series prices = null;
if(sc.Count>0)
prices = sc[0];
else
return;
prices.DefaultElement.ToolTip="L:%Low-H:%High";
prices.DefaultElement.SmartLabel.Font = new Font("Arial", 6);
prices.DefaultElement.SmartLabel.Text="O:%Open-C:%Close";
prices.Type = SeriesTypeFinancial.CandleStick;
CalendarPattern cp = new CalendarPattern (TimeInterval.Day, TimeInterval.Week, "0000001");
cp.AdjustmentUnit = TimeInterval.Day;
prices.Trim (cp, ElementValue.XDateTime);
prices.Name = "Prices";
FinancialChart.SeriesCollection.Add (prices);
/*
* Financial Extreme Value Signal Indicators
*/
FinancialChart.DefaultSeries.DefaultElement.Marker = new ElementMarker (ElementMarkerType.None);
FinancialChart.ChartAreaLayout.Mode = ChartAreaLayoutMode.Vertical;
FinancialChart.DefaultSeries.Type = SeriesType.Spline;
// Here we display the financial simple moving average for the prices series over five days
FinancialChart.SeriesCollection.Add (FinancialEngine.SimpleMovingAverage (prices, ElementValue.High, 5));
// Create a new chart area for KFastStochastic and DStochastic financial indicators
ChartArea stochasticChartArea = new ChartArea ("Stochastic");
stochasticChartArea.HeightPercentage = 20;
stochasticChartArea.YAxis = new Axis();
FinancialChart.ExtraChartAreas.Add (stochasticChartArea);
// Here we display the kFastStochastic over a period of ten days for the Prices Series
Series kFast = FinancialEngine.KFastStochastic (prices, 10);
kFast.Type = SeriesType.Spline;
kFast.DefaultElement.Color = Color.FromArgb(255, 99, 49);
if (kFast.Elements.Count > 0)
stochasticChartArea.SeriesCollection.Add (kFast);
else Console.WriteLine ("The series kfast is empty");
// Here we display the DStochastic over a period of ten days.
// For the calculation of DStochastic we use SimpleMovingAverage over 5 days.
Series dStochastic = FinancialEngine.DStochastic (prices, 10, 1, 5);
dStochastic.Type = SeriesType.Spline;
dStochastic.DefaultElement.Color = Color.FromArgb(0, 255, 0);
if (dStochastic.Elements.Count > 0)
stochasticChartArea.SeriesCollection.Add (dStochastic);
else Console.WriteLine ("The series dStochastic is empty");
// Create a new chart area for ExtremeValueKSignal and ExtremeValueDSignal financial indicators
ChartArea signalChartArea = new ChartArea ("Extreme Value K Signals");
signalChartArea.YAxis = new Axis();
signalChartArea.HeightPercentage = 20;
FinancialChart.ExtraChartAreas.Add (signalChartArea);
// Here we display the ExtremeValueKSignal calculated over 10 day period
// which can take the values 1, 0, -1
Series kSignal = FinancialEngine.ExtremeValueKSignal(prices, 20, 80, 10);
kSignal.Type = SeriesType.Marker;
kSignal.DefaultElement.Marker = new ElementMarker(ElementMarkerType.Triangle, 5, Color.FromArgb(125, 255, 125));
signalChartArea.SeriesCollection.Add(kSignal);
// Here we display the ExtremeValueDSignal calculated over 10 day period
// which can take the values 1, 0, -1
Series dSignal = FinancialEngine.ExtremeValueDSignal(prices, 20, 80, 10, 1, 5);
dSignal.Type = SeriesType.Marker;
dSignal.DefaultElement.Marker = new ElementMarker(ElementMarkerType.Triangle, 5, Color.FromArgb(255, 125, 125));
FinancialChart.SeriesCollection.Add(dSignal);
}
</script>
</head>
<body>
<div style="text-align:center">
<dotnet:Chart id="FinancialChart" 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" %>
<%@ Import Namespace="dotnetCHARTING"%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>.netCHARTING Financial Extreme Value Signal Sample</title>
<script runat="server">
Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
' Demonstrates the use of the Extreme value signal indicators
' First we declare a chart of type FinancialChart
' The Financial Chart
FinancialChart.Title="Financial Chart"
FinancialChart.TempDirectory="temp"
FinancialChart.Debug=True
FinancialChart.ShadingEffect = True
FinancialChart.LegendBox.Template ="%icon %name"
FinancialChart.Size="800X600"
FinancialChart.XAxis.Scale = Scale.Time
FinancialChart.XAxis.FormatString = "MMM d"
FinancialChart.XAxis.TimeInterval = TimeInterval.Week
FinancialChart.YAxis.Label.Text = "Price (USD)"
FinancialChart.YAxis.FormatString = "currency"
FinancialChart.YAxis.ScaleRange.ValueLow = 11
' Here we load data samples from the FinancialCompany table from within chartsample.mdb
Dim priceDataEngine As DataEngine = New DataEngine(ConfigurationManager.AppSettings("DNCConnectionString"))
priceDataEngine.ChartType = ChartType.Financial
priceDataEngine.DateGrouping = TimeInterval.Day
priceDataEngine.StartDate = New DateTime (2021,6,1)
priceDataEngine.EndDate = New DateTime (2021,9,30)
priceDataEngine.SqlStatement = "SELECT TransDate, HighPrice, LowPrice, OpenPrice, ClosePrice FROM FinancialCompany WHERE TransDate >= #STARTDATE# AND TransDate <= #ENDDATE# ORDER BY TransDate "
priceDataEngine.DataFields = "xAxis=TransDate,High=HighPrice,Low=LowPrice,Open=OpenPrice,Close=ClosePrice"
Dim sc As SeriesCollection = priceDataEngine.GetSeries ()
Dim prices As Series = Nothing
If sc.Count>0 Then
prices = sc(0)
Else
Return
End If
prices.DefaultElement.ToolTip="L:%Low-H:%High"
prices.DefaultElement.SmartLabel.Font = New Font("Arial", 6)
prices.DefaultElement.SmartLabel.Text="O:%Open-C:%Close"
prices.Type = SeriesTypeFinancial.CandleStick
Dim cp As CalendarPattern = New CalendarPattern (TimeInterval.Day, TimeInterval.Week, "0000001")
cp.AdjustmentUnit = TimeInterval.Day
prices.Trim (cp, ElementValue.XDateTime)
prices.Name = "Prices"
FinancialChart.SeriesCollection.Add (prices)
'
'* Financial Extreme Value Signal Indicators
'
FinancialChart.DefaultSeries.DefaultElement.Marker = New ElementMarker (ElementMarkerType.None)
FinancialChart.ChartAreaLayout.Mode = ChartAreaLayoutMode.Vertical
FinancialChart.DefaultSeries.Type = SeriesType.Spline
' Here we display the financial simple moving average for the prices series over five days
FinancialChart.SeriesCollection.Add (FinancialEngine.SimpleMovingAverage (prices, ElementValue.High, 5))
' Create a new chart area for KFastStochastic and DStochastic financial indicators
Dim stochasticChartArea As ChartArea = New ChartArea ("Stochastic")
stochasticChartArea.HeightPercentage = 20
stochasticChartArea.YAxis = New Axis()
FinancialChart.ExtraChartAreas.Add (stochasticChartArea)
' Here we display the kFastStochastic over a period of ten days for the Prices Series
Dim kFast As Series = FinancialEngine.KFastStochastic (prices, 10)
kFast.Type = SeriesType.Spline
kFast.DefaultElement.Color = Color.FromArgb(255, 99, 49)
If kFast.Elements.Count > 0 Then
stochasticChartArea.SeriesCollection.Add (kFast)
Else
Console.WriteLine ("The series kfast is empty")
End If
' Here we display the DStochastic over a period of ten days.
' For the calculation of DStochastic we use SimpleMovingAverage over 5 days.
Dim dStochastic As Series = FinancialEngine.DStochastic (prices, 10, 1, 5)
dStochastic.Type = SeriesType.Spline
dStochastic.DefaultElement.Color = Color.FromArgb(0, 255, 0)
If dStochastic.Elements.Count > 0 Then
stochasticChartArea.SeriesCollection.Add (dStochastic)
Else
Console.WriteLine ("The series dStochastic is empty")
End If
' Create a new chart area for ExtremeValueKSignal and ExtremeValueDSignal financial indicators
Dim signalChartArea As ChartArea = New ChartArea ("Extreme Value K Signals")
signalChartArea.YAxis = New Axis()
signalChartArea.HeightPercentage = 20
FinancialChart.ExtraChartAreas.Add (signalChartArea)
' Here we display the ExtremeValueKSignal calculated over 10 day period
' which can take the values 1, 0, -1
Dim kSignal As Series = FinancialEngine.ExtremeValueKSignal(prices, 20, 80, 10)
kSignal.Type = SeriesType.Marker
kSignal.DefaultElement.Marker = New ElementMarker(ElementMarkerType.Triangle, 5, Color.FromArgb(125, 255, 125))
signalChartArea.SeriesCollection.Add(kSignal)
' Here we display the ExtremeValueDSignal calculated over 10 day period
' which can take the values 1, 0, -1
Dim dSignal As Series = FinancialEngine.ExtremeValueDSignal(prices, 20, 80, 10, 1, 5)
dSignal.Type = SeriesType.Marker
dSignal.DefaultElement.Marker = New ElementMarker(ElementMarkerType.Triangle, 5, Color.FromArgb(255, 125, 125))
FinancialChart.SeriesCollection.Add(dSignal)
End Sub
</script>
</head>
<body>
<div style="text-align:center">
<dotnet:Chart id="FinancialChart" runat="server"/>
</div>
</body>
</html>
- Sample FilenameExtremeValueSignal.aspx
- VersionLegacy (Pre 3.0)
- Uses DatabaseYes