同花顺MACD彩色量柱未加密未加密选股指标公式源码

Zero : 0;
dif : Ema(CLOSE,6) - ema(CLOSE,13);
DEA : EMA(DIF,4);
MacD : 2*(DIF-DEA),COLORFF00FF;
主力线:EMA(DIF-MA(REF(DIF,1),1),1)*1.862,colorwhite,LINETHICK1;
STICKLINE(macd>0 AND MACD>=REF(MACD,1),0,MACD,5,0),color0000ff;
STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,5,0),colorffff00;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,5,0),colorff00ff;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,5,0),color00ff00;
DIF:=EMA(CLOSE,6)-EMA(CLOSE,13);
mtm:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(Abs(MTM),6),6);
YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND crOSS(DX,MA(DX,2)),1,0);
蓝:IF(FILTER(YXF=1,5),20,0),colorliblue,LINETHICK3;
红: IF(FILTER(YXF=1,5),10,0),colorred,LINETHICK2;
黄: IF(FILTER(YXF=1,5),5,0),coloryellow,LINETHICK1;
A:=(3*C+L+O+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210;
S2:=SMA(C,3,1);
S6:=SMA(C,5,1);
DK:=2*(S2-S6);
主力成本:EMA(X,13),colorcyan,LINETHICK0;
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,4,0 ),COLOR00aaff;
X1:IF(dif<0,dif,0),COLOR0000FF,LINETHICK2;
X2:IF(dif<0,0,dif),colormagenta,LINETHICK1;
X3:IF(dIf<dea,dif,dea),COLOR00ff00,linethick1;
X4:IF(dif>dea,dea,dea),linethick1,COLORffbb11;
低位金叉:=CROSS(DIF,DEA) AND DIF<-0.1;
STICKLINE(低位金叉,DEA*0.86,DEA*0.66,6,0),coloryellow;
DRAWTEXT(低位金叉,dea*0.86,' 金叉'),coloryellow;
JCCOUNT:=COUNT(CROSS(DIF,DEA),BArslAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,DEA*0.96,DEA*0.76,6,0),ColorFF00FF;
DRAWICON(二次金叉,dea*1.1,'BUY') ;
DRAWTEXT(二次金叉,DEA*0.96,' 金叉'),ColorFF00FF;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA);
STICKLINE(底背离,DEA*1.09,DEA*0.86,6,0),Color00FF00;
DRAWLINE(A1=0,DEA,底背离,DEA,0),colorred,linethick1;
DRAWTEXT(底背离,DEA*1.09,' 底背'),Color6600FF;
A2:=BARSLAST(REF(CROSS(DEA,DIF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF);
DRAWLINE(A2=0,DEA,顶背离,DEA,0),colorgreen,linethick1;
DRAWTEXT(顶背离,DEA*1.2,' 顶背'),Color00FF00;

通达信持仓k线主图未加密选股指标公式源码

源码正文：

使用说明:红色持股，绿色空仓，白色为预警。

LC:=REF(CLOSE,1){XG51};
RSI1:=SMA(maX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100{XG51};
X9:=FORCAst(C,9){XG51};
LLX:=LLV(FORCAST(C,9),2){XG51};
XX9:=X9*100-LLX*100{XG51};
DRAWBAND(X9,RGB(255,255,0),LLX,RGB(0,255,0)){XG51};
D:IF(XX9=0,LLX,DRAWNULL),COLORCYAN{XG51};
VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;    
VAR2A:=SMA(VAR1A,9,1)+100;    
VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;    
VAR4A:=SMA(VAR3A,3,1);    
VAR5A:=SMA(VAR4A,3,1)+100;    
VAR6A:=VAR5A-VAR2A;    
端庄窝:=IF(VAR6A>21,VAR6A-21,0);  
T1:=(XX9=0 AND 端庄窝<=REF(端庄窝,1)){XG51};
T2:=(XX9=0 AND 端庄窝>REF(端庄窝,1)){XG51};
T3:=(XX9>0 AND 端庄窝>REF(端庄窝,1)){XG51};
T4:=(XX9>0 AND 端庄窝<=REF(端庄窝,1)){XG51};
T5:=RSI1>=RSI2{XG51};
T6:=RSI1<RSI2{XG51};
STICKLINE(T1,H,L,0,1),COLORCYAN{XG51};
STICKLINE(T1 AND C>O,O,C,3,1),COLORCYAN{XG51};
STICKLINE(T1 AND C<O,C,O,3,0),COLORCYAN{XG51};
STICKLINE(T2 AND T5,H,L,0,1),COLORRED{XG51};
STICKLINE(T2 AND T5 AND C>O,O,C,3,1),COLORRED{XG51};
STICKLINE(T2 AND T5 AND C<O,C,O,3,0),COLORRED{XG51};
STICKLINE(T2 AND T6,H,L,0,1),COLORCYAN{XG51};
STICKLINE(T2 AND T6 AND C>O,O,C,3,1),COLORCYAN{XG51};
STICKLINE(T2 AND T6 AND C<O,C,O,3,0),COLORCYAN{XG51};
STICKLINE(T3,H,L,0,1),COLORWHITE{XG51};
STICKLINE(T3 AND C>O,O,C,3,1),COLORWHITE{XG51};
STICKLINE(T3 AND C<O,C,O,3,0),COLORWHITE{XG51};
STICKLINE(T4 AND T5,H,L,0,1),COLORRED{XG51};
STICKLINE(T4 AND T5 AND C>O,O,C,3,1),COLORRED{XG51};
STICKLINE(T4 AND T5 AND C<O,C,O,3,0),COLORRED{XG51};
STICKLINE(T4 AND T6,H,L,0,1),COLORCYAN{XG51};
STICKLINE(T4 AND T6 AND C>O,O,C,3,1),COLORCYAN{XG51};
STICKLINE(T4 AND T6 AND C<O,C,O,3,0),COLORCYAN{XG51};
STICKLINE(T3 AND C<LLX,H,L,0,1),COLORRED{XG51};
STICKLINE(T3 AND C>O AND C<LLX,O,C,3,1),COLORRED{XG51};
STICKLINE(T3 AND C<O AND C<LLX,C,O,3,0),COLORRED{XG51};
短线:=MA(CLOSE,6),COLOR0000FF,LINETHICK2{XG51};
中线:MA(CLOSE,33),COLORGREEN,LINETHICK2{XG51};
多:IF(短线>=中线,中线,DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
空:IF(中线>=短线,中线,DRAWNULL),COLORYELLOW,LINETHICK2{XG51};
MA250:MA(C,250),LINETHICK2{X.G*5.1.C.N.{};