//+------------------------------------------------------------------+
//| TREND_alexcud.mq4 |
//| Copyright © 2007, Aleksander Kudimov |
//| alexcud@rambler.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2007, Aleksander Kudimov"
#property link "alexcud@rambler.ru"
#property indicator_separate_window
#property indicator_minimum 0
#property indicator_maximum 1
#property indicator_buffers 2
#property indicator_color1 Lime
#property indicator_color2 Red
//---- buffers
double UPBuffer[];
double DOWNBuffer[];
extern int maTrendPeriod_1 = 5;
extern int maTrendPeriod_2 = 8;
extern int maTrendPeriod_3 = 13;
extern int maTrendPeriod_4 = 21;
extern int maTrendPeriod_5 = 34;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
double MaH11, MaH41, MaD11, MaH1pr1, MaH4pr1, MaD1pr1;
double MaH12, MaH42, MaD12, MaH1pr2, MaH4pr2, MaD1pr2;
double MaH13, MaH43, MaD13, MaH1pr3, MaH4pr3, MaD1pr3;
double MaH14, MaH44, MaD14, MaH1pr4, MaH4pr4, MaD1pr4;
double MaH15, MaH45, MaD15, MaH1pr5, MaH4pr5, MaD1pr5;
string H11, H41, D11;
string H12, H42, D12;
string H13, H43, D13;
string H14, H44, D14;
string H15, H45, D15;
color co11 , co41 , co61;
color co12 , co42 , co62;
color co13 , co43 , co63;
color co14 , co44 , co64;
color co15 , co45 , co65;
double u1x5, u1x8, u1x13, u1x21, u1x34;
double u2x5, u2x8, u2x13, u2x21, u2x34;
double u3x5, u3x8, u3x13, u3x21, u3x34;
double u1ac, u2ac, u3ac;
double d1x5, d1x8, d1x13, d1x21, d1x34;
double d2x5, d2x8, d2x13, d2x21, d2x34;
double d3x5, d3x8, d3x13, d3x21, d3x34;
double d1ac, d2ac, d3ac;
string short_name="TREND_alexcud";
int init()
{
//---- name for indicator window
string short_name="TREND_alexcud";
IndicatorShortName(short_name);
SetIndexBuffer(0,UPBuffer);
SetIndexBuffer(1,DOWNBuffer);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
ObjectCreate("MA", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("MA", "Moving Average",9, "Verdana", Lime );
ObjectSet("MA", OBJPROP_XDISTANCE, 75);
ObjectSet("MA", OBJPROP_YDISTANCE, 0);
ObjectCreate("label_object1", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("label_object1", OBJPROP_XDISTANCE, 11);
ObjectSet("label_object1", OBJPROP_YDISTANCE, 15);
ObjectCreate("label_object2", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("label_object2", OBJPROP_XDISTANCE, 11);
ObjectSet("label_object2", OBJPROP_YDISTANCE, 35);
ObjectCreate("label_object3", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("label_object3", OBJPROP_XDISTANCE, 11);
ObjectSet("label_object3", OBJPROP_YDISTANCE, 55);
// ----------------------------------------------------------------------------
ObjectCreate("H11", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H11", OBJPROP_XDISTANCE, 40);
ObjectSet("H11", OBJPROP_YDISTANCE, 15);
ObjectCreate("H12", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H12", OBJPROP_XDISTANCE, 70);
ObjectSet("H12", OBJPROP_YDISTANCE, 15);
ObjectCreate("H13", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H13", OBJPROP_XDISTANCE, 100);
ObjectSet("H13", OBJPROP_YDISTANCE, 15);
ObjectCreate("H14", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H14", OBJPROP_XDISTANCE, 130);
ObjectSet("H14", OBJPROP_YDISTANCE, 15);
ObjectCreate("H15", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H15", OBJPROP_XDISTANCE, 160);
ObjectSet("H15", OBJPROP_YDISTANCE, 15);
//---------------------------------------------------------------------------
ObjectCreate("H41", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H41", OBJPROP_XDISTANCE, 40);
ObjectSet("H41", OBJPROP_YDISTANCE, 35);
ObjectCreate("H42", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H42", OBJPROP_XDISTANCE, 70);
ObjectSet("H42", OBJPROP_YDISTANCE, 35);
ObjectCreate("H43", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H43", OBJPROP_XDISTANCE, 100);
ObjectSet("H43", OBJPROP_YDISTANCE, 35);
ObjectCreate("H44", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H44", OBJPROP_XDISTANCE, 130);
ObjectSet("H44", OBJPROP_YDISTANCE, 35);
ObjectCreate("H45", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("H45", OBJPROP_XDISTANCE, 160);
ObjectSet("H45", OBJPROP_YDISTANCE, 35);
//---------------------------------------------------------------------------
ObjectCreate("D11", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("D11", OBJPROP_XDISTANCE, 40);
ObjectSet("D11", OBJPROP_YDISTANCE, 55);
ObjectCreate("D12", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("D12", OBJPROP_XDISTANCE, 70);
ObjectSet("D12", OBJPROP_YDISTANCE, 55);
ObjectCreate("D13", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("D13", OBJPROP_XDISTANCE, 100);
ObjectSet("D13", OBJPROP_YDISTANCE, 55);
ObjectCreate("D14", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("D14", OBJPROP_XDISTANCE, 130);
ObjectSet("D14", OBJPROP_YDISTANCE, 55);
ObjectCreate("D15", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSet("D15", OBJPROP_XDISTANCE, 160);
ObjectSet("D15", OBJPROP_YDISTANCE, 55);
MaH11=iMA(NULL,PERIOD_H1,maTrendPeriod_1,0,MODE_SMA,PRICE_CLOSE,0); MaH1pr1=iMA(NULL,PERIOD_H1,maTrendPeriod_1,0,MODE_SMA,PRICE_CLOSE,1);
MaH12=iMA(NULL,PERIOD_H1,maTrendPeriod_2,0,MODE_SMA,PRICE_CLOSE,0); MaH1pr2=iMA(NULL,PERIOD_H1,maTrendPeriod_2,0,MODE_SMA,PRICE_CLOSE,1);
MaH13=iMA(NULL,PERIOD_H1,maTrendPeriod_3,0,MODE_SMA,PRICE_CLOSE,0); MaH1pr3=iMA(NULL,PERIOD_H1,maTrendPeriod_3,0,MODE_SMA,PRICE_CLOSE,1);
MaH14=iMA(NULL,PERIOD_H1,maTrendPeriod_4,0,MODE_SMA,PRICE_CLOSE,0); MaH1pr4=iMA(NULL,PERIOD_H1,maTrendPeriod_4,0,MODE_SMA,PRICE_CLOSE,1);
MaH15=iMA(NULL,PERIOD_H1,maTrendPeriod_5,0,MODE_SMA,PRICE_CLOSE,0); MaH1pr5=iMA(NULL,PERIOD_H1,maTrendPeriod_5,0,MODE_SMA,PRICE_CLOSE,1);
MaH41=iMA(NULL,PERIOD_H4,maTrendPeriod_1 ,0,MODE_SMA,PRICE_CLOSE,0); MaH4pr1=iMA(NULL,PERIOD_H4,maTrendPeriod_1,0,MODE_SMA,PRICE_CLOSE,1);
MaH42=iMA(NULL,PERIOD_H4,maTrendPeriod_2,0,MODE_SMA,PRICE_CLOSE,0); MaH4pr2=iMA(NULL,PERIOD_H4,maTrendPeriod_2,0,MODE_SMA,PRICE_CLOSE,1);
MaH43=iMA(NULL,PERIOD_H4,maTrendPeriod_3,0,MODE_SMA,PRICE_CLOSE,0); MaH4pr3=iMA(NULL,PERIOD_H4,maTrendPeriod_3,0,MODE_SMA,PRICE_CLOSE,1);
MaH44=iMA(NULL,PERIOD_H4,maTrendPeriod_4,0,MODE_SMA,PRICE_CLOSE,0); MaH4pr4=iMA(NULL,PERIOD_H4,maTrendPeriod_4,0,MODE_SMA,PRICE_CLOSE,1);
MaH45=iMA(NULL,PERIOD_H4,maTrendPeriod_5,0,MODE_SMA,PRICE_CLOSE,0); MaH4pr5=iMA(NULL,PERIOD_H4,maTrendPeriod_5,0,MODE_SMA,PRICE_CLOSE,1);
MaD11=iMA(NULL,PERIOD_D1,maTrendPeriod_1,0,MODE_SMA,PRICE_CLOSE,0); MaD1pr1=iMA(NULL,PERIOD_D1,maTrendPeriod_1,0,MODE_SMA,PRICE_CLOSE,1);
MaD12=iMA(NULL,PERIOD_D1,maTrendPeriod_2,0,MODE_SMA,PRICE_CLOSE,0); MaD1pr2=iMA(NULL,PERIOD_D1,maTrendPeriod_2,0,MODE_SMA,PRICE_CLOSE,1);
MaD13=iMA(NULL,PERIOD_D1,maTrendPeriod_3,0,MODE_SMA,PRICE_CLOSE,0); MaD1pr3=iMA(NULL,PERIOD_D1,maTrendPeriod_3,0,MODE_SMA,PRICE_CLOSE,1);
MaD14=iMA(NULL,PERIOD_D1,maTrendPeriod_4,0,MODE_SMA,PRICE_CLOSE,0); MaD1pr4=iMA(NULL,PERIOD_D1,maTrendPeriod_4,0,MODE_SMA,PRICE_CLOSE,1);
MaD15=iMA(NULL,PERIOD_D1,maTrendPeriod_5,0,MODE_SMA,PRICE_CLOSE,0); MaD1pr5=iMA(NULL,PERIOD_D1,maTrendPeriod_5,0,MODE_SMA,PRICE_CLOSE,1);
// MaH4=iMA(NULL,PERIOD_M30,34,0,MODE_SMA,PRICE_CLOSE,0);
if (MaH11 < MaH1pr1){H11 = " V "; co11 = Red; u1x5 = 0; d1x5 = 1;}
if (MaH11 > MaH1pr1){H11 = " /\\ "; co11 = Blue; u1x5 = 1; d1x5 = 0;}
if (MaH11 == MaH1pr1){H11 = " 0 "; co11 = Green; u1x5 = 0; d1x5 = 0;}
if (MaH41 < MaH4pr1){H41 = " V "; co41 = Red; u2x5 = 0; d2x5 = 1;}
if (MaH41 > MaH4pr1){H41 = " /\\ "; co41 = Blue; u2x5 = 1; d2x5 = 0;}
if (MaH41 == MaH4pr1){H41 = " 0 "; co41 = Green; u2x5 = 0; d2x5 = 0;}
if (MaD11 < MaD1pr1){D11 = " V "; co61 = Red; u3x5 = 0; d3x5 = 1;}
if (MaD11 > MaD1pr1){D11 = " /\\ "; co61 = Blue; u3x5 = 1; d3x5 = 0;}
if (MaD11 == MaD1pr1){D11 = " 0 "; co61 = Green; u3x5 = 0; d3x5 = 0;}
if (MaH12 < MaH1pr2){H12 = " V "; co12 = Red; u1x8 = 0; d1x8 = 1;}
if (MaH12 > MaH1pr2){H12 = " /\\ "; co12 = Blue; u1x8 = 1; d1x8 = 0;}
if (MaH12 == MaH1pr2){H12 = " 0 "; co12 = Green; u1x8 = 0; d1x8 = 0;}
if (MaH42 < MaH4pr2){H42 = " V "; co42 = Red; u2x8 = 0; d2x8 = 1;}
if (MaH42 > MaH4pr2){H42 = " /\\ "; co42 = Blue; u2x8 = 1; d2x8 = 0;}
if (MaH42 == MaH4pr2){H42 = " 0 "; co42 = Green; u2x8 = 0; d2x8 = 0;}
if (MaD12 < MaD1pr2){D12 = " V "; co62 = Red; u3x8 = 0; d3x8 = 1;}
if (MaD12 > MaD1pr2){D12 = " /\\ "; co62 = Blue; u3x8 = 1; d3x8 = 0;}
if (MaD12 == MaD1pr2){D12 = " 0 "; co62 = Green; u3x8 = 0; d3x8 = 0;}
if (MaH13 < MaH1pr3){H13 = " V "; co13 = Red; u1x13 = 0; d1x13 = 1;}
if (MaH13 > MaH1pr3){H13 = " /\\ "; co13 = Blue; u1x13 = 1; d1x13 = 0;}
if (MaH13 ==MaH1pr3){H13 = " 0 "; co13 = Green; u1x13 = 0; d1x13 = 0;}
if (MaH43 < MaH4pr3){H43 = " V "; co43 = Red; u2x13 = 0; d2x13 = 1;}
if (MaH43 > MaH4pr3){H43 = " /\\ "; co43 = Blue; u2x13 = 1; d2x13 = 0;}
if (MaH43 ==MaH4pr3){H43 = " 0 "; co43 = Green; u2x13 = 0; d2x13 = 0;}
if (MaD13 < MaD1pr3){D13 = " V "; co63 = Red; u3x13 = 0; d3x13 = 1;}
if (MaD13 > MaD1pr3){D13 = " /\\ "; co63 = Blue; u3x13 = 1; d3x13 = 0;}
if (MaD13 ==MaD1pr3){D13 = " 0 "; co63 = Green; u3x13 = 0; d3x13 = 0;}
if (MaH14 < MaH1pr4){H14 = " V "; co14 = Red; u1x21 = 0; d1x21 = 1;}
if (MaH14 > MaH1pr4){H14 = " /\\ "; co14 = Blue; u1x21 = 1; d1x21 = 0;}
if (MaH14 == MaH1pr4){H14 = " 0 "; co14 = Green; u1x21 = 0; d1x21 = 0;}
if (MaH44 < MaH4pr4){H44 = " V "; co44 = Red; u2x21 = 0; d2x21 = 1;}
if (MaH44 > MaH4pr4){H44 = " /\\ "; co44 = Blue; u2x21 = 1; d2x21 = 0;}
if (MaH44 == MaH4pr4){H44 = " 0 "; co44 = Green; u2x21 = 0; d2x21 = 0;}
if (MaD14 < MaD1pr4){D14 = " V "; co64 = Red; u3x21 = 0; d3x21 = 1;}
if (MaD14 > MaD1pr4){D14 = " /\\ "; co64 = Blue; u3x21 = 1; d3x21 = 0;}
if (MaD14 == MaD1pr4){D14 = " 0 "; co64 = Green; u3x21 = 0; d3x21 = 0;}
if (MaH15 < MaH1pr5){H15 = " V "; co15 = Red; u1x34 = 0; d1x34 = 1;}
if (MaH15 > MaH1pr5){H15 = " /\\ "; co15 = Blue; u1x34 = 1; d1x34 = 0;}
if (MaH15 == MaH1pr5){H15 = " 0 "; co15 = Green; u1x34 = 0; d1x34 = 0;}
if (MaH45 < MaH4pr5){H45 = " V "; co45 = Red; u2x34 = 0; d2x34 = 1;}
if (MaH45 > MaH4pr5){H45 = " /\\ "; co45 = Blue; u2x34 = 1; d2x34 = 0;}
if (MaH45 == MaH4pr5){H45 = " 0 "; co45 = Green; u2x34 = 0; d2x34 = 0;}
if (MaD15 < MaD1pr5){D15 = " V "; co65 = Red; u3x34 = 0; d3x34 = 1;}
if (MaD15 > MaD1pr5){D15 = " /\\ "; co65 = Blue; u3x34 = 1; d3x34 = 0;}
if (MaD15 == MaD1pr5){D15 = " 0 "; co65 = Green; u3x34 = 0; d3x34 = 0;}
// Comment(";JGF:");
// "\n", "H4 - ", H41 ,
// "\n", "D1 - ", D11 );
ObjectSetText("label_object1", "H1 - ",11, "Verdana", Lime );
ObjectSetText("label_object2", "H4 - ",11, "Verdana", Lime );
ObjectSetText("label_object3", "D1 - ",11, "Verdana", Lime );
ObjectSetText("H11", H11 ,11, "Verdana", co11 );
ObjectSetText("H12", H12 ,11, "Verdana", co12 );
ObjectSetText("H13", H13 ,11, "Verdana", co13 );
ObjectSetText("H14", H14 ,11, "Verdana", co14 );
ObjectSetText("H15", H15 ,11, "Verdana", co15 );
ObjectSetText("H41", H41 ,11, "Verdana", co41 );
ObjectSetText("H42", H42 ,11, "Verdana", co42 );
ObjectSetText("H43", H43 ,11, "Verdana", co43 );
ObjectSetText("H44", H44 ,11, "Verdana", co44 );
ObjectSetText("H45", H45 ,11, "Verdana", co45 );
ObjectSetText("D11", D11 ,11, "Verdana", co61 );
ObjectSetText("D12", D12 ,11, "Verdana", co62 );
ObjectSetText("D13", D13 ,11, "Verdana", co63 );
ObjectSetText("D14", D14 ,11, "Verdana", co64 );
ObjectSetText("D15", D15 ,11, "Verdana", co65 );
//----------------------------------------------------------------------------
// AC Bil Vil
ObjectCreate("AC", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("AC", "AC",9, "Verdana", Lime );
ObjectSet("AC", OBJPROP_XDISTANCE, 200);
ObjectSet("AC", OBJPROP_YDISTANCE, 0);
double ac = iAC(NULL, 60, 0);
double ac1 = iAC(NULL, 60, 1);
double ac2 = iAC(NULL, 60, 2);
double ac3 = iAC(NULL, 60, 3);
//double ac4 = iAO(NULL, 0, 4);
string ach11;
color acco11;
if ((ac1>ac2 && ac2>ac3 && ac<0 && ac>ac1) || (ac>ac1 && ac1>ac2 && ac>0))
{ach11 = "/\\ " ; acco11 = Blue; u1ac = 3; d1ac = 0;}
if ((ac1<ac2 && ac2<ac3 && ac>0 && ac<ac1) || (ac<ac1 && ac1<ac2 && ac<0))
{ach11 = "V " ; acco11 = Red; u1ac = 0; d1ac = 3;}
if ((((ac1<ac2 || ac2<ac3) && ac<0 && ac>ac1) || (ac>ac1 && ac1<ac2 && ac>0))||
(((ac1>ac2 || ac2>ac3) && ac>0 && ac<ac1) || (ac<ac1 && ac1>ac2 && ac<0)))
{ach11 = "0 " ; acco11 = Green; u1ac = 0; d1ac = 0;}
ObjectCreate("AC11", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("AC11", ach11,11, "Verdana", acco11 );
ObjectSet("AC11", OBJPROP_XDISTANCE, 200);
ObjectSet("AC11", OBJPROP_YDISTANCE, 15);
double ac03 = iAC(NULL, 1440, 0);
double ac13 = iAC(NULL, 1440, 1);
double ac23 = iAC(NULL, 1440, 2);
double ac33 = iAC(NULL, 1440, 3);
//double ac4 = iAO(NULL, 0, 4);
string ach13;
color acco13;
if ((ac13>ac23 && ac23>ac33 && ac03<0 && ac03>ac13) || (ac03>ac13 && ac13>ac23 && ac03>0))
{ach13 = "/\\ " ; acco13 = Blue; u3ac = 3; d3ac = 0;}
if ((ac13<ac23 && ac23<ac33 && ac03>0 && ac03<ac13) || (ac03<ac13 && ac13<ac23 && ac03<0))
{ach13 = "V " ; acco13 = Red; u3ac = 0; d3ac = 3;}
if ((((ac13<ac23 || ac23<ac33) && ac03<0 && ac03>ac13) || (ac03>ac13 && ac13<ac23 && ac03>0))||
(((ac13>ac23 || ac23>ac33) && ac03>0 && ac03<ac13) || (ac03<ac13 && ac13>ac23 && ac03<0)))
{ach13 = "0 " ; acco13 = Green; u3ac = 0; d3ac = 0;}
ObjectCreate("AC13", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("AC13", ach13,11, "Verdana", acco13 );
ObjectSet("AC13", OBJPROP_XDISTANCE, 200);
ObjectSet("AC13", OBJPROP_YDISTANCE, 55);
double ac02 = iAC(NULL, 240, 0);
double ac12 = iAC(NULL, 240, 1);
double ac22 = iAC(NULL, 240, 2);
double ac32 = iAC(NULL, 240, 3);
//double ac4 = iAO(NULL, 0, 4);
string ach12;
color acco12;
if ((ac12>ac22 && ac22>ac32 && ac02<0 && ac02>ac12) || (ac02>ac12 && ac12>ac22 && ac02>0))
{ach12 = "/\\ " ; acco12 = Blue; u2ac = 3; d2ac = 0;}
if ((ac12<ac22 && ac22<ac32 && ac02>0 && ac02<ac12) || (ac02<ac12 && ac12<ac22 && ac02<0))
{ach12 = "V " ; acco12 = Red; u2ac = 0; d2ac = 3;}
if ((((ac12<ac22 || ac22<ac32) && ac02<0 && ac02>ac12) || (ac02>ac12 && ac12<ac22 && ac02>0))||
(((ac12>ac22 || ac22>ac32) && ac02>0 && ac02<ac12) || (ac02<ac12 && ac12>ac22 && ac02<0)))
{ach12 = "0 " ; acco12 = Green; u2ac = 0; d2ac = 0;}
ObjectCreate("AC12", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("AC12", ach12,11, "Verdana", acco12 );
ObjectSet("AC12", OBJPROP_XDISTANCE, 200);
ObjectSet("AC12", OBJPROP_YDISTANCE, 35);
ObjectCreate("rez", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("rez", "ÐÅÇÓËÜÒÀÒÛ",9, "Verdana", Lime );
ObjectSet("rez", OBJPROP_XDISTANCE, 240);
ObjectSet("rez", OBJPROP_YDISTANCE, 0);
double uitog1 = (u1x5 + u1x8 + u1x13 + u1x21 + u1x34 + u1ac) * 12.5;
double uitog2 = (u2x5 + u2x8 + u2x13 + u2x21 + u2x34 + u2ac) * 12.5;
double uitog3 = (u3x5 + u3x8 + u3x13 + u3x21 + u3x34 + u3ac) * 12.5;
double ditog1 = (d1x5 + d1x8 + d1x13 + d1x21 + d1x34 + d1ac) * 12.5;
double ditog2 = (d2x5 + d2x8 + d2x13 + d2x21 + d2x34 + d2ac) * 12.5;
double ditog3 = (d3x5 + d3x8 + d3x13 + d3x21 + d3x34 + d3ac) * 12.5;
string hr1, hr2, hr3, hr4, hr5,hr6;
string dhr1, dhr2, dhr3, dhr4, dhr5, dhr6;
if (uitog1> ditog1) {hr1 = "Arial Black"; dhr1 = "Arial";}
if (uitog1< ditog1) {hr1 = "Arial"; dhr1 = "Arial Black";}
if (uitog1 == ditog1) {hr1 = "Arial"; dhr1 = "Arial";}
if (uitog2> ditog2) {hr2 = "Arial Black"; dhr2 = "Arial";}
if (uitog2< ditog2) {hr2 = "Arial"; dhr2 = "Arial Black";}
if (uitog2 == ditog2) {hr2 = "Arial"; dhr2 = "Arial";}
if (uitog3> ditog3) {hr3 = "Arial Black"; dhr3 = "Arial";}
if (uitog3< ditog3) {hr3 = "Arial"; dhr3 = "Arial Black";}
if (uitog3 == ditog3) {hr3 = "Arial"; dhr3 = "Arial";}
ObjectCreate("uitog1", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("uitog1", StringConcatenate("/\\ ", uitog1, "%"),12, hr1, DodgerBlue );
ObjectSet("uitog1", OBJPROP_XDISTANCE, 235);
ObjectSet("uitog1", OBJPROP_YDISTANCE, 15);
ObjectCreate("uitog2", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("uitog2", StringConcatenate("/\\ ",uitog2, "%"),12, hr2, DodgerBlue );
ObjectSet("uitog2", OBJPROP_XDISTANCE, 235);
ObjectSet("uitog2", OBJPROP_YDISTANCE, 35);
ObjectCreate("uitog3", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("uitog3", StringConcatenate("/\\ ",uitog3, "%"),12, hr3, DodgerBlue );
ObjectSet("uitog3", OBJPROP_XDISTANCE, 235);
ObjectSet("uitog3", OBJPROP_YDISTANCE, 55);
ObjectCreate("ditog1", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("ditog1", StringConcatenate("\\/ ", ditog1, "%"),12, dhr1, Red );
ObjectSet("ditog1", OBJPROP_XDISTANCE, 310);
ObjectSet("ditog1", OBJPROP_YDISTANCE, 15);
ObjectCreate("ditog2", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("ditog2", StringConcatenate("\\/ ",ditog2, "%"),12, dhr2, Red );
ObjectSet("ditog2", OBJPROP_XDISTANCE, 310);
ObjectSet("ditog2", OBJPROP_YDISTANCE, 35);
ObjectCreate("ditog3", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("ditog3", StringConcatenate("\\/ ",ditog3, "%"),12, dhr3, Red );
ObjectSet("ditog3", OBJPROP_XDISTANCE, 310);
ObjectSet("ditog3", OBJPROP_YDISTANCE, 55);
string txt;
if (uitog1 > 50 && uitog2 > 50 && uitog3 > 50)
{txt = "Íåïëîõîé ìîìåíò äëÿ îòêðûòèÿ ïîçèöèè BUY";}
else
{txt = "Íå ðåêîìåíäóåòñÿ îòêðûâàòü ïîçèçèè. ÆÄÈÒÅ.";}
if (ditog1 > 50 && ditog2 > 50 && ditog3 > 50)
{txt = "Íåïëîõîé ìîìåíò äëÿ îòêðûòèÿ ïîçèöèè SELL";}
if (uitog1 >= 75 && uitog2 >= 75 && uitog3 >= 75)
{txt = "ÓÄÀ×ÍÛÉ ìîìåíò äëÿ îòêðûòèÿ ïîçèöèè BUY";}
if (ditog1 >= 75 && ditog2 >= 75 && ditog3 >= 75)
{txt = "ÓÄÀ×ÍÛÉ ìîìåíò äëÿ îòêðûòèÿ ïîçèöèè SELL";}
ObjectCreate("txt", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("txt", txt,14, "Verdana", Lime );
ObjectSet("txt", OBJPROP_XDISTANCE, 410);
ObjectSet("txt", OBJPROP_YDISTANCE, 35);
ObjectCreate("txt2", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("txt2","Ìóëüòèòàéìôðåéìíûé èíäèêàòîð \"TREND_ALEXCUD\"",9, "Verdana", Silver );
ObjectSet("txt2", OBJPROP_XDISTANCE, 11);
ObjectSet("txt2", OBJPROP_YDISTANCE, 80);
ObjectCreate("txt3", OBJ_LABEL, WindowFind(short_name), 0, 0);
ObjectSetText("txt3","Copyright © 2007 ALEXCUD",9, "Verdana", Silver );
ObjectSet("txt3", OBJPROP_XDISTANCE, 410);
ObjectSet("txt3", OBJPROP_YDISTANCE, 80);
return(0);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Indicator Curves created:
Indicators Used:
Moving average indicator
Bill Williams Accelerator/Decelerator oscillator
Custom Indicators Used:
Order Management characteristics:
Other Features: