【徹底解説】MQL5ソースコード解体新書-MT5に標準実装されているEA「MACD Sample」編-【MQL勉強用】

//+------------------------------------------------------------------+
//|                                                  MACD Sample.mq5 |
//|                             Copyright 2000-2024, MetaQuotes Ltd. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright   "Copyright 2000-2024, MetaQuotes Ltd."
#property link        "https://www.mql5.com"
#property version     "5.50"
#property description "正常なチャートでエキスパートが動作することを確認し、"
//+------------------------------------------------------------------+
//| 必要なライブラリをインクルード                                    |
//+------------------------------------------------------------------+
#define MACD_MAGIC 1234502            // MACD専用のマジックナンバー（注文識別用）

#include <Trade\Trade.mqh>            // 取引機能クラス（CTrade）
#include <Trade\SymbolInfo.mqh>       // シンボル情報クラス（CSymbolInfo）
#include <Trade\PositionInfo.mqh>     // ポジション情報クラス（CPositionInfo）
#include <Trade\AccountInfo.mqh>      // 取引口座情報クラス（CAccountInfo）

//+------------------------------------------------------------------+
//| 入力パラメータ                                                    |
//+------------------------------------------------------------------+
input double InpLots          =0.1;   // ロット数の設定
input int    InpTakeProfit    =50;    // テイクプロフィット
input int    InpTrailingStop  =30;    // トレーリングストップレベル
input int    InpMACDOpenLevel =3;     // MACDのオープンレベル（pips単位）
input int    InpMACDCloseLevel=2;     // MACDのクローズレベル（pips単位）
input int    InpMATrendPeriod =26;    // 移動平均のトレンド期間
//---
int ExtTimeOut=10;                    // 取引操作のタイムアウト（秒単位）
//+------------------------------------------------------------------+
//| エキスパートクラス定義                                            |
//+------------------------------------------------------------------+
class CSampleExpert
  {
protected:
   double            m_adjusted_point;             // ポイント数調整後の値（小数点数対応）
   CTrade            m_trade;                      // 取引オブジェクト
   CSymbolInfo       m_symbol;                     // シンボル情報オブジェクト
   CPositionInfo     m_position;                   // ポジション情報オブジェクト
   CAccountInfo      m_account;                    // アカウント情報オブジェクト
   //--- インジケータ
   int               m_handle_macd;                // MACDインジケータのハンドル
   int               m_handle_ema;                 // 移動平均インジケータのハンドル
   //--- インジケータバッファ
   double            m_buff_MACD_main[];           // MACDインジケータのメインバッファ
   double            m_buff_MACD_signal[];         // MACDインジケータのシグナルバッファ
   double            m_buff_EMA[];                 // EMAインジケータのバッファ
   //--- インジケータデータの格納
   double            m_macd_current;               // 現在のMACD値
   double            m_macd_previous;              // 前回のMACD値
   double            m_signal_current;             // 現在のシグナル値
   double            m_signal_previous;            // 前回のシグナル値
   double            m_ema_current;                // 現在のEMA値
   double            m_ema_previous;               // 前回のEMA値
   //---
   double            m_macd_open_level;            // MACDのオープンレベル
   double            m_macd_close_level;           // MACDのクローズレベル
   double            m_traling_stop;               // トレーリングストップ値
   double            m_take_profit;                // テイクプロフィット値

public:
                     CSampleExpert(void);          // コンストラクタ
                    ~CSampleExpert(void);          // デストラクタ
   bool              Init(void);                   // 初期化関数
   void              Deinit(void);                 // 終了処理関数
   bool              Processing(void);             // メイン処理関数

protected:
   bool              InitCheckParameters(const int digits_adjust); // 初期パラメータチェック
   bool              InitIndicators(void);         // インジケータの初期化
   bool              LongClosed(void);             // ロングポジションのクローズ確認
   bool              ShortClosed(void);            // ショートポジションのクローズ確認
   bool              LongModified(void);           // ロングポジションの変更確認
   bool              ShortModified(void);          // ショートポジションの変更確認
   bool              LongOpened(void);             // ロングポジションのオープン確認
   bool              ShortOpened(void);            // ショートポジションのオープン確認
  };
//--- グローバルエキスパートオブジェクト
CSampleExpert ExtExpert;
//+------------------------------------------------------------------+
//| コンストラクタ                                                     |
//+------------------------------------------------------------------+
CSampleExpert::CSampleExpert(void) : m_adjusted_point(0),       // ポイント値の初期化
                                     m_handle_macd(INVALID_HANDLE), // MACDハンドル初期化
                                     m_handle_ema(INVALID_HANDLE),  // EMAハンドル初期化
                                     m_macd_current(0),         // MACDの初期値
                                     m_macd_previous(0),        // MACDの前回値
                                     m_signal_current(0),       // シグナルの初期値
                                     m_signal_previous(0),      // シグナルの前回値
                                     m_ema_current(0),          // EMAの初期値
                                     m_ema_previous(0),         // EMAの前回値
                                     m_macd_open_level(0),      // MACDのオープンレベル
                                     m_macd_close_level(0),     // MACDのクローズレベル
                                     m_traling_stop(0),         // トレーリングストップ値
                                     m_take_profit(0)           // テイクプロフィット値
  {
   ArraySetAsSeries(m_buff_MACD_main,true);      // MACDメインバッファの配列順序設定
   ArraySetAsSeries(m_buff_MACD_signal,true);    // MACDシグナルバッファの配列順序設定
   ArraySetAsSeries(m_buff_EMA,true);            // EMAバッファの配列順序設定
  }
//+------------------------------------------------------------------+
//| デストラクタ                                                       |
//+------------------------------------------------------------------+
CSampleExpert::~CSampleExpert(void)
  {
   //--- 必要なリソースの解放（デストラクタでは特に処理なし）
  }
//+------------------------------------------------------------------+
//| 初期化と入力パラメータのチェック                                  |
//+------------------------------------------------------------------+
bool CSampleExpert::Init(void)
  {
   //--- シンボル情報を初期化
   m_symbol.Name(Symbol());                  // 現在のシンボル名を設定
   m_trade.SetExpertMagicNumber(MACD_MAGIC); // マジックナンバーの設定
   m_trade.SetMarginMode();                  // マージンモード設定
   m_trade.SetTypeFillingBySymbol(Symbol()); // シンボルごとのフィリング設定
//--- 調整設定（小数点対応）
   int digits_adjust=1;
   if(m_symbol.Digits()==3 || m_symbol.Digits()==5)
      digits_adjust=10;
   m_adjusted_point=m_symbol.Point()*digits_adjust; // ポイント値を調整

   //--- トレーリングストップ、テイクプロフィットの値を設定
   m_macd_open_level =InpMACDOpenLevel*m_adjusted_point;
   m_macd_close_level=InpMACDCloseLevel*m_adjusted_point;
   m_traling_stop    =InpTrailingStop*m_adjusted_point;
   m_take_profit     =InpTakeProfit*m_adjusted_point;
   //--- 許容スリッページ設定
   m_trade.SetDeviationInPoints(3*digits_adjust);
   //--- 初期パラメータのチェック
   if(!InitCheckParameters(digits_adjust))
      return(false);
   //--- インジケータの初期化
   if(!InitIndicators())
      return(false);
   //--- 正常終了
   return(true);
  }
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| 入力パラメータのチェック                                          |
//+------------------------------------------------------------------+
bool CSampleExpert::InitCheckParameters(const int digits_adjust)
  {
//--- 初期データチェック
   if(InpTakeProfit * digits_adjust < m_symbol.StopsLevel()) // テイクプロフィットが停止レベルより小さい場合
     {
      printf("Take Profit must be greater than %d", m_symbol.StopsLevel()); // エラーメッセージ出力
      return(false); // チェック失敗
     }
   if(InpTrailingStop * digits_adjust < m_symbol.StopsLevel()) // トレーリングストップが停止レベルより小さい場合
     {
      printf("Trailing Stop must be greater than %d", m_symbol.StopsLevel()); // エラーメッセージ出力
      return(false); // チェック失敗
     }
//--- ロット数の確認
   if(InpLots < m_symbol.LotsMin() || InpLots > m_symbol.LotsMax()) // 許可されるロット範囲外の場合
     {
      printf("Lots amount must be in the range from %f to %f", m_symbol.LotsMin(), m_symbol.LotsMax());
      return(false); // チェック失敗
     }
   if(MathAbs(InpLots / m_symbol.LotsStep() - MathRound(InpLots / m_symbol.LotsStep())) > 1.0E-10)
     {
      printf("Lots amount is not corresponding with lot step %f", m_symbol.LotsStep()); // ロット量が不正
      return(false); // チェック失敗
     }
//--- 警告メッセージ
   if(InpTakeProfit <= InpTrailingStop) // トレーリングストップがテイクプロフィット以上の場合
      printf("Warning: Trailing Stop must be less than Take Profit"); // 警告メッセージ出力
//--- チェック成功
   return(true); // 全てのチェックが成功
  }
//+------------------------------------------------------------------+
//| インジケータの初期化                                              |
//+------------------------------------------------------------------+
bool CSampleExpert::InitIndicators(void)
  {
//--- MACDインジケータの作成
   if(m_handle_macd == INVALID_HANDLE) // ハンドルが無効な場合に新規作成
      if((m_handle_macd = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE)) == INVALID_HANDLE)
        {
         printf("Error creating MACD indicator"); // エラーを出力
         return(false); // 初期化失敗
        }
//--- EMAインジケータの作成
   if(m_handle_ema == INVALID_HANDLE) // ハンドルが無効な場合に新規作成
      if((m_handle_ema = iMA(NULL, 0, InpMATrendPeriod, 0, MODE_EMA, PRICE_CLOSE)) == INVALID_HANDLE)
        {
         printf("Error creating EMA indicator"); // エラーを出力
         return(false); // 初期化失敗
        }
//--- 初期化成功
   return(true);
  }
//+------------------------------------------------------------------+
//| ロングポジションのクローズ確認                                   |
//+------------------------------------------------------------------+
bool CSampleExpert::LongClosed(void)
  {
   bool res = false;
//--- クローズ条件の確認
   if(m_macd_current > 0)
      if(m_macd_current < m_signal_current && m_macd_previous > m_signal_previous)
         if(m_macd_current > m_macd_close_level)
           {
            //--- ポジションのクローズ
            if(m_trade.PositionClose(Symbol()))
               printf("Long position by %s to be closed", Symbol()); // クローズ成功メッセージ出力
            else
               printf("Error closing position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
            res = true; // クローズ処理完了
           }
//--- 結果を返す
   return(res);
  }
//+------------------------------------------------------------------+
//| ショートポジションのクローズ確認                                  |
//+------------------------------------------------------------------+
bool CSampleExpert::ShortClosed(void)
  {
   bool res = false;
//--- クローズ条件の確認
   if(m_macd_current < 0)
      if(m_macd_current > m_signal_current && m_macd_previous < m_signal_previous)
         if(MathAbs(m_macd_current) > m_macd_close_level)
           {
            //--- ポジションのクローズ
            if(m_trade.PositionClose(Symbol()))
               printf("Short position by %s to be closed", Symbol()); // クローズ成功メッセージ出力
            else
               printf("Error closing position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
            res = true; // クローズ処理完了
           }
//--- 結果を返す
   return(res);
  }
//+------------------------------------------------------------------+
//| ロングポジションの変更確認                                        |
//+------------------------------------------------------------------+
bool CSampleExpert::LongModified(void)
  {
   bool res = false;
//--- トレーリングストップの確認
   if(InpTrailingStop > 0)
     {
      if(m_symbol.Bid() - m_position.PriceOpen() > m_adjusted_point * InpTrailingStop)
        {
         double sl = NormalizeDouble(m_symbol.Bid() - m_traling_stop, m_symbol.Digits()); // ストップロス価格の計算
         double tp = m_position.TakeProfit(); // テイクプロフィットを取得
         if(m_position.StopLoss() < sl || m_position.StopLoss() == 0.0)
           {
            //--- ポジションの変更
            if(m_trade.PositionModify(Symbol(), sl, tp))
               printf("Long position by %s to be modified", Symbol()); // 変更成功メッセージ出力
            else
              {
               printf("Error modifying position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
               printf("Modify parameters : SL=%f,TP=%f", sl, tp); // エラー詳細出力
              }
            res = true; // 変更処理完了
           }
        }
     }
//--- 結果を返す
   return(res);
  }

//+------------------------------------------------------------------+
//| ショートポジションの変更確認                                      |
//+------------------------------------------------------------------+
bool CSampleExpert::ShortModified(void)
  {
   bool res = false;
//--- トレーリングストップの確認
   if(InpTrailingStop > 0)
     {
      if((m_position.PriceOpen() - m_symbol.Ask()) > (m_adjusted_point * InpTrailingStop))
        {
         double sl = NormalizeDouble(m_symbol.Ask() + m_traling_stop, m_symbol.Digits()); // ストップロス価格の計算
         double tp = m_position.TakeProfit(); // テイクプロフィットを取得
         if(m_position.StopLoss() > sl || m_position.StopLoss() == 0.0)
           {
            //--- ポジションの変更
            if(m_trade.PositionModify(Symbol(), sl, tp))
               printf("Short position by %s to be modified", Symbol()); // 変更成功メッセージ出力
            else
              {
               printf("Error modifying position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
               printf("Modify parameters : SL=%f,TP=%f", sl, tp); // エラー詳細出力
              }
            res = true; // 変更処理完了
           }
        }
     }
//--- 結果を返す
   return(res);
  }
//+------------------------------------------------------------------+
//| ロングポジションのオープン確認                                    |
//+------------------------------------------------------------------+
bool CSampleExpert::LongOpened(void)
  {
   bool res = false;
//--- ロングポジション（買い）のオープン条件を確認
   if(m_macd_current < 0)
      if(m_macd_current > m_signal_current && m_macd_previous < m_signal_previous)
         if(MathAbs(m_macd_current) > m_macd_open_level && m_ema_current > m_ema_previous)
           {
            double price = m_symbol.Ask(); // 現在の買い価格を取得
            double tp = m_symbol.Bid() + m_take_profit; // テイクプロフィット価格を計算
            //--- フリーマージンの確認
            if(m_account.FreeMarginCheck(Symbol(), ORDER_TYPE_BUY, InpLots, price) < 0.0)
               printf("We have no money. Free Margin = %f", m_account.FreeMargin()); // フリーマージンが不足している場合
            else
              {
               //--- ポジションをオープン
               if(m_trade.PositionOpen(Symbol(), ORDER_TYPE_BUY, InpLots, price, 0.0, tp))
                  printf("Position by %s to be opened", Symbol()); // オープン成功メッセージ出力
               else
                 {
                  printf("Error opening BUY position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
                  printf("Open parameters : price=%f,TP=%f", price, tp); // エラー詳細出力
                 }
              }
            res = true; // 処理完了
           }
//--- 結果を返す
   return(res);
  }
//+------------------------------------------------------------------+
//| ショートポジションのオープン確認                                  |
//+------------------------------------------------------------------+
bool CSampleExpert::ShortOpened(void)
  {
   bool res = false;
//--- ショートポジション（売り）のオープン条件を確認
   if(m_macd_current > 0)
      if(m_macd_current < m_signal_current && m_macd_previous > m_signal_previous)
         if(m_macd_current > m_macd_open_level && m_ema_current < m_ema_previous)
           {
            double price = m_symbol.Bid(); // 現在の売り価格を取得
            double tp = m_symbol.Ask() - m_take_profit; // テイクプロフィット価格を計算
            //--- フリーマージンの確認
            if(m_account.FreeMarginCheck(Symbol(), ORDER_TYPE_SELL, InpLots, price) < 0.0)
               printf("We have no money. Free Margin = %f", m_account.FreeMargin()); // フリーマージンが不足している場合
            else
              {
               //--- ポジションをオープン
               if(m_trade.PositionOpen(Symbol(), ORDER_TYPE_SELL, InpLots, price, 0.0, tp))
                  printf("Position by %s to be opened", Symbol()); // オープン成功メッセージ出力
               else
                 {
                  printf("Error opening SELL position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
                  printf("Open parameters : price=%f,TP=%f", price, tp); // エラー詳細出力
                 }
              }
            res = true; // 処理完了
           }
//--- 結果を返す
   return(res);
  }
//+------------------------------------------------------------------+
//| メイン処理関数：ポジションが処理された場合にtrueを返す            |
//+------------------------------------------------------------------+
bool CSampleExpert::Processing(void)
  {
//--- レート情報の更新
   if(!m_symbol.RefreshRates())
      return(false);
//--- インジケータの更新確認
   if(BarsCalculated(m_handle_macd) < 2 || BarsCalculated(m_handle_ema) < 2)
      return(false);
   if(CopyBuffer(m_handle_macd, 0, 0, 2, m_buff_MACD_main) != 2 ||
      CopyBuffer(m_handle_macd, 1, 0, 2, m_buff_MACD_signal) != 2 ||
      CopyBuffer(m_handle_ema, 0, 0, 2, m_buff_EMA) != 2)
      return(false);
//--- データを内部変数に格納
   m_macd_current = m_buff_MACD_main[0];
   m_macd_previous = m_buff_MACD_main[1];
   m_signal_current = m_buff_MACD_signal[0];
   m_signal_previous = m_buff_MACD_signal[1];
   m_ema_current = m_buff_EMA[0];
   m_ema_previous = m_buff_EMA[1];
//--- 既存ポジションの有無を確認
   if(m_position.Select(Symbol()))
     {
      if(m_position.PositionType() == POSITION_TYPE_BUY)
        {
         //--- ロングポジションのクローズまたは変更を確認
         if(LongClosed())
            return(true);
         if(LongModified())
            return(true);
        }
      else
        {
         //--- ショートポジションのクローズまたは変更を確認
         if(ShortClosed())
            return(true);
         if(ShortModified())
            return(true);
        }
     }
   else
     {
      //--- ロングポジションのオープン確認
      if(LongOpened())
         return(true);
      //--- ショートポジションのオープン確認
      if(ShortOpened())
         return(true);
     }
//--- ポジションが処理されなかった場合
   return(false);
  }

//+------------------------------------------------------------------+
//| エキスパート初期化関数                                           |
//+------------------------------------------------------------------+
int OnInit(void)
  {
   //--- エキスパートオブジェクトの初期化
   if(!ExtExpert.Init())
      return(INIT_FAILED); // 初期化失敗時にエキスパートの開始をキャンセル

   //--- 初期化成功
   return(INIT_SUCCEEDED); // 正常に初期化が完了したことを示す
  }
//+------------------------------------------------------------------+
//| エキスパートティック関数                                          |
//+------------------------------------------------------------------+
void OnTick(void)
  {
   static datetime limit_time = 0; // 最後の取引処理時間とタイムアウトを保持

   //--- タイムアウトが経過しているか確認
   if(TimeCurrent() >= limit_time)
     {
      //--- データが十分であることを確認
      if(Bars(Symbol(), Period()) > 2 * InpMATrendPeriod)
        {
         //--- 処理が行われた場合は次のタイムアウト時間を設定
         if(ExtExpert.Processing())
            limit_time = TimeCurrent() + ExtTimeOut; // 次回の処理をタイムアウト設定に基づき遅延
        }
     }
  }
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
//| 必要なライブラリをインクルード                                    |
//+------------------------------------------------------------------+
#define MACD_MAGIC 1234502            // MACD専用のマジックナンバー（注文識別用）

#include <Trade\Trade.mqh>            // 取引機能クラス（CTrade）
#include <Trade\SymbolInfo.mqh>       // シンボル情報クラス（CSymbolInfo）
#include <Trade\PositionInfo.mqh>     // ポジション情報クラス（CPositionInfo）
#include <Trade\AccountInfo.mqh>      // 取引口座情報クラス（CAccountInfo）

//+------------------------------------------------------------------+
//| 入力パラメータ                                                    |
//+------------------------------------------------------------------+
input double InpLots          =0.1;   // ロット数の設定
input int    InpTakeProfit    =50;    // テイクプロフィット（pips単位）
input int    InpTrailingStop  =30;    // トレーリングストップレベル（pips単位）
input int    InpMACDOpenLevel =3;     // MACDのオープンレベル（pips単位）
input int    InpMACDCloseLevel=2;     // MACDのクローズレベル（pips単位）
input int    InpMATrendPeriod =26;    // 移動平均のトレンド期間
//---
int ExtTimeOut=10;                    // 取引操作のタイムアウト（秒単位）

//+------------------------------------------------------------------+
//| エキスパートクラス定義                                            |
//+------------------------------------------------------------------+
class CSampleExpert
  {
protected:
   double            m_adjusted_point;             // ポイント数調整後の値（小数点数対応）
   CTrade            m_trade;                      // 取引オブジェクト
   CSymbolInfo       m_symbol;                     // シンボル情報オブジェクト
   CPositionInfo     m_position;                   // ポジション情報オブジェクト
   CAccountInfo      m_account;                    // アカウント情報オブジェクト
   //--- インジケータ
   int               m_handle_macd;                // MACDインジケータのハンドル
   int               m_handle_ema;                 // 移動平均インジケータのハンドル
   //--- インジケータバッファ
   double            m_buff_MACD_main[];           // MACDインジケータのメインバッファ
   double            m_buff_MACD_signal[];         // MACDインジケータのシグナルバッファ
   double            m_buff_EMA[];                 // EMAインジケータのバッファ
   //--- インジケータデータの格納
   double            m_macd_current;               // 現在のMACD値
   double            m_macd_previous;              // 前回のMACD値
   double            m_signal_current;             // 現在のシグナル値
   double            m_signal_previous;            // 前回のシグナル値
   double            m_ema_current;                // 現在のEMA値
   double            m_ema_previous;               // 前回のEMA値
   //---
   double            m_macd_open_level;            // MACDのオープンレベル
   double            m_macd_close_level;           // MACDのクローズレベル
   double            m_traling_stop;               // トレーリングストップ値
   double            m_take_profit;                // テイクプロフィット値

public:
                     CSampleExpert(void);          // コンストラクタ
                    ~CSampleExpert(void);          // デストラクタ
   bool              Init(void);                   // 初期化関数
   void              Deinit(void);                 // 終了処理関数
   bool              Processing(void);             // メイン処理関数

protected:
   bool              InitCheckParameters(const int digits_adjust); // 初期パラメータチェック
   bool              InitIndicators(void);         // インジケータの初期化
   bool              LongClosed(void);             // ロングポジションのクローズ確認
   bool              ShortClosed(void);            // ショートポジションのクローズ確認
   bool              LongModified(void);           // ロングポジションの変更確認
   bool              ShortModified(void);          // ショートポジションの変更確認
   bool              LongOpened(void);             // ロングポジションのオープン確認
   bool              ShortOpened(void);            // ショートポジションのオープン確認
  };
//--- グローバルエキスパートオブジェクト
CSampleExpert ExtExpert;

//+------------------------------------------------------------------+
//| コンストラクタ                                                     |
//+------------------------------------------------------------------+
CSampleExpert::CSampleExpert(void) : m_adjusted_point(0),       // ポイント値の初期化
                                     m_handle_macd(INVALID_HANDLE), // MACDハンドル初期化
                                     m_handle_ema(INVALID_HANDLE),  // EMAハンドル初期化
                                     m_macd_current(0),         // MACDの初期値
                                     m_macd_previous(0),        // MACDの前回値
                                     m_signal_current(0),       // シグナルの初期値
                                     m_signal_previous(0),      // シグナルの前回値
                                     m_ema_current(0),          // EMAの初期値
                                     m_ema_previous(0),         // EMAの前回値
                                     m_macd_open_level(0),      // MACDのオープンレベル
                                     m_macd_close_level(0),     // MACDのクローズレベル
                                     m_traling_stop(0),         // トレーリングストップ値
                                     m_take_profit(0)           // テイクプロフィット値
  {
   ArraySetAsSeries(m_buff_MACD_main,true);      // MACDメインバッファの配列順序設定
   ArraySetAsSeries(m_buff_MACD_signal,true);    // MACDシグナルバッファの配列順序設定
   ArraySetAsSeries(m_buff_EMA,true);            // EMAバッファの配列順序設定
  }

// デストラクタの例
CSampleExpert::~CSampleExpert(void)
{
   // 必要に応じてリソースの解放や後処理を記述
}

//+------------------------------------------------------------------+
//| 初期化と入力パラメータのチェック                                  |
//+------------------------------------------------------------------+
bool CSampleExpert::Init(void)
  {
   //--- シンボル情報を初期化
   m_symbol.Name(Symbol());                  // 現在のシンボル名を設定
   m_trade.SetExpertMagicNumber(MACD_MAGIC); // マジックナンバーの設定
   m_trade.SetMarginMode();                  // マージンモード設定
   m_trade.SetTypeFillingBySymbol(Symbol()); // シンボルごとのフィリング設定
//--- 調整設定（小数点対応）
   int digits_adjust=1;
   if(m_symbol.Digits()==3 || m_symbol.Digits()==5)
      digits_adjust=10;
   m_adjusted_point=m_symbol.Point()*digits_adjust; // ポイント値を調整

   //--- トレーリングストップ、テイクプロフィットの値を設定
   m_macd_open_level =InpMACDOpenLevel*m_adjusted_point;
   m_macd_close_level=InpMACDCloseLevel*m_adjusted_point;
   m_traling_stop    =InpTrailingStop*m_adjusted_point;
   m_take_profit     =InpTakeProfit*m_adjusted_point;
   //--- 許容スリッページ設定
   m_trade.SetDeviationInPoints(3*digits_adjust);
   //--- 初期パラメータのチェック
   if(!InitCheckParameters(digits_adjust))
      return(false);
   //--- インジケータの初期化
   if(!InitIndicators())
      return(false);
   //--- 正常終了
   return(true);
  }
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
//| 入力パラメータのチェック                                          |
//+------------------------------------------------------------------+
bool CSampleExpert::InitCheckParameters(const int digits_adjust)
  {
//--- 初期データチェック
   if(InpTakeProfit * digits_adjust < m_symbol.StopsLevel()) // テイクプロフィットが停止レベルより小さい場合
     {
      printf("Take Profit must be greater than %d", m_symbol.StopsLevel()); // エラーメッセージ出力
      return(false); // チェック失敗
     }
   if(InpTrailingStop * digits_adjust < m_symbol.StopsLevel()) // トレーリングストップが停止レベルより小さい場合
     {
      printf("Trailing Stop must be greater than %d", m_symbol.StopsLevel()); // エラーメッセージ出力
      return(false); // チェック失敗
     }
//--- ロット数の確認
   if(InpLots < m_symbol.LotsMin() || InpLots > m_symbol.LotsMax()) // 許可されるロット範囲外の場合
     {
      printf("Lots amount must be in the range from %f to %f", m_symbol.LotsMin(), m_symbol.LotsMax());
      return(false); // チェック失敗
     }
   if(MathAbs(InpLots / m_symbol.LotsStep() - MathRound(InpLots / m_symbol.LotsStep())) > 1.0E-10)
     {
      printf("Lots amount is not corresponding with lot step %f", m_symbol.LotsStep()); // ロット量が不正
      return(false); // チェック失敗
     }
//--- 警告メッセージ
   if(InpTakeProfit <= InpTrailingStop) // トレーリングストップがテイクプロフィット以上の場合
      printf("Warning: Trailing Stop must be less than Take Profit"); // 警告メッセージ出力
//--- チェック成功
   return(true); // 全てのチェックが成功
  }

//+------------------------------------------------------------------+
//| インジケータの初期化                                              |
//+------------------------------------------------------------------+
bool CSampleExpert::InitIndicators(void)
  {
//--- MACDインジケータの作成
   if(m_handle_macd == INVALID_HANDLE) // ハンドルが無効な場合に新規作成
      if((m_handle_macd = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE)) == INVALID_HANDLE)
        {
         printf("Error creating MACD indicator"); // エラーを出力
         return(false); // 初期化失敗
        }
//--- EMAインジケータの作成
   if(m_handle_ema == INVALID_HANDLE) // ハンドルが無効な場合に新規作成
      if((m_handle_ema = iMA(NULL, 0, InpMATrendPeriod, 0, MODE_EMA, PRICE_CLOSE)) == INVALID_HANDLE)
        {
         printf("Error creating EMA indicator"); // エラーを出力
         return(false); // 初期化失敗
        }
//--- 初期化成功
   return(true);
  }

//+------------------------------------------------------------------+
//| ロングポジションのクローズ確認                                   |
//+------------------------------------------------------------------+
bool CSampleExpert::LongClosed(void)
  {
   bool res = false;
//--- クローズ条件の確認
   if(m_macd_current > 0)
      if(m_macd_current < m_signal_current && m_macd_previous > m_signal_previous)
         if(m_macd_current > m_macd_close_level)
           {
            //--- ポジションのクローズ
            if(m_trade.PositionClose(Symbol()))
               printf("Long position by %s to be closed", Symbol()); // クローズ成功メッセージ出力
            else
               printf("Error closing position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
            res = true; // クローズ処理完了
           }
//--- 結果を返す
   return(res);
  }

//+------------------------------------------------------------------+
//| ショートポジションのクローズ確認                                  |
//+------------------------------------------------------------------+
bool CSampleExpert::ShortClosed(void)
  {
   bool res = false;
//--- クローズ条件の確認
   if(m_macd_current < 0)
      if(m_macd_current > m_signal_current && m_macd_previous < m_signal_previous)
         if(MathAbs(m_macd_current) > m_macd_close_level)
           {
            //--- ポジションのクローズ
            if(m_trade.PositionClose(Symbol()))
               printf("Short position by %s to be closed", Symbol()); // クローズ成功メッセージ出力
            else
               printf("Error closing position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
            res = true; // クローズ処理完了
           }
//--- 結果を返す
   return(res);
  }

//+------------------------------------------------------------------+
//| ロングポジションの変更確認                                        |
//+------------------------------------------------------------------+
bool CSampleExpert::LongModified(void)
  {
   bool res = false;
//--- トレーリングストップの確認
   if(InpTrailingStop > 0)
     {
      if(m_symbol.Bid() - m_position.PriceOpen() > m_adjusted_point * InpTrailingStop)
        {
         double sl = NormalizeDouble(m_symbol.Bid() - m_traling_stop, m_symbol.Digits()); // ストップロス価格の計算
         double tp = m_position.TakeProfit(); // テイクプロフィットを取得
         if(m_position.StopLoss() < sl || m_position.StopLoss() == 0.0)
           {
            //--- ポジションの変更
            if(m_trade.PositionModify(Symbol(), sl, tp))
               printf("Long position by %s to be modified", Symbol()); // 変更成功メッセージ出力
            else
              {
               printf("Error modifying position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
               printf("Modify parameters : SL=%f,TP=%f", sl, tp); // エラー詳細出力
              }
            res = true; // 変更処理完了
           }
        }
     }
//--- 結果を返す
   return(res);
  }

//+------------------------------------------------------------------+
//| ショートポジションの変更確認                                      |
//+------------------------------------------------------------------+
bool CSampleExpert::ShortModified(void)
  {
   bool res = false;
//--- トレーリングストップの確認
   if(InpTrailingStop > 0)
     {
      if((m_position.PriceOpen() - m_symbol.Ask()) > (m_adjusted_point * InpTrailingStop))
        {
         double sl = NormalizeDouble(m_symbol.Ask() + m_traling_stop, m_symbol.Digits()); // ストップロス価格の計算
         double tp = m_position.TakeProfit(); // テイクプロフィットを取得
         if(m_position.StopLoss() > sl || m_position.StopLoss() == 0.0)
           {
            //--- ポジションの変更
            if(m_trade.PositionModify(Symbol(), sl, tp))
               printf("Short position by %s to be modified", Symbol()); // 変更成功メッセージ出力
            else
              {
               printf("Error modifying position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
               printf("Modify parameters : SL=%f,TP=%f", sl, tp); // エラー詳細出力
              }
            res = true; // 変更処理完了
           }
        }
     }
//--- 結果を返す
   return(res);
  }

//+------------------------------------------------------------------+
//| ロングポジションのオープン確認                                    |
//+------------------------------------------------------------------+
bool CSampleExpert::LongOpened(void)
  {
   bool res = false;
//--- ロングポジション（買い）のオープン条件を確認
   if(m_macd_current < 0)
      if(m_macd_current > m_signal_current && m_macd_previous < m_signal_previous)
         if(MathAbs(m_macd_current) > m_macd_open_level && m_ema_current > m_ema_previous)
           {
            double price = m_symbol.Ask(); // 現在の買い価格を取得
            double tp = m_symbol.Bid() + m_take_profit; // テイクプロフィット価格を計算
            //--- フリーマージンの確認
            if(m_account.FreeMarginCheck(Symbol(), ORDER_TYPE_BUY, InpLots, price) < 0.0)
               printf("We have no money. Free Margin = %f", m_account.FreeMargin()); // フリーマージンが不足している場合
            else
              {
               //--- ポジションをオープン
               if(m_trade.PositionOpen(Symbol(), ORDER_TYPE_BUY, InpLots, price, 0.0, tp))
                  printf("Position by %s to be opened", Symbol()); // オープン成功メッセージ出力
               else
                 {
                  printf("Error opening BUY position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
                  printf("Open parameters : price=%f,TP=%f", price, tp); // エラー詳細出力
                 }
              }
            res = true; // 処理完了
           }
//--- 結果を返す
   return(res);
  }

//+------------------------------------------------------------------+
//| ショートポジションのオープン確認                                  |
//+------------------------------------------------------------------+
bool CSampleExpert::ShortOpened(void)
  {
   bool res = false;
//--- ショートポジション（売り）のオープン条件を確認
   if(m_macd_current > 0)
      if(m_macd_current < m_signal_current && m_macd_previous > m_signal_previous)
         if(m_macd_current > m_macd_open_level && m_ema_current < m_ema_previous)
           {
            double price = m_symbol.Bid(); // 現在の売り価格を取得
            double tp = m_symbol.Ask() - m_take_profit; // テイクプロフィット価格を計算
            //--- フリーマージンの確認
            if(m_account.FreeMarginCheck(Symbol(), ORDER_TYPE_SELL, InpLots, price) < 0.0)
               printf("We have no money. Free Margin = %f", m_account.FreeMargin()); // フリーマージンが不足している場合
            else
              {
               //--- ポジションをオープン
               if(m_trade.PositionOpen(Symbol(), ORDER_TYPE_SELL, InpLots, price, 0.0, tp))
                  printf("Position by %s to be opened", Symbol()); // オープン成功メッセージ出力
               else
                 {
                  printf("Error opening SELL position by %s : '%s'", Symbol(), m_trade.ResultComment()); // エラーメッセージ出力
                  printf("Open parameters : price=%f,TP=%f", price, tp); // エラー詳細出力
                 }
              }
            res = true; // 処理完了
           }
//--- 結果を返す
   return(res);
  }

//+------------------------------------------------------------------+
//| メイン処理関数：ポジションが処理された場合にtrueを返す            |
//+------------------------------------------------------------------+
bool CSampleExpert::Processing(void)
  {
//--- レート情報の更新
   if(!m_symbol.RefreshRates())
      return(false);
//--- インジケータの更新確認
   if(BarsCalculated(m_handle_macd) < 2 || BarsCalculated(m_handle_ema) < 2)
      return(false);
   if(CopyBuffer(m_handle_macd, 0, 0, 2, m_buff_MACD_main) != 2 ||
      CopyBuffer(m_handle_macd, 1, 0, 2, m_buff_MACD_signal) != 2 ||
      CopyBuffer(m_handle_ema, 0, 0, 2, m_buff_EMA) != 2)
      return(false);
//--- データを内部変数に格納
   m_macd_current = m_buff_MACD_main[0];
   m_macd_previous = m_buff_MACD_main[1];
   m_signal_current = m_buff_MACD_signal[0];
   m_signal_previous = m_buff_MACD_signal[1];
   m_ema_current = m_buff_EMA[0];
   m_ema_previous = m_buff_EMA[1];
//--- 既存ポジションの有無を確認
   if(m_position.Select(Symbol()))
     {
      if(m_position.PositionType() == POSITION_TYPE_BUY)
        {
         //--- ロングポジションのクローズまたは変更を確認
         if(LongClosed())
            return(true);
         if(LongModified())
            return(true);
        }
      else
        {
         //--- ショートポジションのクローズまたは変更を確認
         if(ShortClosed())
            return(true);
         if(ShortModified())
            return(true);
        }
     }
   else
     {
      //--- ロングポジションのオープン確認
      if(LongOpened())
         return(true);
      //--- ショートポジションのオープン確認
      if(ShortOpened())
         return(true);
     }
//--- ポジションが処理されなかった場合
   return(false);
  }

//+------------------------------------------------------------------+
//| エキスパート初期化関数                                           |
//+------------------------------------------------------------------+
int OnInit(void)
  {
   //--- エキスパートオブジェクトの初期化
   if(!ExtExpert.Init())
      return(INIT_FAILED); // 初期化失敗時にエキスパートの開始をキャンセル

   //--- 初期化成功
   return(INIT_SUCCEEDED); // 正常に初期化が完了したことを示す
  }

//+------------------------------------------------------------------+
//| エキスパートティック関数                                          |
//+------------------------------------------------------------------+
void OnTick(void)
  {
   static datetime limit_time = 0; // 最後の取引処理時間とタイムアウトを保持

   //--- タイムアウトが経過しているか確認
   if(TimeCurrent() >= limit_time)
     {
      //--- データが十分であることを確認
      if(Bars(Symbol(), Period()) > 2 * InpMATrendPeriod)
        {
         //--- 処理が行われた場合は次のタイムアウト時間を設定
         if(ExtExpert.Processing())
            limit_time = TimeCurrent() + ExtTimeOut; // 次回の処理をタイムアウト設定に基づき遅延
        }
     }
  }
//+------------------------------------------------------------------+