通达信MACD建仓买点选股指标公式源码

通达信MACD建仓买点选股指标公式源码

源码正文：

M:=7{XG51};
M1:=3{XG51};
difF:= ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORWHITE{XG51};
LC:=REF(CLOSE,1){XG51};
rsi5:=((SMA(MAX((CLOSE-LC),0),5,1)/SMA(Abs((CLOSE-LC)),5,1))*100){XG51};
DEA:EMA(DIF,9),COLORYELLOW{XG51};
macd:2*(DIF-DEA),COLORstICK{XG51};
TR1:=SUM(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,
1)))),ABS((LOW-REF(CLOSE,1)))),10){XG51};
HD:=(HIGH-REF(HIGH,1)){XG51};
FH1:=REF(MacD,1)<REF(MACD,2) AND REF(MACD,
2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4){XG51};
FH2:=MACD>=0 AND COUNT(MACD>REF(MACD,1),1)=1{XG51};
LD:=(REF(LOW,1)-LOW){XG51};
DMP:=SUM(IF(((HD>0) AND (HD>LD)),HD,0),10){XG51};
DMM:=SUM(IF(((LD>0) AND (LD>HD)),LD,0),10){XG51};
FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1){XG51};
FH4:=FH1 AND FH2 AND ABS((DIF-DEA)/C)<0.018{XG51};
FH5:=FH1 AND FH2 AND MACD<0.10{XG51};
pdi:=((DMP*100)/TR1){XG51};
mdi:=((DMM*100)/TR1){XG51};
VV:=CLOSE>OPEN AND MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,
30) AND DIFF>DEA AND MACD>REF(MACD,1) AND DIFF>0 AND DEA>0 AND MA(vol,
5)>MA(VOL,34) AND MA(CLOSE,30)>=REF(MA(CLOSE,30),1){XG51};
ADX:=MA(((ABS((MDI-PDI))/(MDI+PDI))*100),5){XG51};
AV:=(RSI5+ADX){XG51};
佛手:IF(VV,1,0),NODRAW{XG51};
DRAWICON(佛手,0.06,11){XG51};
二次翻红:(FH3 OR FH4 OR FH5),COLORWHITE,NODRAW{XG51};
DXR:=(((ADX+REF(ADX,5))/2)+RSI5){XG51};
wr10:=((100*(HHV(HIGH,10)-CLOSE))/(HHV(HIGH,10)-LLV(LOW,10))){XG51};
低买:crOSS(DIF,DEA) AND DIF<0,COLORFF00FF,NODRAW{XG51};
加油:CROSS(DIF,DEA) AND DIF>0,COLORBLUE,NODRAW{XG51};
NEWVOL:=(RSI5-WR10){XG51};
最佳买入:=(AV+NEWVOL){XG51};
DRAWICON(二次翻红,-0.05,1){XG51};
DRAWTEXT(二次翻红,-0.15,'翻红'),COLORWHITE{XG51};
买入选股:IF(CROSS(最佳买入,0),3,0),STICK,COLOR00FFFF,LINETHICK2{XG51};
VARA1:=SMA(买入选股,3,1){XG51};
DRAWTEXT(CROSS(DIF,DEA) AND DIF<0,DEA-0.02,'低买'),COLORFF00FF{XG51};
DRAWTEXT(CROSS(DIF,DEA) AND DIF>0,DEA-0.05,'加油'),COLORBLUE{XG51};
XG:二次翻红 OR 低买 OR 加油,NODRAW{XG51};
VARA2:=SMA(VARA1,3,1),COLOR0000FF{XG51};
VARA3:=SMA(VARA2,3,1),COLOR00FFFF{XG51};
YLZC:=IF(CLOSE=INDEXC,(INDEXC+INDEXH+INDEXL+INDEXO)/4,AMOUNT/(VOL+0.01)/100){XG51};
阻价:=IF(CLOSE=INDEXC,YLZC+INDEXC-INDEXL,YLZC+(CLOSE-LOW)){XG51};
支价:=IF(CLOSE=INDEXC,INDEXL+INDEXC-YLZC,LOW+(CLOSE-YLZC)){XG51};
建仓买点:IF(CROSS(VARA2,VARA3) AND (VARA2<40),3,0* 10000),COLOR0000FF,LINETHICK1{XG51};
今压:REF(阻价,1),LINETHICK0,COLORAA11BB,NODRAW{XG51};
今撑:REF(支价,1),LINETHICK0,COLOR009900,NODRAW{XG51};
STICKLINE(建仓买点,0,1.0,6,0),COLORFF80FF{XG51};
STICKLINE(建仓买点,0.5,2.0,2,0),COLOR3000FF{XG51};
明压:阻价,LINETHICK0,NODRAW{XG51};
明撑:支价,LINETHICK0,NODRAW{X!G~5_1!C!N!{};