Trade Assistant MetaTrader 指標

作者：MT4 MT5 來源：本站原創發布時間：2012年05月13日

Trade Assistant MetaTrader 指標 (Trade Assistant (交易輔助工具))— 該指標適用于MT4和MT5。一種多時間框架的指標，基于三種標準指標：Stochastic（隨機指標），RSI (相對強弱指標)和CCI (商品通道指標)。它顯示了5分鐘，15分鐘，30分鐘，1小時，4小時和日時間框架下當前趨勢的方向。

當使用這種指標的時候，您會在所有重要時間框架下看到清晰的趨勢圖。而且您將此指標附加到哪個時間框架下并無影響。建議不要更改任何輸入參數。該指標適用于MT4和MT5。

輸入參數：

PercentK (默認 = 8) — 計算隨機指標%K線使用的天數。
PercentD (默認 = 3) — 計算隨機指標%D線使用的天數。
Slowing (默認 = 3) — 隨機指標的減緩值。
RSIP1 (默認 = 14) — 第一條RSI（快線）的時段。
RSIP2 (默認 = 70) — 第二條RSI (慢線)的時段。
其它參數 — 描繪趨勢方向的信號代碼。最好不要更改。

雖然如何使用這種指標一目了然，但建議只有當您使用的時間框架和相鄰時間框架內所有指標信號一致時再買或賣。例如，您使用30分鐘的時間框架，如果在此時間框架和15分、1小時的時間框架都發出做多信號，那么您就進場做多。

標簽:MT4 MT5指標

MT4源碼：


//+------------------------------------------------------------------+
//|                                                  Trade Assistant |
//|                                                     TA_1.14b.mq4 |
//|                                       Copyright ? 2008 Tom Balfe |
//|                                                                  |
//| This indicator helps you trade by giving you two signals on      |
//| multiple timeframes. It bases it's recommendations on RSI and    |
//| stochastics.                                                     |
//|                                                                  |
//| Version: 1.14b                                                    |
//|                                                                  |
//| Changelog:                                                       |
//|                                                                  |
//|    1.14b - subtracted 1 min TF and added 1 day                   |
//|    1.14  - added CCI, entry and trend                            |
//|    1.12  - fixed RSI code                                        |
//|    1.11  - fixed spacing between objects                         |
//|     1.1  - added buy/sell text                                   |
//|     1.0  - first version, got arrows working                     |
//|    <span style="display:none;"><a href="http://www.tumamayizhan.com">程序
        化交易網</a></span>                                            |
//+------------------------------------------------------------------+
#property copyright "Copyright ? 2008 Tom Balfe"
#property link      "redcarsarasota@yahoo.com"
#property indicator_separate_window

//--- spacing
int     scaleX=120,scaleY=20,offsetX=200,offsetY=4,fontSize=8;
//--- arrays for various things
int     TF[]              = {5,15,30,60,240,1440};
int     eCCI[]            = {14,14,6,6,6,6};
int     tCCI[]            = {50,34,14,14,14,14};
string  periodStr[]       = {"5 MIN:","15 MIN:","30 MIN:","1 HR:","4 HR:","1 DAY:"};
string  signalNameStr[]   = {"STOCH","RSI","EntryCCI","TrendCCI"};

//+------------------------------------------------------------------+
//| USER ADJUSTABLE STUFF                                            |
//+------------------------------------------------------------------+
extern  string  Stochastic_Settings   = "=== Stochastic Settings ===";
extern  int     PercentK              = 8;
extern  int     PercentD              = 3;
extern  int     Slowing               = 3;

extern  string  RSI_Settings          = "=== RSI Settings ===";
extern  int     RSIP1                 = 14;
extern  int     RSIP2                 = 70;  

extern  string  My_Symbols            = "=== Wingdings Symbols ===";
extern  int     sBuy                  = 233;
extern  int     sSell                 = 234;
extern  int     sWait                 = 54;
extern  int     sCCIAgainstBuy        = 238;
extern  int     sCCIAgainstSell       = 236;

//+------------------------------------------------------------------+
//| Initialization function                                          |
//+------------------------------------------------------------------+
int init()
  {
    //-- indicator short name
    IndicatorShortName("Trade Assistant 1.14b ");

    return(0);
  }
//+------------------------------------------------------------------+
//| Deinitialization function                                        |
//+------------------------------------------------------------------+
int deinit()
  {
   //-- need to delete objects should user remove indicator
   ObjectsDeleteAll(0,OBJ_LABEL);
   
    //-- delete timeframe text labels   
    for(int x=0;x<6;x++)
      for (int y=0;y<4;y++)
      { ObjectDelete("tPs"+x+y); } 
    
    //-- delete indicator text labels
    for(y=0;y<4;y++)
      { ObjectDelete("tInd"+y); }       
    
    //-- delete indicator arrows and text
    for (x=0;x<6;x++)
      for (y=0;y<4;y++)
      { ObjectDelete("dI"+x+y); }
          
    for (x=0;x<6;x++)
      for (y=0;y<4;y++)   
      { ObjectDelete("tI"+x+y); } 
   
   return(0);
  }

//+------------------------------------------------------------------+
//| MAIN LOOP                                                        |
//+------------------------------------------------------------------+

int start()
  {
    //--- create timeframe text labels 
    for (int x=0;x<6;x++)
      for (int y=0;y<4;y++)
      {
        ObjectCreate("tPs"+x+y,OBJ_LABEL,WindowFind("Trade Assistant 1.14b "),0,0);
        ObjectSetText("tPs"+x+y,periodStr[x],fontSize,"Arial Bold",LightSteelBlue);
        ObjectSet("tPs"+x+y,OBJPROP_CORNER,0);
        ObjectSet("tPs"+x+y,OBJPROP_XDISTANCE,x*scaleX+offsetX);
        ObjectSet("tPs"+x+y,OBJPROP_YDISTANCE,y*scaleY+offsetY);
      }
    
    //--- create indicator text labels
    for (y=0;y<4;y++)
      {
        ObjectCreate("tInd"+y,OBJ_LABEL,WindowFind("Trade Assistant 1.14b "),0,0);
        ObjectSetText("tInd"+y,signalNameStr[y],fontSize,"Arial Bold",PaleGoldenrod);
        ObjectSet("tInd"+y,OBJPROP_CORNER,0);
        ObjectSet("tInd"+y,OBJPROP_XDISTANCE,offsetX-55);
        ObjectSet("tInd"+y,OBJPROP_YDISTANCE,y*scaleY+offsetY);
      }
    
    //--- create blanks for arrows
    for (x=0;x<6;x++)
      for (y=0;y<4;y++)
      {
        ObjectCreate("dI"+x+y,OBJ_LABEL,WindowFind("Trade Assistant 1.14b "),0,0);
          ObjectSetText("dI"+x+y," ",10,"Wingdings",Goldenrod);
          ObjectSet("dI"+x+y,OBJPROP_CORNER,0);
          ObjectSet("dI"+x+y,OBJPROP_XDISTANCE,x*scaleX+(offsetX+80)); // scaleX == 120, offsetX == 200
          ObjectSet("dI"+x+y,OBJPROP_YDISTANCE,y*scaleY+offsetY);
      }
    
    //--- create blanks for text
    for (x=0;x<6;x++)
      for (y=0;y<4;y++)
      {
        ObjectCreate("tI"+x+y,OBJ_LABEL,WindowFind("Trade Assistant 1.14b "),0,0);
          ObjectSetText("tI"+x+y,"    ",9,"Arial Bold",Goldenrod);
          ObjectSet("tI"+x+y,OBJPROP_CORNER,0);
          ObjectSet("tI"+x+y,OBJPROP_XDISTANCE,x*scaleX+(offsetX+45)); // scaleX == 120, offsetX == 200
          ObjectSet("tI"+x+y,OBJPROP_YDISTANCE,y*scaleY+offsetY);
      }
    
    //--- stochastics arrows
    for(x=0;x<6;x++)
    {
      if((iStochastic(NULL,TF[x],PercentK,PercentD,Slowing,MODE_SMA,0,MODE_MAIN,0)) >  
         (iStochastic(NULL,TF[x],PercentK,PercentD,Slowing,MODE_SMA,0,MODE_SIGNAL,0)))
        ObjectSetText("dI"+x+"0",CharToStr(sBuy),fontSize,"Wingdings",Lime);
      else if             
        ((iStochastic(NULL,TF[x],PercentK,PercentD,Slowing,MODE_SMA,0,MODE_SIGNAL,0)) >
        (iStochastic(NULL,TF[x],PercentK,PercentD,Slowing,MODE_SMA,0,MODE_MAIN,0)))
        ObjectSetText("dI"+x+"0",CharToStr(sSell),fontSize,"Wingdings",Red);         
      else
        ObjectSetText("dI"+x+"0",CharToStr(sWait),10,"Wingdings",Khaki); 
    }
    
    //--- stochastics text
    for(x=0;x<6;x++)
    {
      if((iStochastic(NULL,TF[x],PercentK,PercentD,Slowing,MODE_SMA,0,MODE_MAIN,0)) >  
         (iStochastic(NULL,TF[x],PercentK,PercentD,Slowing,MODE_SMA,0,MODE_SIGNAL,0)))
        ObjectSetText("tI"+x+"0"," BUY",9,"Arial Bold",Lime);
      else if             
        ((iStochastic(NULL,TF[x],PercentK,PercentD,Slowing,MODE_SMA,0,MODE_SIGNAL,0)) >
        (iStochastic(NULL,TF[x],PercentK,PercentD,Slowing,MODE_SMA,0,MODE_MAIN,0)))
        ObjectSetText("tI"+x+"0","SELL",9,"Arial Bold",Red);         
      else
        ObjectSetText("tI"+x+"0","WAIT",9,"Arial Bold",Khaki); 
    }    
        
    //--- RSI arrows
    for(x=0;x<6;x++)
    {
      if ((iRSI(NULL,TF[x],RSIP1,PRICE_TYPICAL,0)) > (iRSI(NULL,TF[x],RSIP2,PRICE_TYPICAL,0)))
        ObjectSetText("dI"+x+"1",CharToStr(sBuy),fontSize,"Wingdings",Lime);  
      else if
         ((iRSI(NULL,TF[x],RSIP2,PRICE_TYPICAL,0)) > (iRSI(NULL,TF[x],RSIP1,PRICE_TYPICAL,0)))  
        ObjectSetText("dI"+x+"1",CharToStr(sSell),fontSize,"Wingdings",Red);
      else
      ObjectSetText("dI"+x+"1",CharToStr(sWait),fontSize,"Wingdings",Khaki);
    }
    
    //--- RSI text
    for(x=0;x<6;x++)
    {
      if ((iRSI(NULL,TF[x],RSIP1,PRICE_TYPICAL,0)) > (iRSI(NULL,TF[x],RSIP2,PRICE_TYPICAL,0)))
        ObjectSetText("tI"+x+"1"," BUY",9,"Arial Bold",Lime);
      else if             
        ((iRSI(NULL,TF[x],RSIP2,PRICE_TYPICAL,0)) > (iRSI(NULL,TF[x],RSIP1,PRICE_TYPICAL,0)))
        ObjectSetText("tI"+x+"1","SELL",9,"Arial Bold",Red);         
      else
        ObjectSetText("tI"+x+"1","WAIT",9,"Arial Bold",Khaki); 
    }  
    
    //--- EntryCCI arrows
    for(x=0;x<6;x++)
    {
      if ((iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,0))>0) // if entry cci above zero
        {                                           
        if ((iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,0))>(iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,1))) 
        ObjectSetText("dI"+x+"2",CharToStr(sBuy),fontSize,"Wingdings",Lime); 
        else ObjectSetText("dI"+x+"2",CharToStr(sCCIAgainstBuy),fontSize,"Wingdings",Red); 
      }
      else if             
        ((iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,0)) <0) // if entry cci below zero
        {
        if ((iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,0)) < (iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,1))) 
        ObjectSetText("dI"+x+"2",CharToStr(sSell),fontSize,"Wingdings",Red);         
        else  ObjectSetText("dI"+x+"2",CharToStr(sCCIAgainstSell),fontSize,"Wingdings",Lime); 
      }
      else
        ObjectSetText("dI"+x+"2",CharToStr(sWait),10,"Wingdings",Khaki); 
    }
        
    //--- EntryCCI text
    for(x=0;x<6;x++)
    {
      if ((iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,0)) >0) // if entry cci above zero
        {
        if ((iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,0))>(iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,1)))
        ObjectSetText("tI"+x+"2"," BUY",9,"Arial Bold",Lime); 
        else ObjectSetText("tI"+x+"2","SELL",9,"Arial Bold",Red); 
      }
      else if             
        ((iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,0)) <0) // if entry cci below zero
        {
        if ((iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,0))<(iCCI(NULL,TF[x],eCCI[x],PRICE_TYPICAL,1)))
        ObjectSetText("tI"+x+"2","SELL",9,"Arial Bold",Red);         
        else ObjectSetText("tI"+x+"2"," BUY",9,"Arial Bold",Lime); 
      }
      else
        ObjectSetText("tI"+x+"2","WAIT",9,"Arial Bold",Khaki); 
    } 
   
    //--- TrendCCI arrows
    for(x=0;x<6;x++)
    {
      if ((iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,0))>0) // if entry cci above zero
        {                                           
        if ((iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,0))>(iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,1))) 
        ObjectSetText("dI"+x+"3",CharToStr(sBuy),fontSize,"Wingdings",Lime); 
        else ObjectSetText("dI"+x+"3",CharToStr(sCCIAgainstBuy),fontSize,"Wingdings",Red); 
      }
      else if             
        ((iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,0)) <0) // if entry cci below zero
        {
        if ((iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,0)) < (iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,1))) 
        ObjectSetText("dI"+x+"3",CharToStr(sSell),fontSize,"Wingdings",Red);         
        else  ObjectSetText("dI"+x+"3",CharToStr(sCCIAgainstSell),fontSize,"Wingdings",Lime); 
      }
      else
        ObjectSetText("dI"+x+"3",CharToStr(sWait),10,"Wingdings",Khaki); 
    }
         
    //--- TrendCCI text
    for(x=0;x<6;x++)
    {
      if ((iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,0)) >0) // if entry cci above zero
        {
        if ((iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,0))>(iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,1)))
        ObjectSetText("tI"+x+"3"," BUY",9,"Arial Bold",Lime); 
        else ObjectSetText("tI"+x+"3","SELL",9,"Arial Bold",Red); 
      }
      else if             
        ((iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,0)) <0) // if entry cci below zero
        {
        if ((iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,0))<(iCCI(NULL,TF[x],tCCI[x],PRICE_TYPICAL,1)))
        ObjectSetText("tI"+x+"3","SELL",9,"Arial Bold",Red);         
        else ObjectSetText("tI"+x+"3"," BUY",9,"Arial Bold",Lime); 
      }
      else
        ObjectSetText("tI"+x+"3","WAIT",9,"Arial Bold",Khaki); 
    } 
     
  return(0);
  }
  //+------------------------------------------------------------------+
  //| END MAIN LOOP                                                    |
  //+------------------------------------------------------------------+

MT5源碼：


//+------------------------------------------------------------------+
//|	     	                                   	 Trade_Assistant.mq5 |
//|                                                    Andriy Moraru |
//| <span style="display:none;"><a href="http://www.tumamayizhan.com">程序
        化交易網</a></span>                                             |
//|            							                            2010 |
//+------------------------------------------------------------------+
#property copyright "www.EarnForex.com, 2010"
#property link      "http://www.earnforex.com"
#property version   "1.01"
#property description "Trade Assistant - an indicator that shows simple trade"
#property description "recommendations based on the Stochastic, RSI and CCI"
#property description "readings."
#property indicator_separate_window

//--- Input parameters
input  string  Stochastic_Settings   = "=== Stochastic Settings ===";
input  int     PercentK              = 8;
input  int     PercentD              = 3;
input  int     Slowing               = 3;

input  string  RSI_Settings          = "=== RSI Settings ===";
input  int     RSIP1                 = 14;
input  int     RSIP2                 = 70;  

input  string  My_Symbols            = "=== Wingdings Symbols ===";
input  int     sBuy                  = 233;
input  int     sSell                 = 234;
input  int     sWait                 = 54;
input  int     sCCIAgainstBuy        = 238;
input  int     sCCIAgainstSell       = 236;

//--- Spacing
int     scaleX = 120, scaleY = 20, offsetX = 200, offsetY = 4, fontSize = 8;

//--- Arrays for various things
ENUM_TIMEFRAMES TF[]              = {PERIOD_M5, PERIOD_M15, PERIOD_M30, PERIOD_H1, PERIOD_H4, PERIOD_D1};
int     			 eCCI[]            = {14, 14, 6, 6, 6, 6};
int     			 tCCI[]            = {50, 34, 14, 14, 14, 14};
string  			 periodStr[]       = {"5 MIN:", "15 MIN:", "30 MIN:", "1 HR:", "4 HR:", "1 DAY:"};
string  			 signalNameStr[]   = {"STOCH", "RSI", "EntryCCI", "TrendCCI"};

//+------------------------------------------------------------------+
//| Custor indicator initialization function                       	|
//+------------------------------------------------------------------+
void OnInit()
{
 	IndicatorSetString(INDICATOR_SHORTNAME, "Trade Assistant");
}

//+------------------------------------------------------------------+
//| Custor indicator deinitialization function                       |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
	// Delete timeframe text labels   
	for (int x = 0; x < 6; x++)
		for (int y = 0; y < 4; y++)
      	ObjectDelete(0, "tPs" + x + y);
    
	// Delete indicator text labels
	for (int y = 0; y < 4; y++)
		ObjectDelete(0, "tInd" + y);
    
	//Delete indicator arrows and text
	for (int x = 0; x < 6; x++)
		for (int y = 0;y < 4; y++)
			ObjectDelete(0, "dI" + x + y);

	for (int x = 0; x < 6; x++)
		for (int y = 0; y < 4; y++)   
			ObjectDelete(0, "tI" + x + y);
}

//+------------------------------------------------------------------+
//| Custom Trade Assistant		                                       |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
{
	// Create timeframe text labels 
	for (int x=0;x<6;x++)
		for (int y=0;y<4;y++)
		{
			ObjectCreate(0, "tPs" + x + y, OBJ_LABEL, ChartWindowFind(), 0, 0);
			ObjectSetText("tPs" + x + y, periodStr[x], fontSize, "Arial Bold", LightSteelBlue);
			ObjectSetInteger(0, "tPs" + x + y, OBJPROP_CORNER, 0);
			ObjectSetInteger(0, "tPs" + x + y, OBJPROP_XDISTANCE, x * scaleX + offsetX);
			ObjectSetInteger(0, "tPs" + x + y, OBJPROP_YDISTANCE, y * scaleY + offsetY);
		}
    
	// Create indicator text labels
	for (int y = 0; y < 4; y++)
	{
		ObjectCreate(0, "tInd" + y, OBJ_LABEL, ChartWindowFind(), 0, 0);
		ObjectSetText("tInd" + y, signalNameStr[y], fontSize, "Arial Bold", PaleGoldenrod);
		ObjectSetInteger(0, "tInd" + y, OBJPROP_CORNER, 0);
		ObjectSetInteger(0, "tInd" + y, OBJPROP_XDISTANCE, offsetX - 55);
		ObjectSetInteger(0, "tInd" + y, OBJPROP_YDISTANCE, y * scaleY + offsetY);
	}
    
	// Create blanks for arrows
	for (int x = 0; x < 6; x++)
		for (int y = 0; y < 4; y++)
		{
			ObjectCreate(0, "dI" + x + y, OBJ_LABEL, ChartWindowFind(), 0, 0);
			ObjectSetText("dI" + x + y, " ", 10, "Wingdings", Goldenrod);
			ObjectSetInteger(0, "dI" + x + y, OBJPROP_CORNER, 0);
			ObjectSetInteger(0, "dI" + x + y, OBJPROP_XDISTANCE,x * scaleX + offsetX + 80); // scaleX == 120, offsetX == 200
			ObjectSetInteger(0, "dI" + x + y, OBJPROP_YDISTANCE,y * scaleY + offsetY);
		}
    
	// Create blanks for text
	for (int x = 0; x < 6; x++)
		for (int y = 0; y < 4; y++)
		{
			ObjectCreate(0, "tI" + x + y, OBJ_LABEL, ChartWindowFind(), 0, 0);
			ObjectSetText("tI" + x + y, "    ", 9, "Arial Bold", Goldenrod);
			ObjectSetInteger(0, "tI" + x + y, OBJPROP_CORNER, 0);
			ObjectSetInteger(0, "tI" + x + y, OBJPROP_XDISTANCE, x * scaleX + offsetX + 45); // scaleX == 120, offsetX == 200
			ObjectSetInteger(0, "tI" + x + y, OBJPROP_YDISTANCE, y * scaleY + offsetY);
		}
    
	// Cycle through 6 timeframes
	for (int x = 0; x < 6; x++)
	{
		// Prepare the indicator buffers
	   double StochasticBuffer_Main[], StochasticBuffer_Signal[];
	   double RSI1[], RSI2[];
	   double CCI_Entry[], CCI_Trend[];
	   ArraySetAsSeries(StochasticBuffer_Main, true);
	   ArraySetAsSeries(StochasticBuffer_Signal, true);
	   ArraySetAsSeries(RSI1, true);
	   ArraySetAsSeries(RSI2, true);
		ArraySetAsSeries(CCI_Entry, true);
		ArraySetAsSeries(CCI_Trend, true);

	   // Get indicators
	   int myStochastic = iStochastic(NULL, TF[x], PercentK, PercentD, Slowing, MODE_SMA, STO_LOWHIGH);
	   if (CopyBuffer(myStochastic, 0, 0, rates_total, StochasticBuffer_Main) < 1) return(0);
	   if (CopyBuffer(myStochastic, 1, 0, rates_total, StochasticBuffer_Signal) < 1) return(0);
	
		int myRSI1 = iRSI(NULL, TF[x], RSIP1, PRICE_TYPICAL);
		int myRSI2 = iRSI(NULL, TF[x], RSIP2, PRICE_TYPICAL);
	   if (CopyBuffer(myRSI1, 0, 0, rates_total, RSI1) < 1) return(0);
	   if (CopyBuffer(myRSI2, 0, 0, rates_total, RSI2) < 1) return(0);
	
		int myCCIe = iCCI(NULL, TF[x], eCCI[x], PRICE_TYPICAL);
		int myCCIt = iCCI(NULL, TF[x], tCCI[x], PRICE_TYPICAL);
	   if (CopyBuffer(myCCIe, 0, 0, rates_total, CCI_Entry) < 1) return(0);
	   if (CopyBuffer(myCCIt, 0, 0, rates_total, CCI_Trend) < 1) return(0);

		// Stochastics arrows and text
		if (StochasticBuffer_Main[0] > StochasticBuffer_Signal[0])
		{
			ObjectSetText("dI" + x + "0", CharToString(sBuy), fontSize, "Wingdings", Lime);
			ObjectSetText("tI" + x + "0", " BUY", 9, "Arial Bold", Lime);
		}
		else if (StochasticBuffer_Signal[0] > StochasticBuffer_Main[0])
		{
			ObjectSetText("dI" + x + "0", CharToString(sSell), fontSize, "Wingdings", Red);
			ObjectSetText("tI" + x + "0", "SELL", 9, "Arial Bold", Red);
		}
		else
		{
			ObjectSetText("dI" + x + "0", CharToString(sWait), 10, "Wingdings", Khaki);
			ObjectSetText("tI" + x + "0", "WAIT", 9, "Arial Bold", Khaki);
		}

		// RSI arrows and text
		if (RSI1[0] > RSI2[0])
		{
			ObjectSetText("dI" + x +"1", CharToString(sBuy), fontSize, "Wingdings", Lime);
			ObjectSetText("tI" + x + "1", " BUY", 9, "Arial Bold", Lime);
		}
		else if (RSI1[0] < RSI2[0])
		{
			ObjectSetText("dI" + x + "1", CharToString(sSell), fontSize, "Wingdings", Red);
			ObjectSetText("tI" + x + "1", "SELL", 9, "Arial Bold", Red);         
		}
		else
		{
			ObjectSetText("dI" + x + "1", CharToString(sWait), fontSize, "Wingdings", Khaki);
			ObjectSetText("tI" + x + "1", "WAIT", 9, "Arial Bold", Khaki); 
		}

		// EntryCCI arrows and text
		if (CCI_Entry[0] > 0) // If entry CCI above zero
		{                                           
			if (CCI_Entry[0] > CCI_Entry[1])
			{
				ObjectSetText("dI" + x + "2", CharToString(sBuy), fontSize, "Wingdings", Lime);
				ObjectSetText("tI" + x + "2", " BUY", 9, "Arial Bold", Lime);
			}
			else
			{
				ObjectSetText("dI" + x + "2", CharToString(sCCIAgainstBuy), fontSize, "Wingdings", Red);
				ObjectSetText("tI" + x + "2", "SELL", 9, "Arial Bold", Red);
			}
		}
		else if (CCI_Entry[0] < 0) // If entry CCI below zero
		{
			if (CCI_Entry[0] < CCI_Entry[1])
			{
				ObjectSetText("dI" + x + "2", CharToString(sSell), fontSize, "Wingdings", Red);
				ObjectSetText("tI" + x + "2", "SELL", 9, "Arial Bold", Red);        
			}
			else
			{
				ObjectSetText("dI" + x + "2", CharToString(sCCIAgainstSell), fontSize, "Wingdings", Lime);
				ObjectSetText("tI" + x + "2", " BUY", 9, "Arial Bold", Lime);
			}
		}
		else
		{
			ObjectSetText("dI" + x + "2", CharToString(sWait), 10, "Wingdings", Khaki);
			ObjectSetText("tI" + x + "2", "WAIT", 9, "Arial Bold", Khaki);
		}

		// TrendCCI arrows and text
		if (CCI_Trend[0] > 0) // If entry CCI above zero
		{                                           
			if (CCI_Trend[0] > CCI_Trend[1])
			{
				ObjectSetText("dI" + x + "3", CharToString(sBuy), fontSize, "Wingdings", Lime);
				ObjectSetText("tI" + x + "3", " BUY",9, "Arial Bold", Lime);
			}
			else
			{
				ObjectSetText("dI" + x + "3", CharToString(sCCIAgainstBuy), fontSize, "Wingdings", Red);
				ObjectSetText("tI" + x + "3", "SELL", 9, "Arial Bold", Red);
			}
		}
		else if (CCI_Trend[0] < 0) // If entry CCI below zero
		{
			if (CCI_Trend[0] < CCI_Trend[1])
			{
				ObjectSetText("dI" + x + "3", CharToString(sSell), fontSize, "Wingdings", Red);
				ObjectSetText("tI" + x + "3", "SELL", 9, "Arial Bold", Red);
			}
			else
			{
				ObjectSetText("dI" + x + "3", CharToString(sCCIAgainstSell), fontSize, "Wingdings", Lime);
				ObjectSetText("tI" + x + "3", " BUY", 9, "Arial Bold", Lime);
			}
		}
		else
		{
			ObjectSetText("dI" + x + "3", CharToString(sWait), 10, "Wingdings", Khaki);
			ObjectSetText("tI" + x + "3", "WAIT", 9, "Arial Bold", Khaki);
		}
	} 

	return(rates_total);
}

//+------------------------------------------------------------------+
//| Imitation of the old MT4 function                                |
//+------------------------------------------------------------------+
void ObjectSetText(string name, string text, int size, string font, color colour)
{
		   ObjectSetString(0,  name, OBJPROP_TEXT, text);
		   ObjectSetInteger(0, name, OBJPROP_FONTSIZE, size);
		   ObjectSetString(0,  name, OBJPROP_FONT, font);
		   ObjectSetInteger(0, name, OBJPROP_COLOR, colour);
}