Forex trading examples
Forex trading examples (page 1)
Example 1
Many beginning traders don’t fully understand the concept of leverage. Basically, if you have a start up capital of $5,000 and if you trade on a 1:50 margin you can effectively control a capital of $250,000. However, a two percent move against you and your capital is completely wiped out. If you are a beginning trader you should not use more than 1:20 margin until you get comfortable and profitable and then and only then you can attempt to use higher margins....
pátek 21. května 2010
pátek 7. května 2010
How To Start An Automated Online Forex Trading System
How To Start An Automated Online Forex Trading System
How To Start An Automated Online Forex Trading System
How To Start An Automated Online Forex Trading System
automatic expert advisor
Creating Multi-Expert Advisors
Creating Multi-Expert Advisors
Creating Multi-Expert Advisors on the basis of Trading Models MT5
Code Base EA MQL4
Expert Advisors - MT4
Expert Advisors for MT4 - Examples
Broker manipulation detector
Mql - Metatrader Development Course
Get keyboard keys to MetaTrader!
Automated Trading, Strategy Testing and Optimization Articles
Creating Multi-Expert Advisors on the basis of Trading Models MT5
Code Base EA MQL4
Expert Advisors - MT4
Expert Advisors for MT4 - Examples
Broker manipulation detector
Mql - Metatrader Development Course
Get keyboard keys to MetaTrader!
Automated Trading, Strategy Testing and Optimization Articles
system
Nejaky mozny system
Dl_Trend
Dl
Dlouhodobý trend
int g_period_76 = 13;
int g_period_80 = 34;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
double g_ibuf_96[];
int init() {
SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(0, g_ibuf_84);
SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(1, g_ibuf_88);
SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(2, g_ibuf_92);
SetIndexStyle(3, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(3, g_ibuf_96);
IndicatorDigits(Digits + 1);
string ls_0 = "Dlouhodobý trend";
IndicatorShortName(ls_0);
SetIndexLabel(0, ls_0);
SetIndexLabel(1, ls_0);
SetIndexLabel(2, ls_0);
SetIndexLabel(3, ls_0);
return (0);
}
}
int l_ind_counted_20 = IndicatorCounted();
if (l_ind_counted_20 < 0) return (-1);
for (int li_24 = Bars - Max(l_ind_counted_20 - 1, 1); li_24 >= 0; li_24--) {
ld_0 = iMA(NULL, 0, g_period_76, 0, MODE_EMA, PRICE_MEDIAN, li_24) - iMA(NULL, 0, g_period_80, 0, MODE_EMA, PRICE_MEDIAN, li_24);
if (ld_0 > 0.0) {
if ((g_ibuf_84[li_24 + 1] != 0.0 && ld_0 >= g_ibuf_84[li_24 + 1]) || (g_ibuf_88[li_24 + 1] != 0.0 && ld_0 > g_ibuf_88[li_24 + 1])) {
g_ibuf_84[li_24] = ld_0;
g_ibuf_88[li_24] = 0;
} else {
g_ibuf_84[li_24] = 0;
g_ibuf_88[li_24] = ld_0;
}
} else {
if ((g_ibuf_92[li_24 + 1] != 0.0 && ld_0 >= g_ibuf_92[li_24 + 1]) || (g_ibuf_96[li_24 + 1] != 0.0 && ld_0 > g_ibuf_96[li_24 + 1])) {
g_ibuf_92[li_24] = ld_0;
g_ibuf_96[li_24] = 0;
} else {
g_ibuf_92[li_24] = 0;
g_ibuf_96[li_24] = ld_0;
}
}
}
return (0);
}
int Max(int ai_0, int ai_4) {
if (ai_0 > ai_4) return (ai_0);
return (ai_4);
}
Dl_Trend_A (black)
double g_ibuf_76[];
double g_ibuf_80[];
int g_period_84 = 13;
int g_period_88 = 34;
extern bool Alerts = TRUE;
int gi_96 = 0;
int gi_100 = 0;
int init() {
SetIndexStyle(0, DRAW_ARROW, EMPTY);
SetIndexArrow(0, SYMBOL_THUMBSUP);
SetIndexBuffer(0, g_ibuf_76);
SetIndexStyle(1, DRAW_ARROW, EMPTY);
SetIndexArrow(1, SYMBOL_THUMBSDOWN);
SetIndexBuffer(1, g_ibuf_80);
return (0);
}
int deinit() {
return (0);
}
int start() {
int li_0;
double l_ima_4;
double l_ima_12;
double l_ima_20;
double l_ima_28;
double l_ima_36;
double l_ima_44;
double ld_52;
double ld_60;
}
int li_80 = IndicatorCounted();
if (li_80 < 0) return (-1);
if (li_80 > 0) li_80--;
int li_84 = Bars - li_80;
for (int li_88 = 0; li_88 <= li_84; li_88++) {
li_0 = li_88;
ld_52 = 0;
ld_60 = 0;
for (li_0 = li_88; li_0 <= li_88 + 9; li_0++) ld_60 += MathAbs(High[li_0] - Low[li_0]);
ld_52 = ld_60 / 10.0;
l_ima_4 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88);
l_ima_20 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88 + 1);
l_ima_36 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88 - 1);
l_ima_12 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88);
l_ima_28 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88 + 1);
l_ima_44 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88 - 1);
if (l_ima_4 > l_ima_12 && l_ima_20 < l_ima_28 && l_ima_36 > l_ima_44) {
g_ibuf_76[li_88] = Low[li_88] - ld_52 / 2.0;
if (li_88 <= 2 && Alerts && !gi_96) {
SendMail("xxxx", "Dlouhodoby trend nad nulou!!!(Long)" + Symbol());
Alert(Symbol(), " ", Period(), " Dlouhodobý trend nad nulou!!!(Long) ");
gi_96 = TRUE;
gi_100 = FALSE;
}
} else {
if (l_ima_4 < l_ima_12 && l_ima_20 > l_ima_28 && l_ima_36 < l_ima_44) {
g_ibuf_80[li_88] = High[li_88] + ld_52 / 2.0;
if (li_88 <= 2 && Alerts && !gi_100) {
SendMail("xxxx", "Dlouhodoby trend pod nulou!!!(Short)" + Symbol());
Alert(Symbol(), " ", Period(), " Dlouhodobý trend pod nulou!!!(Short) ");
gi_100 = TRUE;
gi_96 = FALSE;
}
}
}
}
return (0);
}
Kr_Trend_D
Trend D
int gi_76 = 21;
extern int CountBars = 3000;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
int gi_96;
int g_count_100;
int gi_104;
bool gi_108;
int g_ind_counted_112;
datetime g_time_116;
datetime g_time_120;
datetime g_time_124;
double gd_128;
double gd_136;
double gd_144;
double gd_152;
double gd_368;
double gd_376;
double gd_384;
double gd_392;
double gd_400;
double gd_408;
double gd_416;
int init() {
SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(0, g_ibuf_84);
SetIndexBuffer(1, g_ibuf_88);
SetIndexBuffer(2, g_ibuf_92);
IndicatorShortName("Krátkodobý trend/H");
SetIndexDrawBegin(0, Bars - CountBars);
SetIndexDrawBegin(1, Bars - CountBars);
SetIndexDrawBegin(2, Bars - CountBars);
IndicatorDigits(MarketInfo(Symbol(), MODE_DIGITS));
if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
else gi_104 = 5;
gd_408 = 3 / (gi_76 + 2.0);
gd_416 = 1.0 - gd_408;
return (0);
}
}
g_ind_counted_112 = IndicatorCounted();
if (g_ind_counted_112 < 0) return (-1);
if (g_ind_counted_112 > gi_76) gi_96 = Bars - g_ind_counted_112 - 1;
else gi_96 = Bars - gi_76 - 1;
g_time_124 = Time[gi_96 + 1];
if (g_time_124 != g_time_116 && gi_96 < Bars - gi_76 - 1) {
if (g_time_124 == g_time_120) {
gd_312 = gd_208;
gd_320 = gd_216;
gd_328 = gd_224;
gd_336 = gd_232;
gd_384 = gd_280;
gd_392 = gd_288;
gd_400 = gd_296;
} else return (-1);
}
if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
else gi_104 = 5;
gd_408 = 3 / (gi_76 + 2.0);
gd_416 = 1.0 - gd_408;
while (gi_96 >= 0) {
if (g_count_100 == 0) {
g_count_100 = 1;
gi_108 = FALSE;
} else {
if (g_count_100 >= gi_104) g_count_100 = gi_104 + 1;
else g_count_100++;
gd_136 = Close[gi_96] - (Close[gi_96 + 1]);
gd_192 = MathAbs(gd_136);
gd_312 = gd_416 * gd_312 + gd_408 * gd_136;
gd_320 = gd_408 * gd_312 + gd_416 * gd_320;
gd_176 = 1.5 * gd_312 - gd_320 / 2.0;
gd_328 = gd_416 * gd_328 + gd_408 * gd_176;
gd_336 = gd_408 * gd_328 + gd_416 * gd_336;
gd_144 = 1.5 * gd_328 - gd_336 / 2.0;
gd_344 = gd_416 * gd_344 + gd_408 * gd_144;
gd_352 = gd_408 * gd_344 + gd_416 * gd_352;
gd_152 = 1.5 * gd_344 - gd_352 / 2.0;
gd_360 = gd_416 * gd_360 + gd_408 * gd_192;
gd_368 = gd_408 * gd_360 + gd_416 * gd_368;
gd_160 = 1.5 * gd_360 - gd_368 / 2.0;
gd_376 = gd_416 * gd_376 + gd_408 * gd_160;
gd_384 = gd_408 * gd_376 + gd_416 * gd_384;
gd_184 = 1.5 * gd_376 - gd_384 / 2.0;
gd_392 = gd_416 * gd_392 + gd_408 * gd_184;
gd_400 = gd_408 * gd_392 + gd_416 * gd_400;
gd_168 = 1.5 * gd_392 - gd_400 / 2.0;
if (g_count_100 <= gi_104 && gd_136 != 0.0) gi_108 = TRUE;
if (g_count_100 == gi_104 && gi_108 == FALSE) g_count_100 = 0;
}
if (g_count_100 > gi_104 && gd_168 > 0.0000000001) {
gd_128 = 50.0 * (gd_152 / gd_168 + 1.0);
if (gd_128 > 100.0) gd_128 = 100.0;
if (gd_128 < 0.0) gd_128 = 0.0;
} else gd_128 = 50.0;
gd_304 = gd_128 / 50.0 - 1.0;
if (gi_96 == 1) {
g_time_120 = Time[1];
g_time_116 = Time[0];
gd_208 = gd_312;
gd_216 = gd_320;
gd_224 = gd_328;
gd_232 = gd_336;
gd_272 = gd_376;
gd_280 = gd_384;
gd_288 = gd_392;
gd_296 = gd_400;
}
gd_200 = gd_304 - (g_ibuf_84[gi_96 + 1]) - (g_ibuf_88[gi_96 + 1]) - (g_ibuf_92[gi_96 + 1]);
g_ibuf_84[gi_96] = 0.0;
g_ibuf_88[gi_96] = 0.0;
g_ibuf_92[gi_96] = 0.0;
if (gd_200 > 0.0) g_ibuf_84[gi_96] = gd_304;
else {
if (gd_200 < 0.0) g_ibuf_88[gi_96] = gd_304;
else g_ibuf_92[gi_96] = gd_304;
}
gi_96--;
Kr_Trend_H
int gi_76 = 13;
extern int CountBars = 3000;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
int gi_96;
int g_count_100;
int gi_104;
bool gi_108;
int g_ind_counted_112;
datetime g_time_116;
datetime g_time_120;
datetime g_time_124;
double gd_128;
double gd_136;
double gd_144;
double gd_152;
double gd_160;
double gd_168;
double gd_176;
double gd_328;
double gd_336;
double gd_344;
double gd_352;
double gd_360;
double gd_368;
double gd_376;
double gd_384;
double gd_392;
double gd_400;
double gd_408;
double gd_416;
int init() {
SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(0, g_ibuf_84);
SetIndexBuffer(1, g_ibuf_88);
SetIndexBuffer(2, g_ibuf_92);
IndicatorShortName("Krátkodobý trend/H");
SetIndexDrawBegin(0, Bars - CountBars);
SetIndexDrawBegin(1, Bars - CountBars);
SetIndexDrawBegin(2, Bars - CountBars);
IndicatorDigits(MarketInfo(Symbol(), MODE_DIGITS));
if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
else gi_104 = 5;
gd_408 = 3 / (gi_76 + 2.0);
gd_416 = 1.0 - gd_408;
return (0);
}
}
g_ind_counted_112 = IndicatorCounted();
if (g_ind_counted_112 < 0) return (-1);
if (g_ind_counted_112 > gi_76) gi_96 = Bars - g_ind_counted_112 - 1;
else gi_96 = Bars - gi_76 - 1;
g_time_124 = Time[gi_96 + 1];
if (g_time_124 != g_time_116 && gi_96 < Bars - gi_76 - 1) {
if (g_time_124 == g_time_120) {
gd_312 = gd_208;
gd_320 = gd_216;
gd_328 = gd_224;
gd_336 = gd_232;
gd_344 = gd_240;
gd_352 = gd_248;
gd_360 = gd_256;
gd_368 = gd_264;
gd_376 = gd_272;
gd_384 = gd_280;
gd_392 = gd_288;
gd_400 = gd_296;
} else return (-1);
}
if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
else gi_104 = 5;
gd_408 = 3 / (gi_76 + 2.0);
gd_416 = 1.0 - gd_408;
while (gi_96 >= 0) {
if (g_count_100 == 0) {
g_count_100 = 1;
gi_108 = FALSE;
} else {
if (g_count_100 >= gi_104) g_count_100 = gi_104 + 1;
else g_count_100++;
gd_136 = Close[gi_96] - (Close[gi_96 + 1]);
gd_192 = MathAbs(gd_136);
gd_312 = gd_416 * gd_312 + gd_408 * gd_136;
gd_320 = gd_408 * gd_312 + gd_416 * gd_320;
gd_176 = 1.5 * gd_312 - gd_320 / 2.0;
gd_328 = gd_416 * gd_328 + gd_408 * gd_176;
gd_336 = gd_408 * gd_328 + gd_416 * gd_336;
gd_144 = 1.5 * gd_328 - gd_336 / 2.0;
gd_344 = gd_416 * gd_344 + gd_408 * gd_144;
gd_352 = gd_408 * gd_344 + gd_416 * gd_352;
gd_152 = 1.5 * gd_344 - gd_352 / 2.0;
gd_360 = gd_416 * gd_360 + gd_408 * gd_192;
gd_368 = gd_408 * gd_360 + gd_416 * gd_368;
gd_160 = 1.5 * gd_360 - gd_368 / 2.0;
gd_376 = gd_416 * gd_376 + gd_408 * gd_160;
gd_384 = gd_408 * gd_376 + gd_416 * gd_384;
gd_184 = 1.5 * gd_376 - gd_384 / 2.0;
gd_392 = gd_416 * gd_392 + gd_408 * gd_184;
gd_400 = gd_408 * gd_392 + gd_416 * gd_400;
gd_168 = 1.5 * gd_392 - gd_400 / 2.0;
if (g_count_100 <= gi_104 && gd_136 != 0.0) gi_108 = TRUE;
if (g_count_100 == gi_104 && gi_108 == FALSE) g_count_100 = 0;
}
if (g_count_100 > gi_104 && gd_168 > 0.0000000001) {
gd_128 = 50.0 * (gd_152 / gd_168 + 1.0);
if (gd_128 > 100.0) gd_128 = 100.0;
if (gd_128 < 0.0) gd_128 = 0.0;
} else gd_128 = 50.0;
gd_304 = gd_128 / 50.0 - 1.0;
if (gi_96 == 1) {
g_time_120 = Time[1];
g_time_116 = Time[0];
gd_208 = gd_312;
gd_216 = gd_320;
gd_224 = gd_328;
gd_232 = gd_336;
gd_240 = gd_344;
gd_248 = gd_352;
gd_256 = gd_360;
gd_264 = gd_368;
gd_272 = gd_376;
gd_280 = gd_384;
gd_288 = gd_392;
gd_296 = gd_400;
}
gd_200 = gd_304 - (g_ibuf_84[gi_96 + 1]) - (g_ibuf_88[gi_96 + 1]) - (g_ibuf_92[gi_96 + 1]);
g_ibuf_84[gi_96] = 0.0;
g_ibuf_88[gi_96] = 0.0;
g_ibuf_92[gi_96] = 0.0;
if (gd_200 > 0.0) g_ibuf_84[gi_96] = gd_304;
else {
if (gd_200 < 0.0) g_ibuf_88[gi_96] = gd_304;
else g_ibuf_92[gi_96] = gd_304;
}
gi_96--;
}
return (0);
}
_Trend
extern int SpreadThreshold = 6;
extern bool D_ADX = TRUE;
int init() {
IndicatorShortName("Trend (" + Symbol() + ")");
return (0);
}
int deinit() {
ObjectsDeleteAll(0, OBJ_LABEL);
ObjectDelete("Trend-1");
ObjectDelete("Trend-2");
ObjectDelete("Trend-3");
ObjectDelete("Trend-4");
ObjectDelete("Trend-5");
ObjectDelete("Trend-6");
ObjectDelete("Trend-7");
ObjectDelete("Trend-8");
ObjectDelete("Trend-9");
ObjectDelete("Trend-10");
ObjectDelete("Trend-11");
ObjectDelete("Trend-12");
ObjectDelete("Trend-2a");
ObjectDelete("Trend-4a");
ObjectDelete("Trend-6a");
ObjectDelete("Trend-8a");
ObjectDelete("Trend-10a");
ObjectDelete("Trend-12a");
return (0);
}
int start() {
color l_color_0;
color l_color_4;
color l_color_8;
color l_color_12;
color l_color_16;
color l_color_20;
string l_text_24;
string l_text_32;
string l_text_40;
string l_text_48;
string ls_unused_56;
string l_text_64;
}
double l_iadx_84 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_92 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_100 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_108 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_116 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_124 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_132 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_140 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_148 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_156 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_164 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_172 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_180 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_188 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_196 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_204 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_212 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_220 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
if (l_iadx_84 < 23.0 && l_iadx_84 != 0.0) l_color_0 = LightSkyBlue;
if (l_iadx_84 >= 23.0 && l_iadx_92 > l_iadx_100) l_color_0 = Lime;
if (l_iadx_84 >= 23.0 && l_iadx_92 < l_iadx_100) l_color_0 = Red;
if (l_iadx_108 < 23.0 && l_iadx_108 != 0.0) l_color_4 = LightSkyBlue;
if (l_iadx_108 >= 23.0 && l_iadx_116 > l_iadx_124) l_color_4 = Lime;
if (l_iadx_108 >= 23.0 && l_iadx_116 < l_iadx_124) l_color_4 = Red;
if (l_iadx_132 < 23.0 && l_iadx_132 != 0.0) l_color_8 = LightSkyBlue;
if (l_iadx_132 >= 23.0 && l_iadx_140 > l_iadx_148) l_color_8 = Lime;
if (l_iadx_132 >= 23.0 && l_iadx_140 < l_iadx_148) l_color_8 = Red;
if (l_iadx_156 < 23.0 && l_iadx_156 != 0.0) l_color_12 = LightSkyBlue;
if (l_iadx_156 >= 23.0 && l_iadx_164 > l_iadx_172) l_color_12 = Lime;
if (l_iadx_156 >= 23.0 && l_iadx_164 < l_iadx_172) l_color_12 = Red;
if (l_iadx_180 < 23.0 && l_iadx_180 != 0.0) l_color_16 = LightSkyBlue;
if (l_iadx_180 >= 23.0 && l_iadx_188 > l_iadx_196) l_color_16 = Lime;
if (l_iadx_180 >= 23.0 && l_iadx_188 < l_iadx_196) l_color_16 = Red;
if (l_iadx_204 < 23.0 && l_iadx_204 != 0.0) l_color_20 = LightSkyBlue;
if (l_iadx_204 >= 23.0 && l_iadx_212 > l_iadx_220) l_color_20 = Lime;
if (l_iadx_204 >= 23.0 && l_iadx_212 < l_iadx_220) l_color_20 = Red;
string l_iadx_228 = l_iadx_84;
string l_iadx_236 = l_iadx_108;
string l_iadx_244 = l_iadx_132;
string l_iadx_252 = l_iadx_156;
string l_iadx_260 = l_iadx_180;
string l_iadx_268 = l_iadx_204;
if (l_iadx_84 < 23.0 && l_iadx_84 != 0.0) l_text_24 = "h";
if (l_iadx_84 >= 23.0 && l_iadx_84 < 28.0 && l_iadx_92 > l_iadx_100) l_text_24 = "ě";
if (l_iadx_84 >= 23.0 && l_iadx_84 < 28.0 && l_iadx_92 < l_iadx_100) l_text_24 = "î";
if (l_iadx_84 >= 28.0 && l_iadx_92 > l_iadx_100) l_text_24 = "é";
if (l_iadx_84 >= 28.0 && l_iadx_92 < l_iadx_100) l_text_24 = "ę";
if (l_iadx_108 < 23.0 && l_iadx_108 != 0.0) l_text_32 = "h";
if (l_iadx_108 >= 23.0 && l_iadx_108 < 28.0 && l_iadx_116 > l_iadx_124) l_text_32 = "ě";
if (l_iadx_108 >= 23.0 && l_iadx_108 < 28.0 && l_iadx_116 < l_iadx_124) l_text_32 = "î";
if (l_iadx_108 >= 28.0 && l_iadx_116 > l_iadx_124) l_text_32 = "é";
if (l_iadx_108 >= 28.0 && l_iadx_116 < l_iadx_124) l_text_32 = "ę";
if (l_iadx_132 < 23.0 && l_iadx_132 != 0.0) l_text_40 = "h";
if (l_iadx_132 >= 23.0 && l_iadx_132 < 28.0 && l_iadx_140 > l_iadx_148) l_text_40 = "ě";
if (l_iadx_132 >= 23.0 && l_iadx_132 < 28.0 && l_iadx_140 < l_iadx_148) l_text_40 = "î";
if (l_iadx_132 >= 28.0 && l_iadx_140 > l_iadx_148) l_text_40 = "é";
if (l_iadx_132 >= 28.0 && l_iadx_140 < l_iadx_148) l_text_40 = "ę";
if (l_iadx_156 < 23.0 && l_iadx_156 != 0.0) l_text_48 = "h";
if (l_iadx_156 >= 23.0 && l_iadx_156 < 28.0 && l_iadx_164 > l_iadx_172) l_text_48 = "ě";
if (l_iadx_156 >= 23.0 && l_iadx_156 < 28.0 && l_iadx_164 < l_iadx_172) l_text_48 = "î";
if (l_iadx_156 >= 28.0 && l_iadx_172 > l_iadx_172) l_text_48 = "é";
if (l_iadx_156 >= 28.0 && l_iadx_164 < l_iadx_172) l_text_48 = "ę";
if (l_iadx_180 < 23.0 && l_iadx_180 != 0.0) ls_unused_56 = "h";
if (l_iadx_180 >= 23.0 && l_iadx_180 < 28.0 && l_iadx_188 > l_iadx_196) ls_unused_56 = "ě";
if (l_iadx_180 >= 23.0 && l_iadx_180 < 28.0 && l_iadx_188 < l_iadx_196) ls_unused_56 = "î";
if (l_iadx_180 >= 28.0 && l_iadx_188 > l_iadx_196) ls_unused_56 = "é";
if (l_iadx_180 >= 28.0 && l_iadx_188 < l_iadx_196) ls_unused_56 = "ę";
if (l_iadx_204 < 23.0 && l_iadx_204 != 0.0) l_text_64 = "h";
if (l_iadx_204 >= 23.0 && l_iadx_204 < 28.0 && l_iadx_212 > l_iadx_220) l_text_64 = "ě";
if (l_iadx_204 >= 23.0 && l_iadx_204 < 28.0 && l_iadx_212 < l_iadx_220) l_text_64 = "î";
if (l_iadx_204 >= 28.0 && l_iadx_212 > l_iadx_220) l_text_64 = "é";
if (l_iadx_204 >= 28.0 && l_iadx_212 < l_iadx_220) l_text_64 = "ę";
ObjectCreate("Trend-1", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-1", "5 min:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-1", OBJPROP_CORNER, 0);
ObjectSet("Trend-1", OBJPROP_XDISTANCE, 185);
ObjectSet("Trend-1", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-2", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-2", " ADX " + StringSubstr(l_iadx_228, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_0);
ObjectSet("Trend-2", OBJPROP_CORNER, 0);
ObjectSet("Trend-2", OBJPROP_XDISTANCE, 225);
ObjectSet("Trend-2", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-2a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-2a", l_text_24, 9, "Wingdings", l_color_0);
ObjectSet("Trend-2a", OBJPROP_CORNER, 0);
ObjectSet("Trend-2a", OBJPROP_XDISTANCE, 288);
ObjectSet("Trend-2a", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-3", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-3", "15 min:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-3", OBJPROP_CORNER, 0);
ObjectSet("Trend-3", OBJPROP_XDISTANCE, 318);
ObjectSet("Trend-3", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-4", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-4", " ADX " + StringSubstr(l_iadx_236, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_4);
ObjectSet("Trend-4", OBJPROP_CORNER, 0);
ObjectSet("Trend-4", OBJPROP_XDISTANCE, 363);
ObjectSet("Trend-4", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-4a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-4a", l_text_32, 9, "Wingdings", l_color_4);
ObjectSet("Trend-4a", OBJPROP_CORNER, 0);
ObjectSet("Trend-4a", OBJPROP_XDISTANCE, 426);
ObjectSet("Trend-4a", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-5", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-5", "30 min:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-5", OBJPROP_CORNER, 0);
ObjectSet("Trend-5", OBJPROP_XDISTANCE, 453);
ObjectSet("Trend-5", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-6", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-6", " ADX " + StringSubstr(l_iadx_244, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_8);
ObjectSet("Trend-6", OBJPROP_CORNER, 0);
ObjectSet("Trend-6", OBJPROP_XDISTANCE, 496);
ObjectSet("Trend-6", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-6a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-6a", l_text_40, 9, "Wingdings", l_color_8);
ObjectSet("Trend-6a", OBJPROP_CORNER, 0);
ObjectSet("Trend-6a", OBJPROP_XDISTANCE, 557);
ObjectSet("Trend-6a", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-7", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-7", "1 H:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-7", OBJPROP_CORNER, 0);
ObjectSet("Trend-7", OBJPROP_XDISTANCE, 580);
ObjectSet("Trend-7", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-8", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-8", " ADX " + StringSubstr(l_iadx_252, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_12);
ObjectSet("Trend-8", OBJPROP_CORNER, 0);
ObjectSet("Trend-8", OBJPROP_XDISTANCE, 610);
ObjectSet("Trend-8", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-8a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-8a", l_text_48, 9, "Wingdings", l_color_12);
ObjectSet("Trend-8a", OBJPROP_CORNER, 0);
ObjectSet("Trend-8a", OBJPROP_XDISTANCE, 672);
ObjectSet("Trend-8a", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-9", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-9", "4 H:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-9", OBJPROP_CORNER, 0);
ObjectSet("Trend-9", OBJPROP_XDISTANCE, 702);
ObjectSet("Trend-9", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-10", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-10", " ADX " + StringSubstr(l_iadx_260, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_16);
ObjectSet("Trend-10", OBJPROP_CORNER, 0);
ObjectSet("Trend-10", OBJPROP_XDISTANCE, 732);
ObjectSet("Trend-10", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-10a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-10a", l_text_64, 9, "Wingdings", l_color_20);
ObjectSet("Trend-10a", OBJPROP_CORNER, 0);
ObjectSet("Trend-10a", OBJPROP_XDISTANCE, 793);
ObjectSet("Trend-10a", OBJPROP_YDISTANCE, 2);
if (D_ADX == TRUE) {
ObjectCreate("Trend-11", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-11", "Denní:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-11", OBJPROP_CORNER, 0);
ObjectSet("Trend-11", OBJPROP_XDISTANCE, 823);
ObjectSet("Trend-11", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-12", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-12", " ADX " + StringSubstr(l_iadx_268, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_20);
ObjectSet("Trend-12", OBJPROP_CORNER, 0);
ObjectSet("Trend-12", OBJPROP_XDISTANCE, 863);
ObjectSet("Trend-12", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-12a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-12a", l_text_64, 9, "Wingdings", l_color_20);
ObjectSet("Trend-12a", OBJPROP_CORNER, 0);
ObjectSet("Trend-12a", OBJPROP_XDISTANCE, 923);
ObjectSet("Trend-12a", OBJPROP_YDISTANCE, 2);
}
return (0);
}
Dl_Trend
Dl
Dlouhodobý trend
int g_period_76 = 13;
int g_period_80 = 34;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
double g_ibuf_96[];
int init() {
SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(0, g_ibuf_84);
SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(1, g_ibuf_88);
SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(2, g_ibuf_92);
SetIndexStyle(3, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(3, g_ibuf_96);
IndicatorDigits(Digits + 1);
string ls_0 = "Dlouhodobý trend";
IndicatorShortName(ls_0);
SetIndexLabel(0, ls_0);
SetIndexLabel(1, ls_0);
SetIndexLabel(2, ls_0);
SetIndexLabel(3, ls_0);
return (0);
}
}
int l_ind_counted_20 = IndicatorCounted();
if (l_ind_counted_20 < 0) return (-1);
for (int li_24 = Bars - Max(l_ind_counted_20 - 1, 1); li_24 >= 0; li_24--) {
ld_0 = iMA(NULL, 0, g_period_76, 0, MODE_EMA, PRICE_MEDIAN, li_24) - iMA(NULL, 0, g_period_80, 0, MODE_EMA, PRICE_MEDIAN, li_24);
if (ld_0 > 0.0) {
if ((g_ibuf_84[li_24 + 1] != 0.0 && ld_0 >= g_ibuf_84[li_24 + 1]) || (g_ibuf_88[li_24 + 1] != 0.0 && ld_0 > g_ibuf_88[li_24 + 1])) {
g_ibuf_84[li_24] = ld_0;
g_ibuf_88[li_24] = 0;
} else {
g_ibuf_84[li_24] = 0;
g_ibuf_88[li_24] = ld_0;
}
} else {
if ((g_ibuf_92[li_24 + 1] != 0.0 && ld_0 >= g_ibuf_92[li_24 + 1]) || (g_ibuf_96[li_24 + 1] != 0.0 && ld_0 > g_ibuf_96[li_24 + 1])) {
g_ibuf_92[li_24] = ld_0;
g_ibuf_96[li_24] = 0;
} else {
g_ibuf_92[li_24] = 0;
g_ibuf_96[li_24] = ld_0;
}
}
}
return (0);
}
int Max(int ai_0, int ai_4) {
if (ai_0 > ai_4) return (ai_0);
return (ai_4);
}
Dl_Trend_A (black)
double g_ibuf_76[];
double g_ibuf_80[];
int g_period_84 = 13;
int g_period_88 = 34;
extern bool Alerts = TRUE;
int gi_96 = 0;
int gi_100 = 0;
int init() {
SetIndexStyle(0, DRAW_ARROW, EMPTY);
SetIndexArrow(0, SYMBOL_THUMBSUP);
SetIndexBuffer(0, g_ibuf_76);
SetIndexStyle(1, DRAW_ARROW, EMPTY);
SetIndexArrow(1, SYMBOL_THUMBSDOWN);
SetIndexBuffer(1, g_ibuf_80);
return (0);
}
int deinit() {
return (0);
}
int start() {
int li_0;
double l_ima_4;
double l_ima_12;
double l_ima_20;
double l_ima_28;
double l_ima_36;
double l_ima_44;
double ld_52;
double ld_60;
}
int li_80 = IndicatorCounted();
if (li_80 < 0) return (-1);
if (li_80 > 0) li_80--;
int li_84 = Bars - li_80;
for (int li_88 = 0; li_88 <= li_84; li_88++) {
li_0 = li_88;
ld_52 = 0;
ld_60 = 0;
for (li_0 = li_88; li_0 <= li_88 + 9; li_0++) ld_60 += MathAbs(High[li_0] - Low[li_0]);
ld_52 = ld_60 / 10.0;
l_ima_4 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88);
l_ima_20 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88 + 1);
l_ima_36 = iMA(NULL, 0, g_period_84, 0, MODE_EMA, PRICE_CLOSE, li_88 - 1);
l_ima_12 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88);
l_ima_28 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88 + 1);
l_ima_44 = iMA(NULL, 0, g_period_88, 0, MODE_EMA, PRICE_CLOSE, li_88 - 1);
if (l_ima_4 > l_ima_12 && l_ima_20 < l_ima_28 && l_ima_36 > l_ima_44) {
g_ibuf_76[li_88] = Low[li_88] - ld_52 / 2.0;
if (li_88 <= 2 && Alerts && !gi_96) {
SendMail("xxxx", "Dlouhodoby trend nad nulou!!!(Long)" + Symbol());
Alert(Symbol(), " ", Period(), " Dlouhodobý trend nad nulou!!!(Long) ");
gi_96 = TRUE;
gi_100 = FALSE;
}
} else {
if (l_ima_4 < l_ima_12 && l_ima_20 > l_ima_28 && l_ima_36 < l_ima_44) {
g_ibuf_80[li_88] = High[li_88] + ld_52 / 2.0;
if (li_88 <= 2 && Alerts && !gi_100) {
SendMail("xxxx", "Dlouhodoby trend pod nulou!!!(Short)" + Symbol());
Alert(Symbol(), " ", Period(), " Dlouhodobý trend pod nulou!!!(Short) ");
gi_100 = TRUE;
gi_96 = FALSE;
}
}
}
}
return (0);
}
Kr_Trend_D
Trend D
int gi_76 = 21;
extern int CountBars = 3000;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
int gi_96;
int g_count_100;
int gi_104;
bool gi_108;
int g_ind_counted_112;
datetime g_time_116;
datetime g_time_120;
datetime g_time_124;
double gd_128;
double gd_136;
double gd_144;
double gd_152;
double gd_368;
double gd_376;
double gd_384;
double gd_392;
double gd_400;
double gd_408;
double gd_416;
int init() {
SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(0, g_ibuf_84);
SetIndexBuffer(1, g_ibuf_88);
SetIndexBuffer(2, g_ibuf_92);
IndicatorShortName("Krátkodobý trend/H");
SetIndexDrawBegin(0, Bars - CountBars);
SetIndexDrawBegin(1, Bars - CountBars);
SetIndexDrawBegin(2, Bars - CountBars);
IndicatorDigits(MarketInfo(Symbol(), MODE_DIGITS));
if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
else gi_104 = 5;
gd_408 = 3 / (gi_76 + 2.0);
gd_416 = 1.0 - gd_408;
return (0);
}
}
g_ind_counted_112 = IndicatorCounted();
if (g_ind_counted_112 < 0) return (-1);
if (g_ind_counted_112 > gi_76) gi_96 = Bars - g_ind_counted_112 - 1;
else gi_96 = Bars - gi_76 - 1;
g_time_124 = Time[gi_96 + 1];
if (g_time_124 != g_time_116 && gi_96 < Bars - gi_76 - 1) {
if (g_time_124 == g_time_120) {
gd_312 = gd_208;
gd_320 = gd_216;
gd_328 = gd_224;
gd_336 = gd_232;
gd_384 = gd_280;
gd_392 = gd_288;
gd_400 = gd_296;
} else return (-1);
}
if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
else gi_104 = 5;
gd_408 = 3 / (gi_76 + 2.0);
gd_416 = 1.0 - gd_408;
while (gi_96 >= 0) {
if (g_count_100 == 0) {
g_count_100 = 1;
gi_108 = FALSE;
} else {
if (g_count_100 >= gi_104) g_count_100 = gi_104 + 1;
else g_count_100++;
gd_136 = Close[gi_96] - (Close[gi_96 + 1]);
gd_192 = MathAbs(gd_136);
gd_312 = gd_416 * gd_312 + gd_408 * gd_136;
gd_320 = gd_408 * gd_312 + gd_416 * gd_320;
gd_176 = 1.5 * gd_312 - gd_320 / 2.0;
gd_328 = gd_416 * gd_328 + gd_408 * gd_176;
gd_336 = gd_408 * gd_328 + gd_416 * gd_336;
gd_144 = 1.5 * gd_328 - gd_336 / 2.0;
gd_344 = gd_416 * gd_344 + gd_408 * gd_144;
gd_352 = gd_408 * gd_344 + gd_416 * gd_352;
gd_152 = 1.5 * gd_344 - gd_352 / 2.0;
gd_360 = gd_416 * gd_360 + gd_408 * gd_192;
gd_368 = gd_408 * gd_360 + gd_416 * gd_368;
gd_160 = 1.5 * gd_360 - gd_368 / 2.0;
gd_376 = gd_416 * gd_376 + gd_408 * gd_160;
gd_384 = gd_408 * gd_376 + gd_416 * gd_384;
gd_184 = 1.5 * gd_376 - gd_384 / 2.0;
gd_392 = gd_416 * gd_392 + gd_408 * gd_184;
gd_400 = gd_408 * gd_392 + gd_416 * gd_400;
gd_168 = 1.5 * gd_392 - gd_400 / 2.0;
if (g_count_100 <= gi_104 && gd_136 != 0.0) gi_108 = TRUE;
if (g_count_100 == gi_104 && gi_108 == FALSE) g_count_100 = 0;
}
if (g_count_100 > gi_104 && gd_168 > 0.0000000001) {
gd_128 = 50.0 * (gd_152 / gd_168 + 1.0);
if (gd_128 > 100.0) gd_128 = 100.0;
if (gd_128 < 0.0) gd_128 = 0.0;
} else gd_128 = 50.0;
gd_304 = gd_128 / 50.0 - 1.0;
if (gi_96 == 1) {
g_time_120 = Time[1];
g_time_116 = Time[0];
gd_208 = gd_312;
gd_216 = gd_320;
gd_224 = gd_328;
gd_232 = gd_336;
gd_272 = gd_376;
gd_280 = gd_384;
gd_288 = gd_392;
gd_296 = gd_400;
}
gd_200 = gd_304 - (g_ibuf_84[gi_96 + 1]) - (g_ibuf_88[gi_96 + 1]) - (g_ibuf_92[gi_96 + 1]);
g_ibuf_84[gi_96] = 0.0;
g_ibuf_88[gi_96] = 0.0;
g_ibuf_92[gi_96] = 0.0;
if (gd_200 > 0.0) g_ibuf_84[gi_96] = gd_304;
else {
if (gd_200 < 0.0) g_ibuf_88[gi_96] = gd_304;
else g_ibuf_92[gi_96] = gd_304;
}
gi_96--;
Kr_Trend_H
int gi_76 = 13;
extern int CountBars = 3000;
double g_ibuf_84[];
double g_ibuf_88[];
double g_ibuf_92[];
int gi_96;
int g_count_100;
int gi_104;
bool gi_108;
int g_ind_counted_112;
datetime g_time_116;
datetime g_time_120;
datetime g_time_124;
double gd_128;
double gd_136;
double gd_144;
double gd_152;
double gd_160;
double gd_168;
double gd_176;
double gd_328;
double gd_336;
double gd_344;
double gd_352;
double gd_360;
double gd_368;
double gd_376;
double gd_384;
double gd_392;
double gd_400;
double gd_408;
double gd_416;
int init() {
SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexStyle(2, DRAW_HISTOGRAM, STYLE_SOLID);
SetIndexBuffer(0, g_ibuf_84);
SetIndexBuffer(1, g_ibuf_88);
SetIndexBuffer(2, g_ibuf_92);
IndicatorShortName("Krátkodobý trend/H");
SetIndexDrawBegin(0, Bars - CountBars);
SetIndexDrawBegin(1, Bars - CountBars);
SetIndexDrawBegin(2, Bars - CountBars);
IndicatorDigits(MarketInfo(Symbol(), MODE_DIGITS));
if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
else gi_104 = 5;
gd_408 = 3 / (gi_76 + 2.0);
gd_416 = 1.0 - gd_408;
return (0);
}
}
g_ind_counted_112 = IndicatorCounted();
if (g_ind_counted_112 < 0) return (-1);
if (g_ind_counted_112 > gi_76) gi_96 = Bars - g_ind_counted_112 - 1;
else gi_96 = Bars - gi_76 - 1;
g_time_124 = Time[gi_96 + 1];
if (g_time_124 != g_time_116 && gi_96 < Bars - gi_76 - 1) {
if (g_time_124 == g_time_120) {
gd_312 = gd_208;
gd_320 = gd_216;
gd_328 = gd_224;
gd_336 = gd_232;
gd_344 = gd_240;
gd_352 = gd_248;
gd_360 = gd_256;
gd_368 = gd_264;
gd_376 = gd_272;
gd_384 = gd_280;
gd_392 = gd_288;
gd_400 = gd_296;
} else return (-1);
}
if (gi_76 - 1 >= 5) gi_104 = gi_76 - 1;
else gi_104 = 5;
gd_408 = 3 / (gi_76 + 2.0);
gd_416 = 1.0 - gd_408;
while (gi_96 >= 0) {
if (g_count_100 == 0) {
g_count_100 = 1;
gi_108 = FALSE;
} else {
if (g_count_100 >= gi_104) g_count_100 = gi_104 + 1;
else g_count_100++;
gd_136 = Close[gi_96] - (Close[gi_96 + 1]);
gd_192 = MathAbs(gd_136);
gd_312 = gd_416 * gd_312 + gd_408 * gd_136;
gd_320 = gd_408 * gd_312 + gd_416 * gd_320;
gd_176 = 1.5 * gd_312 - gd_320 / 2.0;
gd_328 = gd_416 * gd_328 + gd_408 * gd_176;
gd_336 = gd_408 * gd_328 + gd_416 * gd_336;
gd_144 = 1.5 * gd_328 - gd_336 / 2.0;
gd_344 = gd_416 * gd_344 + gd_408 * gd_144;
gd_352 = gd_408 * gd_344 + gd_416 * gd_352;
gd_152 = 1.5 * gd_344 - gd_352 / 2.0;
gd_360 = gd_416 * gd_360 + gd_408 * gd_192;
gd_368 = gd_408 * gd_360 + gd_416 * gd_368;
gd_160 = 1.5 * gd_360 - gd_368 / 2.0;
gd_376 = gd_416 * gd_376 + gd_408 * gd_160;
gd_384 = gd_408 * gd_376 + gd_416 * gd_384;
gd_184 = 1.5 * gd_376 - gd_384 / 2.0;
gd_392 = gd_416 * gd_392 + gd_408 * gd_184;
gd_400 = gd_408 * gd_392 + gd_416 * gd_400;
gd_168 = 1.5 * gd_392 - gd_400 / 2.0;
if (g_count_100 <= gi_104 && gd_136 != 0.0) gi_108 = TRUE;
if (g_count_100 == gi_104 && gi_108 == FALSE) g_count_100 = 0;
}
if (g_count_100 > gi_104 && gd_168 > 0.0000000001) {
gd_128 = 50.0 * (gd_152 / gd_168 + 1.0);
if (gd_128 > 100.0) gd_128 = 100.0;
if (gd_128 < 0.0) gd_128 = 0.0;
} else gd_128 = 50.0;
gd_304 = gd_128 / 50.0 - 1.0;
if (gi_96 == 1) {
g_time_120 = Time[1];
g_time_116 = Time[0];
gd_208 = gd_312;
gd_216 = gd_320;
gd_224 = gd_328;
gd_232 = gd_336;
gd_240 = gd_344;
gd_248 = gd_352;
gd_256 = gd_360;
gd_264 = gd_368;
gd_272 = gd_376;
gd_280 = gd_384;
gd_288 = gd_392;
gd_296 = gd_400;
}
gd_200 = gd_304 - (g_ibuf_84[gi_96 + 1]) - (g_ibuf_88[gi_96 + 1]) - (g_ibuf_92[gi_96 + 1]);
g_ibuf_84[gi_96] = 0.0;
g_ibuf_88[gi_96] = 0.0;
g_ibuf_92[gi_96] = 0.0;
if (gd_200 > 0.0) g_ibuf_84[gi_96] = gd_304;
else {
if (gd_200 < 0.0) g_ibuf_88[gi_96] = gd_304;
else g_ibuf_92[gi_96] = gd_304;
}
gi_96--;
}
return (0);
}
_Trend
extern int SpreadThreshold = 6;
extern bool D_ADX = TRUE;
int init() {
IndicatorShortName("Trend (" + Symbol() + ")");
return (0);
}
int deinit() {
ObjectsDeleteAll(0, OBJ_LABEL);
ObjectDelete("Trend-1");
ObjectDelete("Trend-2");
ObjectDelete("Trend-3");
ObjectDelete("Trend-4");
ObjectDelete("Trend-5");
ObjectDelete("Trend-6");
ObjectDelete("Trend-7");
ObjectDelete("Trend-8");
ObjectDelete("Trend-9");
ObjectDelete("Trend-10");
ObjectDelete("Trend-11");
ObjectDelete("Trend-12");
ObjectDelete("Trend-2a");
ObjectDelete("Trend-4a");
ObjectDelete("Trend-6a");
ObjectDelete("Trend-8a");
ObjectDelete("Trend-10a");
ObjectDelete("Trend-12a");
return (0);
}
int start() {
color l_color_0;
color l_color_4;
color l_color_8;
color l_color_12;
color l_color_16;
color l_color_20;
string l_text_24;
string l_text_32;
string l_text_40;
string l_text_48;
string ls_unused_56;
string l_text_64;
}
double l_iadx_84 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_92 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_100 = iADX(NULL, PERIOD_M5, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_108 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_116 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_124 = iADX(NULL, PERIOD_M15, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_132 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_140 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_148 = iADX(NULL, PERIOD_M30, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_156 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_164 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_172 = iADX(NULL, PERIOD_H1, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_180 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_188 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_196 = iADX(NULL, PERIOD_H4, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
double l_iadx_204 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_MAIN, 0);
double l_iadx_212 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_PLUSDI, 0);
double l_iadx_220 = iADX(NULL, PERIOD_D1, 14, PRICE_CLOSE, MODE_MINUSDI, 0);
if (l_iadx_84 < 23.0 && l_iadx_84 != 0.0) l_color_0 = LightSkyBlue;
if (l_iadx_84 >= 23.0 && l_iadx_92 > l_iadx_100) l_color_0 = Lime;
if (l_iadx_84 >= 23.0 && l_iadx_92 < l_iadx_100) l_color_0 = Red;
if (l_iadx_108 < 23.0 && l_iadx_108 != 0.0) l_color_4 = LightSkyBlue;
if (l_iadx_108 >= 23.0 && l_iadx_116 > l_iadx_124) l_color_4 = Lime;
if (l_iadx_108 >= 23.0 && l_iadx_116 < l_iadx_124) l_color_4 = Red;
if (l_iadx_132 < 23.0 && l_iadx_132 != 0.0) l_color_8 = LightSkyBlue;
if (l_iadx_132 >= 23.0 && l_iadx_140 > l_iadx_148) l_color_8 = Lime;
if (l_iadx_132 >= 23.0 && l_iadx_140 < l_iadx_148) l_color_8 = Red;
if (l_iadx_156 < 23.0 && l_iadx_156 != 0.0) l_color_12 = LightSkyBlue;
if (l_iadx_156 >= 23.0 && l_iadx_164 > l_iadx_172) l_color_12 = Lime;
if (l_iadx_156 >= 23.0 && l_iadx_164 < l_iadx_172) l_color_12 = Red;
if (l_iadx_180 < 23.0 && l_iadx_180 != 0.0) l_color_16 = LightSkyBlue;
if (l_iadx_180 >= 23.0 && l_iadx_188 > l_iadx_196) l_color_16 = Lime;
if (l_iadx_180 >= 23.0 && l_iadx_188 < l_iadx_196) l_color_16 = Red;
if (l_iadx_204 < 23.0 && l_iadx_204 != 0.0) l_color_20 = LightSkyBlue;
if (l_iadx_204 >= 23.0 && l_iadx_212 > l_iadx_220) l_color_20 = Lime;
if (l_iadx_204 >= 23.0 && l_iadx_212 < l_iadx_220) l_color_20 = Red;
string l_iadx_228 = l_iadx_84;
string l_iadx_236 = l_iadx_108;
string l_iadx_244 = l_iadx_132;
string l_iadx_252 = l_iadx_156;
string l_iadx_260 = l_iadx_180;
string l_iadx_268 = l_iadx_204;
if (l_iadx_84 < 23.0 && l_iadx_84 != 0.0) l_text_24 = "h";
if (l_iadx_84 >= 23.0 && l_iadx_84 < 28.0 && l_iadx_92 > l_iadx_100) l_text_24 = "ě";
if (l_iadx_84 >= 23.0 && l_iadx_84 < 28.0 && l_iadx_92 < l_iadx_100) l_text_24 = "î";
if (l_iadx_84 >= 28.0 && l_iadx_92 > l_iadx_100) l_text_24 = "é";
if (l_iadx_84 >= 28.0 && l_iadx_92 < l_iadx_100) l_text_24 = "ę";
if (l_iadx_108 < 23.0 && l_iadx_108 != 0.0) l_text_32 = "h";
if (l_iadx_108 >= 23.0 && l_iadx_108 < 28.0 && l_iadx_116 > l_iadx_124) l_text_32 = "ě";
if (l_iadx_108 >= 23.0 && l_iadx_108 < 28.0 && l_iadx_116 < l_iadx_124) l_text_32 = "î";
if (l_iadx_108 >= 28.0 && l_iadx_116 > l_iadx_124) l_text_32 = "é";
if (l_iadx_108 >= 28.0 && l_iadx_116 < l_iadx_124) l_text_32 = "ę";
if (l_iadx_132 < 23.0 && l_iadx_132 != 0.0) l_text_40 = "h";
if (l_iadx_132 >= 23.0 && l_iadx_132 < 28.0 && l_iadx_140 > l_iadx_148) l_text_40 = "ě";
if (l_iadx_132 >= 23.0 && l_iadx_132 < 28.0 && l_iadx_140 < l_iadx_148) l_text_40 = "î";
if (l_iadx_132 >= 28.0 && l_iadx_140 > l_iadx_148) l_text_40 = "é";
if (l_iadx_132 >= 28.0 && l_iadx_140 < l_iadx_148) l_text_40 = "ę";
if (l_iadx_156 < 23.0 && l_iadx_156 != 0.0) l_text_48 = "h";
if (l_iadx_156 >= 23.0 && l_iadx_156 < 28.0 && l_iadx_164 > l_iadx_172) l_text_48 = "ě";
if (l_iadx_156 >= 23.0 && l_iadx_156 < 28.0 && l_iadx_164 < l_iadx_172) l_text_48 = "î";
if (l_iadx_156 >= 28.0 && l_iadx_172 > l_iadx_172) l_text_48 = "é";
if (l_iadx_156 >= 28.0 && l_iadx_164 < l_iadx_172) l_text_48 = "ę";
if (l_iadx_180 < 23.0 && l_iadx_180 != 0.0) ls_unused_56 = "h";
if (l_iadx_180 >= 23.0 && l_iadx_180 < 28.0 && l_iadx_188 > l_iadx_196) ls_unused_56 = "ě";
if (l_iadx_180 >= 23.0 && l_iadx_180 < 28.0 && l_iadx_188 < l_iadx_196) ls_unused_56 = "î";
if (l_iadx_180 >= 28.0 && l_iadx_188 > l_iadx_196) ls_unused_56 = "é";
if (l_iadx_180 >= 28.0 && l_iadx_188 < l_iadx_196) ls_unused_56 = "ę";
if (l_iadx_204 < 23.0 && l_iadx_204 != 0.0) l_text_64 = "h";
if (l_iadx_204 >= 23.0 && l_iadx_204 < 28.0 && l_iadx_212 > l_iadx_220) l_text_64 = "ě";
if (l_iadx_204 >= 23.0 && l_iadx_204 < 28.0 && l_iadx_212 < l_iadx_220) l_text_64 = "î";
if (l_iadx_204 >= 28.0 && l_iadx_212 > l_iadx_220) l_text_64 = "é";
if (l_iadx_204 >= 28.0 && l_iadx_212 < l_iadx_220) l_text_64 = "ę";
ObjectCreate("Trend-1", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-1", "5 min:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-1", OBJPROP_CORNER, 0);
ObjectSet("Trend-1", OBJPROP_XDISTANCE, 185);
ObjectSet("Trend-1", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-2", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-2", " ADX " + StringSubstr(l_iadx_228, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_0);
ObjectSet("Trend-2", OBJPROP_CORNER, 0);
ObjectSet("Trend-2", OBJPROP_XDISTANCE, 225);
ObjectSet("Trend-2", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-2a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-2a", l_text_24, 9, "Wingdings", l_color_0);
ObjectSet("Trend-2a", OBJPROP_CORNER, 0);
ObjectSet("Trend-2a", OBJPROP_XDISTANCE, 288);
ObjectSet("Trend-2a", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-3", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-3", "15 min:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-3", OBJPROP_CORNER, 0);
ObjectSet("Trend-3", OBJPROP_XDISTANCE, 318);
ObjectSet("Trend-3", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-4", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-4", " ADX " + StringSubstr(l_iadx_236, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_4);
ObjectSet("Trend-4", OBJPROP_CORNER, 0);
ObjectSet("Trend-4", OBJPROP_XDISTANCE, 363);
ObjectSet("Trend-4", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-4a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-4a", l_text_32, 9, "Wingdings", l_color_4);
ObjectSet("Trend-4a", OBJPROP_CORNER, 0);
ObjectSet("Trend-4a", OBJPROP_XDISTANCE, 426);
ObjectSet("Trend-4a", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-5", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-5", "30 min:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-5", OBJPROP_CORNER, 0);
ObjectSet("Trend-5", OBJPROP_XDISTANCE, 453);
ObjectSet("Trend-5", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-6", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-6", " ADX " + StringSubstr(l_iadx_244, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_8);
ObjectSet("Trend-6", OBJPROP_CORNER, 0);
ObjectSet("Trend-6", OBJPROP_XDISTANCE, 496);
ObjectSet("Trend-6", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-6a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-6a", l_text_40, 9, "Wingdings", l_color_8);
ObjectSet("Trend-6a", OBJPROP_CORNER, 0);
ObjectSet("Trend-6a", OBJPROP_XDISTANCE, 557);
ObjectSet("Trend-6a", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-7", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-7", "1 H:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-7", OBJPROP_CORNER, 0);
ObjectSet("Trend-7", OBJPROP_XDISTANCE, 580);
ObjectSet("Trend-7", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-8", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-8", " ADX " + StringSubstr(l_iadx_252, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_12);
ObjectSet("Trend-8", OBJPROP_CORNER, 0);
ObjectSet("Trend-8", OBJPROP_XDISTANCE, 610);
ObjectSet("Trend-8", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-8a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-8a", l_text_48, 9, "Wingdings", l_color_12);
ObjectSet("Trend-8a", OBJPROP_CORNER, 0);
ObjectSet("Trend-8a", OBJPROP_XDISTANCE, 672);
ObjectSet("Trend-8a", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-9", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-9", "4 H:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-9", OBJPROP_CORNER, 0);
ObjectSet("Trend-9", OBJPROP_XDISTANCE, 702);
ObjectSet("Trend-9", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-10", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-10", " ADX " + StringSubstr(l_iadx_260, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_16);
ObjectSet("Trend-10", OBJPROP_CORNER, 0);
ObjectSet("Trend-10", OBJPROP_XDISTANCE, 732);
ObjectSet("Trend-10", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-10a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-10a", l_text_64, 9, "Wingdings", l_color_20);
ObjectSet("Trend-10a", OBJPROP_CORNER, 0);
ObjectSet("Trend-10a", OBJPROP_XDISTANCE, 793);
ObjectSet("Trend-10a", OBJPROP_YDISTANCE, 2);
if (D_ADX == TRUE) {
ObjectCreate("Trend-11", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-11", "Denní:", 9, "Lucida Sans Regular", LightSteelBlue);
ObjectSet("Trend-11", OBJPROP_CORNER, 0);
ObjectSet("Trend-11", OBJPROP_XDISTANCE, 823);
ObjectSet("Trend-11", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-12", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-12", " ADX " + StringSubstr(l_iadx_268, 0, 5) + " ", 9, "Lucida Sands Regular", l_color_20);
ObjectSet("Trend-12", OBJPROP_CORNER, 0);
ObjectSet("Trend-12", OBJPROP_XDISTANCE, 863);
ObjectSet("Trend-12", OBJPROP_YDISTANCE, 2);
ObjectCreate("Trend-12a", OBJ_LABEL, WindowFind("Trend (" + Symbol() + ")"), 0, 0);
ObjectSetText("Trend-12a", l_text_64, 9, "Wingdings", l_color_20);
ObjectSet("Trend-12a", OBJPROP_CORNER, 0);
ObjectSet("Trend-12a", OBJPROP_XDISTANCE, 923);
ObjectSet("Trend-12a", OBJPROP_YDISTANCE, 2);
}
return (0);
}
The Indicators for Simplicity Forex System
The Indicators for Simplicity Forex System
BolingerBands_Stop_v1 (BBStops_v1) can be downloaded
Heiken Ashi Smoothed (HAS) can be downloaded
SilverTrend_Signal can be downloaded
SignalBars_v6 can be downloaded
Fibo_Piv_v2 can be downloaded
BolingerBands_Stop_v1 (BBStops_v1) can be downloaded
Heiken Ashi Smoothed (HAS) can be downloaded
SilverTrend_Signal can be downloaded
SignalBars_v6 can be downloaded
Fibo_Piv_v2 can be downloaded
Přihlásit se k odběru:
Příspěvky (Atom)