[MT4EA]完全無敗勝率100％のバックテストを生成するEA[ソースコードあり]

公開日： 2020/02/04 : 中級者EA開発バックテスト, 勝率100%, 後出しじゃんけん, ソースコードあり

今回はバックテストで完璧な成績を出すＥＡを作成しました。

意味は…ありません。ただの道楽です。

仕様

仕様は、
・ＥＡに一度バックテストさせる
（バックテストの際にチャートデータを記録する）
・ＥＡにもう一度バックテストさせる
（記録したデータをもとに後出しじゃんけん的エントリーをする）
という具合です。

一度経験したチャートを記録し、その記録をもとに未来予知を実現します。

1回目のテストの際にロウソク足が上がるか、下がるがを順番に記録していき、
2回目のテストで次のロウソクが上がる場合は買い、
下がる場合は売りをするロジックを組み込みました。

もちろん後出しなので、勝率は100%です。

どの期間、どの通貨ペア、どの時間枠でも勝率100%をたたき出すことが可能です。（爆）

時間枠はD1にしてください。

もちろん、日足の変位がスプレッド未満の場合は、手数料負けする可能性はあります。

EAのダウンロード

ソースコードのダウンロード

//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
{
//---
   
   int filehandle;
   string terminal_data_path=TerminalInfoString(TERMINAL_DATA_PATH); 
   string filename=/*terminal_data_path+"\\MQL4\\Files\\"+*/Symbol()+".txt"; 
   if( !FileIsExist(filename) )
   {
      filehandle=FileOpen(filename,FILE_WRITE|FILE_TXT); 
      FileWriteString(filehandle,"");
      FileClose(filehandle);
   }
   filehandle=FileOpen(filename,FILE_READ|FILE_TXT);
   if(filehandle!=INVALID_HANDLE)
   {
      string FileText = FileReadString(filehandle,0);
      FileClose(filehandle);
      string SearchStr = IntegerToString(Year())+DigitFix3(TimeDayOfYear(TimeCurrent())-1);
      int WritingDataPlace = StringFind(FileText,SearchStr,0);
      if( WritingDataPlace == -1 )
      {
         
         filehandle=FileOpen(filename,FILE_WRITE|FILE_TXT); 
         if(filehandle!=INVALID_HANDLE) 
         { 
            if( iOpen(Symbol(),PERIOD_D1,1) > iClose(Symbol(),PERIOD_D1,1) )
            {
               FileWriteString(filehandle,FileText+Year()+DigitFix3(TimeDayOfYear(TimeCurrent())-1)+""+"0"); 
               FileClose(filehandle); 
               
               int Handle = FileOpen(Symbol()+"Moving"+".txt",FILE_READ|FILE_TXT);
               string MovingData = FileReadString(Handle,0);
               FileClose(Handle);
               Handle = FileOpen(Symbol()+"Moving"+".txt",FILE_WRITE|FILE_TXT);
               FileWriteString(Handle,MovingData+"0");
            }
            else
            {
               FileWriteString(filehandle,FileText+Year()+DigitFix3(TimeDayOfYear(TimeCurrent())-1)+""+"1"); 
               FileClose(filehandle); 
               
               Handle = FileOpen(Symbol()+"Moving"+".txt",FILE_READ|FILE_TXT);
               MovingData = FileReadString(Handle,0);
               FileClose(Handle);
               Handle = FileOpen(Symbol()+"Moving"+".txt",FILE_WRITE|FILE_TXT);
               FileWriteString(Handle,MovingData+"1");
            }
            
         } 
      } 
      else
      {
         string OrderID = IntegerToString(Year())+DigitFix3(TimeDayOfYear(TimeCurrent()));
         int OrdersTotal_ = OrdersTotal();
         for(int i =0;i<OrdersTotal_;i++ ) 
         {  
            bool Select = OrderSelect(0,SELECT_BY_POS);
            if( StringFind(OrderComment(),OrderID,0) == -1 )
            {
               bool RClose;
               if( OrderType() == OP_BUY ) RClose = OrderClose(OrderTicket(),OrderLots(),Bid,3,clrRed);
               if( OrderType() == OP_SELL ) RClose =OrderClose(OrderTicket(),OrderLots(),Ask,3,clrBlue);
            }
         }
         
         string TodaySearchStr = IntegerToString(Year())+DigitFix3(TimeDayOfYear(TimeCurrent()));
         int TodaysDataPlace = StringFind(FileText,TodaySearchStr,0);
         string FileDayData = StringSubstr(FileText,TodaysDataPlace,9);
         string FileDayOfYear = StringSubstr(FileDayData,4,3);
         string FileYear = StringSubstr(FileDayData,0,4);
         string FileUpOrDown = StringSubstr(FileDayData,7,1);

         if( OrdersTotal() == 0 )
         {
            if( IntegerToString(Year()) == FileYear )
            {
               if( FileDayOfYear == DigitFix3(TimeDayOfYear(TimeCurrent())) )
               {

                  int Ticket;
                  
                  if( FileUpOrDown == "1" )
                  {
                     Ticket = OrderSend(Symbol(),OP_BUY,0.1,Ask,3,0,0,OrderID,3141592,0,clrRed);
                  }
                  else if( FileUpOrDown == "0" )
                  {
                     Ticket = OrderSend(Symbol(),OP_SELL,0.1,Bid,3,0,0,OrderID,3141592,0,clrBlue);
                  }
               }
            }
         }
      }
   }
   FileClose(filehandle);
      
      
}
//+------------------------------------------------------------------+
//| ChartEvent function                                              |
//+------------------------------------------------------------------+
void OnChartEvent(const int id,
                  const long &lparam,
                  const double &dparam,
                  const string &sparam)
{
//---
   
}
//+------------------------------------------------------------------+
string DigitFix3(string FixedStr)
{
   string DummyReturn;
   if( StringToInteger(FixedStr) < 10 ) DummyReturn = "00"+FixedStr;
   else if( StringToInteger(FixedStr) < 100 ) DummyReturn = "0"+FixedStr;
   //else if( StringToInteger(FixedStr) == -1 ) DummyReturn = "365";
   else DummyReturn = FixedStr;
   
   return(DummyReturn);
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

//+------------------------------------------------------------------+

//| Expert tick function |

//+------------------------------------------------------------------+

void OnTick()

{

//---

int filehandle;

string terminal_data_path=TerminalInfoString(TERMINAL_DATA_PATH);

string filename=/*terminal_data_path+"\\MQL4\\Files\\"+*/Symbol()+".txt";

if( !FileIsExist(filename) )

{

filehandle=FileOpen(filename,FILE_WRITE|FILE_TXT);

FileWriteString(filehandle,"");

FileClose(filehandle);

}

filehandle=FileOpen(filename,FILE_READ|FILE_TXT);

if(filehandle!=INVALID_HANDLE)

{

string FileText = FileReadString(filehandle,0);

FileClose(filehandle);

string SearchStr = IntegerToString(Year())+DigitFix3(TimeDayOfYear(TimeCurrent())-1);

int WritingDataPlace = StringFind(FileText,SearchStr,0);

if( WritingDataPlace == -1 )

{

filehandle=FileOpen(filename,FILE_WRITE|FILE_TXT);

if(filehandle!=INVALID_HANDLE)

{

if( iOpen(Symbol(),PERIOD_D1,1) > iClose(Symbol(),PERIOD_D1,1) )

{

FileWriteString(filehandle,FileText+Year()+DigitFix3(TimeDayOfYear(TimeCurrent())-1)+""+"0");

FileClose(filehandle);

int Handle = FileOpen(Symbol()+"Moving"+".txt",FILE_READ|FILE_TXT);

string MovingData = FileReadString(Handle,0);

FileClose(Handle);

Handle = FileOpen(Symbol()+"Moving"+".txt",FILE_WRITE|FILE_TXT);

FileWriteString(Handle,MovingData+"0");

}

else

{

FileWriteString(filehandle,FileText+Year()+DigitFix3(TimeDayOfYear(TimeCurrent())-1)+""+"1");

FileClose(filehandle);

Handle = FileOpen(Symbol()+"Moving"+".txt",FILE_READ|FILE_TXT);

MovingData = FileReadString(Handle,0);

FileClose(Handle);

Handle = FileOpen(Symbol()+"Moving"+".txt",FILE_WRITE|FILE_TXT);

FileWriteString(Handle,MovingData+"1");

}

else

{

string OrderID = IntegerToString(Year())+DigitFix3(TimeDayOfYear(TimeCurrent()));

int OrdersTotal_ = OrdersTotal();

for(int i =0;i<OrdersTotal_;i++ )

{

bool Select = OrderSelect(0,SELECT_BY_POS);

if( StringFind(OrderComment(),OrderID,0) == -1 )

{

bool RClose;

if( OrderType() == OP_BUY ) RClose = OrderClose(OrderTicket(),OrderLots(),Bid,3,clrRed);

if( OrderType() == OP_SELL ) RClose =OrderClose(OrderTicket(),OrderLots(),Ask,3,clrBlue);

}

string TodaySearchStr = IntegerToString(Year())+DigitFix3(TimeDayOfYear(TimeCurrent()));

int TodaysDataPlace = StringFind(FileText,TodaySearchStr,0);

string FileDayData = StringSubstr(FileText,TodaysDataPlace,9);

string FileDayOfYear = StringSubstr(FileDayData,4,3);

string FileYear = StringSubstr(FileDayData,0,4);

string FileUpOrDown = StringSubstr(FileDayData,7,1);

if( OrdersTotal() == 0 )

{

if( IntegerToString(Year()) == FileYear )

{

if( FileDayOfYear == DigitFix3(TimeDayOfYear(TimeCurrent())) )

{

int Ticket;

if( FileUpOrDown == "1" )

{

Ticket = OrderSend(Symbol(),OP_BUY,0.1,Ask,3,0,0,OrderID,3141592,0,clrRed);

}

else if( FileUpOrDown == "0" )

{

Ticket = OrderSend(Symbol(),OP_SELL,0.1,Bid,3,0,0,OrderID,3141592,0,clrBlue);

}

FileClose(filehandle);

}

//+------------------------------------------------------------------+

//| ChartEvent function |

//+------------------------------------------------------------------+

void OnChartEvent(const int id,

const long &lparam,

const double &dparam,

const string &sparam)

{

//---

}

//+------------------------------------------------------------------+

string DigitFix3(string FixedStr)

{

string DummyReturn;

if( StringToInteger(FixedStr) < 10 ) DummyReturn = "00"+FixedStr;

else if( StringToInteger(FixedStr) < 100 ) DummyReturn = "0"+FixedStr;

//else if( StringToInteger(FixedStr) == -1 ) DummyReturn = "365";

else DummyReturn = FixedStr;

return(DummyReturn);

}

この投稿は役に立ちましたか？役に立った役に立たなかった 1 人中 1 人がこの投稿は役に立ったと言っています。

Message コメントをキャンセル

PREV: [MT4]インジケーター無料ダウンロード一覧
NEXT: MT4の"本当の"スプレッドを表示する(チェックソフト配布)

利用可能なトレード系APIまとめ

今まで当たり前のようにMT4/MT5で開発をしてきましたが、そういえばAPIを使った取引も可能だよね

記事を読む

(MQL4)MT4チャート上で動画を表示するやり方[EA自作]

MT4にはチャート上に画像を表示させる機能があります。しかし、動画を表示させる機能はありません。

記事を読む

iCustomではEA化できないインジケーターをEA化するやり方

世の中にはいろいろなMT4用インジケーターがあるわけですが、その中にもEA化できるインジケーターとE

記事を読む

(MQL4)WEBサイトの情報を取得するやり方[EA]WebRequest

MT4のチャート上にWEBサイトの情報を参照する方法について紹介します。背景

記事を読む

[MT4EA]チャートパターンを分析,分類して、一番多いパターンが来たらトレードする

パターン分析トレードとは今回はMT4のファイル関数を使って、パターン分析トレードシステムを作成し

記事を読む

[MT4EA]完全無敗勝率100％のバックテストを生成するEA[ソースコードあり]