相關標簽:

?

原理解析：
輸出MA5:收盤價的5日指數移動平均,畫白色 輸出工作線:收盤價的14日指數移動平均,COLORF00FF0,線寬為1 輸出二號線:收盤價的25日指數移動平均,COLOR00FF00,線寬為1 輸出九號線:收盤價的99日指數移動平均,線寬為1 輸出MA120:收盤價的120日指數移動平均,線寬為1 輸出生命線:收盤價的453日指數移動平均,線寬為1,畫紅色 DIFF賦值:( 收盤價的7日指數移動平均 - 收盤價的19日指數移動平均) DEA賦值:DIFF的9日指數移動平均 MACD賦值:0.90*(DIFF-DEA) TJ賦值:(DIFF>=DEA) TJ1賦值:(DIFF>=0) 當滿足條件TJ時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫黃色 當滿足條件TJ時,在開盤價和收盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫黃色 當滿足條件TJ1ANDTJ時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORF00FF0 當滿足條件TJ1ANDTJ時,在開盤價和收盤價位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLORF00FF0 當滿足條件DIFF<DEA時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORF0F000 當滿足條件DIFF<DEA時,在開盤價和收盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORF0F000 VAR1賦值:(收盤價*2+最高價+最低價)/4 SK賦值: VAR1的13日指數移動平均-VAR1的73日指數移動平均 SD賦值: SK的2日指數移動平均 當滿足條件(SK上穿SDANDSK<-0.04AND(收盤價-1日前的收盤價)/1日前的收盤價>=0.03)OR(SK上穿SDANDSK<=-0.14)OR(SK上穿SDANDSK<=0.05AND(成交量(手)/成交量(手)的5日簡單移動平均>2ORC/1日前的收盤價>0.035))時,在最低價*0.99位置書寫文字,畫綠色 當滿足條件(SK上穿SDANDSK<-0.04AND(收盤價-1日前的收盤價)/1日前的收盤價>=0.03)OR(SK上穿SDANDSK<=-0.14)OR(SK上穿SDANDSK<=0.05AND(成交量(手)/成交量(手)的5日簡單移動平均>2ORC/1日前的收盤價>0.035))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫紅色 當滿足條件(SK上穿SDANDSK<-0.04AND(收盤價-1日前的收盤價)/1日前的收盤價>=0.03)OR(SK上穿SDANDSK<=-0.14)OR(SK上穿SDANDSK<=0.05AND(成交量(手)/成交量(手)的5日簡單移動平均>2ORC/1日前的收盤價>0.035))時,在開盤價和收盤價位置之間畫柱狀線,寬度為10,1不為0則畫空心柱.,線寬為3,畫紅色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

MA5:EMA(C,5),COLORWHITE;
工作線:EMA(C,14),COLORF00FF0,LINETHICK1;
二號線:EMA(C,25),COLOR00FF00,LINETHICK1;
九號線:EMA(CLOSE,99),LINETHICK1;
MA120:EMA(CLOSE,120),LINETHICK1;
生命線:EMA(CLOSE,453),LINETHICK1,COLORRED;
DIFF:=( EMA(CLOSE,7) - EMA(CLOSE,19));
DEA:=EMA(DIFF,9);
MACD:=0.90*(DIFF-DEA);
TJ:=(DIFF>=DEA);
TJ1:=(DIFF>=0);
STICKLINE(TJ,H,L,0.5,0),COLORYELLOW;
STICKLINE(TJ,O,C,4,0),COLORYELLOW;
STICKLINE(TJ1 AND TJ,H,L,0.5,0),COLORF00FF0;
STICKLINE(TJ1 AND TJ,O,C,4,1),COLORF00FF0;
STICKLINE(DIFF<DEA,H,L,0.5,0),COLORF0F000;
STICKLINE(DIFF<DEA,O,C,4,0),COLORF0F000;
VAR1:=(CLOSE*2+HIGH+LOW)/4;
SK:= EMA(VAR1,13)-EMA(VAR1,73);
SD:= EMA(SK,2);
DRAWTEXT((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) ,L*0.99,'短線'),COLORGREEN;
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),H,L,0.5,0),COLORRED;
STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),O,C,10,1),LINETHICK3,COLORRED;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?