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

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

Originally posted 2018-08-04 18:20:25.

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

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

仕様

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

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

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: サービス展開向けの仮想通貨自動売買システムを作るには
NEXT: MT4の"本当の"スプレッドを表示する(チェックソフト配布)

[MQL]ティック更新よりも早い頻度で演算させる方法とちょっとした注意事項

MT4のEAは基本的にティックレートを受信する度に一回演算する仕組みになっています。 USDJPY

記事を読む

[MT4]EAに口座縛り/期間限定縛りをかける種類と方法(MT5)

良いEAができると、クレクレ厨がよってきますが、身内の人にならひっそりと配布したい場合もあります。

記事を読む

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

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

記事を読む

ティック更新のズレにはFXシステムの穴がある合成通貨アービトラージ

合成通貨アービトラージとは FXは通貨ペアなので、その組み合わせは無数にあります。例えば、ドル

記事を読む

自動売買における仮想ストップロス、仮想テイクプロフィットの概念と意味

最近の自動売買系の論文やコードを読んでいると「仮想ストップロス」、「仮想テイクプロフィット」という概

記事を読む

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