Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #property indicator_chart_window
- #property indicator_buffers 6
- #property indicator_color1 Black
- #property indicator_color2 Black
- #property indicator_color3 White
- #property indicator_color4 White
- #property indicator_color5 Black
- #property indicator_color6 Black
- extern int tf=0;
- extern int g_period_76 = 3;
- extern int dev_long = 2;
- extern int dev_short =2;
- extern int sc_upper = 0;
- extern int sc_lower = 0;
- extern int appliedpriceupper = 0;
- extern int appliedpricelower = 0;
- extern double gd_84 = 1.0;
- extern int gi_92 = 1;
- extern int gi_96 = 1;
- extern int gi_100 = 5000;
- double g_ibuf_104[];
- double g_ibuf_108[];
- double g_ibuf_112[];
- double g_ibuf_116[];
- double g_ibuf_120[];
- double g_ibuf_124[];
- extern bool SoundON = true;
- bool gi_132 = TRUE;
- bool gi_136 = TRUE;
- int init() {
- SetIndexBuffer(0, g_ibuf_104);
- SetIndexBuffer(1, g_ibuf_108);
- SetIndexBuffer(2, g_ibuf_112);
- SetIndexBuffer(3, g_ibuf_116);
- SetIndexBuffer(4, g_ibuf_120);
- SetIndexBuffer(5, g_ibuf_124);
- SetIndexStyle(0, DRAW_NONE);
- SetIndexStyle(1, DRAW_NONE, STYLE_SOLID, 0);
- SetIndexStyle(2, DRAW_ARROW, STYLE_DASH, 3);
- SetIndexStyle(3, DRAW_ARROW, STYLE_DASH, 3);
- SetIndexStyle(4, DRAW_NONE);
- SetIndexStyle(5, DRAW_NONE);
- SetIndexArrow(0, 32);
- SetIndexArrow(1, 32);
- SetIndexArrow(2, SYMBOL_ARROWUP);
- SetIndexArrow(3, SYMBOL_ARROWDOWN);
- IndicatorDigits(MarketInfo(Symbol(), MODE_DIGITS));
- string ls_0 = "FxSoni Entry";
- IndicatorShortName(ls_0);
- SetIndexLabel(0, "UpTrend Stop");
- SetIndexLabel(1, "DownTrend Stop");
- SetIndexLabel(2, "UpTrend Signal");
- SetIndexLabel(3, "DownTrend Signal");
- SetIndexLabel(4, "UpTrend Line");
- SetIndexLabel(5, "DownTrend Line");
- SetIndexDrawBegin(0, g_period_76);
- SetIndexDrawBegin(1, g_period_76);
- SetIndexDrawBegin(2, g_period_76);
- SetIndexDrawBegin(3, g_period_76);
- SetIndexDrawBegin(4, g_period_76);
- SetIndexDrawBegin(5, g_period_76);
- return (0);
- }
- int start() {
- int li_8;
- double lda_12[25000];
- double lda_16[25000];
- double lda_20[25000];
- double lda_24[25000];
- for (int l_shift_4 = gi_100; l_shift_4 >= 0; l_shift_4--) {
- g_ibuf_104[l_shift_4] = 0;
- g_ibuf_108[l_shift_4] = 0;
- g_ibuf_112[l_shift_4] = 0;
- g_ibuf_116[l_shift_4] = 0;
- g_ibuf_120[l_shift_4] = EMPTY_VALUE;
- g_ibuf_124[l_shift_4] = EMPTY_VALUE;
- }
- for ( l_shift_4 = gi_100 - g_period_76 - 1; l_shift_4 >= 0; l_shift_4--) {
- lda_12[l_shift_4] = iBands(NULL, tf, g_period_76, dev_long, sc_upper, appliedpriceupper, MODE_UPPER, l_shift_4);
- lda_16[l_shift_4] = iBands(NULL, tf, g_period_76, dev_short, sc_lower, appliedpricelower, MODE_LOWER, l_shift_4);
- if (Close[l_shift_4]> lda_12[l_shift_4 + 1]) li_8 = 1;
- if (Close[l_shift_4] < lda_16[l_shift_4 + 1]) li_8 = -1;
- if (li_8 > 0 && lda_16[l_shift_4] < lda_16[l_shift_4 + 1]) lda_16[l_shift_4] = lda_16[l_shift_4 + 1];
- if (li_8 < 0 && lda_12[l_shift_4] > lda_12[l_shift_4 + 1]) lda_12[l_shift_4] = lda_12[l_shift_4 + 1];
- lda_20[l_shift_4] = lda_12[l_shift_4] + (gd_84 - 1.0) / 2.0 * (lda_12[l_shift_4] - lda_16[l_shift_4]);
- lda_24[l_shift_4] = lda_16[l_shift_4] - (gd_84 - 1.0) / 2.0 * (lda_12[l_shift_4] - lda_16[l_shift_4]);
- if (li_8 > 0 && lda_24[l_shift_4] < lda_24[l_shift_4 + 1]) lda_24[l_shift_4] = lda_24[l_shift_4 + 1];
- if (li_8 < 0 && lda_20[l_shift_4] > lda_20[l_shift_4 + 1]) lda_20[l_shift_4] = lda_20[l_shift_4 + 1];
- if (li_8 > 0) {
- if (gi_92 > 0 && g_ibuf_104[l_shift_4 + 1] == -1.0) {
- g_ibuf_112[l_shift_4] = lda_24[l_shift_4];
- g_ibuf_104[l_shift_4] = lda_24[l_shift_4];
- if (gi_96 > 0) g_ibuf_120[l_shift_4] = lda_24[l_shift_4];
- if (SoundON == TRUE && l_shift_4 == 0 && !gi_132) {
- Alert("Buy Alert ", Symbol(), "-", Period());
- gi_132 = TRUE;
- gi_136 = FALSE;
- }
- } else {
- g_ibuf_104[l_shift_4] = lda_24[l_shift_4];
- if (gi_96 > 0) g_ibuf_120[l_shift_4] = lda_24[l_shift_4];
- g_ibuf_112[l_shift_4] = -1;
- }
- if (gi_92 == 2) g_ibuf_104[l_shift_4] = 0;
- g_ibuf_116[l_shift_4] = -1;
- g_ibuf_108[l_shift_4] = -1.0;
- g_ibuf_124[l_shift_4] = EMPTY_VALUE;
- }
- if (li_8 < 0) {
- if (gi_92 > 0 && g_ibuf_108[l_shift_4 + 1] == -1.0) {
- g_ibuf_116[l_shift_4] = lda_20[l_shift_4];
- g_ibuf_108[l_shift_4] = lda_20[l_shift_4];
- if (gi_96 > 0) g_ibuf_124[l_shift_4] = lda_20[l_shift_4];
- if (SoundON == TRUE && l_shift_4 == 0 && !gi_136) {
- Alert("Sell Alert ", Symbol(), "-", Period());
- gi_136 = TRUE;
- gi_132 = FALSE;
- }
- } else {
- g_ibuf_108[l_shift_4] = lda_20[l_shift_4];
- if (gi_96 > 0) g_ibuf_124[l_shift_4] = lda_20[l_shift_4];
- g_ibuf_116[l_shift_4] = -1;
- }
- if (gi_92 == 2) g_ibuf_108[l_shift_4] = 0;
- g_ibuf_112[l_shift_4] = -1;
- g_ibuf_104[l_shift_4] = -1.0;
- g_ibuf_120[l_shift_4] = EMPTY_VALUE;
- }
- }
- return (0);
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement