EAで平均足を使う（サンプルソース）

//+------------------------------------------------------------------+
//|                                                   HeikinAshi.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"

input int A_SPREAD = 10;
input double Lots = 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;
    
double ea_order_stop_price=0,ea_order_good_price=0,ea_order_entry_price=0; //ストップロスレート,利確レート,エントリーレート
    
//---
   //新しい足ができた時だけやる
       
   if(Time[0] != prevtime){
      prevtime = Time[0];
   }else{
      return(0);
   }
    
//平均足の戻り値確認用（※削除可能スペース)
double a = iCustom(NULL,0,"Heiken Ashi",0,1);//平均足High
double b = iCustom(NULL,0,"Heiken Ashi",1,1);//平均足Low
double c = iCustom(NULL,0,"Heiken Ashi",2,1);//平均足Open
double d = iCustom(NULL,0,"Heiken Ashi",3,1);//平均足Close
double e = iCustom(NULL,0,"Heiken Ashi",4,1);//なし
    
Print(" a=",a," b=",b," c=",c," d=",d," e=",e);  
//平均足の戻り値確認用（※削除可能スペース)
       
    
    //***平均足の確認***//
   double haOpen1 = iCustom(NULL,0,"Heiken Ashi",2,1);//１つ前の足の平均足始値
   double haClose1 = iCustom(NULL,0,"Heiken Ashi",3,1);//１つ前の足の平均足終値
       
   double haOpen2 = iCustom(NULL,0,"Heiken Ashi",2,2);//２つ前の足の平均足始値
   double haClose2 = iCustom(NULL,0,"Heiken Ashi",3,2);//２つ前の足の平均足終値
       
   double HaDifference1 = haClose1 - haOpen1;//マイナスなら赤色、プラスなら白色
   double HaDifference2 = haClose2 - haOpen2;//マイナスなら赤色、プラスなら白色
       
   double Open_Day = iCustom(NULL,PERIOD_D1,"Heiken Ashi",2,0);
   double Close_Day = iCustom(NULL,PERIOD_D1,"Heiken Ashi",3,0);
   double Difference_Day = Close_Day - Open_Day;
    
    
//***売買判断箇所***//
   //平均足が陰線から陽線に変わったら買い注文
   if(HaDifference2<0 && HaDifference1>0 && Difference_Day>0){
      orderPtn = 1;
   }
       
   //平均足が陽線から陰線に変わったら売り注文
   if(HaDifference2>0 && HaDifference1<0 && Difference_Day<0){
      orderPtn = 2;
   }
    
    
    //同一方向
    if((orderPtn == 1 || orderPtn == 2) && OrderSelect(OrdersHistoryTotal()-1,SELECT_BY_POS,MODE_HISTORY) == true)
    {
         if(OrderProfit() < 0  && OrderType() == OP_BUY && orderPtn==1){
            if(OrderCloseTime() > iTime(NULL, 0, 3) ){
               orderPtn=0;             
            }
         }
         if(OrderProfit() < 0 && OrderType() == OP_SELL && orderPtn==2){
            if(OrderCloseTime() > iTime(NULL, 0, 2) ){
               orderPtn=0;    
            }
         }      
    }
    
//***決済判断箇所***//
   total=OrdersTotal();
   if(total == 1 ){
       
      bool OrderKekka = OrderSelect(0,SELECT_BY_POS,MODE_TRADES); 
      
      if(HaDifference1<0 && OrderType() == OP_BUY){
         OrderKekka = funcOrder_Close();
      }
      
      if(HaDifference1>0 &&  OrderType() == OP_SELL){
         OrderKekka = funcOrder_Close();
      }
       
   }
//***エントリー箇所***//
   else if(total == 0 && orderPtn > 0)   
   {
      ea_order_stop_price = 0;
      ea_order_good_price = 0;         
    
      //新規注文
      OrderKekka = funcOrder_Send(orderPtn - 1,ea_order_stop_price,ea_order_good_price,0,0);
    
   }
     
     
   return(0);
}
    
    
    
//+------------------------------------------------------------------+
//|【関数】新規注文関数                                                 |
//|                                                                  |
//|【引数】 ea_order_entry_Type:売買(0:買 1:売)                         |
//|【引数】 ea_order_stop_price:損切値  ea_order_good_price:利確値      |
//|【引数】 orderComment:オーダーコメント    ea_order_MagicNo:マジックNo       |
//|                                                                  |
//|【戻値】True:成功                                                   |
//|                                                                  |
//| 
bool funcOrder_Send(int ea_order_entry_Type, double ea_order_stop_price, double ea_order_good_price,int orderComment,int ea_order_MagicNo)
{
    
   int order_resend_num;        // エントリー試行回数
   int ea_ticket_res;           // チケットNo
   int errorcode;               // エラーコード
   double ea_order_entry_price; // エントリーレート
   color order_Color;
   bool kekka;
       
   for( order_resend_num = 0; order_resend_num < 10; order_resend_num++ ) {    // エントリー試行回数上限:10回
    
      if(MarketInfo(NULL,MODE_SPREAD) < A_SPREAD){
    
         if(ea_order_entry_Type == OP_BUY){   
            ea_order_entry_price = Ask;               // 現在の買値でエントリー
            order_Color = clrBlue;
         }else if(ea_order_entry_Type == OP_SELL){        
            ea_order_entry_price = Bid;               // 現在の売値でエントリー
            order_Color = clrRed;            
         }
    
         // FXCMでは新規エントリー時にストップ/リミットを設定出来ない。
         ea_ticket_res = OrderSend(   // 新規エントリー注文
            NULL,                 // 通貨ペア
            ea_order_entry_Type,      // オーダータイプ[OP_BUY / OP_SELL]
            Lots,                     // ロット[0.01単位](FXTFは1=10Lot)
            ea_order_entry_price,     // オーダープライスレート
            20,                       // スリップ上限    (int)[分解能 0.1pips]
            ea_order_stop_price,      // ストップレート
            ea_order_good_price,      // リミットレート
            orderComment,             // オーダーコメント
            ea_order_MagicNo,         // マジックナンバー(識別用)
            0,                        // オーダーリミット時間
            order_Color               // オーダーアイコンカラー
            );
      }
                
      if ( ea_ticket_res == -1) {            // オーダーエラー
         errorcode = GetLastError();      // エラーコード取得
    
         if( errorcode != ERR_NO_ERROR) { // エラー発生
            printf("エラー");
         }
    
         Sleep(2000);                                           // 1000msec待ち
         RefreshRates();                                        // レート更新
    
         printf("再エントリー要求回数:%d, 更新エントリーレート:%g",order_resend_num+1 ,ea_order_entry_price);
    
      } else {    // 注文約定
         Print("新規注文約定。 チケットNo=",ea_ticket_res," レート:",ea_order_entry_price);
         Sleep(300);                                           // 300msec待ち(オーダー要求頻度が多過ぎるとエラーになる為)
                
         break;
      }
   }
   return kekka;   
}
    
//+------------------------------------------------------------------+
//|【関数】決済関数                                                     |
//|                                                                  |
//|【引数】 なし                          |
//|                                                                  |
//|【戻値】True:成功                                                   |
//|                                                                  |
//|  
bool funcOrder_Close()
{
   bool kekka,OrderKekka;
   int total,order_resend_num,errorcode;
       
   kekka=false;
   for(order_resend_num = 0; order_resend_num < 100; order_resend_num++ ) {   
      if(MarketInfo(NULL,MODE_SPREAD) < A_SPREAD){
         total=OrdersTotal();
             
         if(total >0 && OrderSelect(0,SELECT_BY_POS,MODE_TRADES)==true){
            if(OrderType() == OP_BUY){
               OrderKekka = OrderClose(OrderTicket(),OrderLots(),Bid,10,Violet);
            }
            else if(OrderType() == OP_SELL){
               OrderKekka = OrderClose(OrderTicket(),OrderLots(),Ask,10,Violet);
            }
                
            if(OrderKekka==false){
               errorcode = GetLastError();      // エラーコード取得
       
               if( errorcode != ERR_NO_ERROR) { // エラー発生
                  printf("決済エラー 要求回数:%d",order_resend_num+1);          
               }
               RefreshRates();
               Sleep(1000); 
            }
            else{
               kekka=true;
               break;
            }
         }
      }else{
          printf(MarketInfo(NULL,MODE_SPREAD) + "スプレッド拡大中");
          Sleep(5000);                                           // msec待ち
          RefreshRates();                                        // レート更新
      }
   }
   return kekka;   
}