通达信连续走强MACD未加密选股指标公式源码

通达信连续走强MACD未加密选股指标公式源码

源码正文：

difF:ema(CLOSE,12)-Ema(CLOSE,26){XG51};
IF(DIFF>REF(DIFF,1) AND DIFF>=0,DIFF,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
IF(DIFF<REF(DIFF,1) AND DIFF>0,DIFF,DRAWNULL),COLOR00FF00,LINETHICK1{XG51};
IF(DIFF<REF(DIFF,1) AND DIFF<=0,DIFF,DRAWNULL),COLOR00FF00,LINETHICK1{XG51};
IF(DIFF>REF(DIFF,1) AND DIFF<0,DIFF,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
DEA:EMA(DIFF,9){XG51};
IF(DEA>REF(DEA,1) AND DEA>=0,DEA,DRAWNULL),COLORMAGENTA,LINETHICK2{XG51};
IF(DEA<REF(DEA,1) AND DEA>0,DEA,DRAWNULL),COLOR00FF00,LINETHICK1{XG51};
IF(DEA<REF(DEA,1) AND DEA<=0,DEA,DRAWNULL),COLOR00FF00,LINETHICK1{XG51};
IF(DEA>REF(DEA,1) AND DEA<0,DEA,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
macd:2*(DIFF-DEA),LINETHICK0{XG51};
stICKLINE(MacD>=0,MACD,0,4,1),COLORF00FF0{XG51};
STICKLINE(MACD<0,MACD,0,4,1),COLORRED{XG51};
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,0.5,0 ),COLOR00FFFF{XG51};
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,0.5 ,0 ),COLOR0055FF{XG51};
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,0.5 ,0 ),COLORFF55BB{XG51};
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,0.5 ,0 ),COLORFFFF55{XG51};
连续反弹天:BArslASTCOUNT(MACD>REF(MACD,1) AND MACD<0),COLORMAGENTA,NODRAW;{XG51};
连续走强天:BARSLASTCOUNT(MACD>REF(MACD,1) AND MACD>0)NODRAW,COLORWHITE{XG51};
强势回调天:BARSLASTCOUNT(MACD<REF(MACD,1) AND MACD>0)NODRAW,COLORBLUE{XG51};
连续走弱天:BARSLASTCOUNT(MACD<REF(MACD,1) AND MACD<0)NODRAW,COLOR00FF00;{X=G-5-1=C=N={};

通达信红豆未加密选股指标公式源码

源码正文：

VAR1:=ema(Ema(CLOSE,9),9){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
stICKLINE(控盘<0,控盘,0,1,0),COLORRED{XG51};
A10:=crOSS(控盘,0){XG51};
无庄控盘:IF(控盘<0,控盘,0),COLORRED,NODRAW{XG51};
开始控盘:IF(A10,5,0),LINETHICK1,COLORBLUE{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORWHITE{XG51};
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORWHITE,NODRAW{XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF{XG51};
高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW{XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00{XG51};
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW{X*G_5=1*C*N*{};