EAにマーチンゲール法を取り入れてみた結果（サンプルソース）

//+------------------------------------------------------------------+
//|                                                    BB_Sample.mq4 |
//|                                    Copyright 2020, mef Software. |
//|                                             https://fx-prog.com/ |
//+------------------------------------------------------------------+
#property copyright "Copyright 2020, mef Software."
#property link      "https://fx-prog.com/"
#property version   "1.00"
#property strict
double waitBB,maisuu=0.01;
datetime prevtime;
       
       
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//---
           
//---
   return(INIT_SUCCEEDED);
  }
        
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
int start()
{
int orderPtn=0; //0:何もしない 1:買い 2:売り
int total=0;
        
int errorcode;               // エラーコード
int ea_ticket_No,ea_order_entry_Type=0,ea_order_MagicNo;  // チケットNo,エントリタイプ,マジックＮｏ．
double ea_order_stop_price=0,ea_order_good_price=0,ea_order_entry_price=0; //ストップロスレート,利確レート,エントリーレート
        
//---
        
        
        
   //ボリンジャーバンドの値を取得
   double BB3UP = iBands(NULL,0,20,3,0,PRICE_CLOSE,MODE_UPPER,0); //3σの上側
   double BB3LO = iBands(NULL,0,20,3,0,PRICE_CLOSE,MODE_LOWER,0); //3σの下側
        
   double BB2UP = iBands(NULL,0,20,2,0,PRICE_CLOSE,MODE_UPPER,0); //2σの上側
   double BB2LO = iBands(NULL,0,20,2,0,PRICE_CLOSE,MODE_LOWER,0); //2σの下側
        
        
//***売買判断箇所***//
        
   //Askがボリンジャーバンドの上3σタッチで買いサイン
   if(BB3UP < Ask) 
   {
      orderPtn=1;
   }
   //Bidがボリンジャーバンドの下3σタッチで売りサイン
   else if(BB3LO > Bid)
   {
      orderPtn=2;
   }
   //それ以外は何もしない
   else
   {
      orderPtn=0;
   }
           
           
   //買いの場合　または　買い待ちの場合
   if((orderPtn==1) || waitBB>0 )
   {
      //2σ内で買いエントリー
      if((BB2UP > Ask && BB2LO < Bid ))
      {
         orderPtn=1;
         waitBB=0;
      }else{
         orderPtn=0;
         waitBB=1;  
      }
   }
   //売りの場合　または　売り待ちの場合
   if((orderPtn==2) || waitBB<0 )
   {
      //2σ内で売りエントリー   
      if((BB2LO < Bid && BB2UP > Ask ))
      {
         orderPtn=2;
         waitBB=0;
      }else{
         orderPtn=0;
         waitBB=-1;  
      }
   }   
//***売買判断箇所***//
        
   total=OrdersTotal();
           
   if(total == 1){
      //既に建玉を保有していたら何もしない
      waitBB=0; 
   }
        
//***エントリー箇所***//
   else if(total == 0 && orderPtn > 0)
   {
          
      //★★★★★マーチンゲール法★★★★★
      if(OrderSelect(OrdersHistoryTotal()-1,SELECT_BY_POS,MODE_HISTORY) == true)
      {
         //前回マイナスだった場合はLot数を倍
         if(OrderProfit() < 0){
            maisuu =  maisuu * 2;
         //前回イーブンだった場合はLot数を保留            
         }else if(OrderProfit() == 0){
            maisuu =  maisuu;
         //前回プラスだった場合はLot数を戻す
         }else{
            maisuu =  0.01;
         }
             
         //枚数が最大の10を超えた場合、取引できなくなるので10にする
         if(maisuu>10){
               maisuu=10;
         }
      }
      //★★★★★マーチンゲール法★★★★★
   
          
      if(orderPtn == 1)
      {
         ea_order_entry_price = Ask;               // 現在の買値でエントリー
         ea_order_entry_Type = OP_BUY;             //OP_BUY
         ea_order_stop_price = Ask - 220 * Point;  //損切りポイント(-22銭)
         ea_order_good_price = Ask + 220 * Point;  //利喰いポイント(+22銭)  
      }
      else if(orderPtn == 2)
      {
         ea_order_entry_price = Bid;               // 現在の売値でエントリー
         ea_order_entry_Type = OP_SELL;            //OP_SELL      
         ea_order_stop_price = Bid + 220 * Point;  //損切りポイント(-22銭)
         ea_order_good_price = Bid - 220 * Point;  //利喰いポイント(+22銭)  
      }
              
      ea_order_MagicNo=0000;  //マジックナンバーは0000固定とする
        
      ea_ticket_No = OrderSend(   // 新規エントリー注文
            NULL,                     // 通貨ペア
            ea_order_entry_Type,      // オーダータイプ[OP_BUY / OP_SELL]
            maisuu,                   // ロット(0.01単位,FXTFは1=10Lot)
            ea_order_entry_price,     // オーダープライスレート
            20,                       // スリップ上限
            ea_order_stop_price,      // ストップレート
            ea_order_good_price,      // リミットレート
            "テストオーダー",             // オーダーコメント
            ea_order_MagicNo,         // マジックナンバー(識別用)
            0,                        // オーダーリミット時間
            clrRed                    // オーダーアイコンカラー
          );
                
      if ( ea_ticket_No == -1)           // オーダーエラー
      {
         errorcode = GetLastError();      // エラーコード取得
         if( errorcode != ERR_NO_ERROR)   // エラー発生
         {
             printf("エラー");
         }
      }
      else {    // 注文約定
         Print("新規注文約定。 チケットNo=",ea_ticket_No);
      }
   }
        
        
   return(0);
}
//***エントリー箇所***//
        
//+------------------------------------------------------------------+