//+------------------------------------------------------------------+
//| CoeffofLine_v1.mq4
//| Kalenzo - Conversion only
//| I added also second line
//| bartlomiej.gorski@gmail.com
//+------------------------------------------------------------------+
#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 Yellow
#property indicator_color2 Red
#property indicator_level1 Silver
#property indicator_level2 Silver
extern int fastSeed = 5;
extern int slowSeed = 20;
//---- buffers
double cfl[];
double cfl2[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
string short_name;
//---- indicator line
IndicatorBuffers(2);
SetIndexStyle(0,DRAW_LINE);
SetIndexBuffer(0,cfl);
SetLevelValue( 0, 0.4);
SetLevelValue( 1, -0.4);
SetIndexStyle(1,DRAW_LINE);
SetIndexBuffer(1,cfl2);
//----
return(0);
}
//+------------------------------------------------------------------+
//| CoeffofLine |
//+------------------------------------------------------------------+
int start()
{
int limit;
int counted_bars=IndicatorCounted();
if(counted_bars<0) counted_bars=0;
if(counted_bars>0) counted_bars--;
limit=Bars-counted_bars;
counted_bars=limit;
int i,shift,cnt,ndot1,ndot=fastSeed,ndot2=slowSeed;
double TYVar,ZYVar,TIndicatorVar,ZIndicatorVar,M,N,AY,AIndicator;
for(shift = limit ;shift>=0;shift--)
{
TYVar=0;
ZYVar=0;
N=0;
M=0;
TIndicatorVar=0;
ZIndicatorVar=0;
for (cnt = ndot; cnt>=1; cnt--)
{
ZYVar+=(High[shift+cnt-1]+Low[shift+cnt-1])/2*(6-cnt);
TYVar+=(High[shift+cnt-1]+Low[shift+cnt-1])/2;
ZIndicatorVar=ZIndicatorVar+iMA(NULL,0,5,3,MODE_SMMA,PRICE_MEDIAN,shift+cnt-1)*(6-cnt);
TIndicatorVar=TIndicatorVar+iMA(NULL,0,5,3,MODE_SMMA,PRICE_MEDIAN,shift+cnt-1);
AY=(TYVar+(55-2*ZYVar)*5/15)/15;
AIndicator=(TIndicatorVar+(55-2*ZIndicatorVar)*5/15)/15;
}
cfl[shift]=(-1000)*MathLog(AY/AIndicator);
TYVar=0;
ZYVar=0;
N=0;
M=0;
TIndicatorVar=0;
ZIndicatorVar=0;
for (cnt = ndot2; cnt>=1; cnt--)
{
ZYVar+=(High[shift+cnt-1]+Low[shift+cnt-1])/2*(6-cnt);
TYVar+=(High[shift+cnt-1]+Low[shift+cnt-1])/2;
ZIndicatorVar=ZIndicatorVar+iMA(NULL,0,5,3,MODE_SMMA,PRICE_MEDIAN,shift+cnt-1)*(6-cnt);
TIndicatorVar=TIndicatorVar+iMA(NULL,0,5,3,MODE_SMMA,PRICE_MEDIAN,shift+cnt-1);
AY=(TYVar+(55-2*ZYVar)*5/15)/15;
AIndicator=(TIndicatorVar+(55-2*ZIndicatorVar)*5/15)/15;
}
cfl2[shift]=(-1000)*MathLog(AY/AIndicator);
}
return(0);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Indicator Curves created:
Implements a curve of type DRAW_LINE
Indicators Used:
Moving average indicator
Custom Indicators Used:
Order Management characteristics:
Other Features: