#property indicator_separate_window
#property indicator_buffers 3
#property indicator_color1 LimeGreen
#property indicator_color2 Tomato
#property indicator_color3 Yellow
#property indicator_width1 2
#property indicator_width2 2
#property indicator_width3 1
#property indicator_level1 1
#property indicator_level2 0.25
#property indicator_level3 -0.25
#property indicator_level4 -1
#property indicator_levelcolor DarkSlateGray
extern int Price = 6;
extern int Method = 3;
extern int Methodx = 1;
extern bool UseUserVariables = True;
extern int FastPeriod = 11;//21
extern int SlowPeriod = 21;//144
extern int deltax = 1;
extern string notes = "If UseUserVariables set to false, Fast&SlowPeriods are preset for each TF";
extern string price_ = "0C 1O 2H 3L 4Md 5Tp 6WghC: Md(HL/2)4,Tp(HLC/3)5,Wgh(HLCC/4)6";
extern string Method_ = "SMA0 EMA1 SMMA2 LWMA3";
//---- parameters
int per1, per2;
//---- buffers
double up[];
double dn[];
double upx[];
double WorkBuffer[];
double WorkBuffer2[];
double WorkBufferx[];
double WorkBuffer2x[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//----
if (!UseUserVariables)
{
// for monthly
int mn_per = 12;
int mn_fast = 3;
// for weekly
int w_per = 9;
int w_fast = 3;
// for daily
int d_per = 5;
int d_fast = 3;
// for H4
int h4_per = 12;
int h4_fast = 2;
// for H1
int h1_per = 24;
int h1_fast = 8;
// for M30
int m30_per = 16;
int m30_fast = 2;
// for M15
int m15_per = 16;
int m15_fast = 4;
// for M5
int m5_per = 12;
int m5_fast = 3;
// for M1
int m1_per = 30;
int m1_fast = 10;
//----
}
//----
if (UseUserVariables)
{
per1=FastPeriod;
per2=SlowPeriod;
}
else
{
switch(Period())
{
case 1: per2 = m1_per; per1 = m1_fast; break;
case 5: per2 = m5_per; per1 = m5_fast; break;
case 15: per2 = m15_per; per1 = m15_fast; break;
case 30: per2 = m30_per; per1 = m30_fast; break;
case 60: per2 = h1_per; per1 = h1_fast; break;
case 240: per2 = h4_per; per1 = h4_fast; break;
case 1440: per2 = d_per; per1 = d_fast; break;
case 10080: per2 = w_per; per1 = w_fast; break;
case 43200: per2 = mn_per; per1 = mn_fast; break;
}
}
string Indicator_Name = "Vasily Pip Sniper ZL ("+per1+","+ per2+") ";
//-----
IndicatorBuffers(7);
SetIndexStyle (0, DRAW_LINE);
SetIndexBuffer(0, up);
SetIndexStyle (1, DRAW_LINE);
SetIndexBuffer(1, dn);
SetIndexStyle (2, DRAW_LINE);
SetIndexBuffer(2, upx);
SetIndexBuffer(3, WorkBuffer);
SetIndexBuffer(4, WorkBuffer2);
SetIndexBuffer(5, WorkBufferx);
SetIndexBuffer(6, WorkBuffer2x);
SetIndexDrawBegin(0, per1 + per2);
SetIndexDrawBegin(1, per1 + per2);
SetIndexDrawBegin(2, per1 + per2);
IndicatorShortName(Indicator_Name);
SetIndexLabel(0, "up "+Method );
SetIndexLabel(1, "dn "+Method );
SetIndexLabel(2, "upx "+Methodx );
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int limit;
int counted_bars = IndicatorCounted();
//----
if(counted_bars < 0)
return(-1);
//----
if(counted_bars > 0)
counted_bars --;
limit = Bars - counted_bars;
//----
for(int i = 0; i < limit; i++)
{
WorkBuffer = iMA(NULL, 0, per1, 0, Method, Price, i);
WorkBuffer2= iMA(NULL, 0, per2, 0, Method, Price, i);
WorkBufferx = iMA(NULL, 0, per1+deltax, 0, Methodx, Price, i);
WorkBuffer2x= iMA(NULL, 0, per2+deltax, 0, Methodx, Price, i);
}
for(i = 0; i < limit; i++)
{
double wMA, wMA2, lMA, sMA;
double wMAx, wMA2x, lMAx, sMAx;
wMA = iMAOnArray(WorkBuffer, 0, per1, 0, Method, i);
lMA = 2*WorkBuffer-wMA ;
wMA2 = iMAOnArray(WorkBuffer2, 0, per2, 0, Method, i);
sMA = 2*WorkBuffer2-wMA2;
wMAx = iMAOnArray(WorkBufferx, 0, per1, 0, Methodx, i);
lMAx = 2*WorkBufferx-wMAx ;
wMA2x = iMAOnArray(WorkBuffer2x, 0, per2, 0, Methodx, i);
sMAx = 2*WorkBuffer2x-wMA2x;
up =100*(lMA-sMA)/sMA;
upx=100*(lMAx-sMAx)/sMAx;
dn =-1*up;
}
//----
return(0);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+