Author: Copyright � 2006, MetaQuotes Software Corp.
DIGISTOCH

This script is designed to display a summary of market trends across different timeframes, helping traders quickly assess potential buying or selling opportunities.

Here's the breakdown:

  1. Initialization: The script starts by defining customizable settings (K_period, D_period, S_period) for the Stochastic Oscillator, a tool used to identify overbought or oversold conditions in the market. It also includes options to show the detailed values of the Stochastic Oscillator and a legend explaining the color codes.

  2. Data Collection: The core of the script involves calculating the Stochastic Oscillator values for various timeframes: 1 minute (M1), 5 minutes (M5), 15 minutes (M15), 30 minutes (M30), 1 hour (H1), and 4 hours (H4). It does this by using the iStochastic function, which performs the Stochastic calculation for each timeframe using the specified settings. The script gets two lines of the stochastics indicator: the main line and the signal line.

  3. Trend Determination: For each timeframe, the script compares the Stochastic Oscillator's main line with its signal line to determine the current trend (uptrend or downtrend). It also checks whether the signal line is in overbought (above 80) or oversold (below 20) territory. These levels can suggest when an asset is trading too high or too low, respectively.

  4. Color-Coded Signals: Based on the trend and overbought/oversold conditions, the script assigns a specific color to each timeframe. The colors used are:

    • Green/Lime/YellowGreen indicates an uptrend.

    • Red/Tomato/FireBrick indicates a downtrend.

    • The intensity of the color represents whether the signal line of the stochastics indicator is inside the overbought/oversold zones or trending inside the 20-80 range.

  5. Display on Chart: The script then displays these color-coded signals on the chart using text labels. It shows the timeframe (e.g., "M1", "H4") and its corresponding color, providing a quick visual summary of the market trend across different time horizons.

  6. Stochastic values: If the user enabled in the settings, it also shows the stochastics values and an arrow representing if the main line is above the signal line (up) or below the signal line (down).

  7. Legend: If the user enabled in the settings, the script includes a legend that explains what each color represents, making it easy for traders to interpret the signals. The legend explains what the different colors means.

In essence, this script acts as a multi-timeframe dashboard for the Stochastic Oscillator. It provides a concise overview of potential buying or selling opportunities by highlighting trends and overbought/oversold conditions across various timeframes, all in a visually accessible format.

Indicators Used
Stochastic oscillator
4 Views
0 Downloads
1 Favorites
DIGISTOCH
//+------------------------------------------------------------------+
//|                                                    DIGISTOCH.mq4 |
//|                      Copyright © 2006, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"

/*********************************************************************
* Author: Muhammad Hamizi Jaminan
* Nick: hymns
*
* Date: December 13, 2006
* Custom Indicator: DigiStoch.mq4
* Version: 1.0.1
* Description: Multi TimeFrame Digital Stochastic Indicator
*
* Change Logs
* Version 1.0.1
* - Fix little bugs for color and arrow. When price overbought or  
*   oversold color change to bearish or bullish begin color. Should be 
*   overbought or oversold color and arrow.
*
* Version 1.0
* - Release DigiStoch ;)
**********************************************************************/

#property indicator_separate_window

extern int K_period = 8;
extern int D_period = 3;
extern int S_period = 3;
extern bool Show_Stoch_Value = true;
extern bool Show_Legend = true;

//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
   IndicatorShortName("DIGISTOCH");
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   ObjectsDeleteAll(0,OBJ_LABEL);
   ObjectDelete("ObjLabel1"); ObjectDelete("ObjLabel2"); ObjectDelete("ObjLabel3"); ObjectDelete("ObjLabel4");
   ObjectDelete("ObjLabel5"); ObjectDelete("ObjLabel6"); ObjectDelete("ObjLabel7"); ObjectDelete("ObjLabel8");
   ObjectDelete("ObjLabel9"); ObjectDelete("ObjLabel10"); ObjectDelete("ObjLabel11"); ObjectDelete("ObjLabel12");
   ObjectDelete("ObjLabel9a"); ObjectDelete("ObjLabel10a"); ObjectDelete("ObjLabel11a"); ObjectDelete("ObjLabel12a");
   ObjectDelete("ObjLabel13"); ObjectDelete("ObjLabel14"); ObjectDelete("ObjLabel15"); ObjectDelete("ObjLabel16");
   ObjectDelete("ObjLabel13a"); ObjectDelete("ObjLabel14a"); ObjectDelete("ObjLabel15a"); ObjectDelete("ObjLabel16a");   
   ObjectDelete("SSIG1"); ObjectDelete("SSIG2"); ObjectDelete("SSIG3"); ObjectDelete("SSIG4"); ObjectDelete("SSIG5"); ObjectDelete("SSIG6"); 
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {    
    //m1 data
    double stoch_main_m1 = iStochastic(NULL,PERIOD_M1,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
    double stoch_sig_m1 = iStochastic(NULL,PERIOD_M1,K_period,D_period,S_period,MODE_SMA,1,MODE_SIGNAL,0);

    //m5 data
    double stoch_main_m5 = iStochastic(NULL,PERIOD_M5,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
    double stoch_sig_m5 = iStochastic(NULL,PERIOD_M5,K_period,D_period,S_period,MODE_SMA,1,MODE_SIGNAL,0);

    //m15 data
    double stoch_main_m15 = iStochastic(NULL,PERIOD_M15,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
    double stoch_sig_m15 = iStochastic(NULL,PERIOD_M15,K_period,D_period,S_period,MODE_SMA,1,MODE_SIGNAL,0);
    
    //m30 data
    double stoch_main_m30 = iStochastic(NULL,PERIOD_M30,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
    double stoch_sig_m30 = iStochastic(NULL,PERIOD_M30,K_period,D_period,S_period,MODE_SMA,1,MODE_SIGNAL,0);

    //h1 data
    double stoch_main_h1 = iStochastic(NULL,PERIOD_H1,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
    double stoch_sig_h1 = iStochastic(NULL,PERIOD_H1,K_period,D_period,S_period,MODE_SMA,1,MODE_SIGNAL,0);

    //h4 data
    double stoch_main_h4 = iStochastic(NULL,PERIOD_H4,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
    double stoch_sig_h4 = iStochastic(NULL,PERIOD_H4,K_period,D_period,S_period,MODE_SMA,1,MODE_SIGNAL,0);
    
    //define color
    color stoch_color_m1, stoch_color_m5, stoch_color_m15, stoch_color_m30, stoch_color_h1, stoch_color_h4;

    //define string    
    string stoch_level_m1, stoch_level_m5, stoch_level_m15, stoch_level_m30, stoch_level_h1, stoch_level_h4,
           stoch_arrow_m1, stoch_arrow_m5, stoch_arrow_m15, stoch_arrow_m30, stoch_arrow_h1, stoch_arrow_h4;
    
    //m1 up trend
    if ((stoch_main_m1 >= stoch_sig_m1) && (stoch_sig_m1 < 20) && (stoch_sig_m1 != 0)) { stoch_color_m1 = YellowGreen; }
    if ((stoch_main_m1 >= stoch_sig_m1) && (stoch_sig_m1 >= 20) && (stoch_sig_m1 <= 80)) { stoch_color_m1 = Lime; }
    if ((stoch_main_m1 >= stoch_sig_m1) && (stoch_sig_m1 > 80)) { stoch_color_m1 = Green; }

    //m1 down trend
    if ((stoch_main_m1 <= stoch_sig_m1) && (stoch_sig_m1 > 80) && (stoch_sig_m1 != 100)) { stoch_color_m1 = Tomato; }
    if ((stoch_main_m1 <= stoch_sig_m1) && (stoch_sig_m1 >= 20) && (stoch_sig_m1 <= 80)) { stoch_color_m1 = Red; }
    if ((stoch_main_m1 <= stoch_sig_m1) && (stoch_sig_m1 < 20)) { stoch_color_m1 = FireBrick; }

    //m5 up trend
    if ((stoch_main_m5 >= stoch_sig_m5) && (stoch_sig_m5 < 20) && (stoch_sig_m5 != 0)) { stoch_color_m5 = YellowGreen; }
    if ((stoch_main_m5 >= stoch_sig_m5) && (stoch_sig_m5 >= 20) && (stoch_sig_m5 <= 80)) { stoch_color_m5 = Lime; }
    if ((stoch_main_m5 >= stoch_sig_m5) && (stoch_sig_m5 > 80)) { stoch_color_m5 = Green; }

    //m5 down trend
    if ((stoch_main_m5 <= stoch_sig_m5) && (stoch_sig_m5 > 80) && (stoch_sig_m5 != 100)) { stoch_color_m5 = Tomato; }    
    if ((stoch_main_m5 <= stoch_sig_m5) && (stoch_sig_m5 >= 20) && (stoch_sig_m5 <= 80)) { stoch_color_m5 = Red; }
    if ((stoch_main_m5 <= stoch_sig_m5) && (stoch_sig_m5 < 20)) { stoch_color_m5 = FireBrick; }

    //m15 up trend
    if ((stoch_main_m15 >= stoch_sig_m15) && (stoch_sig_m15 < 20) && (stoch_sig_m15 != 0)) { stoch_color_m15 = YellowGreen; }
    if ((stoch_main_m15 >= stoch_sig_m15) && (stoch_sig_m15 >= 20) && (stoch_sig_m15 <= 80)) { stoch_color_m15 = Lime; }
    if ((stoch_main_m15 >= stoch_sig_m15) && (stoch_sig_m15 > 80)) { stoch_color_m15 = Green; }

    //m15 down trend
    if ((stoch_main_m15 <= stoch_sig_m15) && (stoch_sig_m15 > 80) && (stoch_sig_m15 != 100)) { stoch_color_m15 = Tomato; }
    if ((stoch_main_m15 <= stoch_sig_m15) && (stoch_sig_m15 >= 20) && (stoch_sig_m15 <= 80)) { stoch_color_m15 = Red; }
    if ((stoch_main_m15 <= stoch_sig_m15) && (stoch_sig_m15 < 20)) { stoch_color_m15 = FireBrick; }
       
    //m30 up trend
    if ((stoch_main_m30 >= stoch_sig_m30) && (stoch_sig_m30 < 20) && (stoch_sig_m30 != 0)) { stoch_color_m30 = YellowGreen; }
    if ((stoch_main_m30 >= stoch_sig_m30) && (stoch_sig_m30 >= 20) && (stoch_sig_m30 <= 80)) { stoch_color_m30 = Lime; }
    if ((stoch_main_m30 >= stoch_sig_m30) && (stoch_sig_m30 > 80)) { stoch_color_m30 = Green; }

    //m30 down trend
    if ((stoch_main_m30 <= stoch_sig_m30) && (stoch_sig_m30 > 80) && (stoch_sig_m30 != 100)) { stoch_color_m30 = Tomato; }
    if ((stoch_main_m30 <= stoch_sig_m30) && (stoch_sig_m30 >= 20) && (stoch_sig_m30 <= 80)) { stoch_color_m30 = Red; }
    if ((stoch_main_m30 <= stoch_sig_m30) && (stoch_sig_m30 < 20)) { stoch_color_m30 = FireBrick; }

    //h1 up trend
    if ((stoch_main_h1 >= stoch_sig_h1) && (stoch_sig_h1 < 20) && (stoch_sig_h1 != 0)) { stoch_color_h1 = YellowGreen; }
    if ((stoch_main_h1 >= stoch_sig_h1) && (stoch_sig_h1 >= 20) && (stoch_sig_h1 <= 80)) { stoch_color_h1 = Lime; }
    if ((stoch_main_h1 >= stoch_sig_h1) && (stoch_sig_h1 > 80)) { stoch_color_h1 = Green; }
    
    //h1 down trend
    if ((stoch_main_h1 <= stoch_sig_h1) && (stoch_sig_h1 > 80) && (stoch_sig_h1 != 100)) { stoch_color_h1 = Tomato; }
    if ((stoch_main_h1 <= stoch_sig_h1) && (stoch_sig_h1 >= 20) && (stoch_sig_h1 <= 80)) { stoch_color_h1 = Red; }
    if ((stoch_main_h1 <= stoch_sig_h1) && (stoch_sig_h1 < 20)) { stoch_color_h1 = FireBrick; }

    //h4 up trend
    if ((stoch_main_h4 >= stoch_sig_h4) && (stoch_sig_h4 < 20) && (stoch_sig_h4 != 0)) { stoch_color_h4 = YellowGreen; }    
    if ((stoch_main_h4 >= stoch_sig_h4) && (stoch_sig_h4 >= 20) && (stoch_sig_h4 <= 80)) { stoch_color_h4 = Lime; }
    if ((stoch_main_h4 >= stoch_sig_h4) && (stoch_sig_h4 > 80)) { stoch_color_h4 = Green; }
    
    //h4 down trend
    if ((stoch_main_h4 <= stoch_sig_h4) && (stoch_sig_h4 > 80) && (stoch_sig_h4 != 100)) { stoch_color_h4 = Tomato; }
    if ((stoch_main_h4 <= stoch_sig_h4) && (stoch_sig_h4 >= 20) && (stoch_sig_h4 <= 80)) { stoch_color_h4 = Red; }
    if ((stoch_main_h4 <= stoch_sig_h4) && (stoch_sig_h4 < 20)) { stoch_color_h4 = FireBrick; }
    
    //Signal Labels           
    ObjectCreate("ObjLabel1", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0); //LABEL
        ObjectSetText("ObjLabel1","SIGNAL",8, "Arial Bold", Silver);
        ObjectSet("ObjLabel1", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel1", OBJPROP_XDISTANCE, 105);
        ObjectSet("ObjLabel1", OBJPROP_YDISTANCE, 3);

    ObjectCreate("SSIG1", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);//M1 SIGNAL
        ObjectSetText("SSIG1","M1",9, "Arial Bold", stoch_color_m1);
        ObjectSet("SSIG1", OBJPROP_CORNER, 0);
        ObjectSet("SSIG1", OBJPROP_XDISTANCE, 150);
        ObjectSet("SSIG1", OBJPROP_YDISTANCE, 3);
        
    ObjectCreate("SSIG2", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);//M5 SIGNAL
        ObjectSetText("SSIG2","M5",9, "Arial Bold", stoch_color_m5);
        ObjectSet("SSIG2", OBJPROP_CORNER, 0);
        ObjectSet("SSIG2", OBJPROP_XDISTANCE, 175);
        ObjectSet("SSIG2", OBJPROP_YDISTANCE, 3);
        
    ObjectCreate("SSIG3", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);//M15 SIGNAL
        ObjectSetText("SSIG3","M15",9, "Arial Bold", stoch_color_m15);
        ObjectSet("SSIG3", OBJPROP_CORNER, 0);
        ObjectSet("SSIG3", OBJPROP_XDISTANCE, 200);
        ObjectSet("SSIG3", OBJPROP_YDISTANCE, 3);
        
    ObjectCreate("SSIG4", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);//M30 SIGNAL
        ObjectSetText("SSIG4","M30",9, "Arial Bold", stoch_color_m30);
        ObjectSet("SSIG4", OBJPROP_CORNER, 0);
        ObjectSet("SSIG4", OBJPROP_XDISTANCE, 230);
        ObjectSet("SSIG4", OBJPROP_YDISTANCE, 3);

    ObjectCreate("SSIG5", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);//H1 SIGNAL
        ObjectSetText("SSIG5","H1",9, "Arial Bold", stoch_color_h1);
        ObjectSet("SSIG5", OBJPROP_CORNER, 0);
        ObjectSet("SSIG5", OBJPROP_XDISTANCE, 260);
        ObjectSet("SSIG5", OBJPROP_YDISTANCE, 3);             

    ObjectCreate("SSIG6", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);//H4 SIGNAL
        ObjectSetText("SSIG6","H4",9, "Arial Bold", stoch_color_h4);
        ObjectSet("SSIG6", OBJPROP_CORNER, 0);
        ObjectSet("SSIG6", OBJPROP_XDISTANCE, 280);
        ObjectSet("SSIG6", OBJPROP_YDISTANCE, 3);             

    //Show Digital Stochastic Value
    if (Show_Stoch_Value == true) 
    {
      //stochastic value
      string stoch_m1_val = stoch_sig_m1;
      string stoch_m5_val = stoch_sig_m5;
      string stoch_m15_val = stoch_sig_m15;
      string stoch_m30_val = stoch_sig_m30;
      string stoch_h1_val = stoch_sig_h1;
      string stoch_h4_val = stoch_sig_h4;
    
      if (stoch_main_m1 >= stoch_sig_m1 && stoch_sig_m1 > 0) { stoch_arrow_m1 = "Ù"; }
      if (stoch_main_m1 <= stoch_sig_m1 && stoch_sig_m1 < 100) { stoch_arrow_m1 = "Ú"; }

      if (stoch_main_m5 >= stoch_sig_m5 && stoch_sig_m5 > 0) { stoch_arrow_m5 = "Ù"; }
      if (stoch_main_m5 <= stoch_sig_m5 && stoch_sig_m5 < 100) { stoch_arrow_m5 = "Ú"; }

      if (stoch_main_m15 >= stoch_sig_m15 && stoch_sig_m15 > 0) { stoch_arrow_m15 = "Ù"; }
      if (stoch_main_m15 <= stoch_sig_m15 && stoch_sig_m15 < 100) { stoch_arrow_m15 = "Ú"; }

      if (stoch_main_m30 >= stoch_sig_m30 && stoch_sig_m30 > 0) { stoch_arrow_m30 = "Ù"; }
      if (stoch_main_m30 <= stoch_sig_m30 && stoch_sig_m30 < 100) { stoch_arrow_m30 = "Ú"; }

      if (stoch_main_h1 >= stoch_sig_h1 && stoch_sig_h1 > 0) { stoch_arrow_h1 = "Ù"; }
      if (stoch_main_h1 <= stoch_sig_h1 && stoch_sig_h1 < 100) { stoch_arrow_h1 = "Ú"; }

      if (stoch_main_h4 >= stoch_sig_h4 && stoch_sig_h4 > 0) { stoch_arrow_h4 = "Ù"; }
      if (stoch_main_h4 <= stoch_sig_h4 && stoch_sig_h4 < 100) { stoch_arrow_h4 = "Ú"; }

      //stochastic value
      ObjectCreate("ObjLabel15", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel15","STOCHASTIC",8, "Arial Bold", Silver);
        ObjectSet("ObjLabel15", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel15", OBJPROP_XDISTANCE, 310);
        ObjectSet("ObjLabel15", OBJPROP_YDISTANCE, 3);
            
      //stoch m1 value
      ObjectCreate("ObjLabel9", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel9","M1  : "+StringSubstr(stoch_m1_val,0,5)+" ",8, "Arial Bold", stoch_color_m1);
        ObjectSet("ObjLabel9", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel9", OBJPROP_XDISTANCE, 380);
        ObjectSet("ObjLabel9", OBJPROP_YDISTANCE, 2);

      //arrow m1
      ObjectCreate("ObjLabel9a", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel9a",stoch_arrow_m1,8, "Wingdings", stoch_color_m1);
        ObjectSet("ObjLabel9a", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel9a", OBJPROP_XDISTANCE, 435);
        ObjectSet("ObjLabel9a", OBJPROP_YDISTANCE, 3);
        
      //stoch m30 value
      ObjectCreate("ObjLabel10", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel10","M30: "+StringSubstr(stoch_m30_val,0,5),8, "Arial Bold", stoch_color_m30);
        ObjectSet("ObjLabel10", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel10", OBJPROP_XDISTANCE, 380);
        ObjectSet("ObjLabel10", OBJPROP_YDISTANCE, 12);

      //arrow m30
      ObjectCreate("ObjLabel10a", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel10a",stoch_arrow_m30,8, "Wingdings", stoch_color_m30);
        ObjectSet("ObjLabel10a", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel10a", OBJPROP_XDISTANCE, 435);
        ObjectSet("ObjLabel10a", OBJPROP_YDISTANCE, 13);
    
      //stoch m5 value            
      ObjectCreate("ObjLabel11", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel11","M5: "+StringSubstr(stoch_m5_val,0,5),8, "Arial Bold", stoch_color_m5);
        ObjectSet("ObjLabel11", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel11", OBJPROP_XDISTANCE, 460);
        ObjectSet("ObjLabel11", OBJPROP_YDISTANCE, 2);
        
      //arrow m5
      ObjectCreate("ObjLabel11a", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel11a",stoch_arrow_m5,8, "Wingdings", stoch_color_m5);
        ObjectSet("ObjLabel11a", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel11a", OBJPROP_XDISTANCE, 510);
        ObjectSet("ObjLabel11a", OBJPROP_YDISTANCE, 3);        
        
      //stoch h1 value
      ObjectCreate("ObjLabel12", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel12","H1 : "+StringSubstr(stoch_h1_val,0,5),8, "Arial Bold", stoch_color_h1);
        ObjectSet("ObjLabel12", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel12", OBJPROP_XDISTANCE, 460);
        ObjectSet("ObjLabel12", OBJPROP_YDISTANCE, 12);

      //arrow h1
      ObjectCreate("ObjLabel12a", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel12a",stoch_arrow_h1,8, "Wingdings", stoch_color_h1);
        ObjectSet("ObjLabel12a", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel12a", OBJPROP_XDISTANCE, 510);
        ObjectSet("ObjLabel12a", OBJPROP_YDISTANCE, 13);        

      //stoch m15 value        
      ObjectCreate("ObjLabel13", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel13","M15: "+StringSubstr(stoch_m15_val,0,5),8, "Arial Bold", stoch_color_m15);
        ObjectSet("ObjLabel13", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel13", OBJPROP_XDISTANCE, 535);
        ObjectSet("ObjLabel13", OBJPROP_YDISTANCE, 2);

      //arrow m15
      ObjectCreate("ObjLabel13a", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel13a",stoch_arrow_m15,8, "Wingdings", stoch_color_m15);
        ObjectSet("ObjLabel13a", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel13a", OBJPROP_XDISTANCE, 590);
        ObjectSet("ObjLabel13a", OBJPROP_YDISTANCE, 3);        


      //stoch h4 value
      ObjectCreate("ObjLabel14", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel14","H4   : "+StringSubstr(stoch_h4_val,0,5),8, "Arial Bold", stoch_color_h4);
        ObjectSet("ObjLabel14", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel14", OBJPROP_XDISTANCE, 535);
        ObjectSet("ObjLabel14", OBJPROP_YDISTANCE, 12);        
        
      //arrow h4
      ObjectCreate("ObjLabel14a", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel14a",stoch_arrow_h4,8, "Wingdings", stoch_color_h4);
        ObjectSet("ObjLabel14a", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel14a", OBJPROP_XDISTANCE, 590);
        ObjectSet("ObjLabel14a", OBJPROP_YDISTANCE, 13); 
    }
            
    //Show Legend
    if (Show_Legend == true) 
    {
    ObjectCreate("ObjLabel2", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel2","LEGEND",8, "Arial Bold", Silver);
        ObjectSet("ObjLabel2", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel2", OBJPROP_XDISTANCE, 615);
        ObjectSet("ObjLabel2", OBJPROP_YDISTANCE, 3);

    ObjectCreate("ObjLabel3", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel3","* TREND UP",8, "Arial Bold", Lime);
        ObjectSet("ObjLabel3", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel3", OBJPROP_XDISTANCE, 665);
        ObjectSet("ObjLabel3", OBJPROP_YDISTANCE, 2);   
        
    ObjectCreate("ObjLabel4", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel4","* TREND DN",8, "Arial Bold", Red);
        ObjectSet("ObjLabel4", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel4", OBJPROP_XDISTANCE, 665);
        ObjectSet("ObjLabel4", OBJPROP_YDISTANCE, 12);       
        
    ObjectCreate("ObjLabel5", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel5","* OVERBOUGHT",8, "Arial Bold", Green);
        ObjectSet("ObjLabel5", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel5", OBJPROP_XDISTANCE, 735);
        ObjectSet("ObjLabel5", OBJPROP_YDISTANCE, 2);   
        
    ObjectCreate("ObjLabel6", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel6","* OVERSOLD",8, "Arial Bold", FireBrick);
        ObjectSet("ObjLabel6", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel6", OBJPROP_XDISTANCE, 735);
        ObjectSet("ObjLabel6", OBJPROP_YDISTANCE, 12);      

    ObjectCreate("ObjLabel7", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel7","* BULLISH START",8, "Arial Bold", YellowGreen);
        ObjectSet("ObjLabel7", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel7", OBJPROP_XDISTANCE, 825);
        ObjectSet("ObjLabel7", OBJPROP_YDISTANCE, 2);   
        
    ObjectCreate("ObjLabel8", OBJ_LABEL, WindowFind("DIGISTOCH"), 0, 0);
        ObjectSetText("ObjLabel8","* BEARISH START",8, "Arial Bold", Tomato);
        ObjectSet("ObjLabel8", OBJPROP_CORNER, 0);
        ObjectSet("ObjLabel8", OBJPROP_XDISTANCE, 825);
        ObjectSet("ObjLabel8", OBJPROP_YDISTANCE, 12);                      
    }
//----
    RefreshRates();
    return(0); 
//----
} 

//+------------------------------------------------------------------+

Comments