//+------------------------------------------------------------------+
//| FerruFx_Multi_info+_light_chart_v1.1.mq4 |
//| Copyright © 2007, FerruFx |
//| |
//+------------------------------------------------------------------+
// Version "Light": only the results are displayed
// Version "Light" v1.1: you can choose which indicators and TF you want to calculate the trend
#property indicator_chart_window
#property indicator_minimum 0
#property indicator_maximum 1
//---- Positionning the boxs
//---- Positionning the boxs
extern string Trend_box2 = "=== Trend Box2 ===";
bool box_trend2 = true;
extern int X_trend2 = 840;
extern int Y_trend2 = 20;
//---- Level to change the strength "weak" to "strong"
double TrendStrongLevel = 75.00;
//---- Indicators to calculate the trend
string Trend_calculation = "=== Trend calculation and display ===";
bool display_fast_MA = true;
bool display_medium_MA = true;
bool display_slow_MA = true;
bool display_CCI = true;
bool display_MACD = true;
bool display_ADX = true;
bool display_BULLS = true;
bool display_BEARS = true;
bool display_STOCH = true;
bool display_RSI = true;
bool display_FORCE = true;
bool display_MOMENTUM = true;
bool display_DeMARKER = true;
bool display_WAE = true;
//---- Timeframes to display and calculate the trend
string TF_calculation = "=== If display false, set coef to 0 ===";
string Coefs_TF = "3 TF true, SUM of their coef must be 3";
bool display_M1 = true;
double coef_m1 = 1.0;
bool display_M5 = true;
double coef_m5 = 1.0;
bool display_M15 = true;
double coef_m15 = 1.0;
bool display_M30 = true;
double coef_m30 = 1.0;
bool display_H1 = true;
double coef_H1 = 1.0;
bool display_H4 = true;
double coef_H4 = 1.0;
bool display_D1 = true;
double coef_D1 = 1.0;
//---- Indicators parameters
string Shift_Settings_test_only = "=== Format: 2007.05.07 00:00 ===";
datetime look_time_shift = D'2007.05.07 00:00'; // Shift for test if "test" is true
double shift_indicators = 0; // Shift for indicators if "test" is false
bool test = false;
int TimeZone=0;
bool pivots = true;
bool alert = true;
double yesterday_high=0;
double yesterday_open=0;
double yesterday_low=0;
double yesterday_close=0;
double today_open=0;
double today_high=0;
double today_low=0;
double rates_h1[2][6];
double rates_d1[2][6];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
ObjectDelete("Trend_UP");
ObjectDelete("line9");
ObjectDelete("Trend_UP_text");
ObjectDelete("Trend_UP_value");
ObjectDelete("Trend_DOWN_text");
ObjectDelete("Trend_DOWN_value");
ObjectDelete("line10");
ObjectDelete("line12");
ObjectDelete("Trend");
ObjectDelete("Trend_comment");
ObjectDelete("line13");
ObjectDelete("line11");
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
double UP_1, UP_2, UP_3, UP_4, UP_5, UP_6, UP_7, UP_8, UP_9, UP_10;
double UP_11, UP_12, UP_13, UP_14, UP_15, UP_16, UP_17, UP_18, UP_19, UP_20;
double UP_21, UP_22, UP_23, UP_24, UP_25, UP_26, UP_27, UP_28, UP_29, UP_30;
double UP_31, UP_32, UP_33, UP_34, UP_35, UP_36, UP_37, UP_38, UP_39, UP_40;
double UP_41, UP_42, UP_43, UP_44, UP_45, UP_46, UP_47, UP_48, UP_49, UP_50;
double UP_51, UP_52, UP_53, UP_54, UP_55, UP_56, UP_57, UP_58, UP_59, UP_60;
double UP_61, UP_62, UP_63, UP_64;
double DOWN_1, DOWN_2, DOWN_3, DOWN_4, DOWN_5, DOWN_6, DOWN_7, DOWN_8, DOWN_9, DOWN_10;
double DOWN_11, DOWN_12, DOWN_13, DOWN_14, DOWN_15, DOWN_16, DOWN_17, DOWN_18, DOWN_19, DOWN_20;
double DOWN_21, DOWN_22, DOWN_23, DOWN_24, DOWN_25, DOWN_26, DOWN_27, DOWN_28, DOWN_29, DOWN_30;
double DOWN_31, DOWN_32, DOWN_33, DOWN_34, DOWN_35, DOWN_36, DOWN_37, DOWN_38, DOWN_39, DOWN_40;
double DOWN_41, DOWN_42, DOWN_43, DOWN_44, DOWN_45, DOWN_46, DOWN_47, DOWN_48, DOWN_49, DOWN_50;
double DOWN_51, DOWN_52, DOWN_53, DOWN_54, DOWN_55, DOWN_56, DOWN_57, DOWN_58, DOWN_59, DOWN_60;
double DOWN_61, DOWN_62, DOWN_63, DOWN_64;
double UP_65, UP_66, UP_67, UP_68, UP_69, UP_70;
double UP_71, UP_72, UP_73, UP_74, UP_75, UP_76, UP_77, UP_78, UP_79, UP_80;
double UP_81, UP_82, UP_83, UP_84, UP_85, UP_86, UP_87, UP_88, UP_89, UP_90;
double UP_91, UP_92, UP_93, UP_94, UP_95, UP_96, UP_97, UP_98, UP_99, UP_100;
double UP_101, UP_102, UP_103, UP_104, UP_105, UP_106, UP_107, UP_108, UP_109, UP_110;
double UP_111, UP_112;
double DOWN_65, DOWN_66, DOWN_67, DOWN_68, DOWN_69, DOWN_70;
double DOWN_71, DOWN_72, DOWN_73, DOWN_74, DOWN_75, DOWN_76, DOWN_77, DOWN_78, DOWN_79, DOWN_80;
double DOWN_81, DOWN_82, DOWN_83, DOWN_84, DOWN_85, DOWN_86, DOWN_87, DOWN_88, DOWN_89, DOWN_90;
double DOWN_91, DOWN_92, DOWN_93, DOWN_94, DOWN_95, DOWN_96, DOWN_97, DOWN_98, DOWN_99, DOWN_100;
double DOWN_101, DOWN_102, DOWN_103, DOWN_104, DOWN_105, DOWN_106, DOWN_107, DOWN_108, DOWN_109, DOWN_110;
double DOWN_111, DOWN_112;
double count_m1, count_m5, count_m15, count_m30, count_h1, count_h4, count_d1;
if ( display_M1 == true) { count_m1 = 1; }
if ( display_M5 == true) { count_m5 = 1; }
if ( display_M15 == true) { count_m15 = 1; }
if ( display_M30 == true) { count_m30 = 1; }
if ( display_H1 == true) { count_h1 = 1; }
if ( display_H4 == true) { count_h4 = 1; }
if ( display_D1 == true) { count_d1 = 1; }
double count_tf = count_m1 + count_m5 + count_m15 + count_m30 + count_h1 + count_h4 + count_d1;
double coef = coef_m1 + coef_m5 + coef_m15 + coef_m30 + coef_H1 + coef_H4 + coef_D1;
if( coef != count_tf ) { Alert("The sum of the coefs must be ", count_tf,". Your setting is ", coef,"!!!"); }
// Shift calculation for indicators (tests only)
double shift_1, shift_5, shift_15, shift_30, shift_60, shift_240, shift_1440, shift_10080;
if( test == true )
{
shift_1=iBarShift(NULL,PERIOD_M1,look_time_shift,false);
shift_5=iBarShift(NULL,PERIOD_M5,look_time_shift,false);
shift_15=iBarShift(NULL,PERIOD_M15,look_time_shift,false);
shift_30=iBarShift(NULL,PERIOD_M30,look_time_shift,false);
shift_60=iBarShift(NULL,PERIOD_H1,look_time_shift,false);
shift_240=iBarShift(NULL,PERIOD_H4,look_time_shift,false);
shift_1440=iBarShift(NULL,PERIOD_D1,look_time_shift,false);
shift_10080=iBarShift(NULL,PERIOD_W1,look_time_shift,false);
}
else
{
shift_1=shift_indicators;
shift_5=shift_indicators;
shift_15=shift_indicators;
shift_30=shift_indicators;
shift_60=shift_indicators;
shift_240=shift_indicators;
shift_1440=shift_indicators;
shift_10080=shift_indicators;
}
// Indicator (Moving Average)
// FAST
if( display_fast_MA == true )
{
if( display_M1 == true )
{
double FastMA_1_1 = iCustom(NULL,PERIOD_H4, "FX-AO",0,0);
double FastMA_2_1 = iCustom(NULL,PERIOD_H4, "FX-AO",0,1);
if ((FastMA_1_1 < FastMA_2_1)) { UP_1 = 1; DOWN_1 = 0; }
if ((FastMA_1_1 > FastMA_2_1)) { UP_1 = 0; DOWN_1 = 1; }
}
if( display_M5 == true )
{
double FastMA_1_5 = iCustom(NULL,PERIOD_D1, "FX-AO",0,0);
double FastMA_2_5 = iCustom(NULL,PERIOD_D1, "FX-AO",0,1);
if ((FastMA_1_5 < FastMA_2_5)) { UP_2 = 1; DOWN_2 = 0; }
if ((FastMA_1_5 > FastMA_2_5)) { UP_2 = 0; DOWN_2 = 1; }
}
if( display_M15 == true )
{
double FastMA_1_15 = iCustom(NULL,PERIOD_W1, "FX-AO",0,0);
double FastMA_2_15 = iCustom(NULL,PERIOD_W1, "FX-AO",0,1);
if ((FastMA_1_15 < FastMA_2_15)) { UP_3 = 1; DOWN_3 = 0; }
if ((FastMA_1_15 > FastMA_2_15)) { UP_3 = 0; DOWN_3 = 1; }
}
if( display_M30 == true )
{
double FastMA_1_30 = iCustom(NULL,PERIOD_H4, "FX-AO",0,0);
double FastMA_2_30 = iCustom(NULL,PERIOD_H4, "FX-AO",0,1);
if ((FastMA_1_30 < FastMA_2_30)) { UP_4 = 1; DOWN_4 = 0; }
if ((FastMA_1_30 > FastMA_2_30)) { UP_4 = 0; DOWN_4 = 1; }
}
if( display_H1 == true )
{
double FastMA_1_60 = iCustom(NULL,PERIOD_D1, "FX-AO",0,0);
double FastMA_2_60 = iCustom(NULL,PERIOD_D1, "FX-AO",0,1);
if ((FastMA_1_60 < FastMA_2_60)) { UP_5 = 1; DOWN_5 = 0; }
if ((FastMA_1_60 > FastMA_2_60)) { UP_5 = 0; DOWN_5 = 1; }
}
if( display_H4 == true )
{
double FastMA_1_240 = iCustom(NULL,PERIOD_W1, "FX-AO",0,0);
double FastMA_2_240 = iCustom(NULL,PERIOD_W1, "FX-AO",0,1);
if ((FastMA_1_240 < FastMA_2_240)) { UP_6 = 1; DOWN_6 = 0; }
if ((FastMA_1_240 > FastMA_2_240)) { UP_6 = 0; DOWN_6 = 1; }
}
if( display_D1 == true )
{
double FastMA_1_1440 = iCustom(NULL,PERIOD_H4, "FX-AO",0,0);
double FastMA_2_1440 = iCustom(NULL,PERIOD_H4, "FX-AO",0,1);
if ((FastMA_1_1440 < FastMA_2_1440)) { UP_7 = 1; DOWN_7 = 0; }
if ((FastMA_1_1440 > FastMA_2_1440)) { UP_7 = 0; DOWN_7 = 1; }
}
}
// MEDIUM
if( display_medium_MA == true )
{
if( display_M1 == true )
{
double MediumMA_1_1 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double MediumMA_2_1 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((MediumMA_1_1 < MediumMA_2_1)) { UP_9 = 1; DOWN_9 = 0; }
if ((MediumMA_1_1 > MediumMA_2_1)) { UP_9 = 0; DOWN_9 = 1; }
}
if( display_M5 == true )
{
double MediumMA_1_5 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double MediumMA_2_5 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((MediumMA_1_5 < MediumMA_2_5)) { UP_10 = 1; DOWN_10 = 0; }
if ((MediumMA_1_5 > MediumMA_2_5)) { UP_10 = 0; DOWN_10 = 1; }
}
if( display_M15 == true )
{
double MediumMA_1_15 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double MediumMA_2_15 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((MediumMA_1_15 < MediumMA_2_15)) { UP_11 = 1; DOWN_11 = 0; }
if ((MediumMA_1_15 > MediumMA_2_15)) { UP_11 = 0; DOWN_11 = 1; }
}
if( display_M30 == true )
{
double MediumMA_1_30 = iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double MediumMA_2_30 = iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if ((MediumMA_1_30 < MediumMA_2_30)) { UP_12 = 1; DOWN_12 = 0; }
if ((MediumMA_1_30 > MediumMA_2_30)) { UP_12 = 0; DOWN_12 = 1; }
}
if( display_H1 == true )
{
double MediumMA_1_60 = iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double MediumMA_2_60 = iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if ((MediumMA_1_60 < MediumMA_2_60)) { UP_13 = 1; DOWN_13 = 0; }
if ((MediumMA_1_60 > MediumMA_2_60)) { UP_13 = 0; DOWN_13 = 1; }
}
if( display_H4 == true )
{
double MediumMA_1_240 = iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double MediumMA_2_240 = iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if ((MediumMA_1_240 < MediumMA_2_240)) { UP_14 = 1; DOWN_14 = 0; }
if ((MediumMA_1_240 > MediumMA_2_240)) { UP_14 = 0; DOWN_14 = 1; }
}
if( display_D1 == true )
{
double MediumMA_1_1440 = iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double MediumMA_2_1440 = iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if ((MediumMA_1_1440 < MediumMA_2_1440)) { UP_15 = 1; DOWN_15 = 0; }
if ((MediumMA_1_1440 > MediumMA_2_1440)) { UP_15 = 0; DOWN_15 = 1; }
}
}
// SLOW
if( display_slow_MA == true )
{
if( display_M1 == true )
{
double SlowMA_1_1 = iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double SlowMA_2_1 = iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((SlowMA_1_1 < SlowMA_2_1)) { UP_17 = 1; DOWN_17 = 0; }
if ((SlowMA_1_1 > SlowMA_2_1)) { UP_17 = 0; DOWN_17 = 1; }
}
if( display_M5 == true )
{
double SlowMA_1_5 = iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double SlowMA_2_5 = iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((SlowMA_1_5 < SlowMA_2_5)) { UP_18 = 1; DOWN_18 = 0; }
if ((SlowMA_1_5 > SlowMA_2_5)) { UP_18 = 0; DOWN_18 = 1; }
}
if( display_M15 == true )
{
double SlowMA_1_15 = iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double SlowMA_2_15 = iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((SlowMA_1_15 < SlowMA_2_15)) { UP_19 = 1; DOWN_19 = 0; }
if ((SlowMA_1_15 > SlowMA_2_15)) { UP_19 = 0; DOWN_19 = 1; }
}
if( display_M30 == true )
{
double SlowMA_1_30 = iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double SlowMA_2_30 = iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if ((SlowMA_1_30 < SlowMA_2_30)) { UP_20 = 1; DOWN_20 = 0; }
if ((SlowMA_1_30 > SlowMA_2_30)) { UP_20 = 0; DOWN_20 = 1; }
}
if( display_H1 == true )
{
double SlowMA_1_60 = iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double SlowMA_2_60 = iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if ((SlowMA_1_60 < SlowMA_2_60)) { UP_21 = 1; DOWN_21 = 0; }
if ((SlowMA_1_60 > SlowMA_2_60)) { UP_21 = 0; DOWN_21 = 1; }
}
if( display_H4 == true )
{
double SlowMA_1_240 = iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double SlowMA_2_240 = iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if ((SlowMA_1_240 < SlowMA_2_240)) { UP_22 = 1; DOWN_22 = 0; }
if ((SlowMA_1_240 > SlowMA_2_240)) { UP_22 = 0; DOWN_22 = 1; }
}
if( display_D1 == true )
{
double SlowMA_1_1440 = iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double SlowMA_2_1440 = iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if ((SlowMA_1_1440 < SlowMA_2_1440)) { UP_23 = 1; DOWN_23 = 0; }
if ((SlowMA_1_1440 > SlowMA_2_1440)) { UP_23 = 0; DOWN_23 = 1; }
}
}
// Indicator (CCI)
if( display_CCI == true )
{
if( display_M1 == true )
{
double CCI_1=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double CCI_2=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((CCI_1 < CCI_2)) { UP_25 = 1; DOWN_25 = 0; }
if ((CCI_1 > CCI_2)) { UP_25 = 0; DOWN_25 = 1; }
}
if( display_M5 == true )
{
double CCI_5=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double CCI_6=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((CCI_5 < CCI_6)) { UP_26 = 1; DOWN_26 = 0; }
if ((CCI_5 > CCI_6)) { UP_26 = 0; DOWN_26 = 1; }
}
if( display_M15 == true )
{
double CCI_15=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double CCI_16=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((CCI_15 < CCI_16)) { UP_27 = 1; DOWN_27 = 0; }
if ((CCI_15 > CCI_16)) { UP_27 = 0; DOWN_27 = 1; }
}
if( display_M30 == true )
{
double CCI_30=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double CCI_31=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if ((CCI_30 < CCI_31)) { UP_28 = 1; DOWN_28 = 0; }
if ((CCI_30 > CCI_31)) { UP_28 = 0; DOWN_28 = 1; }
}
if( display_H1 == true )
{
double CCI_60=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double CCI_61=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if ((CCI_60 < CCI_61)) { UP_29 = 1; DOWN_29 = 0; }
if ((CCI_60 > CCI_61)) { UP_29 = 0; DOWN_29 = 1; }
}
if( display_H4 == true )
{
double CCI_240=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double CCI_241=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if ((CCI_240 < CCI_241)) { UP_30 = 1; DOWN_30 = 0; }
if ((CCI_240 > CCI_241)) { UP_30 = 0; DOWN_30 = 1; }
}
if( display_D1 == true )
{
double CCI_1440=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double CCI_1441=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if ((CCI_1440 < CCI_1441)) { UP_31 = 1; DOWN_31 = 0; }
if ((CCI_1440 > CCI_1441)) { UP_31 = 0; DOWN_31 = 1; }
}
}
// Indicator (MACD)
if( display_MACD == true )
{
if( display_M1 == true )
{
double MACD_m_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double MACD_s_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((MACD_m_1 > MACD_s_1)) { UP_33 = 1; DOWN_33 = 0; }
if ((MACD_m_1 < MACD_s_1)) { UP_33 = 0; DOWN_33 = 1; }
}
if( display_M5 == true )
{
double MACD_m_5=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double MACD_s_5=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((MACD_m_5 > MACD_s_5)) { UP_34 = 1; DOWN_34 = 0; }
if ((MACD_m_5 < MACD_s_5)) { UP_34 = 0; DOWN_34 = 1; }
}
if( display_M15 == true )
{
double MACD_m_15=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double MACD_s_15=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((MACD_m_15 > MACD_s_15)) { UP_35 = 1; DOWN_35 = 0; }
if ((MACD_m_15 < MACD_s_15)) { UP_35 = 0; DOWN_35 = 1; }
}
if( display_M30 == true )
{
double MACD_m_30=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double MACD_s_30=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if ((MACD_m_30 > MACD_s_30)) { UP_36 = 1; DOWN_36 = 0; }
if ((MACD_m_30 < MACD_s_30)) { UP_36 = 0; DOWN_36 = 1; }
}
if( display_H1 == true )
{
double MACD_m_60=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double MACD_s_60=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if ((MACD_m_60 > MACD_s_60)) { UP_37 = 1; DOWN_37 = 0; }
if ((MACD_m_60 < MACD_s_60)) { UP_37 = 0; DOWN_37 = 1; }
}
if( display_H4 == true )
{
double MACD_m_240=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double MACD_s_240=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if ((MACD_m_240 > MACD_s_240)) { UP_38 = 1; DOWN_38 = 0; }
if ((MACD_m_240 < MACD_s_240)) { UP_38 = 0; DOWN_38 = 1; }
}
if( display_D1 == true )
{
double MACD_m_1440=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double MACD_s_1440=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if ((MACD_m_1440 > MACD_s_1440)) { UP_39 = 1; DOWN_39 = 0; }
if ((MACD_m_1440 < MACD_s_1440)) { UP_39 = 0; DOWN_39 = 1; }
}
}
// Indicator (ADX)
if( display_ADX == true )
{
if( display_M1 == true )
{
double ADX_plus_1=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double ADX_minus_1=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((ADX_plus_1 > ADX_minus_1)) { UP_41 = 1; DOWN_41 = 0; }
if ((ADX_plus_1 < ADX_minus_1)) { UP_41 = 0; DOWN_41 = 1; }
}
if( display_M5 == true )
{
double ADX_plus_5=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double ADX_minus_5=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((ADX_plus_5 > ADX_minus_5)) { UP_42 = 1; DOWN_42 = 0; }
if ((ADX_plus_5 < ADX_minus_5)) { UP_42 = 0; DOWN_42 = 1; }
}
if( display_M15 == true )
{
double ADX_plus_15=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double ADX_minus_15=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((ADX_plus_15 > ADX_minus_15)) { UP_43 = 1; DOWN_43 = 0; }
if ((ADX_plus_15 < ADX_minus_15)) { UP_43 = 0; DOWN_43 = 1; }
}
if( display_M30 == true )
{
double ADX_plus_30=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double ADX_minus_30=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if ((ADX_plus_30 > ADX_minus_30)) { UP_44 = 1; DOWN_44 = 0; }
if ((ADX_plus_30 < ADX_minus_30)) { UP_44 = 0; DOWN_44 = 1; }
}
if( display_H1 == true )
{
double ADX_plus_60=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double ADX_minus_60=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if ((ADX_plus_60 > ADX_minus_60)) { UP_45 = 1; DOWN_45 = 0; }
if ((ADX_plus_60 < ADX_minus_60)) { UP_45 = 0; DOWN_45 = 1; }
}
if( display_H4 == true )
{
double ADX_plus_240=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double ADX_minus_240=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if ((ADX_plus_240 > ADX_minus_240)) { UP_46 = 1; DOWN_46 = 0; }
if ((ADX_plus_240 < ADX_minus_240)) { UP_46 = 0; DOWN_46 = 1; }
}
if( display_D1 == true )
{
double ADX_plus_1440=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double ADX_minus_1440=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if ((ADX_plus_1440 > ADX_minus_1440)) { UP_47 = 1; DOWN_47 = 0; }
if ((ADX_plus_1440 < ADX_minus_1440)) { UP_47 = 0; DOWN_47 = 1; }
}
}
// Indicator (BULLS)
if( display_BULLS == true )
{
if( display_M1 == true )
{
double bulls_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double bulls_2=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((bulls_1 > bulls_2)) { UP_49 = 1; DOWN_49 = 0; }
if ((bulls_1 < bulls_2)) { UP_49 = 0; DOWN_49 = 1; }
}
if( display_M5 == true )
{
double bulls_5=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double bulls_6=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((bulls_5 > bulls_6)) { UP_50 = 1; DOWN_50 = 0; }
if ((bulls_5 < bulls_6)) { UP_50 = 0; DOWN_50 = 1; }
}
if( display_M15 == true )
{
double bulls_15=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double bulls_16=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if ((bulls_15 > bulls_16)) { UP_51 = 1; DOWN_51 = 0; }
if ((bulls_15 < bulls_16)) { UP_51 = 0; DOWN_51 = 1; }
}
if( display_M30 == true )
{
double bulls_30=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double bulls_31=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if ((bulls_30 > bulls_31)) { UP_52 = 1; DOWN_52 = 0; }
if ((bulls_30 < bulls_31)) { UP_52 = 0; DOWN_52 = 1; }
}
if( display_H1 == true )
{
double bulls_60=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double bulls_61=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if ((bulls_60 > bulls_61)) { UP_53 = 1; DOWN_53 = 0; }
if ((bulls_60 < bulls_61)) { UP_53 = 0; DOWN_53 = 1; }
}
if( display_H4 == true )
{
double bulls_240=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double bulls_241=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if ((bulls_240 > bulls_241)) { UP_54 = 1; DOWN_54 = 0; }
if ((bulls_240 < bulls_241)) { UP_54 = 0; DOWN_54 = 1; }
}
if( display_D1 == true )
{
double bulls_1440=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double bulls_1441=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if ((bulls_1440 > bulls_1441)) { UP_55 = 1; DOWN_55 = 0; }
if ((bulls_1440 < bulls_1441)) { UP_55 = 0; DOWN_55 = 1; }
}
}
// Indicator (BEARS)
if( display_BEARS == true )
{
if( display_M1 == true )
{
double bears_1=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double bears_2=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((bears_1 > bears_2)) { UP_57 = 1; DOWN_57 = 0; }
if ((bears_1 < bears_2)) { UP_57 = 0; DOWN_57 = 1; }
}
if( display_M5 == true )
{
double bears_5=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double bears_6=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((bears_5 > bears_6)) { UP_58 = 1; DOWN_58 = 0; }
if ((bears_5 < bears_6)) { UP_58 = 0; DOWN_58 = 1; }
}
if( display_M15 == true )
{
double bears_15=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double bears_16=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if ((bears_15 > bears_16)) { UP_59 = 1; DOWN_59 = 0; }
if ((bears_15 < bears_16)) { UP_59 = 0; DOWN_59 = 1; }
}
if( display_M30 == true )
{
double bears_30=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double bears_31=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if ((bears_30 > bears_31)) { UP_60 = 1; DOWN_60 = 0; }
if ((bears_30 < bears_31)) { UP_60 = 0; DOWN_60 = 1; }
}
if( display_H1 == true )
{
double bears_60=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double bears_61=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if ((bears_60 > bears_61)) { UP_61 = 1; DOWN_61 = 0; }
if ((bears_60 < bears_61)) { UP_61 = 0; DOWN_61 = 1; }
}
if( display_H4 == true )
{
double bears_240=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double bears_241=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if ((bears_240 > bears_241)) { UP_62 = 1; DOWN_62 = 0; }
if ((bears_240 < bears_241)) { UP_62 = 0; DOWN_62 = 1; }
}
if( display_D1 == true )
{
double bears_1440=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double bears_1441=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if ((bears_1440 > bears_1441)) { UP_63 = 1; DOWN_63 = 0; }
if ((bears_1440 < bears_1441)) { UP_63 = 0; DOWN_63 = 1; }
}
}
// Indicator (STOCH)
if( display_STOCH == true )
{
if( display_M1 == true )
{
double stoch_m_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double stoch_s_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (stoch_m_1 >= stoch_s_1) { UP_65 = 1; DOWN_65 = 0; }
if (stoch_m_1 < stoch_s_1) { UP_65 = 0; DOWN_65 = 1; }
}
if( display_M5 == true )
{
double stoch_m_5=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double stoch_s_5=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (stoch_m_5 >= stoch_s_5) { UP_66 = 1; DOWN_66 = 0; }
if (stoch_m_5 < stoch_s_5) { UP_66 = 0; DOWN_66 = 1; }
}
if( display_M15 == true )
{
double stoch_m_15=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double stoch_s_15=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (stoch_m_15 >= stoch_s_15) { UP_67 = 1; DOWN_67 = 0; }
if (stoch_m_15 < stoch_s_15) { UP_67 = 0; DOWN_67 = 1; }
}
if( display_M30 == true )
{
double stoch_m_30=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double stoch_s_30=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if (stoch_m_30 >= stoch_s_30) { UP_68 = 1; DOWN_68 = 0; }
if (stoch_m_30 < stoch_s_30) { UP_68 = 0; DOWN_68 = 1; }
}
if( display_H1 == true )
{
double stoch_m_60=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double stoch_s_60=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if (stoch_m_60 >= stoch_s_60) { UP_69 = 1; DOWN_69 = 0; }
if (stoch_m_60 < stoch_s_60) { UP_69 = 0; DOWN_69 = 1; }
}
if( display_H4 == true )
{
double stoch_m_240=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double stoch_s_240=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if (stoch_m_240 >= stoch_s_240) { UP_70 = 1; DOWN_70 = 0; }
if (stoch_m_240 < stoch_s_240) { UP_70 = 0; DOWN_70 = 1; }
}
if( display_D1 == true )
{
double stoch_m_1440=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double stoch_s_1440=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if (stoch_m_1440 >= stoch_s_1440) { UP_71 = 1; DOWN_71 = 0; }
if (stoch_m_1440 < stoch_s_1440) { UP_71 = 0; DOWN_71 = 1; }
}
}
// Indicator (RSI)
if( display_RSI == true )
{
if( display_M1 == true )
{
double rsi_1=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double rsi_2=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (rsi_1 >= rsi_2) { UP_73 = 1; DOWN_73 = 0; }
if (rsi_1 < rsi_2) { UP_73 = 0; DOWN_73 = 1; }
}
if( display_M5 == true )
{
double rsi_5=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double rsi_6=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (rsi_5 >= rsi_6) { UP_74 = 1; DOWN_74 = 0; }
if (rsi_5 < rsi_6) { UP_74 = 0; DOWN_74 = 1; }
}
if( display_M15 == true )
{
double rsi_15=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double rsi_16=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (rsi_15 >= rsi_16) { UP_75 = 1; DOWN_75 = 0; }
if (rsi_15 < rsi_16) { UP_75 = 0; DOWN_75 = 1; }
}
if( display_M30 == true )
{
double rsi_30=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double rsi_31=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if (rsi_30 >= rsi_31) { UP_76 = 1; DOWN_76 = 0; }
if (rsi_30 < rsi_31) { UP_76 = 0; DOWN_76 = 1; }
}
if( display_H1 == true )
{
double rsi_60=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double rsi_61=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if (rsi_60 >= rsi_61) { UP_77 = 1; DOWN_77 = 0; }
if (rsi_60 < rsi_61) { UP_77 = 0; DOWN_77 = 1; }
}
if( display_H4 == true )
{
double rsi_240=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double rsi_241=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if (rsi_240 >= rsi_241) { UP_78 = 1; DOWN_78 = 0; }
if (rsi_240 < rsi_241) { UP_78 = 0; DOWN_78 = 1; }
}
if( display_D1 == true )
{
double rsi_1440=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double rsi_1441=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if (rsi_1440 >= rsi_1441) { UP_79 = 1; DOWN_79 = 0; }
if (rsi_1440 < rsi_1441) { UP_79 = 0; DOWN_79 = 1; }
}
}
// Indicator (FORCE INDEX)
if( display_FORCE == true )
{
if( display_M1 == true )
{
double fi_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double fi_2=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (fi_1 > fi_2) { UP_81 = 1; DOWN_81 = 0; }
if (fi_1 < fi_2) { UP_81 = 0; DOWN_81 = 1; }
}
if( display_M5 == true )
{
double fi_5=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double fi_6=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (fi_5 > fi_6) { UP_82 = 1; DOWN_82 = 0; }
if (fi_5 < fi_6) { UP_82 = 0; DOWN_82 = 1; }
}
if( display_M15 == true )
{
double fi_15=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double fi_16=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (fi_15 > fi_16) { UP_83 = 1; DOWN_83 = 0; }
if (fi_15 < fi_16) { UP_83 = 0; DOWN_83 = 1; }
}
if( display_M30 == true )
{
double fi_30=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double fi_31=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if (fi_30 > fi_31) { UP_84 = 1; DOWN_84 = 0; }
if (fi_30 < fi_31) { UP_84 = 0; DOWN_84 = 1; }
}
if( display_H1 == true )
{
double fi_60=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double fi_61=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if (fi_60 > fi_61) { UP_85 = 1; DOWN_85 = 0; }
if (fi_60 < fi_61) { UP_85 = 0; DOWN_85 = 1; }
}
if( display_H4 == true )
{
double fi_240=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double fi_241=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if (fi_240 > fi_241) { UP_86 = 1; DOWN_86 = 0; }
if (fi_240 < fi_241) { UP_86 = 0; DOWN_86 = 1; }
}
if( display_D1 == true )
{
double fi_1440=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double fi_1441=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if (fi_1440 > fi_1441) { UP_87 = 1; DOWN_87 = 0; }
if (fi_1440 < fi_1441) { UP_87 = 0; DOWN_87 = 1; }
}
}
// Indicator (MOMENTUM)
if( display_MOMENTUM == true )
{
if( display_M1 == true )
{
double momentum_1=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double momentum_2=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (momentum_1 >= momentum_2) { UP_89 = 1; DOWN_89 = 0; }
if (momentum_1 < momentum_2) { UP_89 = 0; DOWN_89 = 1; }
}
if( display_M5 == true )
{
double momentum_5=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double momentum_6=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (momentum_5 >= momentum_6) { UP_90 = 1; DOWN_90 = 0; }
if (momentum_5 < momentum_6) { UP_90 = 0; DOWN_90 = 1; }
}
if( display_M15 == true )
{
double momentum_15=iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double momentum_16=iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (momentum_15 >= momentum_16) { UP_91 = 1; DOWN_91 = 0; }
if (momentum_15 < momentum_16) { UP_91 = 0; DOWN_91 = 1; }
}
if( display_M30 == true )
{
double momentum_30=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double momentum_31=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if (momentum_30 >= momentum_31) { UP_92 = 1; DOWN_92 = 0; }
if (momentum_30 < momentum_31) { UP_92 = 0; DOWN_92 = 1; }
}
if( display_H1 == true )
{
double momentum_60=iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double momentum_61=iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if (momentum_60 >= momentum_61) { UP_93 = 1; DOWN_93 = 0; }
if (momentum_60 < momentum_61) { UP_93 = 0; DOWN_93 = 1; }
}
if( display_H4 == true )
{
double momentum_240=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double momentum_241=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if (momentum_240 >= momentum_241) { UP_94 = 1; DOWN_94 = 0; }
if (momentum_240 < momentum_241) { UP_94 = 0; DOWN_94 = 1; }
}
if( display_D1 == true )
{
double momentum_1440=iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double momentum_1441=iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if (momentum_1440 >= momentum_1441) { UP_95 = 1; DOWN_95 = 0; }
if (momentum_1440 < momentum_1441) { UP_95 = 0; DOWN_95 = 1; }
}
}
// Indicator (DE MARKER)
if(display_DeMARKER == true )
{
if( display_M1 == true )
{
double demarker_1_0=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double demarker_1_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (demarker_1_0 >= demarker_1_1) { UP_97 = 1; DOWN_97 = 0; }
if (demarker_1_0 < demarker_1_1) { UP_97 = 0; DOWN_97 = 1; }
}
if( display_M5 == true )
{
double demarker_5_0=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double demarker_5_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (demarker_5_0 >= demarker_5_1) { UP_98 = 1; DOWN_98 = 0; }
if (demarker_5_0 < demarker_5_1) { UP_98 = 0; DOWN_98 = 1; }
}
if( display_M15 == true )
{
double demarker_15_0=iCustom(NULL, PERIOD_H4, "FX-AO",0,0);
double demarker_15_1=iCustom(NULL, PERIOD_H4, "FX-AO",0,1);
if (demarker_15_0 >= demarker_15_1) { UP_99 = 1; DOWN_99 = 0; }
if (demarker_15_0 < demarker_15_1) { UP_99 = 0; DOWN_99 = 1; }
}
if( display_M30 == true )
{
double demarker_30_0=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double demarker_30_1=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if (demarker_30_0 >= demarker_30_1) { UP_100 = 1; DOWN_100 = 0; }
if (demarker_30_0 < demarker_30_1) { UP_100 = 0; DOWN_100 = 1; }
}
if( display_H1 == true )
{
double demarker_60_0=iCustom(NULL, PERIOD_D1, "FX-AO",0,0);
double demarker_60_1=iCustom(NULL, PERIOD_D1, "FX-AO",0,1);
if (demarker_60_0 >= demarker_60_1) { UP_101 = 1; DOWN_101 = 0; }
if (demarker_60_0 < demarker_60_1) { UP_101 = 0; DOWN_101 = 1; }
}
if( display_H4 == true )
{
double demarker_240_0=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double demarker_240_1=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if (demarker_240_0 >= demarker_240_1) { UP_102 = 1; DOWN_102 = 0; }
if (demarker_240_0 < demarker_240_1) { UP_102 = 0; DOWN_102 = 1; }
}
if( display_D1 == true )
{
double demarker_1440_0=iCustom(NULL, PERIOD_W1, "FX-AO",0,0);
double demarker_1440_1=iCustom(NULL, PERIOD_W1, "FX-AO",0,1);
if (demarker_1440_0 >= demarker_1440_1) { UP_103 = 1; DOWN_103 = 0; }
if (demarker_1440_0 < demarker_1440_1) { UP_103 = 0; DOWN_103 = 1; }
}
}
// Indicator (Waddah Attar Explosion)
if( display_WAE == true )
{
if( display_M1 == true )
{
double wae_histo_up_1_0 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double wae_histo_up_1_1 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (wae_histo_up_1_0 > wae_histo_up_1_1) { UP_105 = 1; DOWN_105 = 0; }
if (wae_histo_up_1_0 < wae_histo_up_1_1) { UP_105 = 0; DOWN_105 = 1; }
}
if( display_M5 == true )
{
double wae_histo_up_5_0 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double wae_histo_up_5_1 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (wae_histo_up_5_0 > wae_histo_up_5_1) { UP_106 = 1; DOWN_106 = 0; }
if (wae_histo_up_5_0 < wae_histo_up_5_1) { UP_106 = 0; DOWN_106 = 1; }
}
if( display_M15 == true )
{
double wae_histo_up_15_0 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,0);
double wae_histo_up_15_1 = iCustom(NULL, PERIOD_H4, "FX-BAR",0,1);
if (wae_histo_up_15_0 > wae_histo_up_15_1) { UP_107 = 1; DOWN_107 = 0; }
if (wae_histo_up_15_0 < wae_histo_up_15_1) { UP_107 = 0; DOWN_107 = 1; }
}
if( display_M30 == true )
{
double wae_histo_up_30_0 = iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double wae_histo_up_30_1 = iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if (wae_histo_up_30_0 > wae_histo_up_30_1) { UP_108 = 1; DOWN_108 = 0; }
if (wae_histo_up_30_0 < wae_histo_up_30_1) { UP_108 = 0; DOWN_108 = 1; }
}
if( display_H1 == true )
{
double wae_histo_up_60_0 = iCustom(NULL, PERIOD_D1, "FX-BAR",0,0);
double wae_histo_up_60_1 = iCustom(NULL, PERIOD_D1, "FX-BAR",0,1);
if (wae_histo_up_60_0 > wae_histo_up_60_1) { UP_109 = 1; DOWN_109 = 0; }
if (wae_histo_up_60_0 < wae_histo_up_60_1) { UP_109 = 0; DOWN_109 = 1; }
}
if( display_H4 == true )
{
double wae_histo_up_240_0 =iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double wae_histo_up_240_1 = iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if (wae_histo_up_240_0 > wae_histo_up_240_1) { UP_110 = 1; DOWN_110 = 0; }
if (wae_histo_up_240_0 < wae_histo_up_240_1) { UP_110 = 0; DOWN_110 = 1; }
}
if( display_D1 == true )
{
double wae_histo_up_1440_0 = iCustom(NULL, PERIOD_W1, "FX-BAR",0,0);
double wae_histo_up_1440_1 = iCustom(NULL, PERIOD_W1, "FX-BAR",0,1);
if (wae_histo_up_1440_0 > wae_histo_up_1440_1) { UP_111 = 1; DOWN_111 = 0; }
if (wae_histo_up_1440_0 < wae_histo_up_1440_1) { UP_111 = 0; DOWN_111 = 1; }
}
}
//---- Count Indicators
double Indy_count = UP_1 + UP_9 + UP_17 + UP_25 + UP_33 + UP_41 + UP_49 + UP_57 + UP_65 + UP_73 + UP_81 + UP_89 + UP_97 + UP_105
+ UP_2 + UP_10 + UP_18 + UP_26 + UP_34 + UP_42 + UP_50 + UP_58 + UP_66 + UP_74 + UP_82 + UP_90 + UP_98 + UP_106
+ UP_3 + UP_11 + UP_19 + UP_27 + UP_35 + UP_43 + UP_51 + UP_59 + UP_67 + UP_75 + UP_83 + UP_91 + UP_99 + UP_107
+ UP_4 + UP_12 + UP_20 + UP_28 + UP_36 + UP_44 + UP_52 + UP_60 + UP_68 + UP_76 + UP_84 + UP_92 + UP_100 + UP_108
+ UP_5 + UP_13 + UP_21 + UP_29 + UP_37 + UP_45 + UP_53 + UP_61 + UP_69 + UP_77 + UP_85 + UP_93 + UP_101 + UP_109
+ UP_6 + UP_14 + UP_22 + UP_30 + UP_38 + UP_46 + UP_54 + UP_62 + UP_70 + UP_78 + UP_86 + UP_94 + UP_102 + UP_110
+ UP_7 + UP_15 + UP_23 + UP_31 + UP_39 + UP_47 + UP_55 + UP_63 + UP_71 + UP_79 + UP_87 + UP_95 + UP_103 + UP_111
+ DOWN_1 + DOWN_9 + DOWN_17 + DOWN_25 + DOWN_33 + DOWN_41 + DOWN_49 + DOWN_57 + DOWN_65 + DOWN_73 + DOWN_81 + DOWN_89 + DOWN_97 + DOWN_105
+ DOWN_2 + DOWN_10 + DOWN_18 + DOWN_26 + DOWN_34 + DOWN_42 + DOWN_50 + DOWN_58 + DOWN_66 + DOWN_74 + DOWN_82 + DOWN_90 + DOWN_98 + DOWN_106
+ DOWN_3 + DOWN_11 + DOWN_19 + DOWN_27 + DOWN_35 + DOWN_43 + DOWN_51 + DOWN_59 + DOWN_67 + DOWN_75 + DOWN_83 + DOWN_91 + DOWN_99 + DOWN_107
+ DOWN_4 + DOWN_12 + DOWN_20 + DOWN_28 + DOWN_36 + DOWN_44 + DOWN_52 + DOWN_60 + DOWN_68 + DOWN_76 + DOWN_84 + DOWN_92 + DOWN_100 + DOWN_108
+ DOWN_5 + DOWN_13 + DOWN_21 + DOWN_29 + DOWN_37 + DOWN_45 + DOWN_53 + DOWN_61 + DOWN_69 + DOWN_77 + DOWN_85 + DOWN_93 + DOWN_101 + DOWN_109
+ DOWN_6 + DOWN_14 + DOWN_22 + DOWN_30 + DOWN_38 + DOWN_46 + DOWN_54 + DOWN_62 + DOWN_70 + DOWN_78 + DOWN_86 + DOWN_94 + DOWN_102 + DOWN_110
+ DOWN_7 + DOWN_15 + DOWN_23 + DOWN_31 + DOWN_39 + DOWN_47 + DOWN_55 + DOWN_63 + DOWN_71 + DOWN_79 + DOWN_87 + DOWN_95 + DOWN_103 + DOWN_111;
//---- Calculation of the trend. Let's give TFs more "force"
double UP_m1 = (UP_1 + UP_9 + UP_17 + UP_25 + UP_33 + UP_41 + UP_49 + UP_57 + UP_65 + UP_73 + UP_81 + UP_89 + UP_97 + UP_105);
double UP_m5 = (UP_2 + UP_10 + UP_18 + UP_26 + UP_34 + UP_42 + UP_50 + UP_58 + UP_66 + UP_74 + UP_82 + UP_90 + UP_98 + UP_106);
double UP_m15 = (UP_3 + UP_11 + UP_19 + UP_27 + UP_35 + UP_43 + UP_51 + UP_59 + UP_67 + UP_75 + UP_83 + UP_91 + UP_99 + UP_107);
double UP_m30 = (UP_4 + UP_12 + UP_20 + UP_28 + UP_36 + UP_44 + UP_52 + UP_60 + UP_68 + UP_76 + UP_84 + UP_92 + UP_100 + UP_108);
double UP_H1 = (UP_5 + UP_13 + UP_21 + UP_29 + UP_37 + UP_45 + UP_53 + UP_61 + UP_69 + UP_77 + UP_85 + UP_93 + UP_101 + UP_109);
double UP_H4 = (UP_6 + UP_14 + UP_22 + UP_30 + UP_38 + UP_46 + UP_54 + UP_62 + UP_70 + UP_78 + UP_86 + UP_94 + UP_102 + UP_110);
double UP_D1 = (UP_7 + UP_15 + UP_23 + UP_31 + UP_39 + UP_47 + UP_55 + UP_63 + UP_71 + UP_79 + UP_87 + UP_95 + UP_103 + UP_111);
double TrendUP = UP_m1 + UP_m5 + UP_m15 + UP_m30 + UP_H1 + UP_H4 + UP_D1;
double DOWN_m1 = (DOWN_1 + DOWN_9 + DOWN_17 + DOWN_25 + DOWN_33 + DOWN_41 + DOWN_49 + DOWN_57 + DOWN_65 + DOWN_73 + DOWN_81 + DOWN_89 + DOWN_97 + DOWN_105);
double DOWN_m5 = (DOWN_2 + DOWN_10 + DOWN_18 + DOWN_26 + DOWN_34 + DOWN_42 + DOWN_50 + DOWN_58 + DOWN_66 + DOWN_74 + DOWN_82 + DOWN_90 + DOWN_98 + DOWN_106);
double DOWN_m15 = (DOWN_3 + DOWN_11 + DOWN_19 + DOWN_27 + DOWN_35 + DOWN_43 + DOWN_51 + DOWN_59 + DOWN_67 + DOWN_75 + DOWN_83 + DOWN_91 + DOWN_99 + DOWN_107);
double DOWN_m30 = (DOWN_4 + DOWN_12 + DOWN_20 + DOWN_28 + DOWN_36 + DOWN_44 + DOWN_52 + DOWN_60 + DOWN_68 + DOWN_76 + DOWN_84 + DOWN_92 + DOWN_100 + DOWN_108);
double DOWN_H1 = (DOWN_5 + DOWN_13 + DOWN_21 + DOWN_29 + DOWN_37 + DOWN_45 + DOWN_53 + DOWN_61 + DOWN_69 + DOWN_77 + DOWN_85 + DOWN_93 + DOWN_101 + DOWN_109);
double DOWN_H4 = (DOWN_6 + DOWN_14 + DOWN_22 + DOWN_30 + DOWN_38 + DOWN_46 + DOWN_54 + DOWN_62 + DOWN_70 + DOWN_78 + DOWN_86 + DOWN_94 + DOWN_102 + DOWN_110);
double DOWN_D1 = (DOWN_7 + DOWN_15 + DOWN_23 + DOWN_31 + DOWN_39 + DOWN_47 + DOWN_55 + DOWN_63 + DOWN_71 + DOWN_79 + DOWN_87 + DOWN_95 + DOWN_103 + DOWN_111);
double TrendDOWN = DOWN_m1 + DOWN_m5 + DOWN_m15 + DOWN_m30 + DOWN_H1 + DOWN_H4 + DOWN_D1;
string Trend_UP = DoubleToStr(((TrendUP/Indy_count)*100),0);
string Trend_DOWN = DoubleToStr((100 - StrToDouble(Trend_UP)),0);
// UPBuffer[0] = Trend_UP;
// DOWNBuffer[0] = Trend_DOWN;
//---- Result of the trend
if( box_trend2 == true )
{
ObjectCreate("Trend_UP", OBJ_LABEL, 0, 0, 0);
ObjectSetText("Trend_UP",Symbol(),9, "Verdana", DarkOrange);
ObjectSet("Trend_UP", OBJPROP_CORNER, 0);
ObjectSet("Trend_UP", OBJPROP_XDISTANCE, 920+X_trend2-900);
ObjectSet("Trend_UP", OBJPROP_YDISTANCE, 1+Y_trend2);
ObjectCreate("line9", OBJ_LABEL, 0, 0, 0);
ObjectSetText("line9","----------------",8, "Verdana", DarkOrange);
ObjectSet("line9", OBJPROP_CORNER, 0);
ObjectSet("line9", OBJPROP_XDISTANCE, 907+X_trend2-900);
ObjectSet("line9", OBJPROP_YDISTANCE, 12+Y_trend2);
ObjectCreate("Trend_UP_text", OBJ_LABEL, 0, 0, 0);
ObjectSetText("Trend_UP_text","UP",9, "Verdana", Lime);
ObjectSet("Trend_UP_text", OBJPROP_CORNER, 0);
ObjectSet("Trend_UP_text", OBJPROP_XDISTANCE, 909+X_trend2-900);
ObjectSet("Trend_UP_text", OBJPROP_YDISTANCE, 26+Y_trend2);
ObjectCreate("Trend_UP_value", OBJ_LABEL, 0, 0, 0);
ObjectSetText("Trend_UP_value",Trend_UP+"%",9, "Verdana", PeachPuff);
ObjectSet("Trend_UP_value", OBJPROP_CORNER, 0);
ObjectSet("Trend_UP_value", OBJPROP_XDISTANCE, 955+X_trend2-900);
ObjectSet("Trend_UP_value", OBJPROP_YDISTANCE, 26+Y_trend2);
ObjectCreate("Trend_DOWN_text", OBJ_LABEL, 0, 0, 0);
ObjectSetText("Trend_DOWN_text","DOWN",9, "Verdana", Red);
ObjectSet("Trend_DOWN_text", OBJPROP_CORNER, 0);
ObjectSet("Trend_DOWN_text", OBJPROP_XDISTANCE, 909+X_trend2-900);
ObjectSet("Trend_DOWN_text", OBJPROP_YDISTANCE, 46+Y_trend2);
ObjectCreate("Trend_DOWN_value", OBJ_LABEL, 0, 0, 0);
ObjectSetText("Trend_DOWN_value",Trend_DOWN+"%",9, "Verdana", PeachPuff);
ObjectSet("Trend_DOWN_value", OBJPROP_CORNER, 0);
ObjectSet("Trend_DOWN_value", OBJPROP_XDISTANCE, 955+X_trend2-900);
ObjectSet("Trend_DOWN_value", OBJPROP_YDISTANCE, 46+Y_trend2);
string trend2;
string comment2;
color coltrend2;
color colcomment2;
double xt2, xc2;
if(StrToDouble(Trend_UP) >= TrendStrongLevel) { trend2 = "UP"; coltrend2 = Lime; xt2 = 935; comment2 = "[TREND]"; xc2 = 921; colcomment2 = Lime; /* if (alert == true) { Alert(TimeToStr(TimeCurrent(),TIME_SECONDS)," Trend UP > "TrendStrongLevel"% on ",Symbol()," ", Bid); PlaySound("tick.wav"); } */ }
else if(StrToDouble(Trend_UP) < TrendStrongLevel && StrToDouble(Trend_UP) >= 50) { trend2 = "UP"; coltrend2 = Lime; xt2 = 935; comment2 = "[TREND]"; xc2 = 924; colcomment2 = Orange; }
else if(StrToDouble(Trend_DOWN) >= TrendStrongLevel) { trend2 = "DOWN"; coltrend2 = Red; xt2 = 918; comment2 = "[TREND]"; xc2 = 921; colcomment2 = Red; /* if (alert == true) { Alert(TimeToStr(TimeCurrent(),TIME_SECONDS)," Trend DOWN > "TrendStrongLevel"% on ",Symbol()," ", Bid); PlaySound("tick.wav"); } */ }
else if(StrToDouble(Trend_DOWN) < TrendStrongLevel && StrToDouble(Trend_DOWN) > 50) { trend2 = "DOWN"; coltrend2 = Red; xt2 = 918; comment2 = "[TREND]"; xc2 = 924; colcomment2 = Orange; }
ObjectCreate("line10", OBJ_LABEL, 0, 0, 0);
ObjectSetText("line10","----------------",8, "Verdana", coltrend2);
ObjectSet("line10", OBJPROP_CORNER, 0);
ObjectSet("line10", OBJPROP_XDISTANCE, 907+X_trend2-900);
ObjectSet("line10", OBJPROP_YDISTANCE, 61+Y_trend2);
ObjectCreate("line12", OBJ_LABEL, 0, 0, 0);
ObjectSetText("line12","----------------",8, "Verdana", coltrend2);
ObjectSet("line12", OBJPROP_CORNER, 0);
ObjectSet("line12", OBJPROP_XDISTANCE, 907+X_trend2-900);
ObjectSet("line12", OBJPROP_YDISTANCE, 64+Y_trend2);
ObjectCreate("Trend", OBJ_LABEL, 0, 0, 0);
ObjectSetText("Trend",trend2,18, "Impact", coltrend2);
ObjectSet("Trend", OBJPROP_CORNER, 0);
ObjectSet("Trend", OBJPROP_XDISTANCE, xt2+X_trend2-900);
ObjectSet("Trend", OBJPROP_YDISTANCE, 76+Y_trend2);
ObjectCreate("Trend_comment", OBJ_LABEL, 0, 0, 0);
ObjectSetText("Trend_comment",comment2,10, "Verdana", colcomment2);
ObjectSet("Trend_comment", OBJPROP_CORNER, 0);
ObjectSet("Trend_comment", OBJPROP_XDISTANCE, xc2+X_trend2-903);
ObjectSet("Trend_comment", OBJPROP_YDISTANCE, 106+Y_trend2);
ObjectCreate("line13", OBJ_LABEL, 0, 0, 0);
ObjectSetText("line13","----------------",8, "Verdana", coltrend2);
ObjectSet("line13", OBJPROP_CORNER, 0);
ObjectSet("line13", OBJPROP_XDISTANCE, 907+X_trend2-900);
ObjectSet("line13", OBJPROP_YDISTANCE, 123+Y_trend2);
ObjectCreate("line11", OBJ_LABEL, 0, 0, 0);
ObjectSetText("line11","----------------",8, "Verdana", coltrend2);
ObjectSet("line11", OBJPROP_CORNER, 0);
ObjectSet("line11", OBJPROP_XDISTANCE, 907+X_trend2-900);
ObjectSet("line11", OBJPROP_YDISTANCE, 126+Y_trend2);
} // if( box_trend == true )
// HIGH
double val125 = High[iHighest(NULL,0,MODE_HIGH,5,1)];
// LOW
double val127 = Low[iLowest(NULL,0,MODE_LOW,5,1)];
if((val125 > 0) && (val127 > 0))
Comment("\n\n HIGH 5 ÁÀÐÎÂ ",val125,"\n","\n LOW 5 ÁÀÐÎÂ ",val127);
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:
Indicators Used:
Custom Indicators Used:
FX-AO
FX-BAR
Order Management characteristics:
Other Features:
It issuies visual alerts to the screen
It plays sound alerts