LRSF - TMS Expert Advisor

Quoting jansb000

Disliked

Welcome, I used to post updates of my little Expert Advisor in the Trading Made Simple forum. However as I forsee that I will have several versions to go before it turns into a useful EA that one can trust with a real account I decided to start this thread to make it easy for everyone to follow my progres and to add comments to this specific take on Trading Made Simple. * Currently not able to upload files

Ignored

Quoting emmanuel7788

Disliked

{quote}see Tipster thread.

Ignored

Quoting jansb000

Disliked

{quote} Thanks for your comments. I never saw the Tipster's Trade Manager before. But it looks very good. I will study this thread next week (as I finally have a week off work). Later this weekend I will post here my plan for how I plan to proceed with my expert advisor. I will definitely include MEME and the use of SR-lines in a similar way that RickM has recently explained in the TMS forum. It's no coincidence that I programmed that SR-Lines tool that I posted in the TMS forum. That tool stores SR-Lines in a format that I can use in my EA. Cheers...

Ignored

* 15-09-2017 Version 1.10
* - Using the class cl_symbol where possible.
* - Better messages on screen about status.
* - No new orders after 18:00 on friday.
* - Close positive orders on friday after 23:50.
* - Some classes are now suitable for multi-curency and multi-timeframe
*   operation. This is needed if we want this program to run on a single
*   instance but still trade multiple currencies.
* - Exit trade when we are under 3 pips profit and the MA10 on M1 is against us.
* - Make use of extra ma_fast and ma_slow optional.
* - Set BE SL when the price reaches BE trigger. The old algo would wait
*   for the current bar to finish and then set BE to the LOW of the previous bar
*   (the one just completed) if that would be above the open-price.
* - Made PAC-check a separate function.
* - Made MA-check a separate function.
* - Redesigned code to check the conditions from the TDI.

/** before
  * ------
  * This function returns the part of a string BEFORE a certain
  * search pattern. If the pattern is not found then the whole
  * string s is returned.
  *
  * s   The string to search
  * pat The pattern to search for
  * pos The position to start searching
  */
string strBefore(const string &s, const string &pat, const int pos = 0) {
    int it = StringFind(s, pat, pos);
    //if (it <= StringLen(s))
    if (it > -1)
      return strMid(s, 0, it);
    else
      return s;
        
}
string strBefore(const string &s, const char c, const int pos = 0) {
   string s_pat;
   StringInit(s_pat,1,c);
   return strBefore(s,s_pat,pos);
}
    
/** after
  * -----
  * This function returns the part of a string AFTER a certain
  * search pattern. If the pattern is not found then the empty
  * string s is returned.
  *
  * s   The string to search
  * pat The pattern to search for
  * pos The position to start searching
  */
string strAfter(const string &s, const string &pat, const int pos = 0) {
   int    it;
   string x = "";    
   int slen = StringLen(s);
   int plen = StringLen(pat);
   it = StringFind(s, pat, pos);
   if ( it > -1)
      x = strMid(s, it + plen, slen - it - plen);
   return x;    
}
string strAfter(const string &s, const char c, int pos = 0) {
   string s_key;
   StringInit(s_key,1,c);
   return strAfter(s,s_key,pos);
}

//+------------------------------------------------------------------+
//|                                                    cl_symbol.mqh |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, JANSB000"
#property link      "https://www.forexfactory.com/showthread.php?p=10597594#post10597594"
#property version   "1.00"
#property strict
//+------------------------------------------------------------------+
//| This class is suited for a future translation to MT5.  
//+------------------------------------------------------------------+
class cl_symbol {
   private:  
      string _symbol;    // Symbol
      double _stoplevel; // Stop level corrected for 3/5 digit brokers
      double _point;     // Point corrected for 3/5 digit brokers
        
    public:
      cl_symbol(const string i_sym);
      
      string get_symbol()    const { return _symbol; }
      double get_bid()       const { return MarketInfo(_symbol,MODE_BID); }
      double get_ask()       const { return MarketInfo(_symbol,MODE_ASK); }      
      double get_lotsize()   const { return MarketInfo(_symbol,MODE_LOTSIZE); }
      double get_lotstep()   const { return MarketInfo(_symbol,MODE_LOTSTEP); }
      double get_tickvalue() const { return MarketInfo(_symbol,MODE_TICKVALUE); }
      double get_ticksize()  const { return MarketInfo(_symbol,MODE_TICKSIZE); }      
      double get_basepoint() const { return MarketInfo(_symbol,MODE_POINT); }          
      int    get_digits()    const { return (int)MarketInfo(_symbol,MODE_DIGITS); }          
      double get_stoplevel() const { return _stoplevel; }  
      double get_point()     const { return _point; }
      
      double get_volume_min() const { return SymbolInfoDouble(_symbol,SYMBOL_VOLUME_MIN); }
      double get_volume_max() const { return SymbolInfoDouble(_symbol,SYMBOL_VOLUME_MAX); }
      
      double get_spread()    const;
          
      double normpoint() const;
      double pointvalue() const;
      void   get_infotick(MqlTick &tick) { SymbolInfoTick(_symbol, tick); }
      void   update(const string i_symbol);          
};
cl_symbol::cl_symbol(const string i_sym) {
   update(i_sym);
}
double cl_symbol::get_spread() const {
   double lv_basespread = MarketInfo(_symbol, MODE_SPREAD);
   int    lv_digits     = get_digits();
   if ( lv_digits == 3 || lv_digits == 5 )
      return (lv_basespread /= 10);
   else
      return lv_basespread;  
}
// === update
// Update and set those parameters that will not change or with a vary
// low frequency. The update should be executed during initialisation
// and then once per minute to keep it up to date.
void cl_symbol::update(const string i_symbol) {
   _symbol    = i_symbol;
   int lv_digits  = get_digits();
 
   // Calculate the normalised stoplevel
   double lv_stplvl = MarketInfo(_symbol,MODE_STOPLEVEL);
   if ( lv_digits == 3 || lv_digits == 5 )
      _stoplevel = lv_stplvl /= 10;
   else
      _stoplevel = lv_stplvl;
      
   double lv_bpoint = get_basepoint();
   if( lv_digits == 3 || lv_digits == 5 ) {
      _point = lv_bpoint * 10.0;      
   } else {
      _point = lv_bpoint;
   }      
}
 
// === pointvalue
// This method calculates the value of a one point move for 1 lot.
double cl_symbol::pointvalue() const {
   double t_value = get_tickvalue();
   double t_size  = get_ticksize();  
   double p_size  = get_point();
   return t_value * (p_size / t_size); // Not Point.  
}
  
cl_symbol gSymbol(_Symbol); //Global symbol parameters

Quoting fxenthusiast

Disliked

Happy New Year! I just came across this thread just now. I'm interested in this EA and I think it has a lot of potential. By the way, may I know what indicators to be attached to the chart in order for the EA to function?

Ignored

Quoting pamc

Disliked

The Long and Winding Road. Putting EA's together seems so so complicated. Good luck with this project and Happy New Year

Ignored

Quoting Abhimanyu

Disliked

I am getting the following errors. I have tdi indicator in /expert/indicator folder. 2018.01.01 09:26:52.014 GBPUSD,M5: 74314 tick events (75314 bars, 149622 bar states) processed in 0:00:15.928 (total time 0:00:18.939) 2018.01.01 09:26:52.013 2017.12.29 23:59:59 cannot open file 'C:\Users\medcenter\AppData\Roaming\MetaQuotes\Terminal\8E768FE62C7F3F1D539F3B0724A84FDA\MQL4\indicators\bim\tms\TradersDynamicIndex.ex4' [3] 2018.01.01 09:26:52.012 2017.12.29 23:59:59

Ignored