*

一目均衡表(関数版)

公開日: : 最終更新日:2015/02/20 マネー

MetaTrader4 に付属している一目均衡表のソースを見てみるとずいぶん複雑なので、関数を使って簡単に記述し直してみました。

書き換えたのはほとんど start 関数だけです(バッファ名も長いので変えましたけど)。

これをちょっと変えるとリアルタイム雲のフィルタが簡単に作れます。

プログラムソース

//+------------------------------------------------------------------+
//|              一目均衡表(関数版)          yasciiIchimoku01.mq4 |
//+------------------------------------------------------------------+

#property strict

#property indicator_chart_window
#property indicator_buffers 7
#property indicator_color1 Red          // Tenkan-sen
#property indicator_color2 Blue         // Kijun-sen
#property indicator_color3 SandyBrown   // Up Kumo
#property indicator_color4 Thistle      // Down Kumo
#property indicator_color5 Yellow         // Chikou Span
#property indicator_color6 SandyBrown   // Up Kumo bounding line
#property indicator_color7 Thistle      // Down Kumo bounding line
//--- input parameters
input int InpTenkan=9;   // Tenkan-sen
input int InpKijun=26;   // Kijun-sen
input int InpSenkou=52;  // Senkou Span B
//--- buffers
double tenkan[];
double kijun[];
double senkouA[];
double senkouB[];
double chikou[];
double senkouAL[];
double senkouBL[];
//---
int    ExtBegin;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
void OnInit(void)
  {
   IndicatorDigits(Digits);
//---
   SetIndexStyle(0,DRAW_LINE);
   SetIndexBuffer(0,tenkan);
   SetIndexDrawBegin(0,InpTenkan-1);
   SetIndexLabel(0,"Tenkan Sen");
//---
   SetIndexStyle(1,DRAW_LINE);
   SetIndexBuffer(1,kijun);
   SetIndexDrawBegin(1,InpKijun-1);
   SetIndexLabel(1,"Kijun Sen");
//---
   ExtBegin = InpKijun;
   if(ExtBegin < InpTenkan) ExtBegin = InpTenkan;
//---
   SetIndexStyle(2,DRAW_HISTOGRAM,STYLE_DOT);
   SetIndexBuffer(2,senkouA);
   SetIndexDrawBegin(2,InpKijun+ExtBegin-1);
   SetIndexShift(2,InpKijun-1);
   SetIndexLabel(2,NULL);
   SetIndexStyle(5,DRAW_LINE,STYLE_DOT);
   SetIndexBuffer(5,senkouAL);
   SetIndexDrawBegin(5,InpKijun+ExtBegin-1);
   SetIndexShift(5,InpKijun-1);
   SetIndexLabel(5,"Senkou Span A");
//---
   SetIndexStyle(3,DRAW_HISTOGRAM,STYLE_DOT);
   SetIndexBuffer(3,senkouB);
   SetIndexDrawBegin(3,InpKijun+InpSenkou-1);
   SetIndexShift(3,InpKijun-1);
   SetIndexLabel(3,NULL);
   SetIndexStyle(6,DRAW_LINE,STYLE_DOT);
   SetIndexBuffer(6,senkouBL);
   SetIndexDrawBegin(6,InpKijun+InpSenkou-1);
   SetIndexShift(6,InpKijun-1);
   SetIndexLabel(6,"Senkou Span B");
//---
   SetIndexStyle(4,DRAW_LINE);
   SetIndexBuffer(4,chikou);
   SetIndexShift(4,1-InpKijun);
   SetIndexLabel(4,"Chikou Span");
//--- initialization done
  }
//+------------------------------------------------------------------+
//| Ichimoku Kinko Hyo                                               |
//+------------------------------------------------------------------+
int start()
{
   int limit = Bars - IndicatorCounted();
   if(limit == Bars) limit -= InpKijun+InpSenkou-1;
   for (int i =limit -1; i>=0; i--)
   {
        tenkan[i] = (High[iHighest(NULL, 0, MODE_HIGH, InpTenkan, i)] + Low[iLowest(NULL, 0, MODE_LOW, InpTenkan, i)]) / 2.0 ;
        kijun[i] = (High[iHighest(NULL, 0, MODE_HIGH, InpKijun, i)] + Low[iLowest(NULL, 0, MODE_LOW, InpKijun, i)]) / 2.0 ;
        senkouA[i] = (High[iHighest(NULL, 0, MODE_HIGH, InpKijun, i)] + Low[iLowest(NULL, 0, MODE_LOW, InpKijun, i)] + High[iHighest(NULL, 0, MODE_HIGH, InpTenkan, i)] + Low[iLowest(NULL, 0, MODE_LOW, InpTenkan, i)]) / 4.0 ;
        senkouB[i] = (High[iHighest(NULL, 0, MODE_HIGH, InpSenkou, i)] + Low[iLowest(NULL, 0, MODE_LOW, InpSenkou, i)])/2.0 ;
        senkouAL[i] = senkouA[i] ;
        senkouBL[i] = senkouB[i] ;
        chikou[i] = Close[i];
     }

   return(0);
}
//+------------------------------------------------------------------+

###

関連記事

【FX】2024年2月集計

現在運用中の FX口座の2024年2月中の運用成績です。 1336.63$+153568円(と

記事を読む

【FX】Yetti という EA(2)

「【FX】Yetti という EA」の続きです。 TitanFX デモ口座(ブレードタイプ)で

記事を読む

中国バブル崩壊は不動産から始まる?

中国内部からのいい情報源を見つけました。 中国経済が上向く要素はなにもない ということです。

記事を読む

【FX】プロップファームの Fintokei について

以前の記事「【FX】プロップファーム(Prop Firm)について(2)」の続きです。 日本で

記事を読む

住宅ローン完済

* 平成2年に買った我が家(マンション)ですが、先月ようやくローンが完済のはこびとなりました。

記事を読む

医師のための資産形成アカデミーとかあるみたいですが

「医師のための資産形成アカデミー」という Youtube チャンネルがあることを この前知りました。

記事を読む

アメリカ高配当株投資で初の配当金

アメリカ株投資を先月始めたところです。 個別株は危険なので、ファンド(投資信託)と ETF(上

記事を読む

高級腕時計

* 以前にも書きましたが、世の中の商品はだいたい数量限定品。無限に生産できっこありません。

記事を読む

[FX] 2015/4/13 EA 緊急停止 トレンドが消失(2)

以前の記事「2015/4/13 EA 緊急停止 トレンドが消失」でも書きましたが、GBPUSD

記事を読む

[FX] EA の使い方&デモ口座成績 2015/4/1-8

デモ口座近況 EA 日 売買時刻 取引 lots 通貨 売買値 決済

記事を読む

Message

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

アマゾンで売られている 30TB のハードディスク

Amazon.co.jp で30TB の 外付けHDDが 1万

一神教は砂漠で生まれ、多神教は森で生まれた

一神教と多神教との違いは多々ありますが、 一神教は砂漠で生まれ、

胸部単純X線写真での異常影

いつの写真か全く覚えていませんが、かなり年配の女性。 「検診の胸部単

横静脈洞内のクモ膜顆粒

クモ膜顆粒(くも膜顆粒、パッキオーニ小体、arachnoid gran

2025-5-5 京都市動物園

本日は孫4人とともに 京都市動物園に。 子供の日なので孫たちは無

→もっと見る

  • 2025年5月
     1234
    567891011
    12131415161718
    19202122232425
    262728293031  
  • アクセスカウンター
PAGE TOP ↑