【MQL5】 MT5のEA作成の勉強 その10 複数ポジションをオープンする (2/ 2)

//+------------------------------------------------------------------+
//| Check for long position opening                                  |
//+------------------------------------------------------------------+
bool CSampleExpert::LongOpened(void)
  {
   bool res=false;

   //--- 現在の価格と前回の価格を取得
   MqlRates rt[2];
   if(CopyRates(_Symbol,_Period,0,2,rt)!=2)
   {
      Print("CopyRates of ",_Symbol," failed, no history");
      return(false);
   }
   
   //--- 新規のバーでトレード可能フラグをtrueに変更
   if(rt[1].tick_volume<=1)
      Tradable = true;
      
  //--- パラポリックSAR指標が現在の足で開始価格より下にある場合
  if(m_sar_current<rt[1].open && 
     //m_sar_previous>rt[0].open && 
     Tradable==true)
   {
      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());
            Tradable = false;
           }
         else
           {
            printf("Error opening BUY position by %s : '%s'",Symbol(),m_trade.ResultComment());
            printf("Open parameters : price=%f,TP=%f",price,tp);
           }
        }
      //--- in any case we must exit from expert
      res=true;
    }
//--- result
   return(res);
  }