#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 DeepSkyBlue
#property indicator_color2 Red
int gi_76 = 7;
double gd_80 = 50.6;
int g_bars_88 = 300;
double g_ibuf_92[];
double g_ibuf_96[];
double g_ibuf_100[];
double g_ibuf_104[];
int init() {
IndicatorBuffers(4);
SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID, 4);
SetIndexBuffer(0, g_ibuf_100);
SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID, 4);
SetIndexBuffer(1, g_ibuf_104);
SetIndexBuffer(2, g_ibuf_92);
SetIndexBuffer(3, g_ibuf_96);
IndicatorShortName("dpt9(" + gi_76 + ")");
return (0);
}
int deinit() {
return (0);
}
int start() {
double ld_8;
double ld_16;
double ld_32;
if (g_bars_88 >= Bars) g_bars_88 = Bars;
SetIndexDrawBegin(0, Bars - g_bars_88 + gi_76);
SetIndexDrawBegin(1, Bars - g_bars_88 + gi_76);
int l_ind_counted_4 = IndicatorCounted();
if (Bars <= gi_76 + 1) return (0);
if (l_ind_counted_4 < gi_76 + 1) {
for (int li_0 = 1; li_0 <= gi_76; li_0++) g_ibuf_92[g_bars_88 - li_0] = 0.0;
for (li_0 = 1; li_0 <= gi_76; li_0++) g_ibuf_96[g_bars_88 - li_0] = 0.0;
}
for (li_0 = g_bars_88 - gi_76; li_0 >= 0; li_0--) {
ld_8 = High[iHighest(NULL, 0, MODE_HIGH, gi_76, li_0 - gi_76 + 1)];
ld_16 = Low[iLowest(NULL, 0, MODE_LOW, gi_76, li_0 - gi_76 + 1)];
ld_32 = ld_8 - (ld_8 - ld_16) * gd_80 / 100.0;
g_ibuf_92[li_0 - gi_76 + 6] = ld_32;
g_ibuf_96[li_0 - gi_76 - 1] = ld_32;
}
for (int li_40 = g_bars_88 - gi_76; li_40 >= 0; li_40--) {
if (g_ibuf_92[li_40] > g_ibuf_96[li_40]) {
g_ibuf_100[li_40] = 1;
g_ibuf_104[li_40] = 0;
} else {
g_ibuf_100[li_40] = 0;
g_ibuf_104[li_40] = 1;
}
}
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_HISTOGRAM
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Other Features: