Nik_PSAR_2B
Download script
The provided script is a specialized technical analysis tool designed to identify market trends and generate trading signals based on the Parabolic Stop and Reverse (PSAR) indicator. Unlike standard versions that only look at a single timeframe, this logic is built to analyze multiple timeframes simultaneously to provide a more comprehensive view of market momentum.
Multi-Timeframe Analysis Logic
The core functionality of the script relies on its ability to "stack" data from different time horizons. Depending on your settings, the tool can monitor up to four different timeframes at once. By doing this, it attempts to confirm that a trend is consistent across short, medium, and long-term periods before suggesting a trade.
The logic follows a hierarchy:
- Highest Complexity: It can simultaneously check four timeframes to ensure maximum trend alignment.
- Adjustable Depth: You can toggle specific timeframes on or off (e.g., viewing only two or three at once), allowing you to customize how much "confirmation" is required before a signal appears.
Signal Generation Rules
The script looks for specific "flips" in the Parabolic Stop and Reverse values. The logic determines a trend change when the indicator value moves from being below the price candles to above them (or vice versa) across the active timeframes.
- Bearish Signals (Sell): The tool identifies a potential downward trend when the PSAR values across the selected timeframes move above the current price highs. It specifically looks for instances where the indicator was recently below the price but has now crossed over to the top.
- Bullish Signals (Buy): Conversely, it identifies an upward trend when the PSAR values move below the current price lows. It seeks a confirmed "flip" from above the price to underneath it.
Dynamic Feedback and Alerts
To keep the user informed, the script employs three different methods of communication:
- Visual Markers: It places specific arrows on the chart to highlight exactly where a buy or sell condition was met.
- On-Screen Comments: The tool provides real-time text on the chart, showing which timeframes are currently being analyzed and identifying their specific roles in the calculation.
- Audio/Pop-up Alerts: If enabled, the script will trigger a notification sound and window alert the moment a trend reversal is detected, ensuring you don't have to watch the screen constantly to catch a signal.
Summary of Behavior
In short, this tool acts as a "trend confirmer." Instead of reacting to every small price wiggle on a single chart, it waits for the Parabolic Stop and Reverse indicator to agree across multiple different time horizons. This multi-layered approach is designed to filter out market noise and highlight stronger, more reliable trend shifts.
Price Data Components
Indicators Used
Miscellaneous
11
Views
0
Downloads
0
Favorites
Nik_PSAR_2B
/*------------------------------------------------------------------+
| Nik_PSAR_2B.mq4.mq4 |
| Copyright © 2010 |
| basisforex@gmail.com |
+------------------------------------------------------------------*/
#property copyright "Copyright © 2010, basisforex@gmail.com"
#property link "basisforex@gmail.com"
//-----
#property indicator_chart_window
#property indicator_buffers 6
#property indicator_color1 White
#property indicator_color2 Yellow
#property indicator_color3 Blue
#property indicator_color4 Black
#property indicator_color5 Green
#property indicator_color6 Red
//-----
extern bool AlertsEnabled = true;
extern bool TF4 = true;
extern bool TF3 = true;
extern bool TF2 = true;
//-----
extern double Step = 0.02;
extern double Maximum = 0.2;
//-----
double s1[];
double s2[];
double s3[];
double s4[];
double bullish[];
double bearish[];
double sarUp[];
double sarDn[];
double alertBar;
bool sar4, sar3, sar2;
//+------------------------------------------------------------------+
int init()
{
SetIndexBuffer(0, s1);
SetIndexBuffer(1, s2);
SetIndexBuffer(2, s3);
SetIndexBuffer(3, s4);
//-----
SetIndexStyle(0, DRAW_ARROW);
SetIndexArrow(0, 159);
SetIndexStyle(1, DRAW_ARROW);
SetIndexArrow(1, 159);
SetIndexStyle(2, DRAW_ARROW);
SetIndexArrow(2, 159);
SetIndexStyle(3, DRAW_ARROW);
SetIndexArrow(3, 159);
//------
SetIndexStyle(4, DRAW_ARROW);// UP___UP___UP
SetIndexArrow(4, 233);
SetIndexBuffer(4, bullish);
//-----
SetIndexStyle(5, DRAW_ARROW);// DOWN____DOWN
SetIndexArrow(5, 234);
SetIndexBuffer(5, bearish);
//-----
return(0);
}
//+------------------------------------------------------------------+
void GetBool()
{
if(TF4 == true)
{
sar4 = true; sar3 = true; sar2 = true;
}
else if(TF3 == true && TF4 == false)
{
sar4 = false; sar3 = true; sar2 = true;
}
else if(TF2 == true && TF4 == false && TF3 == false)
{
sar4 = false; sar3 = false; sar2 = true;
}
else if(TF2 == false && TF4 == false && TF3 == false)
{
sar4 = false; sar3 = false; sar2 = false;
}
}
//+------------------------------------------------------------------+
string GetNextTF(int curTF)
{
switch(curTF)
{
case 1:
return("5=15#30");
break;
case 5:
return("15=30#60");
break;
case 15:
return("30=60#240");
break;
case 30:
return("60=240#1440");
break;
case 60:
return("240=1440#10080");
break;
case 240:
return("1440=10080#43200");
break;
}
}
//+------------------------------------------------------------------+
void AlertDn(double sar)
{
int limit;
int counted_bars=IndicatorCounted();
if(counted_bars < 0) counted_bars = 0;
if(counted_bars > 0) counted_bars--;
limit = Bars - counted_bars;
//----
for(int i = 0; i < limit ;i++)
{
if(sar >= iHigh(Symbol(),0,i))
{
if(AlertsEnabled == true && sarUp[i] == 0 && Bars > alertBar)
{
Alert("PSAR Going Down on ", Symbol(), " - ", Period(), " min");
alertBar = Bars;
}
sarUp[i] = sar;
sarDn[i] = 0;
}
}
}
//+------------------------------------------------------------------+
void AlertUp(double sar)
{
int limit;
int counted_bars = IndicatorCounted();
if(counted_bars < 0) counted_bars = 0;
if(counted_bars > 0) counted_bars--;
limit = Bars - counted_bars;
//----
for(int i = 0; i<limit ;i++)
{
if(sar <= iLow(Symbol(), 0, i))
{
if(AlertsEnabled == true && sarDn[i] == 0 && Bars > alertBar)
{
Alert("PSAR Going Up on ",Symbol(), " - ", Period(), " min");
alertBar = Bars;
}
sarUp[i] = 0;
sarDn[i] = sar;
}
}
}
//+------------------------------------------------------------------+
int start()
{
int limit;
int counted_bars = IndicatorCounted();
if(counted_bars < 0) return(-1);
if(counted_bars > 0) counted_bars--;
limit = Bars - counted_bars;
//-----
string T = GetNextTF(Period());
int tf1 = StrToDouble(StringSubstr(T, 0, StringFind(T, "=", 0)));
int tf2 = StrToDouble(StringSubstr(T, StringFind(T, "=", 0) + 1, StringFind(T, "#", 0)));
int tf3 = StrToDouble(StringSubstr(T, StringFind(T, "#", 0) + 1, StringLen(T)));
//-----
GetBool();
//-----
for(int i = limit - 1; i >= 0; i--)
{
//=============================================== __________________________________________________ sar1 & sar2 & sar3 & sar4
if(sar2 == true && sar3 == true && sar4 == true)
{
Comment(Period(), " White", "\n", tf1, " Yellow", "\n", tf2, " Blue", "\n", tf3, " Black");
s1[i] = iSAR(NULL, Period(), Step, Maximum, i);
s2[i] = iSAR(NULL, tf1, Step, Maximum, i / (tf1 / Period()));
s3[i] = iSAR(NULL, tf2, Step, Maximum, i / (tf2 / Period()));
s4[i] = iSAR(NULL, tf3, Step, Maximum, i / (tf3 / Period()));
//============================================================
if((s1[i] > High[i] && s2[i] > High[i] && s3[i] > High[i] && s4[i + 1] < Low[i + 1] && s4[i] > High[i]) ||
(s1[i] > High[i] && s2[i] > High[i] && s3[i + 1] < Low[i + 1] && s3[i] > High[i] && s4[i] > High[i]) ||
(s1[i] > High[i] && s2[i + 1] < Low[i + 1] && s2[i] > High[i] && s3[i] > High[i] && s4[i] > High[i]) ||
(s1[i + 1] < Low[i + 1] && s1[i] > High[i] && s2[i] > High[i] && s3[i] > High[i] && s4[i] > High[i]))
{
bearish[i] = s1[i] + 5 * Point;// SELL__SELL__SELL
AlertDn(s1[i]);
}
//-----
if((s1[i] < Low[i] && s2[i] < Low[i] && s3[i] < Low[i] && s4[i + 1] > High[i + 1] && s4[i] < Low[i]) ||
(s1[i] < Low[i] && s2[i] < Low[i] && s3[i + 1] > High[i + 1] && s3[i] < Low[i] && s4[i] < Low[i]) ||
(s1[i] < Low[i] && s2[i + 1] > High[i + 1] && s2[i] < Low[i] && s3[i] < Low[i] && s4[i] < Low[i]) ||
(s1[i + 1] > High[i + 1] && s1[i] < Low[i] && s2[i] < Low[i] && s3[i] < Low[i] && s4[i] < Low[i]))
{
bullish[i] = s1[i] - 5 * Point;// BUY___BUY___BUY
AlertUp(s1[i]);
}
}
//=============================================== __________________________________________________ sar1 & sar2 & sar3
else if(sar2 == true && sar3 == true && sar4 == false)
{
Comment(Period(), " White", "\n", tf1, " Yellow ", "\n", tf2, " Blue");
s1[i] = iSAR(NULL, Period(), Step, Maximum, i);
s2[i] = iSAR(NULL, tf1, Step, Maximum, i / (tf1 / Period()));
s3[i] = iSAR(NULL, tf2, Step, Maximum, i / (tf2 / Period()));
//============================================================
if((s1[i] > High[i] && s2[i] > High[i] && s3[i + 1] < Low[i + 1] && s3[i] > High[i]) ||
(s1[i] > High[i] && s2[i + 1] < Low[i + 1] && s2[i] > High[i] && s3[i] > High[i]) ||
(s1[i + 1] < Low[i + 1] && s1[i] > High[i] && s2[i] > High[i] && s3[i] > High[i]))
{
bearish[i] = s1[i] + 5 * Point;// SELL__SELL__SELL
AlertDn(s1[i]);
}
//-----
if((s1[i] < Low[i] && s2[i] < Low[i] && s3[i + 1] > High[i + 1] && s3[i] < Low[i]) ||
(s1[i] < Low[i] && s2[i + 1] > High[i + 1] && s2[i] < Low[i] && s3[i] < Low[i]) ||
(s1[i + 1] > High[i + 1] && s1[i] < Low[i] && s2[i] < Low[i] && s3[i] < Low[i]))
{
bullish[i] = s1[i] - 5 * Point;// BUY___BUY___BUY
AlertUp(s1[i]);
}
}
//=============================================== __________________________________________________ sar1 & sar2
else if(sar2 == true && sar3 == false && sar4 == false)
{
Comment(Period(), " White", "\n", tf1, " Yellow");
s1[i] = iSAR(NULL, Period(), Step, Maximum, i);
s2[i] = iSAR(NULL, tf1, Step, Maximum, i / (tf1 / Period()));
//============================================================
if((s1[i] > High[i] && s2[i + 1] < Low[i + 1] && s2[i] > High[i]) ||
(s1[i + 1] < Low[i + 1] && s1[i] > High[i] && s2[i] > High[i]))
{
bearish[i] = s1[i] + 5 * Point;// SELL__SELL__SELL
AlertDn(s1[i]);
}
//-----
if((s1[i] < Low[i] && s2[i + 1] > High[i + 1] && s2[i] < Low[i]) ||
(s1[i + 1] > High[i + 1] && s1[i] < Low[i] && s2[i] < Low[i]))
{
bullish[i] = s1[i] - 5 * Point;// BUY___BUY___BUY
AlertUp(s1[i]);
}
}
//=============================================== __________________________________________________ sar1
else if(sar2 == false && sar3 == false && sar4 == false)
{
Comment(Period(), " White");
s1[i] = iSAR(NULL, Period(), Step, Maximum, i);
//============================================================
if(s1[i + 1] < Low[i + 1] && s1[i] > High[i])
{
bearish[i] = s1[i] + 5 * Point;// SELL__SELL__SELL
AlertDn(s1[i]);
}
//-----
if(s1[i + 1] > High[i + 1] && s1[i] < Low[i])
{
bullish[i] = s1[i] - 5 * Point;// BUY___BUY___BUY
AlertUp(s1[i]);
}
}
}
//==============================================================================================================================================
return(0);
}
Comments