Trend Intensity Index という指標(2) シグナルを付加
公開日:
:
最終更新日:2015/02/24
日記
以前の記事『Trend Intensity Index という指標』で紹介したインディケーターもシグナルを表示するように改変してみました。
シグナルというのは指標の移動平均をとったもので、平滑されている分、遅れて動くので、指標とのクロスで売買のシグナルにすることができるのです。
サブウィンドウの上が TII_RLH.ex4(オリジナル)で、下が私の改良したシグナル付加版。
下のシグナル付加版で赤と水色の線のクロスしたところ(平行して重なったところではない)が買いまたは売りとなります。
シグナルがないと指標の反転を判断するのに数値で比べないといけないのですが、シグナルがあるとクロスの有無で判定でき、より簡単にプログラムできるという裏事情があるのです。
関連記事
- Trend Intensity Index という指標
- スローな TII にしてくれ
- Trend Intensity Index を使った EA
- Trend Intensity Index を使った EA(2) Damiani filter版
プログラムソース
#property copyright "Copyright ゥ 2006, Robert Hill " #property link "http://www.metaquotes.net/" //---- indicator settings #property indicator_separate_window #property indicator_buffers 2 #property indicator_color1 Red #property indicator_color2 Aqua #property indicator_width1 2 #property indicator_width2 1 //---- extern int Major_Period=60; extern int Major_MaMode=1; //0=sma, 1=ema, 2=smma, 3=lwma, 4=lsma extern int Major_PriceMode=0;//0=close, 1=open, 2=high, 3=low, 4=median(high+low)/2, 5=typical(high+low+close)/3, 6=weighted(high+low+close+close)/4 extern int Minor_Period=30; extern color LevelColor=Silver; extern int BuyLevel=20; extern int MidLevel=50; extern int SellLevel=80; extern int SigPeriod = 8; //---- buffers double ma[]; double ma_dev[]; double tii[]; double tiis[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { //---- drawing settings IndicatorBuffers(4); SetIndexStyle(0,DRAW_LINE); SetIndexDrawBegin(0,Major_Period); IndicatorDigits(MarketInfo(Symbol(),MODE_DIGITS)+2); //---- 3 indicator buffers mapping SetIndexBuffer(0,tii); SetIndexBuffer(1,tiis); SetIndexStyle(1,DRAW_LINE); SetIndexDrawBegin(1,Major_Period); SetIndexBuffer(2,ma_dev); SetIndexBuffer(3,ma); //---- name for DataWindow and indicator subwindow label IndicatorShortName(" TII , Major_Period ( "+Major_Period+" ) , Minor_Period ( "+Minor_Period+" ), "); SetLevelStyle(STYLE_DASH,1,LevelColor); SetLevelValue(0,BuyLevel); SetLevelValue(1,MidLevel); SetLevelValue(2,SellLevel); //---- initialization done return(0); } //+------------------------------------------------------------------+ //| LSMA with PriceMode | //| PrMode 0=close, 1=open, 2=high, 3=low, 4=median(high+low)/2, | //| 5=typical(high+low+close)/3, 6=weighted(high+low+close+close)/4 | //+------------------------------------------------------------------+ double LSMA(int Rperiod,int prMode,int shift) { int i; double sum,pr; int length; double lengthvar; double tmp; double wt; //---- length=Rperiod; sum=0; for(i=length; i>=1;i--) { lengthvar=length+1; lengthvar/=3; tmp=0; switch(prMode) { case 0: pr=Close[length-i+shift];break; case 1: pr=Open[length-i+shift];break; case 2: pr=High[length-i+shift];break; case 3: pr=Low[length-i+shift];break; case 4: pr=(High[length-i+shift] + Low[length-i+shift])/2;break; case 5: pr=(High[length-i+shift] + Low[length-i+shift] + Close[length-i+shift])/3;break; case 6: pr=(High[length-i+shift] + Low[length-i+shift] + Close[length-i+shift] + Close[length-i+shift])/4;break; } tmp =(i - lengthvar)*pr; sum+=tmp; } wt=sum*6/(length*(length+1)); //---- return(wt); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ int start() { int i,j,limit; double sdPos,sdNeg; int counted_bars=IndicatorCounted(); if(counted_bars<0) return(-1); if(counted_bars>0) counted_bars--; limit=Bars-counted_bars; if(counted_bars==0) limit-=1+MathMax(Major_Period,Minor_Period); //---- for(i=limit; i>=0; i--) { if(Major_MaMode==4) { ma[i]=LSMA(Major_Period,Major_PriceMode,i); } else { ma[i]=iMA(NULL,0,Major_Period,0,Major_MaMode,Major_PriceMode,i); } ma_dev[i]=Close[i]-ma[i]; } //========== COLOR CODING =========================================== for(i=0; i<=limit; i++) { sdPos=0; sdNeg=0; for(j=i;j<i+Minor_Period;j++) { if(ma_dev[j]>=0) sdPos=sdPos+ma_dev[j]; if(ma_dev[j]<0) sdNeg=sdNeg+ma_dev[j]; } tii[i]=100*sdPos/(sdPos-sdNeg); } for(i=0; i<=limit; i++) { tiis[i] = iMAOnArray(tii,0,SigPeriod,0,MODE_EMA,i); } //---- return(0); } //+------------------------------------------------------------------+<>
###
関連記事
-
-
ファミマの お好み焼き&たこ焼きセット
本日の昼食 本日の昼食は金曜日に私がよくやっているセットメニュー。 もちろんファミマの冷凍食
-
-
過去の日記のリライト
過去の日記のリライトです。 無視しても結構です。 06.03.31
-
-
過去の日記のリライト
過去の日記のリライトです。 無視して結構です。 02.05.31
-
-
干し芋 訳あり 300g 紅はるか
干し芋って結構高いですが、訳あり(切り落とし)なのでか、300g なのに 1000円のものが楽天市場
-
-
三菱 TC-ED2D-S サイクロン式掃除機
この前、事務所で使っていた掃除機(紙パック式)が壊れてスティック型のサイクロン式掃除機を買ったばかり
-
-
衛星アンテナの取り付け
今日は衛星放送用のアンテナを買ったので、設置してみました。 なぜ買ったかは話が長くなるの
-
-
【映画】ハンターキラー 潜航せよ
★★★☆☆ 「青の6号」、「サブマリン707」、「原子力潜水艦シービュー号」、「海底大
-
-
過去の日記のリライト 2011/05/09
過去の日記のリライトです。 無視してください。 03.12.
- PREV
- 究極のテクニカル分析 / 黒岩 泰
- NEXT
- スローな TII にしてくれ