Rads stoch Bar A

Download script
Author: Copyright � 2006, Eli hayun
Rads stoch Bar A

This indicator is designed to provide a multi-timeframe perspective on market momentum by visualizing several different time periods simultaneously within a single window. Instead of looking at just one chart, it allows you to see the "health" or direction of the market across four different scales at once.

Core Logic and Functionality

1. Multi-Timeframe Detection The script automatically detects which timeframe your current chart is set to (e.g., 5 minutes, 1 hour, or daily). Based on that specific starting point, it calculates four additional related timeframes. This ensures that the data remains relevant; for example, if you are on a small timeframe, it shows you several nearby smaller timeframes, but if you move to a large timeframe, it shifts to show much larger global trends.

2. Momentum Analysis (Stochastic Calculation) To determine the market direction, the script uses a technical indicator known as the "Stochastic Oscillator." It looks at two specific components of this oscillator:

  • The Main Line: Represents the current momentum.
  • The Signal Line: A smoothed average of that momentum.

By comparing these two lines, the script determines whether the trend is currently leaning upward or downward.

3. Visual Representation Instead of drawing complex lines that might clutter your screen, the script uses a "Bar" or "Arrow" system located in a separate window at the bottom of your chart:

  • Color Coding: It uses Lime (Green) and Red to signify upward and downward trends, respectively.
  • Vertical Separation: The script places the data for the four different timeframes on different horizontal levels. This prevents the data from overlapping, making it easy to see the trend of each period at a glance.
  • Labels: It automatically generates text labels so you know exactly which timeframe corresponds to which level (e.g., showing "M15," "H1," etc.).

How to Interpret the Data

The logic is built to give you a "Bird's Eye View" of the market:

  • If all four levels are showing the same color, it suggests a strong, unified trend across multiple timeframes.
  • If the colors are mixed (e.g., the lower levels are one color while the higher levels are another), it indicates a conflict between short-term noise and long-term trends.

In summary, this tool condenses a massive amount of data—normally requiring you to jump between four different windows—into one organized visual display that tracks momentum across various scales automatically.

Indicators Used
Stochastic oscillator
Miscellaneous
Implements a curve of type %1
9 Views
0 Downloads
0 Favorites
Rads stoch Bar A 
//+------------------------------------------------------------------+
//|                                                  4TF HAS Bar.mq4 |
//|                  Modified by Matsu, from #MTF Supertrend Bar.mq4 |
//|                                      Copyright © 2006, Eli hayun |
//|                                          http://www.elihayun.com |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, Eli hayun"
#property link      "http://www.elihayun.com"

#property indicator_separate_window
#property indicator_minimum 0
#property indicator_maximum 5
#property indicator_buffers 8
#property indicator_color1 Red
#property indicator_color2 Blue
#property indicator_color3 Red
#property indicator_color4 Blue
#property indicator_color5 Red
#property indicator_color6 Blue
#property indicator_color7 Red
#property indicator_color8 Blue

//---- parameters
extern int MaMetod  = 2;
extern int MaPeriod = 6;
extern int MaMetod2  = 3;
extern int MaPeriod2 = 2;
extern int BarWidth = 0;
extern color BarColorUp = Lime;
extern color BarColorDown = Red;
extern color TextColor = White;
extern int MaxBars=500;

double Gap = 1; // Gap between the lines of bars
//---- buffers
double buf4_up[];
double buf4_down[];
double buf3_up[];
double buf3_down[];
double buf2_up[];
double buf2_down[];
double buf1_up[];
double buf1_down[];
double haOpen;
double haClose;
double haOpen2;
double haClose2;


string shortname = "";


int ArrSize = 110;//159;
int UniqueNum = 2282;
int Period_1, Period_2, Period_3, Period_4;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
  
  
   SetIndexStyle(0,DRAW_ARROW,0,BarWidth,BarColorUp);
   SetIndexArrow(0,ArrSize);
   SetIndexBuffer(0,buf1_up);
   SetIndexEmptyValue(0,0.0);
   SetIndexStyle(1,DRAW_ARROW,0,BarWidth,BarColorDown);
   SetIndexArrow(1,ArrSize);
   SetIndexBuffer(1,buf1_down);
   SetIndexEmptyValue(1,0.0);
   SetIndexStyle(2,DRAW_ARROW,0,BarWidth,BarColorUp);
   SetIndexArrow(2,ArrSize);
   SetIndexBuffer(2,buf2_up);
   SetIndexEmptyValue(2,0.0);
   SetIndexStyle(3,DRAW_ARROW,0,BarWidth,BarColorDown);
   SetIndexArrow(3,ArrSize);
   SetIndexBuffer(3,buf2_down);
   SetIndexEmptyValue(3,0.0);
   SetIndexStyle(4,DRAW_ARROW,0,BarWidth,BarColorUp);
   SetIndexArrow(4,ArrSize);
   SetIndexBuffer(4,buf3_up);
   SetIndexEmptyValue(4,0.0);
   SetIndexStyle(5,DRAW_ARROW,0,BarWidth,BarColorDown);
   SetIndexArrow(5,ArrSize);
   SetIndexBuffer(5,buf3_down);
   SetIndexEmptyValue(5,0.0);
   SetIndexStyle(6,DRAW_ARROW,0,BarWidth,BarColorUp);
   SetIndexArrow(6,ArrSize);
   SetIndexBuffer(6,buf4_up);
   SetIndexEmptyValue(6,0.0);
   SetIndexStyle(7,DRAW_ARROW,0,BarWidth,BarColorDown);
   SetIndexArrow(7,ArrSize);
   SetIndexBuffer(7,buf4_down);
   SetIndexEmptyValue(7,0.0);
   
   SetIndexLabel(0,NULL);
   SetIndexLabel(1,NULL);
   SetIndexLabel(2,NULL);
   SetIndexLabel(3,NULL);
   SetIndexLabel(4,NULL);
   SetIndexLabel(5,NULL);
   SetIndexLabel(6,NULL);
   SetIndexLabel(7,NULL);
   
   IndicatorDigits(0);
   getPeriod();
   
   shortname = "4TF-HAS ("+Period_1+","+Period_2+","+Period_3+","+Period_4+")";
   IndicatorShortName(shortname);
   
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {

   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+




int start()
  {
   int counted_bars=IndicatorCounted();
   //---- check for possible errors
   if(counted_bars<0) return(-1);
   //---- the last counted bar will be recounted
   if(counted_bars>0) counted_bars--;
   int limit=Bars-counted_bars;
   int i,tf;

   //-------------------------------1----------------------------------------   
   double dif = Time[0] - Time[1];
   for ( i=ObjectsTotal()-1; i>-1; i--)
      {
         if (StringFind(ObjectName(i),"FF_"+UniqueNum+"_") >= 0)  ObjectDelete(ObjectName(i));
      }
      
   double shift = 0.;
   for ( tf=1; tf<=4; tf++)
      {  
         string txt = "??";
         double gp;
         switch (tf)
         {
            case 1: txt = tf2txt(Period_1)+"  STOCH 5,3,3";  gp = 1 + shift; break;
            case 2: txt = tf2txt(Period_2)+" STOCH 5,3,3";   gp = 1 + Gap + shift; break;
            case 3: txt = tf2txt(Period_3)+"  STOCH 5,3,3";  gp = 1 + Gap*2 + shift; break;
            case 4: txt = tf2txt(Period_4)+"  STOCH 15,3,3";  gp = 1 + Gap*3 + shift; break;
         }
         string name = "FF_"+UniqueNum+"_"+tf+"_"+txt;
         ObjectCreate(name, OBJ_TEXT, WindowFind(shortname), iTime(NULL,0,0)+dif*3, gp);
         ObjectSetText(name, txt,8,"Arial", TextColor);
      }
   
   
   
   //-------------------------------2----------------------------------------
   datetime TimeArray_4[], TimeArray_3[], TimeArray_2[], TimeArray_1[];
   ArrayCopySeries(TimeArray_1,MODE_TIME,Symbol(),Period_1);
   ArrayCopySeries(TimeArray_2,MODE_TIME,Symbol(),Period_2);
   ArrayCopySeries(TimeArray_3,MODE_TIME,Symbol(),Period_3); 
   ArrayCopySeries(TimeArray_4,MODE_TIME,Symbol(),Period_4);
   
   int  i1=0, i2=0, i3=0, i4=0, yy;

  // for(i=0, i1=0,  i2=0,  i3=0,  i4=0;i<MaxBars;i++)
   for(i=0, i1=0,  i2=0,  i3=0,  i4=0;i<limit;i++)
   {
      if (Time[i]<TimeArray_1[i1]) i1++;
      if (Time[i]<TimeArray_2[i2]) i2++;
      if (Time[i]<TimeArray_3[i3]) i3++;
      if (Time[i]<TimeArray_4[i4]) i4++;

      for ( tf = 1; tf <= 4; tf++)
      {
         int prd;
         switch (tf)
         {
            case 1: prd = Period_1; yy = i1;  break;
            case 2: prd = Period_2; yy = i2;  break;
            case 3: prd = Period_3; yy = i3;   break;
            case 4: prd = Period_4; yy = i4;   break;
         }
      
         haOpen = iStochastic(NULL,prd,5,3,3,0,PRICE_CLOSE,MODE_SIGNAL,yy) ;
         haClose = iStochastic(NULL,prd,5,3,3,0,PRICE_CLOSE,MODE_MAIN,yy) ;
         if (tf==4)
         {
         haOpen = iStochastic(NULL,prd,15,3,3,0,PRICE_CLOSE,MODE_SIGNAL,yy) ;
         haClose = iStochastic(NULL,prd,15,3,3,0,PRICE_CLOSE,MODE_MAIN,yy) ;
         }
         
         switch (tf)
         {  case 1: buf1_down[i]=EMPTY_VALUE;buf1_up[i]=EMPTY_VALUE;  if (haOpen>=haClose)  buf1_down[i] = 1;           else buf1_up[i] = 1;           break;
            case 2: buf2_down[i]=EMPTY_VALUE;buf2_up[i]=EMPTY_VALUE; if (haOpen>=haClose)  buf2_down[i] = 1 + Gap * 1; else buf2_up[i] = 1 + Gap * 1; break;
            case 3: buf3_down[i]=EMPTY_VALUE;buf3_up[i]=EMPTY_VALUE; if (haOpen>=haClose)  buf3_down[i] = 1 + Gap * 2; else buf3_up[i] = 1 + Gap * 2; break;
            case 4: buf4_down[i]=EMPTY_VALUE;buf4_up[i]=EMPTY_VALUE; if (haOpen>=haClose)  buf4_down[i] = 1 + Gap * 3; else buf4_up[i] = 1 + Gap * 3; break;
         }
      }
   }

   return(0);
  }
  
  
  
//+------------------------------------------------------------------+
void getPeriod()
{
   switch(Period()) 
      {
         case 1: 
            Period_1=5; Period_2=30; Period_3=60; Period_4=60;
            break;
         case 5: 
            Period_1=5; Period_2=30; Period_3=60; Period_4=60;
            break;
         case 15: 
            Period_1=15; Period_2=30; Period_3=60; Period_4=240;
            break;
         case 30: 
            Period_1=30; Period_2=60; Period_3=240; Period_4=1440;
            break;
         case 60: 
            Period_1=60; Period_2=240; Period_3=1440; Period_4=10080;
            break;
         case 240: 
            Period_1=240; Period_2=1440; Period_3=10080; Period_4=43200;
            break;
         case 1440: 
            Period_1=1440; Period_2=10080; Period_3=43200; Period_4=43200;
            break;
         case 10080: 
            Period_1=10080; Period_2=43200; Period_3=43200; Period_4=43200;
            break;
         case 43200: 
            Period_1=43200; Period_2=43200; Period_3=43200; Period_4=43200;
            break;
         
      }
}

string tf2txt(int tf)
{
   if (tf == PERIOD_M1)    return("M1");
   if (tf == PERIOD_M5)    return("M5");
   if (tf == PERIOD_M15)   return("M15");
   if (tf == PERIOD_M30)   return("M30");
   if (tf == PERIOD_H1)    return("H1");
   if (tf == PERIOD_H4)    return("H4");
   if (tf == PERIOD_D1)    return("D1");
   if (tf == PERIOD_W1)    return("W1");
   if (tf == PERIOD_MN1)   return("MN");
   
   return("??");
}


/*bool NewBar()
{
   static datetime dt = 0;
   
   if (Time[0] != dt)
   {
      dt = Time[0];
      
      return(true);
   }
   return(false);
}
*/

Similar scripts

MTF_MegaTrend_Bar_4TFNextM2

This indicator aggregates and visualizes simultaneous trend signals from four distinct timeframes to provide a multi-dimensional perspective on market direction.

N4_TF_HAS_Bar

This indicator visualizes synchronized trend direction across four distinct timeframes by comparing smoothed Heiken Ashi open and close values.

N4 TF HAS Bar

This indicator visually aggregates smoothed Heiken Ashi momentum signals across four concurrent timeframes to identify aligned trend directions.

MFCS 4TF MACD SLOPE #2_002

This indicator visualizes the directional trajectory of the MACD main line across four distinct temporal horizons simultaneously to identify multi-layered trend confluence.

MFCS 4TF MACD SLOPE #2

This indicator visualizes the instantaneous direction of the MACD main line across four distinct timeframes simultaneously to identify concurrent trend momentum.

MTF_4TF_Supertrend_BarM

This indicator synchronizes and visualizes Supertrend trend directions across four concurrent higher-timeframes to identify multi-layer bullish or bearish alignment.

MTF_BH_Ergodic_4TFBars_ADM

This indicator synchronizes directional bias across four distinct timeframes by calculating nested moving averages on ergodic price mean values.

MTF_4TF_Supertrend_BarM1

This indicator synchronizes and overlays directional signals from four distinct timeframes simultaneously to visualize trend alignment across a multi-layered hierarchy.

#MTF_SuperTrendBar

This indicator visualizes concurrent bullish and bearish sentiment across four distinct timeframes by monitoring the Commodity Channel Index (CCI) thresholds.

#MTF Forex freedom Bar_001

This indicator aggregates and visualizes real-time trend sentiment across four synchronized timeframes by monitoring the positive and negative crossovers of the Commodity Channel Index (CCI).

#MTF Forex freedom Bar

Comments