通达信机械量化MACD趋势选股指标公式源码

通达信机械量化MACD趋势选股指标公式源码

源码正文：

difF:=( ema(CLOSE,12) - Ema(CLOSE,26)){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA),stICK{XG51};
STICKLINE(DIFF<0,0,DIFF,2,0),COLORCYAN{XG51};
STICKLINE(DIFF>=0,0,DIFF,2,0),COLORWHITE{XG51};
STICKLINE(DEA>=0,0,DEA,2,-1),COLOR0000CC{XG51};
STICKLINE(DEA<0,0,DEA,2,-1),COLORCYAN{XG51};
柱1:=IF(DIFF>DEA,DIFF,0),COLORWHITE{XG51};
柱2:=IF(DEA<DIFF,DEA,0),COLORLIMAGENTA{XG51};
DRAWICON(crOSS(DIFF,DEA),柱2,1){XG51};
DRAWICON(CROSS(DEA,DIFF),DEA*1.1,2){XG51};
总涨跌比:DYNAINFO(60)/(DYNAINFO(60)+DYNAINFO(61))*100,COLORGREEN,NODRAW{XG51};
净资产:=FINANCE(34){XG51};
年ROE:FINANCE(33)/FINANCE(34)COLORGREEN,NODRAW{XG51};
PE:=DYNAINFO(39),COLORWHITE,NODRAW{XG51};
PB:CONST(DYNAINFO(7) / FINANCE(34))COLOREE3AB2,NODRAW{XG51};
投资回报率:年ROE/PB*100,COLOR0099FF,NODRAW;{XG51};
M:=9; SHORT:=12;LONG:=26{XG51};
JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1)){XG51};
DD:=(MacD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1)){XG51};
DIF拐头价:=(DIFF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1)))COLORGREEN,LINETHICK3{XG51};
柱变向价:=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.9,0.94,0,STRCAT('拐点价格:  ',CON2STR(DIF拐头价,2))),COLORBLUE{XG51};
DRAWNUMBER(DIFF>DEA,3,BArslAST(CROSS(DIFF,DEA))+1),COLORWHITE,NODRAW{XG51};
DRAWNUMBER(DIFF<DEA,-1,BARSLAST(CROSS(DEA,DIFF))+1),COLORCYAN,NODRAW{XG51};
DRAWTEXT_FIX(1,0.0,0.95,0,STRCAT('停止操作: ',CON2STR(CLOSE<MA(CLOSE,60),2))),COLORGREEN{XG51};
VA:=IF(CLOSE>REF(CLOSE,1),vol,-VOL){XG51};
obv1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
OBV2:=EMA(OBV1,3)-MA(OBV1,9){XG51};
OBV3:=EMA(IF(OBV2>0,OBV2,0),3){XG51};
MAC3:=MA(C,3){XG51};
STICKLINE(OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),0,DEA/4,2,0),COLORBLUE{XG51};
{X!G_5?1!C!N!{};