MT4 EAの作り方｜RCIで逆張りするEAを作る方法

//+------------------------------------------------------------------+
//|                                                      10_RCI.mq4 |
//|                                Copyright © 2020-2026 ぷろぐらむFX |
//|                                             https://fx-prog.com/ |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2020-2026 ぷろぐらむFX"
#property link      "https://fx-prog.com/"
#property version   "1.00"
#property strict
input double Lots = 0.01;
input int TP = 100;
input int SL = 50;
//***【パラメータ設定↓】***//
input int RCI_KIKAN1 = 9;
input int RCI_KIKAN2 = 26;
input int RCI_KIKAN3 = 52;
input int RCI_VIEW_CNT = 3;
input int RCI_KAI = -80;
input int RCI_URI = 80;
//***【パラメータ設定↑】***//
string Ea_Name = WindowExpertName();
double PipValue;
datetime prevtime;
int OnInit(){
   if(Digits == 3 || Digits == 5){
      PipValue = Point * 10;
   }else{
      PipValue = Point;
   }
   return(INIT_SUCCEEDED);
}
void OnTick(){
   if(Time[0] != prevtime){
      prevtime = Time[0];
   }else{
      return;
   }
   int total = OrdersTotal();
   int ea_order_Type = -1;
   double ea_order_stop_price = 0;
   double ea_order_good_price = 0;
   if(total == 0){
      bool openBuy = false;
      bool openSell = false;
      //***【新規注文判断↓】***//
      double rciS = GetRCI_MS(0,1);
      double rciM = GetRCI_MS(1,1);
      double rciL = GetRCI_MS(2,1);
      double rciM_prev = GetRCI_MS(1,2);
      double rciL_prev = GetRCI_MS(2,2);
      if(rciS != EMPTY_VALUE && rciM != EMPTY_VALUE && rciL != EMPTY_VALUE && rciM_prev != EMPTY_VALUE && rciL_prev != EMPTY_VALUE){
         double slopeM = rciM - rciM_prev;
         double slopeL = rciL - rciL_prev;
         if(rciS <= RCI_KAI && rciM > rciM_prev && slopeM > 1 && slopeL > -5){
            openBuy = true;
         }else if(rciS >= RCI_URI && rciM < rciM_prev && slopeM < -1 && slopeL < 5){
            openSell = true;
         }
      }
      //***【新規注文判断↑】***//
      if(openBuy){
         ea_order_Type = OP_BUY;
      }else if(openSell){
         ea_order_Type = OP_SELL;
      }
      //***【TP/SL判断↓】***//
      if(openBuy){
         ea_order_stop_price = Ask - SL * PipValue;
         ea_order_good_price = Ask + TP * PipValue;
      }else if(openSell){
         ea_order_stop_price = Bid + SL * PipValue;
         ea_order_good_price = Bid - TP * PipValue;
      }
      //***【TP/SL判断↑】***//
      if(ea_order_Type > -1){
         funcOrder_Send(ea_order_Type,ea_order_stop_price,ea_order_good_price,Lots,Ea_Name,0,0);
      }
   }
}
//+------------------------------------------------------------------+
//| RCI Multi Signalの値を取得                                      |
//+------------------------------------------------------------------+
double GetRCI_MS(int buffer,int shift){
   return iCustom(NULL,0,"RCI-Multi-Signal",RCI_VIEW_CNT,RCI_KIKAN1,RCI_KIKAN2,RCI_KIKAN3,true,buffer,shift);
}
//★★★★★★★★★★★★★★★★★★★★ ここから下は共通関数 ★★★★★★★★★★★★★★★★★★★★
//+------------------------------------------------------------------+
//| 新規注文関数                                                     |
//+------------------------------------------------------------------+
bool funcOrder_Send(int orderType,double sl,double tp,double lots,string orderComment,int magic,int maxSpreadPoints){
   int ticket = -1;
   double price = 0;
   color clr = clrNONE;
   for(int retry=0;retry<10;retry++){
      RefreshRates();
      double spread = MarketInfo(Symbol(),MODE_SPREAD);
      if(maxSpreadPoints > 0 && spread > maxSpreadPoints){
         Print("スプレッド拡大中(",spread,"ポイント) → 待機中 (リトライ=",retry+1,")");
         Sleep(2000);
         continue;
      }
      if(orderType == OP_BUY){
         price = Ask;
         clr = clrBlue;
      }else if(orderType == OP_SELL){
         price = Bid;
         clr = clrRed;
      }else{
         return false;
      }
      ticket = OrderSend(Symbol(),orderType,lots,price,20,sl,tp,orderComment,magic,0,clr);
      if(ticket > 0){
         Print("新規注文成功! チケットNo=",ticket," レート=",price," Lots=",lots," スプレッド=",spread,"ポイント");
         return true;
      }
      int err = GetLastError();
      Print("新規注文失敗 エラーNo=",err," リトライ回数=",retry+1);
      Sleep(2000);
   }
   return false;
}

double GetRCI_MS(int buffer,int shift){
   return iCustom(NULL,0,"RCI-Multi-Signal",RCI_VIEW_CNT,RCI_KIKAN1,RCI_KIKAN2,RCI_KIKAN3,true,buffer,shift);
}