Supertrend Moving Average İndikatörü

Merhaba,

Linkteki indikatörü inceleyebilirsiniz.

/dosya/ca5a60a4cu34pkcbmn13xjryk/SuperTrendMov.mtxiq

iyi çalışmalar.

using System;
using System.Collections.Generic;
using System.Linq;
using System.ComponentModel;
using Matriks.Data.Identifiers;
using Matriks.Data.Symbol;
using Matriks.Engines;
using Matriks.Indicators;
using Matriks.Symbols;
using Matriks.AlgoTrader;
using Matriks.Trader.Core;
using Matriks.Trader.Core.Fields;
using Matriks.Trader.Core.TraderModels;
using Matriks.Lean.Algotrader.AlgoBase;
using Matriks.Lean.Algotrader.Models;
using Matriks.Lean.Algotrader.Trading;
using System.Windows.Media;
using System.Text;
/*
period:=10;
coeff:=3;
AP:=mov(c,20,e);

OFFSET:=coeff*ATR(period);
STR:=AP+OFFSET;
STS:=AP-OFFSET;

FUB:=IF(STR<PREV OR REF(c,-1)>PREV,STR,PREV);
FLB:=IF(STS>PREV OR REF(c,-1)<PREV,STS,PREV);

ST:=IF(PREV=REF(FUB,-1)
        AND c<FUB,FUB,IF(PREV=REF(FUB,-1)
        AND c>FUB,FLB,IF(PREV=REF(FLB,-1)
        AND c>FLB,FLB,IF(PREV=REF(FLB,-1)
        AND c<FLB,FUB,FUB))));
ST

*/
namespace Matriks.Lean.Algotrader
{
	//Ilk parametre indikatörün adı, sınıfın adıyla aynı olmalıdır.
	//Ikinci parametre indikatörün Dataserisinin üzerine mi yeni pencereye mi ekleneceğini belirtir. Yeni pencere için ->IndicatorDrawingArea.NewWindow , Data Serisi için IndicatorDrawingArea.OnDataSeries
	[IndicatorInformationAttribute("SuperTrendMov", IndicatorDrawingArea.OnDataSeries)]
	//Indikatörün çizgilerinin isimleri
	[IndicatorLineInformationAttribute(new []
		{
			"ST(0,1)"
		}, new []
		{
			"#00CCFF"
		}, new []
		{
			false
		}, new []
		{
			0
		}, new []
		{
			2
		}
	)]
	public class SuperTrendMov : MatriksIndicator
	{

		//Indicator opsiyon panelinde değerleri değiştirebildiğimiz parametreler. Int, Bool, Decimal ve Enum değerleri alabilir.Tüm değişken tiplerini DefaultValue ile tanımlarız. 
		[DefaultValue(10)]
		public int Period
		{
			get; set;
		}

		[DefaultValue(3)]
		public decimal Coeff
		{
			get; set;
		}

		[DefaultValue(20)]
		public int MovPeriod
		{
			get; set;
		}

		[DefaultValue(MovMethod.Wilders)]
		public MovMethod MovMethod
		{
			get; set;
		}

		MOV mov;

		ATR atr;

		Dictionary<int, decimal> FUBDict = new Dictionary<int, decimal>();
		Dictionary<int, decimal> FLBDict = new Dictionary<int, decimal>();
		Dictionary<int, decimal> STDict = new Dictionary<int, decimal>();

		public override void OnInit()
		{
			mov = MOVIndicator(Symbol, SymbolPeriod, OHLCType.Close, MovPeriod, MovMethod);

			atr = ATRIndicator(Symbol, SymbolPeriod, OHLCType.Close, Period);
			PointTitle.Add(0, new Dictionary<int, IIndicatorIcons>());
		}

		decimal AP, OFFSET, STR, STS;
		decimal prevFub, prevFlb, prevSt, fub, flb;

		public override void OnDataUpdate(int currentBar, decimal inputValue, DateTime barDateTime)
		{

			if (currentBar < Period)
			{
				FUBDict[currentBar] = 0;
				FLBDict[currentBar] = 0;
				STDict[currentBar] = 0;
				SetLine(0, currentBar, 0);
				return;
			}

			var close = Instrument.SymbolBarData.Close[currentBar];
			var prevClose = Instrument.SymbolBarData.Close[currentBar -1];

			AP = mov.CurrentValue;
			OFFSET = Coeff * atr.CurrentValue;
			STR = AP + OFFSET;
			STS = AP - OFFSET;

			if (FUBDict.ContainsKey(currentBar -1))
			{
				prevFub = FUBDict[currentBar -1];
				prevFlb = FLBDict[currentBar -1];
				prevSt = STDict[currentBar -1];


				FUBDict[currentBar] = STR<prevFub || prevClose>prevFub ? STR:prevFub;

				FLBDict[currentBar] = STS>prevFlb || prevClose<prevFlb ? STS:prevFlb;

				fub = FUBDict[currentBar];
				flb = FLBDict[currentBar];

				STDict[currentBar] = prevSt == prevFub && close<fub ? fub : (prevSt == prevFub && close>fub ? flb : (prevSt == prevFlb && close>flb ? flb : fub));

				SetLine(currentBar, STDict[currentBar]);
			}else
			{
				SetLine(currentBar, 0);
			}
		}
	}
}