同花順大牛MA副圖指標源碼[同花順公式]

相關標簽:

同花順牛MA副圖指標源碼

原理解析：
填充背景 輸出DIFF:收盤價的6日指數移動平均-收盤價的16日指數移動平均,COLORFFFF26 輸出DEA:DIFF的5日指數移動平均,COLOR8A15FF MACD賦值:2*(DIFF-DEA) 輸出對DIFF :0-(收盤價的6日指數移動平均 - 收盤價的16日指數移動平均) 輸出對DEA :0-(DIFF的5日指數移動平均) 輸出對稱 : 0-(2*(DIFF-DEA)),STICK,COLORFF6060,線寬為1 當滿足條件MACD>=0時,在MACD和0位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLORF00FF0 當滿足條件MACD<0時,在MACD和0位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,畫白色 當滿足條件MACD<1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR00C4C4 當滿足條件MACD<1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為6.3,0不為0則畫空心柱.,COLOR00EAEA 當滿足條件MACD<1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOR0BFFFF 當滿足條件MACD<1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為1.65,0不為0則畫空心柱.,COLOR46FFFF 當滿足條件MACD>=1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR0000BB 當滿足條件MACD>=1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為6.3,0不為0則畫空心柱.,COLOR0000F0 當滿足條件MACD>=1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOR1111FF 當滿足條件MACD>=1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為1.65,0不為0則畫空心柱.,COLOR3535FF 當滿足條件MACD>1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR9B009B 當滿足條件MACD>1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為6.3,0不為0則畫空心柱.,COLORCA00CA 當滿足條件MACD>1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLORF000F0 當滿足條件MACD>1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為1.65,0不為0則畫空心柱.,COLORFF28FF 當滿足條件MACD<=1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR00AA00 當滿足條件MACD<=1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為6.3,0不為0則畫空心柱.,COLOR00CE00 當滿足條件MACD<=1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOR00F700 當滿足條件MACD<=1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為1.65,0不為0則畫空心柱.,COLOR2DFF2D 低位金叉賦值:DIFF上穿DEA AND DIFF<-0.1 當滿足條件低位金叉時,在0和-0.18位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLORE8E8E8 當滿足條件低位金叉時,在0和-0.18位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORF2F2F2 當滿足條件低位金叉時,在0和-0.18位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFFFFF 當滿足條件低位金叉時,在-0.2位置書寫文字,COLORFFFFFF JCCOUNT賦值:統計上次DEA>=0距今天數日中滿足DIFF上穿DEA的天數 二次金叉賦值:DIFF上穿DEA AND DEA<0 AND 統計21日中滿足JCCOUNT=2的天數=1 當滿足條件二次金叉時,在0和-0.18位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR0042CC 當滿足條件二次金叉時,在0和-0.18位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR004FF2 當滿足條件二次金叉時,在0和-0.18位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR3375FF 當滿足條件二次金叉時,在-0.2位置書寫文字,COLOR3375FF A1賦值:上次1日前的DIFF上穿DEA距今天數 底背離賦值:A1+1日前的收盤價>收盤價 AND DIFF>A1+1日前的DIFF AND DIFF上穿DEA 當滿足條件底背離時,在0和0.13位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLORCECE00 當滿足條件底背離時,在0和0.13位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFFF00 當滿足條件底背離時,在0和0.13位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFFF44 當滿足條件A1=0時,在DEA位置畫直線起點，當滿足條件底背離時,在DEA位置畫直線終點,0表示是否延長.,COLORFFFFFF,線寬為1 當滿足條件底背離時,在0.3位置書寫文字,COLORFFFF26 A2賦值:上次1日前的DEA上穿DIFF距今天數 頂背離賦值:A2+1日前的收盤價<收盤價 AND A2+1日前的DIFF>DIFF AND DEA上穿DIFF 當滿足條件A2=0時,在DEA位置畫直線起點，當滿足條件頂背離時,在DEA位置畫直線終點,0表示是否延長.,畫綠色,線寬為1

源碼：

DRAWGBK(DATE>900103,STRIP(RGB(43,33,100),RGB(83,73,200),1));
DIFF:EMA(CLOSE,6)-EMA(CLOSE,16),ColorFFFF26;
DEA:EMA(DIFF,5),Color8A15FF;
MACD:=2*(DIFF-DEA);
對DIFF :0-(EMA(CLOSE,6) - EMA(CLOSE,16));
對DEA :0-(EMA(DIFF,5));
對稱 : 0-(2*(DIFF-DEA)),STICK,ColorFF6060,LINETHICK1;
{D1:EMA(C,16)-EMA(C,6),Color26FF26;
E2:EMA(D1,5),ColorFF1EFF;};
STICKLINE(MACD>=0,MACD,0,4,1),COLORF00FF0;
STICKLINE(MACD<0,MACD,0,4,1),colorwhite;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,10,0 ),Color00C4C4;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,6.3,0 ),Color00EAEA;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),Color0BFFFF;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1.65,0 ),Color46FFFF;STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,8 ,0 ),Color0000BB;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,6.3 ,0 ),Color0000F0;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,2.2,0 ),Color1111FF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.65 ,0 ),Color3535FF;STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,10,0 ),Color9B009B;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,6.3 ,0 ),ColorCA00CA;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),ColorF000F0;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.65,0 ),ColorFF28FF;STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,8,0 ),Color00AA00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,6.3 ,0 ),Color00CE00;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,2.2,0 ),Color00F700;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1.65 ,0 ),Color2DFF2D;低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,0,-0.18,10,0),ColorE8E8E8;
STICKLINE(低位金叉,0,-0.18,4,0),ColorF2F2F2;
STICKLINE(低位金叉,0,-0.18,2,0),ColorFFFFFF;
DRAWTEXT(低位金叉,-0.2,' 金叉'),ColorFFFFFF;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,-0.18,10,0),Color0042CC;
STICKLINE(二次金叉,0,-0.18,8,0),Color004FF2;
STICKLINE(二次金叉,0,-0.18,8,0),Color3375FF;
DRAWTEXT(二次金叉,-0.2,' 金叉二'),Color3375FF;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背離:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背離,0,0.13,10,0),ColorCECE00;
STICKLINE(底背離,0,0.13,4,0),ColorFFFF00;
STICKLINE(底背離,0,0.13,2,0),ColorFFFF44;
DRAWLINE(A1=0,DEA,底背離,DEA,0),ColorFFFFFF,linethick1;
DRAWTEXT(底背離,0.3,' 底背離'),ColorFFFF26;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
頂背離:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWLINE(A2=0,DEA,頂背離,DEA,0),colorgreen,linethick1;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.tumamayizhan.com '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

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