Source »
Market Facilitation Index - source code
// Forex Strategy Builder
// Copyright (c) 2006 - 2008 Miroslav Popov - All rights reserved!
// http://forexsb.com
// info(a)forexsb.com
//
// Last changed on: 2007-09-20
using System;
using System.Drawing;
namespace Forex_Strategy_Builder
{
/// <summary>
/// Indicator: Market Facilitation Index
/// </summary>
public class Market_Facilitation_Index : Indicator
{
/// <summary>
/// The default constructor.
/// </summary>
public Market_Facilitation_Index()
{
}
/// <summary>
/// Sets the default parameters for the designated slot type.
/// </summary>
/// <param name="slotType">The slot type.</param>
public Market_Facilitation_Index(SlotTypes slotType)
{
sIndicatorName = "Market Facilitation Index";
parameters = new IndicatorParam();
component = new IndicatorComp[] { };
bSeparatedChart = true;
fMinValue = 0f;
bIsCalculated = false;
// The indicator name.
parameters.IndicatorName = sIndicatorName;
// The slot type.
parameters.SlotType = slotType;
// The ComboBox parameters.
parameters.ListParam[0].Caption = "Logic";
parameters.ListParam[0].ItemList = new string[]
{
"The Market Facilitation Index rises",
"The Market Facilitation Index falls",
"The Market Facilitation Index changes its direction upward",
"The Market Facilitation Index changes its direction downward"
};
parameters.ListParam[0].Index = 0;
parameters.ListParam[0].Text = parameters.ListParam[0].ItemList[parameters.ListParam[0].Index];
parameters.ListParam[0].Enabled = true;
parameters.ListParam[0].ToolTip = "Logic of application";
// The CheckBox parameters.
parameters.CheckParam[0].Caption = "Use previous bar value";
parameters.CheckParam[0].Checked = Data.Strategy.PrepareUsePrevBarValueCheckBox(slotType);
parameters.CheckParam[0].Enabled = true;
parameters.CheckParam[0].ToolTip = "Use the indicator value from the previous bar";
}
/// <summary>
/// Calculates the indicator's components.
/// </summary>
/// <param name="slotType">The slot type.</param>
public override void Calculate(SlotTypes slotType)
{
if (parameters.SlotType == SlotTypes.NotDefined) return;
// Reading the parameters
int iPrvs = parameters.CheckParam[0].Checked ? 1 : 0;
// Calculation
float[] afMFI = new float[Bars];
int iFirstBar = 5;
for (int iBar = 0; iBar < Bars; iBar++)
{
afMFI[iBar] = 1000 * (High[iBar] - Low[iBar]) / Volume[iBar];
}
// Saving the components
component = new IndicatorComp[3];
component[0] = new IndicatorComp();
component[0].CompName = "Market Facilitation Index";
component[0].DataType = IndComponentType.IndicatorValue;
component[0].ChartType = IndChartType.Histogram;
component[0].FirstBar = iFirstBar;
component[0].Value = afMFI;
component[1] = new IndicatorComp();
component[1].ChartType = IndChartType.NoChart;
component[1].FirstBar = iFirstBar;
component[1].Value = new float[Bars];
component[2] = new IndicatorComp();
component[2].ChartType = IndChartType.NoChart;
component[2].FirstBar = iFirstBar;
component[2].Value = new float[Bars];
// Sets the component's type.
if (slotType == SlotTypes.OpenFilter)
{
component[1].DataType = IndComponentType.AllowOpenLong;
component[1].CompName = "Allows long positions opening";
component[2].DataType = IndComponentType.AllowOpenShort;
component[2].CompName = "Allows short positions opening";
}
else if (slotType == SlotTypes.CloseFilter)
{
component[1].DataType = IndComponentType.ForceCloseLong;
component[1].CompName = "Forces long positions closing";
component[2].DataType = IndComponentType.ForceCloseShort;
component[2].CompName = "Forces short positions closing";
}
// Calculation of the logic.
IndicatorLogic indLogic = IndicatorLogic.It_does_not_act_as_a_filter;
switch (parameters.ListParam[0].Text)
{
case "The Market Facilitation Index rises":
indLogic = IndicatorLogic.The_indicator_rises;
break;
case "The Market Facilitation Index falls":
indLogic = IndicatorLogic.The_indicator_falls;
break;
case "The Market Facilitation Index changes its direction upward":
indLogic = IndicatorLogic.The_indicator_changes_its_direction_upward;
break;
case "The Market Facilitation Index changes its direction downward":
indLogic = IndicatorLogic.The_indicator_changes_its_direction_downward;
break;
default:
break;
}
bIsCalculated = NoDirectionOscillatorLogic(iFirstBar, iPrvs, afMFI, 0, ref component[1], indLogic);
component[2].Value = component[1].Value;
}
}
}
Top