*

一目均衡表 改良の試み

公開日: : 最終更新日:2020/03/08 マネー

前回の記事「超シンプルな自動売買プログラム(6) 簡単な一目均衡表」で紹介したプログラムを改良してみました。

まだロスカットはつけておりませんが、HLバンドによるトレーリングストップシャフトレンドサイクルフィルタをつけました。

職場のPCでテストをしたらものすごくいい結果が出ましたが、帰宅してから別のPCでやると悪い結果が。

おまけにプログラムにもバグがあり、修正しましたが、結局オリジナルより悪い結果となりました。

ドル円 4時間足(2014/1/1 – 2015/1/1)

プログラムかバックテスターのミスあるいはその両方だったようです。

バグにしてももう一度現れてほしいものです。

関連記事

超シンプルな自動売買プログラム(6) 簡単な一目均衡表

プログラムソース

//
// yasciiIchimoku03
//           一目均衡表 + HL trailing stop + STC filter
//         Indicators\Downloads フォルダに STC_pure_S.mq4 を入れてください

//マジックナンバーの定義
#define MAGIC  42711      

//パラメーターの設定//
extern double Lots = 1.0;     //取引ロット数
extern int Slip = 10;         //許容スリッページ数
extern string Comments =  "Ichimoku03"; //コメント
extern int Fast_period = 14 ;

extern int MA_Short=3;
extern int MA_Long=10;
extern int MA_Cycle=5;
int PriceType=0;
extern int SigPeriod=3;

int       Tenkan_sen=9;
int       Kijun_sen=26;
double    Senkou_span_b=52;

//変数の設定//
int Ticket_L = 0; //買い注文の結果をキャッチする変数
int Ticket_S = 0; //売り注文の結果をキャッチする変数
int Exit_L = 0;   //買いポジションの決済注文の結果をキャッチする変数
int Exit_S = 0;   //売りポジションの決済注文の結果をキャッチする変数
int OS1 ;
int OS2 ;
double   OOPL;
double   OOPS;

int start(){

    if (Volume[0]>1 || IsTradeAllowed() == false) return(0) ;

     double ten1 = iIchimoku( NULL, 0, Tenkan_sen, Kijun_sen, Senkou_span_b, 1, 1);
     double kij1 = iIchimoku( NULL, 0, Tenkan_sen, Kijun_sen, Senkou_span_b, 2, 1);
     double cla1 = iIchimoku( NULL, 0, Tenkan_sen, Kijun_sen, Senkou_span_b, 3, Kijun_sen);
     double clb1 = iIchimoku( NULL, 0, Tenkan_sen, Kijun_sen, Senkou_span_b, 4, Kijun_sen);

     double FastHH2 = Low[iHighest(NULL, 0, MODE_CLOSE, Fast_period, 2)];
     double FastLL2 = High[iLowest(NULL, 0, MODE_CLOSE, Fast_period, 2)];

     double stc1 = iCustom(NULL,0,"Downloads\\STC_pure_S",MA_Short,MA_Long,MA_Cycle,PriceType,SigPeriod,0,1);
     double stc2 = iCustom(NULL,0,"Downloads\\STC_pure_S",MA_Short,MA_Long,MA_Cycle,PriceType,SigPeriod,1,1);

   //買いポジションのエグジット
    OS1 = OrderSelect(Ticket_L, SELECT_BY_TICKET);
    OOPL = OrderOpenPrice();
    if( 
            ten1 < kij1 || Close[1] < cla1 || Close[1] < clb1 || Close[1] < FastHH2
            && ( Ticket_L != 0 && Ticket_L != -1 ))
    {   
      Exit_L = OrderClose(Ticket_L,Lots,Bid,Slip,Red);
      if( Exit_L ==1 ) {Ticket_L = 0;}
    }  

   //売りポジションのエグジット
     OS2 = OrderSelect(Ticket_S, SELECT_BY_TICKET);
     OOPS = OrderOpenPrice();
   if(  
          ten1 > kij1 || Close[1] > cla1 || Close[1] > clb1 || Close[1] > FastLL2
          && ( Ticket_S != 0 && Ticket_S != -1 ))
    {   
      Exit_S = OrderClose(Ticket_S,Lots,Ask,Slip,Blue);
      if( Exit_S ==1 ) {Ticket_S = 0;}
    } 

   //買いエントリー
   if( ten1 > kij1 && Close[1] > cla1 && Close[1] > clb1 && stc1 > stc2
       && ( Ticket_L == 0 || Ticket_L == -1 )
       && ( Ticket_S == 0 || Ticket_S == -1 ))
    {
      Ticket_L = OrderSend(Symbol(),OP_BUY,Lots,Ask,Slip,0,0,Comments,MAGIC,0,Red);
    }

   //売りエントリー
   if( ten1 < kij1 && Close[1] < cla1 && Close[1] < clb1 && stc1 < stc2
       && ( Ticket_S == 0 || Ticket_S == -1 )
       && ( Ticket_L == 0 || Ticket_L == -1 ))
    { 
      Ticket_S = OrderSend(Symbol(),OP_SELL,Lots,Bid,Slip,0,0,Comments,MAGIC,0,Blue);   
    }

   return(0);

  }

###

関連記事

サブプライム後のマネー経済入門 / 藤田 勉

サブプライム後のマネー経済入門 (Mainichi Business Books

記事を読む

楽天・米国レバレッジバランス・ファンド(愛称:USA360)

楽天証券で扱っている円建てのファンドです。 先週から買い始めました。 このファンドは 「

記事を読む

[FX] 372手法について

372手法 というのは 2ちゃんねる(現在は「5ちゃんねる」)で発表された FX の手法です。

記事を読む

米国株投資 (2)

以前の記事「米国株投資(1)」、「米国株投資(2) ETF ってすごい」で触れましたが、昨年の9月か

記事を読む

【FX】EA の運用

以前にも書いた内容ですが、よい事例が見つかったので、より具体的に述べてみようと思います。 この

記事を読む

米国債を楽天証券で買っています

ご承知のとおり最近アメリカの金利(FFR)がどんどん上がっています。 それにつれて米国債(新発

記事を読む

【ヤフオク】バチカン市国銀貨 レオ12世

ヤフオクで落札(170円+送料)したバチカン市国発行の銀貨(1825年?)です。 レオ12世の

記事を読む

[FX] こんな自動売買プログラムはどう?

Gogojungle というサイトで FX用の自動売買プログラムがいろいろ売られています。 す

記事を読む

[FX]時間帯理論 欧州時間の逆張りタイム

前回の記事「東大院生が考えたスマートフォンFX / 田畑 昇人 」で紹介した時間帯理論ですが、東

記事を読む

【FX】アンディさんのリアルタイム雲 (3)

最強の「FX理論」を君たちに教えたい posted with amazlet

記事を読む

Message

メールアドレスが公開されることはありません。 が付いている欄は必須項目です

HDMI EDIDエミュレーター パススルー ドングル

現在、4台の PC の HDMI端子から KVM切替機を通して 1台の

SWIMMIN’ / 村松健

村松健の CD アルバム「SWIMMIN'」です。 BOOK

M.2 NVMe to PCI-e 変換アダプタ 拡張カード

M.2 NVMe to PCI

【ふるさと納税】河内晩柑 / 愛媛県愛南町

【ふるさと納税】 【高評価★4

Apacer SSD 256GB(M.2 NVMe)

Apacer アペイサー SS

→もっと見る

  • アクセスカウンター
PAGE TOP ↑