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); } //+------------------------------------------------------------------+<>
###
関連記事
-
-
明日のたかじんのそこまで言って委員会
* 明日の「たかじんのそこまで言って委員会」ですが、元オウムのジョウユウが出演らしいです。
-
-
【ふるさと納税】谷川果樹園のぽんかん【10㎏】土佐清水市
土佐清水市に 8000円寄付するともらえます。 ちょっとタネが多いですが、酸味・甘味のバラ
-
-
過去の日記についてのお知らせ
過去の日記をリライトしました。 frame 形式を iframe に書き直し。
-
-
過去の日記のリライト
過去の日記のリライトです。 10年前の梅雨のころですね。 01.0
-
-
Juniper netscreen 5GT(2)
統合型ファイアウォール/VPNアプライアンスである Juniper netscreen 5
-
-
【ふるさと納税】 訳あり 美生柑(みしょうかん)約 5kg 河内晩柑 / 愛媛県愛南町
【ふるさと納税】 訳あり 美生柑 みしょうかん 約 5kg
-
-
【万年筆】セーラー万年筆 プロフィットふでDEまんねん 紺 特殊ペン先
セーラー万年筆のプロフィットというと1万円~6万円くらいのラインアップの高級万年筆ですが、こ
-
-
藤田珈琲 プレミアムラオスブレンド 500g×4 送料無料
【送料無料2kg】藤田珈琲◆プレミアムラオスブレンド【500
-
-
Netflixアニメ 『PLUTO』
手塚治虫の代表作「鉄腕アトム」の「地上最大のロボット編」を浦沢直樹がリメイクしたマンガに『PLUTO
- PREV
- 究極のテクニカル分析 / 黒岩 泰
- NEXT
- スローな TII にしてくれ