TSD-v11-MT4-JB-MACD(27JUL05)

Download script
Profit factor:
333.52

TDSGlobal Trading Logic Overview

This script is designed to automate trading based on Alexander Elder’s Triple Screen System. It operates primarily on weekly charts and uses a multi-layered approach to filter market trends before executing trades.

Core Strategy Components

The logic relies on three primary technical indicators to determine market direction and entry points:

  1. Weekly Trend Analysis: The script monitors the MACD (Moving Average Convergence Divergence) and the OsMA (Oscillator Moving Average) on a weekly timeframe. It checks if these indicators are moving upward or downward to establish the broad trend.
  2. Daily Force: It utilizes a "Force" indicator on a daily basis to measure immediate momentum. It looks for specific bullish or bearish pressure to confirm that the short-term momentum aligns with the larger trend.
  3. Time-Based Filtering: To prevent "collisions" (multiple trades opening at the exact same millisecond across different currency pairs), the script includes a unique scheduling system. It only allows orders to be placed during specific minute windows tailored to individual currency pairs (e.g., USDCHF, GBPUSD, EURUSD).

Trade Execution Logic

The script follows a specific set of rules to enter and manage positions:

1. Entry Conditions

  • Buy Orders: The system looks for a situation where the weekly trend is bullish, but the daily "Force" indicates a bearish pull-back (a common setup for buying a dip). If met, it places a Buy Stop order slightly above the previous candle's high.
  • Sell Orders: Conversely, it looks for a bullish weekly trend paired with a bearish daily force (or vice versa depending on direction) to place a Sell Stop order below the previous candle's low.
  • Price Buffer: The script ensures that entry orders are placed at a minimum distance (16 pips) from the current market price to avoid instant execution during high volatility.

2. Pending Order Management

Once an order is placed but not yet triggered, the script actively manages it:

  • Cancellation: If the trend direction reverses while a pending order is active, the script will automatically delete the opposite-side order.
  • Dynamic Adjustment: If the market price moves against the pending order and creates a new "low" (for buys) or "high" (for sells) relative to previous candles, the script will move the pending order's entry price to stay relevant to the current price action.

3. Active Trade Management

Once a trade is live, the script employs two main management tools:

  • Take Profit: A fixed target is set at the time of entry to lock in gains.
  • Trailing Stop: The script includes a trailing stop mechanism. As the price moves in favor of the trade, the "Stop Loss" automatically moves forward to "lock in" profits, ensuring that a winning trade doesn't turn into a loss if the market suddenly reverses.

Summary for Users

The script acts as an automated "trend follower." It waits for the weekly trend to be clear, looks for a specific type of price pull-back on the daily chart, and then places "trap" orders (Buy Stops/Sell Stops) at key price levels. Once triggered, it protects your profits using a trailing stop while monitoring for trend reversals to cancel any remaining pending orders.

Orders Execution
Checks for the total of open ordersIt automatically opens orders when conditions are reachedIt can change open orders parameters, due to possible stepping strategy
Indicators Used
MACD HistogramMoving Average of OscillatorForce index
21 Views
4 Downloads
0 Favorites
TSD-v11-MT4-JB-MACD(27JUL05) 
/*-----------------------------+
|			       |
| Shared by www.Aptrafx.com    |
|			       |
+------------------------------*/

/*[[
	Name := TDSGlobal
	Author := Copyright © 2005 Bob O'Brien / Barcode
	Link := 
	Notes := Based on Alexander Elder's Triple Screen system. To be run only on a Weekly chart.
	Lots := 1
	Stop Loss := 0
	Take Profit := 100
	Trailing Stop := 60
]]*/
//+------------------------------------------------------------------+
//|  External Variables                                              |
//+------------------------------------------------------------------+

extern int Lots = 1;
extern int TakeProfit = 100;
extern int Stoploss = 0;
extern int TrailingStop = 60;	
extern int Slippage=5;			// Slippage
extern int StopYear=2005;
extern int MM=0,Leverage=1,AcctSize=10000;

int BuyEntryOrderTicket=0,SellEntryOrderTicket=0,cnt=0,total=0;

double MacdCurrent=0, MacdPrevious=0, MacdPrevious2=0, Direction=0, OsMAPrevious=0, OsMAPrevious2=0, OsMADirection=0;

double newbar=0,PrevDay=0,PrevMonth=0,PrevYear=0,PrevCurtime=0;

double PriceOpen=0;								// Price Open


bool First=True;

double TradesThisSymbol=0;
double ForcePos=0, ForceNeg=0, Force=0,NewPrice=0;
double StartMinute1=0,EndMinute1=0,StartMinute2=0,EndMinute2=0,StartMinute3=0,EndMinute3=0;
double StartMinute4=0,EndMinute4=0,StartMinute5=0,EndMinute5=0,StartMinute6=0,EndMinute6=0;
double StartMinute7=0,EndMinute7=0,DummyField=0;

int start()
{

Comment("TSD for MT4 ver beta 0.2 - DO NOT USE WITH REAL MONEY YET",
        "\n",
        "\n","Weekly MacdPrevious = ",MacdPrevious,"    Weekly OsMAPrevious = ",OsMAPrevious,
        "\n","Weekly MacdPrevious2 = ",MacdPrevious2,"    Weekly OsMAPrevious2 = ",OsMAPrevious2,
        "\n","Weekly Direction = ",Direction,"    Weekly OsMADirection = ",OsMADirection,
        "\n",
        "\n","Daily Force = ",Force,
        "\n","Is Daily Force Bullish = ",ForcePos,
        "\n","Is Daily Force Bearish = ",ForceNeg,
        "\n",
        "\n","Total Orders = ",total,
        "\n","Trades this Symbol(",Symbol(),") = ",TradesThisSymbol,
        "\n",
        "\n","New Bar Time is ",TimeToStr(newbar),
        "\n",
        "\n","Daily High[1] = ",High[1],
        "\n","Daily High[2] = ",High[2],
        "\n","Daily Low[1] = ",Low[1],
        "\n","Daily Low[2] = ",Low[2],
        "\n",
        "\n","Current Ask Price + 16 pips = ",Ask+(16*Point),
        "\n","Current Bid Price - 16 pips = ",Bid-(16*Point));
        
        
total=OrdersTotal();
     TradesThisSymbol=0;
	  for(cnt=0;cnt<total;cnt++)
     { 
         OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
	      
	      if(OrderSymbol()==Symbol())
	      {
	        TradesThisSymbol ++;
	      } // close for if(OrderSymbol()==Symbol())
	  } // close for for(cnt=0;cnt<total;cnt++)        
        
        
        
        
        

     
	  MacdPrevious  = iMACD(NULL,10080,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
	  MacdPrevious2 = iMACD(NULL,10080,12,26,9,PRICE_CLOSE,MODE_MAIN,2);
	  
	  OsMAPrevious  = iOsMA(NULL,10080,12,26,9,PRICE_CLOSE,1);
	  OsMAPrevious2 = iOsMA(NULL,10080,12,26,9,PRICE_CLOSE,2);

     Force = iForce(NULL,1440,2,MODE_EMA,PRICE_CLOSE,1); 
     ForcePos = iForce(NULL,1440,2,MODE_EMA,PRICE_CLOSE,1) > 0;
	  ForceNeg = iForce(NULL,1440,2,MODE_EMA,PRICE_CLOSE,1) < 0;

	  
	  if (MacdPrevious > MacdPrevious2) Direction = 1;
	  if (MacdPrevious < MacdPrevious2) Direction = -1;
	  if (MacdPrevious == MacdPrevious2) Direction = 0;
	  
	  if (OsMAPrevious > OsMAPrevious2) OsMADirection = 1;
	  if (OsMAPrevious < OsMAPrevious2) OsMADirection = -1;
	  if (OsMAPrevious == OsMAPrevious2) OsMADirection = 0;
	  
	            
     
	  
// Select a range of minutes in the day to start trading based on the currency pair.
// This is to stop collisions occurring when 2 or more currencies set orders at the same time.

if(Symbol() == "USDCHF")
{
    StartMinute1 = 0;
	EndMinute1   = 1;
    StartMinute2 = 8;
	EndMinute2   = 9;
    StartMinute3 = 16;
	EndMinute3   = 17;
    StartMinute4 = 24;
	EndMinute4   = 25;
    StartMinute5 = 32;
	EndMinute5   = 33;
    StartMinute6 = 40;
	EndMinute6   = 41;
    StartMinute7 = 48;
	EndMinute7   = 49;
} // close for if(Symbol() == "USDCHF")
if(Symbol() == "GBPUSD")
{  
    StartMinute1 = 2;
	EndMinute1   = 3;
    StartMinute2 = 10;
	EndMinute2   = 11;
    StartMinute3 = 18;
	EndMinute3   = 19;
    StartMinute4 = 26;
	EndMinute4   = 27;
    StartMinute5 = 34;
	EndMinute5   = 35;
    StartMinute6 = 42;
	EndMinute6   = 43;
    StartMinute7 = 50;
	EndMinute7   = 51;
} // close for if(Symbol() == "GBPUSD")
if(Symbol() == "USDJPY")
{
    StartMinute1 = 4;
	EndMinute1   = 5;
    StartMinute2 = 12;
	EndMinute2   = 13;
    StartMinute3 = 20;
	EndMinute3   = 21;
    StartMinute4 = 28;
	EndMinute4   = 29;
    StartMinute5 = 36;
	EndMinute5   = 37;
    StartMinute6 = 44;
	EndMinute6   = 45;
    StartMinute7 = 52;
	EndMinute7   = 53;
} //close for if(Symbol() == "USDJPY")
if(Symbol() == "EURUSD")
{
    StartMinute1 = 6;
	EndMinute1   = 7;
    StartMinute2 = 14;
	EndMinute2   = 15;
    StartMinute3 = 22;
	EndMinute3   = 23;
    StartMinute4 = 30;
	EndMinute4   = 31;
    StartMinute5 = 38;
	EndMinute5   = 39;
    StartMinute6 = 46;
	EndMinute6   = 47;
    StartMinute7 = 54;
	EndMinute7   = 59;
} // close for if(Symbol() == "EURUSD")



if( (Minute() >= StartMinute1 && Minute() <= EndMinute1) ||
   (Minute() >= StartMinute2 && Minute() <= EndMinute2) ||
   (Minute() >= StartMinute3 && Minute() <= EndMinute3) ||
   (Minute() >= StartMinute4 && Minute() <= EndMinute4) ||
   (Minute() >= StartMinute5 && Minute() <= EndMinute5) ||
   (Minute() >= StartMinute6 && Minute() <= EndMinute6) ||
   (Minute() >= StartMinute7 && Minute() <= EndMinute7) )
{
	DummyField = 0; // dummy statement because MT will not allow me to use a continue statement
} // close for LARGE if statement
else return(0);

/////////////////////////////////////////////////
//  Process the next bar details
/////////////////////////////////////////////////

if (newbar != Time[0]) 
{
	 newbar        = Time[0];
	 
	 if(TradesThisSymbol < 1) 
	 {
	   
	   if(Direction == 1 && ForceNeg)
		{
			PriceOpen = High[1] + 1 * Point;		// Buy 1 point above high of previous candle
			if(PriceOpen > (Ask + 16 * Point))  // Check if buy price is a least 16 points > Ask
			{
				BuyEntryOrderTicket=OrderSend(Symbol(),OP_BUYSTOP,Lots,PriceOpen,Slippage,Low[1] - 1 * Point,PriceOpen + TakeProfit * Point,"Buy Entry Order placed at "+CurTime(),0,0,Green);
				return(0);

			} // close for if(PriceOpen > (Ask + 16 * Point))
			else
			{
			   NewPrice = Ask + 16 * Point;
				BuyEntryOrderTicket=OrderSend(Symbol(),OP_BUYSTOP,Lots,NewPrice,Slippage,Low[1] - 1 * Point,NewPrice + TakeProfit * Point,"Buy Entry Order placed at "+CurTime(),0,0,Green);
				return(0);
			} // close for else statement
	   } // close for if(Direction == 1 && ForceNeg)
     
     
     if(Direction == -1 && ForcePos)
     {
         PriceOpen = Low[1] - 1 * Point;
			if(PriceOpen < (Bid - 16 * Point)) // Check if buy price is a least 16 points < Bid
			{
				SellEntryOrderTicket=OrderSend(Symbol(),OP_SELLSTOP,Lots,PriceOpen,Slippage,High[1] + 1 * Point,PriceOpen - TakeProfit * Point,"Sell Entry Order placed at "+CurTime(),0,0,Green);
				return(0);
			} // close for if(PriceOpen < (Bid - 16 * Point))
			else
			{
				NewPrice = Bid - 16 * Point;
				SellEntryOrderTicket=OrderSend(Symbol(),OP_SELLSTOP,Lots,NewPrice,Slippage,High[1] + 1 * Point,NewPrice - TakeProfit * Point,"Sell Entry Order placed at "+CurTime(),0,0,Green);
            return(0);			
			} // close for else statement

      } // close for if(Direction == -1 && ForcePos)
    } //Close of if(TradesThisSymbol < 1)


/////////////////////////////////////////////////
//  Pending Order Management
/////////////////////////////////////////////////

if(TradesThisSymbol > 0)
	{
      total=OrdersTotal();
      for(cnt=0;cnt<total;cnt++)
  	   { 
  	      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);

         if(OrderSymbol()==Symbol() && OrderType()==OP_BUYSTOP)
         {

				if(Direction == -1)
  				{ 
  				   OrderDelete(OrderTicket());
	        		return(0); 
				} // close for if(Direction == -1)
			} // close for if(OrderSymbol()==Symbol() && OrderType()==OP_BUYSTOP)

         if(OrderSymbol()==Symbol() && OrderType()==OP_SELLSTOP)
         {

				if(Direction == 1)
  				{ 
  				   OrderDelete(OrderTicket());
	        		return(0); 
				} //close for if(Direction == 1)
			} //close for if(OrderSymbol()==Symbol() && OrderType()==OP_SELLSTOP)


         if(OrderSymbol()==Symbol() && OrderType()==OP_BUYSTOP)
   	   {
				if(High[1] < High[2])
	  			{ 
					if(High[1] > (Ask + 16 * Point))
	  				{ 
	  	   		  OrderModify(OrderTicket(),High[1] + 1 * Point,Low[1] - 1 * Point,OrderTakeProfit(),0,Cyan);
                 return(0);					
	  				} //close for if(High[1] > (Ask + 16 * Point))
	  				else
	  				{
	  				  OrderModify(OrderTicket(),Ask + 16 * Point,Low[1] - 1 * Point,OrderTakeProfit(),0,Cyan);
                 return(0);					
	  				
	  				} //close for else statement
	  			} //close for if(High[1] < High[2])
	  		} //close for if(OrderSymbol()==Symbol() && OrderType()==OP_BUYSTOP)
	  
	      if(OrderSymbol()==Symbol() && OrderType()==OP_SELLSTOP)
   		{
				if(Low[1] > Low[2])
				{ 
					if(Low[1] < (Bid - 16 * Point))
					{
		   		  OrderModify(OrderTicket(),Low[1] - 1 * Point,High[1] + 1 * Point,OrderTakeProfit(),0,Cyan);
                 return(0);					
					} // close for if(Low[1] < (Bid - 16 * Point))
					else
					{
					  OrderModify(OrderTicket(),Bid - 16 * Point,High[1] + 1 * Point,OrderTakeProfit(),0,Cyan);
                 return(0);					
      
					} //close for else statement
				} //close for if(Low[1] > Low[2])
			} //close for if(OrderSymbol()==Symbol() && OrderType()==OP_SELLSTOP)
		} // close for for(cnt=0;cnt<total;cnt++)
	} // close for if(TradesThisSymbol > 0)
} // close for if (newbar != Time[0]) 

/////////////////////////////////////////////////
//  Stop Loss Management
/////////////////////////////////////////////////
if(TradesThisSymbol > 0)
{
  total=OrdersTotal();
  for(cnt=0;cnt<total;cnt++)
  { 
     OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);

     if(OrderSymbol()==Symbol() && OrderType()==OP_BUY)
    	{
			if(Ask-OrderOpenPrice() > (TrailingStop * Point))
  			{ 
				if(OrderStopLoss() < (Ask - TrailingStop * Point))
				{ 
	   		   OrderModify(OrderTicket(),OrderOpenPrice(),Ask - TrailingStop * Point,Ask + TakeProfit * Point,0,Cyan);
               return(0);					

				} // close for if(OrderStopLoss() < (Ask - TrailingStop * Point))
			} // close for if(Ask-OrderOpenPrice() > (TrailingStop * Point))
		} // close for if(OrderSymbol()==Symbol() && OrderType()==OP_BUY)
	
     if(OrderSymbol()==Symbol() && OrderType()==OP_SELL)
		{
			if(OrderOpenPrice() - Bid > (TrailingStop * Point))
			{ 
				if(OrderStopLoss() > (Bid + TrailingStop * Point))
				{ 
	   		   OrderModify(OrderTicket(),OrderOpenPrice(),Bid + TrailingStop * Point,Bid - TakeProfit * Point,0,Cyan);
               return(0);					

				} // close for if(OrderStopLoss() > (Bid + TrailingStop * Point))
			} // close for if(OrderOpenPrice() - Bid > (TrailingStop * Point))
		 } // close for if(OrderSymbol()==Symbol() && OrderType()==OP_SELL)
  	  } // close for for(cnt=0;cnt<total;cnt++)
   } // close for if(TradesThisSymbol > 0)
  
	

//return(0);

} // close for start

Profitability Reports

PERFORMANCE BY SYMBOL

Expected payoff

Average expected payoff across the available backtests for each symbol.

Positive Negative
13 reports
EUR/USD Jul 2025 - Sep 2025
4329.61
Total Trades 449
Won Trades 275
Lost trades 174
Win Rate 61.25 %
Expected payoff 147972.91
Gross Profit 66455186.00
Gross Loss -15349.00
Total Net Profit 66439837.00
-100%
-50%
0%
50%
100%
View Full Report
USD/CAD Oct 2024 - Jan 2025
0.98
Total Trades 166
Won Trades 90
Lost trades 76
Win Rate 54.22 %
Expected payoff -0.71
Gross Profit 6213.74
Gross Loss -6330.95
Total Net Profit -117.21
-100%
-50%
0%
50%
100%
View Full Report
GBP/USD Oct 2024 - Jan 2025
0.68
Total Trades 214
Won Trades 135
Lost trades 79
Win Rate 63.08 %
Expected payoff -14.98
Gross Profit 6771.00
Gross Loss -9976.00
Total Net Profit -3205.00
-100%
-50%
0%
50%
100%
View Full Report
USD/JPY Jul 2025 - Sep 2025
0.68
Total Trades 468
Won Trades 311
Lost trades 157
Win Rate 66.45 %
Expected payoff -12.34
Gross Profit 12041.39
Gross Loss -17815.71
Total Net Profit -5774.32
-100%
-50%
0%
50%
100%
View Full Report
USD/CHF Jul 2025 - Sep 2025
0.66
Total Trades 351
Won Trades 181
Lost trades 170
Win Rate 51.57 %
Expected payoff -17.11
Gross Profit 11526.27
Gross Loss -17532.58
Total Net Profit -6006.31
-100%
-50%
0%
50%
100%
View Full Report
USD/CAD Jul 2025 - Sep 2025
0.65
Total Trades 200
Won Trades 82
Lost trades 118
Win Rate 41.00 %
Expected payoff -12.65
Gross Profit 4605.28
Gross Loss -7135.03
Total Net Profit -2529.75
-100%
-50%
0%
50%
100%
View Full Report
NZD/USD Oct 2024 - Jan 2025
0.63
Total Trades 141
Won Trades 58
Lost trades 83
Win Rate 41.13 %
Expected payoff -20.94
Gross Profit 5064.00
Gross Loss -8017.00
Total Net Profit -2953.00
-100%
-50%
0%
50%
100%
View Full Report
AUD/USD Jul 2025 - Sep 2025
0.51
Total Trades 216
Won Trades 71
Lost trades 145
Win Rate 32.87 %
Expected payoff -22.20
Gross Profit 4911.00
Gross Loss -9706.00
Total Net Profit -4795.00
-100%
-50%
0%
50%
100%
View Full Report
GBP/AUD Oct 2025 - Feb 2026
0.50
Total Trades 309
Won Trades 148
Lost trades 161
Win Rate 47.90 %
Expected payoff -29.77
Gross Profit 9323.36
Gross Loss -18523.76
Total Net Profit -9200.40
-100%
-50%
0%
50%
100%
View Full Report
GBP/CAD Oct 2025 - Feb 2026
0.34
Total Trades 214
Won Trades 77
Lost trades 137
Win Rate 35.98 %
Expected payoff -42.99
Gross Profit 4725.87
Gross Loss -13925.99
Total Net Profit -9200.12
-100%
-50%
0%
50%
100%
View Full Report
AUD/USD Oct 2025 - Feb 2026
0.22
Total Trades 245
Won Trades 55
Lost trades 190
Win Rate 22.45 %
Expected payoff -40.02
Gross Profit 2796.00
Gross Loss -12602.00
Total Net Profit -9806.00
-100%
-50%
0%
50%
100%
View Full Report
AUD/USD Oct 2024 - Jan 2025
0.18
Total Trades 132
Won Trades 0
Lost trades 0
Win Rate 0.00 %
Expected payoff -74.49
Gross Profit 2226.00
Gross Loss -12059.00
Total Net Profit -9833.00
-100%
-50%
0%
50%
100%
View Full Report
GBP/AUD Jul 2025 - Sep 2025
0.18
Total Trades 118
Won Trades 16
Lost trades 102
Win Rate 13.56 %
Expected payoff -78.60
Gross Profit 2072.03
Gross Loss -11346.28
Total Net Profit -9274.25
-100%
-50%
0%
50%
100%
View Full Report

Similar scripts

TSD-v11-MT4-JB-MACD

This MetaTrader code implements a trading strategy based on Alexander Elder's Triple Screen system, using weekly MACD and OSMA for trend direction and daily Force Index for trade entry signals, placing pending orders during specific time slots and managing them with trailing stops.

TSD-v11-MT4-JB-OsMA beta 0.1

TSD-v11-MT4-JB-OsMA beta 0.3

An advanced multi-timeframe strategy that synchronizes weekly momentum indicators with daily force dynamics to execute precision break-out orders during specific high-liquidity windows.

TSD-v11-MT4-JB-OsMA Jan 4 hour

This algorithm executes pending orders by identifying opposing signals between weekly MACD/OSMA trend directions and daily Force Indicator momentum, while utilizing time-specific execution windows for various currency pairs.

TSD_TR_01 2_midweekswitch

This EA executes trades based on a multi-timeframe confluence of MACD trend direction, OSMA momentum shifts, and Williams %R overbought/oversold levels to trigger breakout pending orders.

TSD-v12-MT4-JB-MACD

TSD-v12-MT4-EF-MACD

This MetaTrader EA implements a modified Triple Screen trading strategy using weekly MACD/OsMA for trend direction and daily Williams Percent Range for overbought/oversold conditions, placing pending orders and managing trailing stops during specified time windows.

TSD-v11-MT4-JB-OsMA

TSD-v11-MT4-JB-OsMA(2)

Executes pending limit orders based on conflicting signals between weekly trend indicators and daily momentum oscillators to capture mean reversion entries.

TSD_TR_0[1].2_midweekswitch

TSD_TR_0[1].2_midweekplus

This automated strategy synchronizes daily Williams Percent Range (WPR) extremes with weekly MACD and OsMA trends to execute price action break-out orders.

Comments