//+------------------------------------------------------------------+
//| DynFloatPivot.mq4 |
//| Copyright © 2006, Nick A. Zhilin |
//| rebus@dialup.etr.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, Nick A. Zhilin"
#property link "rebus@dialup.etr.ru"
//----
extern int IPeriod = 96;
extern string note = "Buff:1P;2HP;3LP;4HL/2;5HP/2;6LP/2;7HLPP/2";
//----
#property indicator_chart_window
#property indicator_buffers 7
#property indicator_color1 Sienna //P
#property indicator_color2 Aqua //HP
#property indicator_color3 Red //LP
#property indicator_color4 Gray //HL/2
#property indicator_color5 Teal //HP/2
#property indicator_color6 Maroon //LP/2
#property indicator_color7 Yellow //HLPP/2
//---- buffers
double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
double ExtMapBuffer4[];
double ExtMapBuffer5[];
double ExtMapBuffer6[];
double ExtMapBuffer7[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
IndicatorShortName("Float Pivot");
//---- indicators
SetIndexStyle(0, DRAW_LINE);
SetIndexBuffer(0, ExtMapBuffer1);
SetIndexLabel(0, "Pivot");
SetIndexStyle(1, DRAW_LINE);
SetIndexBuffer(1, ExtMapBuffer2);
SetIndexLabel(1, "HP");
SetIndexStyle(2, DRAW_LINE);
SetIndexBuffer(2, ExtMapBuffer3);
SetIndexLabel(2, "LP");
SetIndexStyle(3, DRAW_LINE);
SetIndexBuffer(3, ExtMapBuffer4);
SetIndexLabel(3, "HL/2");
SetIndexStyle(4, DRAW_LINE);
SetIndexBuffer(4, ExtMapBuffer5);
SetIndexLabel(4, "HP/2");
SetIndexStyle(5, DRAW_LINE);
SetIndexBuffer(5, ExtMapBuffer6);
SetIndexLabel(5, "LP/2");
SetIndexStyle(6, DRAW_LINE);
SetIndexBuffer(6, ExtMapBuffer7);
SetIndexLabel(6, "HLPP/4");
//---
IndicatorShortName("DynFloatPivot(" + IPeriod + ")");
//----
// Comment("FloatPivot(" + IPeriod + ")");
//----
return(0);
}
int deinit()
{
Comment("");
//----
return(0);
}
//+------------------------------------------------------------------+
//| Float Pivot |
//+------------------------------------------------------------------+
int start()
{
int i, counted_bars = IndicatorCounted();
//----
i = Bars - counted_bars - 1;
while(i >= 0)
{
double max = High[Highest(NULL, 0, MODE_HIGH, IPeriod, i)];
double min = Low[Lowest(NULL, 0, MODE_LOW, IPeriod, i)];
double pivot = (Close[i+1] + Close[i+2] + Close[i+3]) / 3;
// Pivot
ExtMapBuffer1[i] = (max + min + pivot) / 3; // HLP/3
// (R1 - Pivot) / 2
ExtMapBuffer2[i] = ((2*(max + min + pivot) / 3 - min) +
(max+min+pivot) / 3) / 2; // HP
// (Pivot - S1) / 2
ExtMapBuffer3[i] = ((max + min + pivot) / 3 +
(2*(max + min + pivot) / 3 - max)) / 2;// LP
ExtMapBuffer4[i] = (max + min) / 2;
ExtMapBuffer5[i] = (ExtMapBuffer1[i]+ExtMapBuffer2[i])/2; //HP/2
ExtMapBuffer6[i] = (ExtMapBuffer1[i]+ExtMapBuffer3[i])/2; //LP/2
ExtMapBuffer7[i] = (max + min + pivot + pivot) / 4; //HLPP/2
i--;
}
//----
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
Series array that contains close prices for each bar
Indicator Curves created:
Implements a curve of type DRAW_LINE
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Other Features: