EALeague_Free/EALeague_Free_Core.mqh

<EFBFBD><EFBFBD>//+------------------------------------------------------------------+
//|                                               EALeague Free Core |
//|                                     Copyright 2019, George March |
//+------------------------------------------------------------------+
/*
!>25B=8: =0 >A=>25 >4=>9 D01@8:8 838 "! - O4@>.
*/

// E>4=K5 ?0@0<5B@K
input ulong Magic = 0;
input double RiskPercent = 0.0;

// 1JO2;O5< 8=B5@D59A 181;8>B5:8
#include "EALeagueI\\EALeagueTradeSystemI.mqh"

// >4:;NG05< 181;8>B5:C
#ifdef __MQL5__
#import "MyLib\\EALeagueLib.ex5"
CEALeagueTradeSysemI* GetTradeSystem(ulong ulMagic,double dRiskPercent,ulong ulTSCode = NULL);
#import
#else //  __MQL5__
#import "MyLib\\EALeagueLib.ex4"
CEALeagueTradeSysemI* GetTradeSystem(ulong ulMagic,double dRiskPercent,ulong ulTSCode = NULL);
#import
#endif //  __MQL5__

// 1JO2;O5< 8=B5@D59A "!
CEALeagueTradeSysemI* ltsTradeSystem = NULL;


int OnInit()
{
 
   // >;CG05< 8=B5@D59A "!
   ltsTradeSystem = GetTradeSystem(Magic,RiskPercent,NULL);
   
   // A;8 8=B5@D59A ?>;CG8BL =5 C40;>AL - 2>72@0I05< ?@87=0: =5C40G8.
   if(ltsTradeSystem == NULL)
      return(INIT_FAILED);

   // A;8 8=B5@D59A ?>;CG5= CA?5H=> - 2K7K205< >1@01>BG8: A>1KB8O OnInit() C MB>3> 8=B5@D59A0
   int iRes = ltsTradeSystem.TradeSystemOnInit();
   
   return(iRes);
};

void OnDeinit(const int iReason)
{
   // A;8 8=B5@D59A B>@3>2>9 A8AB5<K 1K; CA?5H=> ?>;CG5=, 
   // K7>25< >1@01>BG8: A>1KB8O OnDeinit() MB>3> 8=B5@D59A0,
   // C40;8< 53> 8 ?@8@02=O5< =C;N.
   if(ltsTradeSystem != NULL)
      {
      ltsTradeSystem.TradeSystemOnDeinit(iReason);
      delete(ltsTradeSystem);
      ltsTradeSystem = NULL;
      };
};

void OnTick()
{
   //  DC=:F88 OnTick() 2K7>25< >1@01>BG8: MB>3> A>1KB8O C 8=B5@D59A0
   ltsTradeSystem.TradeSystemOnTick();
};